1
0
forked from GitHub/gf-core

Added transfer example: constructing reflexives.

This commit is contained in:
bringert
2006-03-13 10:53:44 +00:00
parent c5eea4b375
commit 941a9f35ba
4 changed files with 121 additions and 0 deletions

View File

@@ -0,0 +1,21 @@
import prelude ;
data Cat : Type where {
Conj : Cat ;
NP : Cat ;
S : Cat ;
V2 : Cat
} ;
data Tree : Cat -> Type where {
And : Tree Conj ;
Bill : Tree NP ;
ConjNP : Tree Conj -> Tree NP -> Tree NP -> Tree NP ;
John : Tree NP ;
Mary : Tree NP ;
Or : Tree Conj ;
PredV2 : Tree V2 -> Tree NP -> Tree NP -> Tree S ;
ReflV2 : Tree V2 -> Tree NP -> Tree S ;
See : Tree V2 ;
Whip : Tree V2
} ;
derive Eq Tree ;
derive Compos Tree ;