started regulus grammar implementation

This commit is contained in:
aarne
2007-06-10 19:55:45 +00:00
parent fb730a75b5
commit 0f3d06022e
8 changed files with 175 additions and 0 deletions
+20
View File
@@ -0,0 +1,20 @@
incomplete concrete Toy0I of Toy0 = open Syntax, Lexicon in {
lincat
Spec = Det ;
Noun = N ;
NP = Syntax.NP ;
MAIN = Utt ;
lin
Main np = mkUtt np ;
SpecNoun spec noun = mkNP spec noun ;
One = mkDet one_Quant ;
Two = mkDet (mkNum n2_Numeral) ;
Felis = cat_N ;
Canis = dog_N ;
}