forked from GitHub/gf-core
new tutorial example
This commit is contained in:
23
doc/tutorial/Food2Eng.gf
Normal file
23
doc/tutorial/Food2Eng.gf
Normal file
@@ -0,0 +1,23 @@
|
||||
concrete Food2Eng of Food = open StringOper in {
|
||||
|
||||
lincat
|
||||
S, Item, Kind, Quality = SS ;
|
||||
|
||||
lin
|
||||
Is item quality = cc item (prefix "is" quality) ;
|
||||
This = prefix "this" ;
|
||||
That = prefix "that" ;
|
||||
QKind = cc ;
|
||||
Wine = ss "wine" ;
|
||||
Cheese = ss "cheese" ;
|
||||
Fish = ss "fish" ;
|
||||
Very = prefix "very" ;
|
||||
Fresh = ss "fresh" ;
|
||||
Warm = ss "warm" ;
|
||||
Italian = ss "Italian" ;
|
||||
Expensive = ss "expensive" ;
|
||||
Delicious = ss "delicious" ;
|
||||
Boring = ss "boring" ;
|
||||
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user