1
0
forked from GitHub/gf-core
Files
gf-core/gf-book/examples/chapter4/FoodsEng.gf
2011-01-11 15:46:43 +00:00

17 lines
467 B
Plaintext

--# -path=.:present
concrete FoodsEng of Foods = CommentsEng **
open SyntaxEng, ParadigmsEng in {
lin
Wine = mkCN (mkN "wine") ;
Pizza = mkCN (mkN "pizza") ;
Cheese = mkCN (mkN "cheese") ;
Fish = mkCN (mkN "fish" "fish") ;
Fresh = mkAP (mkA "fresh") ;
Warm = mkAP (mkA "warm") ;
Italian = mkAP (mkA "Italian") ;
Expensive = mkAP (mkA "expensive") ;
Delicious = mkAP (mkA "delicious") ;
Boring = mkAP (mkA "boring") ;
}