summaryrefslogtreecommitdiff
path: root/examples/query/LexQueryEng.gf
diff options
context:
space:
mode:
Diffstat (limited to 'examples/query/LexQueryEng.gf')
-rw-r--r--examples/query/LexQueryEng.gf32
1 files changed, 32 insertions, 0 deletions
diff --git a/examples/query/LexQueryEng.gf b/examples/query/LexQueryEng.gf
new file mode 100644
index 000000000..74b3c860c
--- /dev/null
+++ b/examples/query/LexQueryEng.gf
@@ -0,0 +1,32 @@
+instance LexQueryEng of LexQuery =
+ open SyntaxEng, (M = MakeStructuralEng), ParadigmsEng, ExtraEng, IrregEng in {
+
+oper
+ located_A : A = mkA "located" | mkA "situated" ;
+
+ give_V3 : V3 = mkV3 give_V ;
+ know_V2 = mkV2 know_V ;
+
+-- structural words
+ about_Prep : Prep = mkPrep "about" ;
+ all_NP : NP = mkNP (mkPN "all") ; ---
+ also_AdV : AdV = mkAdV "also" ;
+ also_AdA : AdA = mkAdA "also" ;
+ as_Prep : Prep = mkPrep "as" ;
+ at_Prep : Prep = mkPrep "at" ;
+ that_RP = ExtraEng.that_RP ;
+
+ participlePropCN : Prop -> CN -> CN = \p,k -> mkCN p.ap k ;
+
+ vpAP = PartVP ;
+
+ called_A : A = mkA "called" | mkA "named" ;
+
+ information_N : N = mkN "information" ;
+ other_A : A = mkA "other" ;
+ otherwise_AdV : AdV = mkAdV "otherwise" ;
+ otherwise_AdA : AdA = mkAdA "otherwise" ;
+ what_IQuant : IQuant = M.mkIQuant "what" "what" ;
+
+
+}