diff options
| author | aarne <aarne@chalmers.se> | 2011-09-19 14:37:30 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2011-09-19 14:37:30 +0000 |
| commit | a96e90a4ae0f05092f9009467d5afcde6f2962f6 (patch) | |
| tree | 766b94b6a83f252e33c58c17b36c70dece253907 /examples/query/small/QuerySwe.gf | |
| parent | 343e852bfe9ef4c63d25742054f6e9463a78d1ac (diff) | |
QueryFin improved
Diffstat (limited to 'examples/query/small/QuerySwe.gf')
| -rw-r--r-- | examples/query/small/QuerySwe.gf | 18 |
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} ; - } |