From 3ce9a4fd89732018d058a1e0fe1cd0752c67b435 Mon Sep 17 00:00:00 2001
From: aarne <aarne@cs.chalmers.se>
Date: Thu, 20 Apr 2006 21:04:04 +0000
Subject: [PATCH] finnish peacekeeping

---
 examples/peacekeeping/finnish/PeaceCat_Fin.gf |  3 ++
 .../finnish/PeaceLexCommon_Fin.gf             |  5 +++
 .../peacekeeping/finnish/PeaceLexExt_Fin.gf   | 37 +++++++++++++++++++
 .../peacekeeping/finnish/PeaceSyntax_Fin.gf   |  5 +++
 examples/peacekeeping/finnish/Peace_Fin.gf    |  3 ++
 5 files changed, 53 insertions(+)
 create mode 100644 examples/peacekeeping/finnish/PeaceCat_Fin.gf
 create mode 100644 examples/peacekeeping/finnish/PeaceLexCommon_Fin.gf
 create mode 100644 examples/peacekeeping/finnish/PeaceLexExt_Fin.gf
 create mode 100644 examples/peacekeeping/finnish/PeaceSyntax_Fin.gf
 create mode 100644 examples/peacekeeping/finnish/Peace_Fin.gf

diff --git a/examples/peacekeeping/finnish/PeaceCat_Fin.gf b/examples/peacekeeping/finnish/PeaceCat_Fin.gf
new file mode 100644
index 000000000..78da43ba7
--- /dev/null
+++ b/examples/peacekeeping/finnish/PeaceCat_Fin.gf
@@ -0,0 +1,3 @@
+--# -path=.:present:prelude
+
+concrete PeaceCat_Fin of PeaceCat = CatFin ** PeaceCatI with (Cat = CatFin);
diff --git a/examples/peacekeeping/finnish/PeaceLexCommon_Fin.gf b/examples/peacekeeping/finnish/PeaceLexCommon_Fin.gf
new file mode 100644
index 000000000..aad047909
--- /dev/null
+++ b/examples/peacekeeping/finnish/PeaceLexCommon_Fin.gf
@@ -0,0 +1,5 @@
+--# -path=.:present:prelude
+
+concrete PeaceLexCommon_Fin of PeaceLexCommon = 
+  PeaceCat_Fin ** PeaceLexCommonI with (Lang = LangFin) ;
+
diff --git a/examples/peacekeeping/finnish/PeaceLexExt_Fin.gf b/examples/peacekeeping/finnish/PeaceLexExt_Fin.gf
new file mode 100644
index 000000000..45b015166
--- /dev/null
+++ b/examples/peacekeeping/finnish/PeaceLexExt_Fin.gf
@@ -0,0 +1,37 @@
+--# -path=.:present:prelude
+
+concrete PeaceLexExt_Fin of PeaceLexExt = 
+  PeaceCat_Fin ** open ParadigmsFin in {
+
+  lin
+
+    -- Adjectives
+    dangerous_A = regA "vaarallinen" ;
+    dead_A = mkA (nRae "kuollut" "kuolleena") ;
+    hungry_A = regA "nälkäinen" ;
+    large_A = regA "iso" ;
+    sick_A = regA "sairas" ;
+
+    -- Nouns
+    air_N = regN "ilma" ;
+    arm_N = reg3N "käsi" "käden" "käsiä" ;
+    building_N = regN "rakennus" ;
+    car_N = regN "auto" ;
+    corpse_N = regN "ruumis" ;
+    doctor_N = regN "lääkäri";
+    enemy_N = regN "vihollinen";
+    food_N = regN "ruoka";
+    friend_N = regN "ystävä";
+    landmine_N = regN "maamiina" ;
+    medicine_N = regN "lääke" ;
+    skin_N = regN "iho" ;
+    soldier_N = regN "sotilas" ;
+    weapon_N = regN "ase";
+
+    -- Verbs
+    cough_V = regV "yskiä" ;
+    need_V2 = dirV2 (regV "tarvita");
+    own_V2 = dirV2 (regV "omistaa") ;
+    show_V3 = dirdirV3 (regV "näyttää") ;
+
+}
diff --git a/examples/peacekeeping/finnish/PeaceSyntax_Fin.gf b/examples/peacekeeping/finnish/PeaceSyntax_Fin.gf
new file mode 100644
index 000000000..80bd821c4
--- /dev/null
+++ b/examples/peacekeeping/finnish/PeaceSyntax_Fin.gf
@@ -0,0 +1,5 @@
+--# -path=.:present:prelude
+
+concrete PeaceSyntax_Fin of PeaceSyntax = PeaceCat_Fin ** PeaceSyntaxI with
+  (Lang = LangFin) ;
+
diff --git a/examples/peacekeeping/finnish/Peace_Fin.gf b/examples/peacekeeping/finnish/Peace_Fin.gf
new file mode 100644
index 000000000..b3e39a014
--- /dev/null
+++ b/examples/peacekeeping/finnish/Peace_Fin.gf
@@ -0,0 +1,3 @@
+--# -path=.:..:present:prelude
+
+concrete Peace_Fin of Peace = PeaceSyntax_Fin, PeaceLexCommon_Fin, PeaceLexExt_Fin ** {}