ExtFoods for book

1 files changed, 34 insertions, 0 deletions

diff --git a/examples/tutorial/resource-foods/ExtFoods.gf b/examples/tutorial/resource-foods/ExtFoods.gf
new file mode 100644
index 000000000..fa417190e
--- /dev/null
+++ b/examples/tutorial/resource-foods/ExtFoods.gf
@@ -0,0 +1,34 @@
+abstract ExtFoods = Foods ** {
+
+  flags startcat=Move ;
+
+  cat
+    Move ;
+    Verb ;
+    Guest ;
+    GuestKind ;
+
+  fun
+    MAssert : Phrase -> Move ;    
+    MDeny : Phrase -> Move ;    
+    MAsk : Phrase -> Move ;
+
+    PVerb : Guest -> Verb -> Item -> Phrase ;
+    PVerbWant : Guest -> Verb -> Item -> Phrase ;
+
+    WhichVerb : Kind -> Guest -> Verb -> Move ;
+    WhichVerbWant : Kind -> Guest -> Verb -> Move ;
+    WhichIs : Kind -> Quality -> Move ;
+
+    Do : Verb -> Item -> Move ;
+    DoPlease : Verb -> Item -> Move ;
+
+    I, You, We : Guest ;
+
+    GThis, GThat, GThese, GThose : GuestKind -> Guest ;
+    
+    Eat, Drink, Pay : Verb ;
+
+    Lady, Gentleman : GuestKind ;
+    
+}