summaryrefslogtreecommitdiff
path: root/gf-book/examples/chapter2/FoodEng.gf
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2011-01-11 15:46:43 +0000
committeraarne <aarne@chalmers.se>2011-01-11 15:46:43 +0000
commite7439d65b0e153434d3acc07df6e2a0972ee79ca (patch)
tree36716eec18256eeb600b4a552d9cc80f8ad7f16f /gf-book/examples/chapter2/FoodEng.gf
parent276327f7f264e770478a6d8c6e683266505b0a55 (diff)
gf-book web page index and toc
Diffstat (limited to 'gf-book/examples/chapter2/FoodEng.gf')
-rw-r--r--gf-book/examples/chapter2/FoodEng.gf19
1 files changed, 19 insertions, 0 deletions
diff --git a/gf-book/examples/chapter2/FoodEng.gf b/gf-book/examples/chapter2/FoodEng.gf
new file mode 100644
index 000000000..f2ed510fe
--- /dev/null
+++ b/gf-book/examples/chapter2/FoodEng.gf
@@ -0,0 +1,19 @@
+concrete FoodEng of Food = {
+ lincat
+ Comment, Item, Kind, Quality = Str ;
+ lin
+ Pred item quality = item ++ "is" ++ quality ;
+ This kind = "this" ++ kind ;
+ That kind = "that" ++ kind ;
+ Mod quality kind = quality ++ kind ;
+ Wine = "wine" ;
+ Cheese = "cheese" ;
+ Fish = "fish" ;
+ Very quality = "very" ++ quality ;
+ Fresh = "fresh" ;
+ Warm = "warm" ;
+ Italian = "Italian" ;
+ Expensive = "expensive" ;
+ Delicious = "delicious" ;
+ Boring = "boring" ;
+}