diff options
Diffstat (limited to 'doc/tutorial/FoodsEng.gf')
| -rw-r--r-- | doc/tutorial/FoodsEng.gf | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/doc/tutorial/FoodsEng.gf b/doc/tutorial/FoodsEng.gf index 1899c0e96..ee3857166 100644 --- a/doc/tutorial/FoodsEng.gf +++ b/doc/tutorial/FoodsEng.gf @@ -1,4 +1,4 @@ ---# -path=.:prelude +--# -path=.:resource:prelude concrete FoodsEng of Foods = open Prelude, MorphoEng in { @@ -9,14 +9,15 @@ concrete FoodsEng of Foods = open Prelude, MorphoEng in { lin Is item quality = ss (item.s ++ (mkVerb "are" "is").s ! item.n ++ quality.s) ; - This = det Sg "this" ; - That = det Sg "that" ; - All = det Pl "all" ; - Most = det Pl "most" ; + This = det Sg "this" ; + That = det Sg "that" ; + These = det Pl "these" ; + Those = det Pl "those" ; QKind quality kind = {s = \\n => quality.s ++ kind.s ! n} ; Wine = regNoun "wine" ; Cheese = regNoun "cheese" ; Fish = mkNoun "fish" "fish" ; + Pizza = regNoun "pizza" ; Very = prefixSS "very" ; Fresh = ss "fresh" ; Warm = ss "warm" ; |