summaryrefslogtreecommitdiff
path: root/examples/query/small/QuerySwe.gf
diff options
context:
space:
mode:
Diffstat (limited to 'examples/query/small/QuerySwe.gf')
-rw-r--r--examples/query/small/QuerySwe.gf18
1 files changed, 2 insertions, 16 deletions
diff --git a/examples/query/small/QuerySwe.gf b/examples/query/small/QuerySwe.gf
index 17f89352c..1dde65a3a 100644
--- a/examples/query/small/QuerySwe.gf
+++ b/examples/query/small/QuerySwe.gf
@@ -117,21 +117,11 @@ oper
-- lexicon
lincat
- Country = {np : NP ; a : A} ;
JobTitle = CN ;
lin
- NCountry c = c.np ;
- PCountry c = mkAP c.a ;
+ Located i = mkAP (mkA2 (mkA "belägen" "beläget") in_Prep) i ;
- Located i =
- mkAP (mkA2 (mkA "belägen" "beläget") in_Prep) i ;
--- | mkAP (mkA2 (mkA "situated") in_Prep) i ;
-
- Employed i =
- mkAP (mkA2 (mkA "anställd") by8agent_Prep) i
--- | mkAP (mkA2 (mkA "paid") by8agent_Prep) i
--- | mkAP (mkA2 (mkA "aktiv") at_Prep) i
- | mkAP (mkA2 (mkA "professionellt aktiv") at_Prep) i ;
+ Employed i = mkAP (mkA2 (mkA "anställd") by8agent_Prep) i ;
Work i =
mkVP (mkV2 (mkV "jobba") at_Prep) i
@@ -178,8 +168,4 @@ lin
Person3 = mkName "'Person3" ;
Person4 = mkName "'Person4" ;
-oper
- mkCountry : Str -> Str -> {np : NP ; a : A} =
- \n,a -> {np = mkNP (mkPN n neutrum) ; a = mkA a} ;
-
}