From 8bffe71cd4af103faaa4276df086aa1b7546844e Mon Sep 17 00:00:00 2001 From: aarne Date: Wed, 20 Oct 2010 16:22:23 +0000 Subject: functorized Query and added Swe --- examples/query/LexQueryEng.gf | 32 ++++++++++++++++++++++++++++++++ 1 file changed, 32 insertions(+) create mode 100644 examples/query/LexQueryEng.gf (limited to 'examples/query/LexQueryEng.gf') 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" ; + + +} -- cgit v1.2.3