summaryrefslogtreecommitdiff
path: root/examples/query/LexQuerySwe.gf
blob: 733f2e9597a39a5f2186271efb9bca9efeae785a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
instance LexQuerySwe of LexQuery = 
  open SyntaxSwe, (M = MakeStructuralSwe), ParadigmsSwe, ExtraSwe, IrregSwe in {

oper
  located_A : A = compoundA (mkA "belägen" "beläget" "belägna" [] []) ;

  giveMe : NP -> VP = \np -> mkVP (mkV3 giva_V) (mkNP i_Pron) np ; 
  know_V2 = mkV2 veta_V ;

-- structural words
  about_Prep : Prep = mkPrep "om" ;
  all_NP : NP = mkNP (mkPN "allt") ; ---
  also_AdV : AdV = mkAdV "också" ;
  also_AdA : AdA = mkAdA "även" ;
  as_Prep : Prep = mkPrep "för" ; --- only used for "vad har X för Y"
  at_Prep : Prep = mkPrep "på" ; --- | mkPrep "hos" | mkPrep "vid" ;
  that_RP = which_RP ;

  participlePropCN : Prop -> CN -> CN = variants {} ;

  vpAP _ = mkAP (mkA "obefintlig") ; --- not used, see LexQuery.participlePropCN

  called_A : A = compoundA (mkA "kallad" "kallat" "kallade" "kallade" "kallade") ;

  information_N : N = mkN "information" "informationer" ;
  other_A : A = compoundA (mkA "annan" "annat" "andra" "andra" "andra") ;
  otherwise_AdV : AdV = mkAdV "annars" ;
  otherwise_AdA : AdA = mkAdA "annars" ;
  what_IQuant : IQuant = which_IQuant ;


}