mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-21 09:02:50 -06:00
Added aggregation example.
This commit is contained in:
20
transfer/examples/aggregation/tree.tr
Normal file
20
transfer/examples/aggregation/tree.tr
Normal file
@@ -0,0 +1,20 @@
|
||||
data Cat : Type where {
|
||||
Conj : Cat ;
|
||||
NP : Cat ;
|
||||
S : Cat ;
|
||||
VP : Cat
|
||||
} ;
|
||||
data Tree : (_ : Cat)-> Type where {
|
||||
And : Tree Conj ;
|
||||
Bill : Tree NP ;
|
||||
ConjNP : (_ : Tree Conj)-> (_ : Tree NP)-> (_ : Tree NP)-> Tree NP ;
|
||||
ConjS : (_ : Tree Conj)-> (_ : Tree S)-> (_ : Tree S)-> Tree S ;
|
||||
ConjVP : (_ : Tree Conj)-> (_ : Tree VP)-> (_ : Tree VP)-> Tree VP ;
|
||||
John : Tree NP ;
|
||||
Mary : Tree NP ;
|
||||
Or : Tree Conj ;
|
||||
Pred : (_ : Tree NP)-> (_ : Tree VP)-> Tree S ;
|
||||
Run : Tree VP ;
|
||||
Swim : Tree VP ;
|
||||
Walk : Tree VP
|
||||
}
|
||||
Reference in New Issue
Block a user