demo restaurant info

2007-10-12 13:46:57 +00:00
parent 530174aad1
commit 96ed0bf4ac
11 changed files with 116 additions and 0 deletions
--- a/examples/restaurant/RestaurantI.gf
+++ 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 ;
+
+
+}