msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

started a subdir for the book

Browse Source
This commit is contained in:
aarne
2010-11-22 12:55:37 +00:00
parent 0bf4179369
commit 76ba03b545
97 changed files with 2026 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
book/examples/chapter2/FoodEng.gf Normal file
View File

@@ -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" ;
}