summaryrefslogtreecommitdiff
path: root/examples/animals/QuestionsI.gf
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2010-01-27 17:51:15 +0000
committeraarne <aarne@chalmers.se>2010-01-27 17:51:15 +0000
commit750a2639b0f46153c36f6c713f522db5bb2d8587 (patch)
treeeb021744f904a0e62b44d4012bea27368651faad /examples/animals/QuestionsI.gf
parent890d45579300f39d50a5a18a9f6feed8634ae8ba (diff)
command eb for example-based grammar conversion; see 'help eb' and the example in examples/animals/QuestionsI.gfe
Diffstat (limited to 'examples/animals/QuestionsI.gf')
-rw-r--r--examples/animals/QuestionsI.gf27
1 files changed, 27 insertions, 0 deletions
diff --git a/examples/animals/QuestionsI.gf b/examples/animals/QuestionsI.gf
new file mode 100644
index 000000000..30476ccdb
--- /dev/null
+++ b/examples/animals/QuestionsI.gf
@@ -0,0 +1,27 @@
+-- to compile: echo "eb -file=QuestionsI.gfe" | gf $GF_LIB_PATH/present/LangEng.gfo
+-- or use directly gf <mkAnimals.gfs
+
+incomplete concrete QuestionsI of Questions = open Lang in {
+ lincat
+ Phrase = Utt ;
+ Entity = N ;
+ Action = V2 ;
+
+ lin
+ Who love_V2 man_N = (
+UttQS (UseQCl (TTAnt TPres ASimul) PPos (QuestVP whoSg_IP (ComplSlash (SlashV2a love_V2) (DetCN (DetQuant IndefArt NumPl) (UseN man_N)))))
+)
+ ;
+ Whom man_N love_V2 = (
+UttQS (UseQCl (TTAnt TPres ASimul) PPos (QuestSlash whoPl_IP (SlashVP (DetCN (DetQuant DefArt NumSg) (UseN man_N)) (SlashV2a love_V2))))
+ --- UttQS (UseQCl (TTAnt TPres ASimul) PPos (QuestSlash whoSg_IP (SlashVP (DetCN (DetQuant DefArt NumSg) (UseN man_N)) (SlashV2a love_V2))))
+)
+ ;
+ Answer woman_N love_V2 man_N = (
+UttNP (DetCN (DetQuant DefArt NumSg) (ApposCN (ApposCN (UseN woman_N) (DetCN (DetQuant IndefArt NumPl) (UseN love_N))) (DetCN (DetQuant IndefArt NumPl) (UseN man_N))))
+ --- UttNP (DetCN (DetQuant DefArt NumSg) (ApposCN (UseN woman_N) (DetCN (DetQuant IndefArt NumPl) (ApposCN (UseN love_N) (DetCN (DetQuant IndefArt NumPl) (UseN man_N))))))
+ --- UttS (UseCl (TTAnt TPres ASimul) PPos (PredVP (DetCN (DetQuant DefArt NumSg) (UseN woman_N)) (ComplSlash (SlashV2a love_V2) (DetCN (DetQuant IndefArt NumPl) (UseN man_N)))))
+)
+ ;
+
+}