diff options
| author | aarne <aarne@cs.chalmers.se> | 2007-10-12 13:46:57 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2007-10-12 13:46:57 +0000 |
| commit | 96ed0bf4ac7e2898f6f8de82cacecb69d1e94684 (patch) | |
| tree | ff4759c241902dabc0198fafcfe76943bf52b328 /examples/restaurant/RestaurantI.gf | |
| parent | 530174aad1d5afecd050a5fe9be83d73e14b2d2a (diff) | |
demo restaurant info
Diffstat (limited to 'examples/restaurant/RestaurantI.gf')
| -rw-r--r-- | examples/restaurant/RestaurantI.gf | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/examples/restaurant/RestaurantI.gf b/examples/restaurant/RestaurantI.gf new file mode 100644 index 000000000..c84a738ce --- /dev/null +++ b/examples/restaurant/RestaurantI.gf @@ -0,0 +1,21 @@ +incomplete concrete RestaurantI of Restaurant = open Syntax, LexRestaurant in { + +lincat + Descr = Phr ; + Name = NP ; + Nationality = A ; + PriceLevel = A ; + +lin + MkDescr name price nat = + mkPhr (mkCl name (mkNP indefSgDet (mkCN price (mkCN nat (mkCN restaurant_N))))) ; + + Cheap = cheap_A ; + Italian = italian_A ; + Thai = thai_A ; + Swedish = swedish_A ; + French = french_A ; + Konkanok = mkNP konkanok_PN ; + + +} |