gf-book/examples/chapter4/FoodsIta.gf


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

--# -path=.:present

concrete FoodsIta of Foods = CommentsIta ** 
    open SyntaxIta, ParadigmsIta in {
  lin
    Wine = mkCN (mkN "vino") ;
    Pizza = mkCN (mkN "pizza") ;
    Cheese = mkCN (mkN "formaggio") ;
    Fish = mkCN (mkN "pesce") ;
    Fresh = mkAP (mkA "fresco") ;
    Warm = mkAP (mkA "caldo") ;
    Italian = mkAP (mkA "italiano") ;
    Expensive = mkAP (mkA "caro") ;
    Delicious = mkAP (mkA "delizioso") ;
    Boring = mkAP (mkA "noioso") ;
}