Added peacekeeping example back in. Doesn't compile yet.

1 files changed, 48 insertions, 0 deletions

diff --git a/examples/peacekeeping/swedish/PeaceLexExt_Swe.gf b/examples/peacekeeping/swedish/PeaceLexExt_Swe.gf
new file mode 100644
index 000000000..5f40fc6b6
--- /dev/null
+++ b/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") ;
+
+}