From 3737b9926696b70bdecdef3d38d1a1f9399c734a Mon Sep 17 00:00:00 2001
From: aarne <aarne@cs.chalmers.se>
Date: Thu, 16 Aug 2007 20:12:45 +0000
Subject: foods example moved and completed

---
 examples/tutorial/foods/Foods.gf | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100644 examples/tutorial/foods/Foods.gf

(limited to 'examples/tutorial/foods/Foods.gf')

diff --git a/examples/tutorial/foods/Foods.gf b/examples/tutorial/foods/Foods.gf
new file mode 100644
index 000000000..9337e234a
--- /dev/null
+++ b/examples/tutorial/foods/Foods.gf
@@ -0,0 +1,14 @@
+abstract Foods = {
+
+  cat
+    S ; Item ; Kind ; Quality ;
+
+  fun
+    Is : Item -> Quality -> S ;
+    This, That, These, Those : Kind -> Item ;
+    QKind : Quality -> Kind -> Kind ;
+    Wine, Cheese, Fish, Pizza : Kind ;
+    Very : Quality -> Quality ;
+    Fresh, Warm, Italian, Expensive, Delicious, Boring : Quality ;
+
+}
\ No newline at end of file
-- 
cgit v1.2.3