mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-22 11:19:32 -06:00
factored Query by taking our Proton parts and introducing an interface
This commit is contained in:
26
examples/query/small/patentsQuery/LexQueryEng.gf
Normal file
26
examples/query/small/patentsQuery/LexQueryEng.gf
Normal file
@@ -0,0 +1,26 @@
|
||||
instance LexQueryEng of LexQuery = open ParadigmsEng, SyntaxEng, ExtraEng, IrregEng in {
|
||||
|
||||
oper
|
||||
-- structural words
|
||||
about_Prep = mkPrep "about" ;
|
||||
all_NP = mkNP (mkPN "all") ; ---
|
||||
also_AdV = mkAdV "also" | mkAdV "otherwise" ;
|
||||
as_Prep = mkPrep "as" ;
|
||||
at_Prep = mkPrep "at" ;
|
||||
called_A = mkA "called" | mkA "named" ;
|
||||
give_V3 = mkV3 give_V ;
|
||||
information_N = mkN "information" ;
|
||||
other_A = mkA "other" ;
|
||||
name_N = mkN "name" ;
|
||||
|
||||
-- lexical constructors
|
||||
mkName : Str -> NP =
|
||||
\s -> mkNP (mkPN s) ;
|
||||
|
||||
oper
|
||||
mkRelation : Str -> {cn : CN ; prep : Prep} =
|
||||
\s -> {cn = mkCN (mkN s) ; prep = possess_Prep} ;
|
||||
|
||||
that_RP = ExtraEng.that_RP ;
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user