Files
gf-core/examples/regulus/toy0/no-functor/Toy0Fin.gf
2007-06-27 12:50:42 +00:00

17 lines
315 B
Plaintext

--# -path=.:present:prelude
concrete Toy0Fin of Toy0 = open SyntaxFin, ParadigmsFin in {
lincat
Spec = Det ;
Noun = N ;
NP = Utt ;
lin
SpecNoun spec noun = mkUtt (SyntaxFin.mkNP spec noun) ;
One = mkDet one_Quant ;
Two = mkDet (mkNum n2_Numeral) ;
Felis = mkN "kissa" ;
Canis = mkN "koira" ;
}