summaryrefslogtreecommitdiff
path: root/old-examples/peacekeeping/swedish/PeaceLexExt_Swe.gf
diff options
context:
space:
mode:
Diffstat (limited to 'old-examples/peacekeeping/swedish/PeaceLexExt_Swe.gf')
-rw-r--r--old-examples/peacekeeping/swedish/PeaceLexExt_Swe.gf48
1 files changed, 48 insertions, 0 deletions
diff --git a/old-examples/peacekeeping/swedish/PeaceLexExt_Swe.gf b/old-examples/peacekeeping/swedish/PeaceLexExt_Swe.gf
new file mode 100644
index 000000000..5f40fc6b6
--- /dev/null
+++ b/old-examples/peacekeeping/swedish/PeaceLexExt_Swe.gf
@@ -0,0 +1,48 @@
+--# -path=.:present:prelude
+
+concrete PeaceLexExt_Swe of PeaceLexExt =
+ PeaceCat_Swe ** open ParadigmsSwe, IrregSwe,
+ LexiconSwe, StructuralSwe in {
+
+ lin
+
+ -- Adjectives
+ dangerous_A = regA "farlig" ;
+ dead_A = regA "död" ;
+ hungry_A = regA "hungrig" ;
+ large_A = big_A ;
+ sick_A = regA "sjuk" ;
+
+ -- Nouns
+ air_N = regN "luft" ;
+ arm_N = regN "arm" ;
+ building_N = mk2N "byggnad" "byggnader" ;
+ car_N = regN "bil" ;
+ corpse_N = mk2N "lik" "lik" ;
+ doctor_N = mkN "doktor" "doktorn" "doktorer" "doktorerna";
+ enemy_N = mk2N "fiende" "fiender" ;
+ face_N = regN "ansikte" ;
+ food_N = regN "mat";
+ friend_N = mkN "vän" "vännen" "vänner" "vännerna" ;
+ ground_N = mk2N "mark" "marker";
+ knife_N = regN "kniv" ;
+ landmine_N = regN "landmina" ;
+ map_N = regN "karta" ;
+ medicine_N = mk2N "medicin" "mediciner";
+ police8officer_N = mk2N "polis" "poliser" ;
+ skin_N = mk2N "skinn" "skinn" ;
+ soldier_N = mk2N "soldat" "soldater" ;
+ toy_N = regN "leksak" ;
+ translation8machine_N = mk2N "översättningsmaskin" "översättningsmaskiner";
+ weapon_N = mkN "vapen" "vapnet" "vapen" "vapnen" ;
+
+ -- Verbs
+ cooperate_V2 = mkV2 (regV "samarbetar") (mkPrep "med") ;
+ cough_V = regV "hostar" ;
+ drop_V2 = dirV2 (regV "släpper") ;
+ hurt_V = partV göra_V "ont" ; -- FIXME: "Gör ont ditt ben?"
+ need_V2 = dirV2 (regV "behöver");
+ own_V2 = dirV2 (regV "äger") ;
+ show_V3 = dirdirV3 (regV "visar") ;
+
+}