diff options
| author | aarne <aarne@cs.chalmers.se> | 2008-06-17 13:16:15 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2008-06-17 13:16:15 +0000 |
| commit | 23b8136af27b0baaa8fcb5272a613d5f2ee447fa (patch) | |
| tree | 2e7cd2930b7e8b6b0d911c00ec2d279b882f4893 /examples-3.0/tutorial/resource-foods/ExtFoods.gf | |
| parent | 7c097669d2c3934622c57f6e2f4ddee8826953d3 (diff) | |
started examples-3.0 with examples that are tested to work
Diffstat (limited to 'examples-3.0/tutorial/resource-foods/ExtFoods.gf')
| -rw-r--r-- | examples-3.0/tutorial/resource-foods/ExtFoods.gf | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/examples-3.0/tutorial/resource-foods/ExtFoods.gf b/examples-3.0/tutorial/resource-foods/ExtFoods.gf new file mode 100644 index 000000000..22b65a3c0 --- /dev/null +++ b/examples-3.0/tutorial/resource-foods/ExtFoods.gf @@ -0,0 +1,35 @@ +abstract ExtFoods = Foods ** { + + flags startcat=Move ; + + cat + Move ; -- declarative, question, or imperative + Verb ; -- transitive verb + Guest ; -- guest in restaurant + GuestKind ; -- type of guest + + fun + MAssert : Phrase -> Move ; -- This pizza is warm. + MDeny : Phrase -> Move ; -- This pizza isn't warm. + MAsk : Phrase -> Move ; -- Is this pizza warm? + + PVerb : Guest -> Verb -> Item -> Phrase ; -- we eat this pizza + PVerbWant : Guest -> Verb -> Item -> Phrase ; -- we want to eat this pizza + + WhichVerb : Kind -> Guest -> Verb -> Move ; -- Which pizza do you eat? + WhichVerbWant : Kind -> Guest -> Verb -> Move ; + -- Which pizza do you want to eat? + WhichIs : Kind -> Quality -> Move ; -- Which wine is Italian? + + Do : Verb -> Item -> Move ; -- Pay this wine! + DoPlease : Verb -> Item -> Move ; -- Pay this wine please! + + I, You, We : Guest ; + + GThis, GThat, GThese, GThose : GuestKind -> Guest ; + + Eat, Drink, Pay : Verb ; + + Lady, Gentleman : GuestKind ; + +} |
