forked from GitHub/gf-core
changed names of resource-1.3; added a note on homepage on release
This commit is contained in:
15
old-examples/regulus/toy0/no-functor/Toy0.gf
Normal file
15
old-examples/regulus/toy0/no-functor/Toy0.gf
Normal file
@@ -0,0 +1,15 @@
|
||||
-- toy0 grammar from Chapter 2 of the Regulus book
|
||||
abstract Toy0 = {
|
||||
|
||||
flags startcat=NP ;
|
||||
|
||||
cat
|
||||
NP ;
|
||||
Noun ;
|
||||
Spec ;
|
||||
|
||||
fun
|
||||
SpecNoun : Spec -> Noun -> NP ;
|
||||
One, Two : Spec ;
|
||||
Felis, Canis : Noun ;
|
||||
}
|
||||
16
old-examples/regulus/toy0/no-functor/Toy0Eng.gf
Normal file
16
old-examples/regulus/toy0/no-functor/Toy0Eng.gf
Normal file
@@ -0,0 +1,16 @@
|
||||
--# -path=.:present:api:prelude
|
||||
concrete Toy0Eng of Toy0 =
|
||||
open SyntaxEng, ParadigmsEng in {
|
||||
|
||||
flags language=en_US ;
|
||||
|
||||
lincat
|
||||
Spec = Det ; Noun = N ; NP = Utt ;
|
||||
|
||||
lin
|
||||
SpecNoun s n = mkUtt (mkNP s n) ;
|
||||
One = mkDet one_Quant ;
|
||||
Two = mkDet n2_Numeral ;
|
||||
Felis = mkN "cat" ;
|
||||
Canis = mkN "dog" ;
|
||||
}
|
||||
16
old-examples/regulus/toy0/no-functor/Toy0Fin.gf
Normal file
16
old-examples/regulus/toy0/no-functor/Toy0Fin.gf
Normal file
@@ -0,0 +1,16 @@
|
||||
--# -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" ;
|
||||
}
|
||||
Reference in New Issue
Block a user