Remove contribs and examples

Everything has now been moved to a separate repository at
https://github.com/GrammaticalFramework/gf-contrib
The contents of the examples folder are build during SetupWeb

35 files changed, 0 insertions, 773 deletions

diff --git a/examples/peacekeeping/EXAMPLES b/examples/peacekeeping/EXAMPLES
deleted file mode 100644
index 822e649eb..000000000
--- a/examples/peacekeeping/EXAMPLES
+++ /dev/null
@@ -1,66 +0,0 @@
-== Working now ==
-
-Yes.
-
-Who coughs?
-Who owns this building?
-Who needs water?
-Who gives weapons to the soldiers?
-Who gives water to the children?
-Who is hungry?
-Where do you sleep?
-Where do you see the landmine?
-Where are the weapons?
-
-The doctor sleeps.
-I see a small girl.
-Does your leg hurt?
-Soldiers don't eat corpses.
-Do you need medicine?
-We don't give weapons to dangerous soldiers.
-We give food to children.
-Are you cold?
-Landmines are dangerous.
-We are your friends.
-I am a police officer.
-This is a translation machine.
-Weapons aren't toys.
-These soldiers aren't your enemies.
-
-Walk!
-Breathe!
-Don't eat your friend!
-Drink cold water!
-Give your weapon to the soldier!
-Show me the landmine!
-Give water to the boy!
-Drop your weapon!
-Cooperate with us!
-
-== Should work ==
-
-Drink this water! (can't modify MassCN)
-Drink! (drink is V2)
-
-
-== How do we do these? ==
-
-(without overgenerating too much)
-
-Turn around!
-
-plural-/singular-only nouns: clothes, ...
-
-
-== English ==
-
-=== Variants that should work ===
-
-don't / do not
-doesn't / does not
-isn't / is not
-aren't / are not
-
-corpse / dead body
-give X to Y / give Y X
-
diff --git a/examples/peacekeeping/Makefile b/examples/peacekeeping/Makefile
deleted file mode 100644
index 3e8cc0af8..000000000
--- a/examples/peacekeeping/Makefile
+++ /dev/null
@@ -1,2 +0,0 @@
-peace.pgf: 
-	gfc --make english/Peace_Eng.gf swedish/Peace_Swe.gf
diff --git a/examples/peacekeeping/Peace.gf b/examples/peacekeeping/Peace.gf
deleted file mode 100644
index 506fdf62a..000000000
--- a/examples/peacekeeping/Peace.gf
+++ /dev/null
@@ -1,8 +0,0 @@
-abstract Peace = 
-  PeaceSyntax, PeaceLexCommon, 
-  PeaceLexExt, PeacePhrases 
-  ** {
-
-  flags startcat = PhraseWritten ; 
-
-}
\ No newline at end of file
diff --git a/examples/peacekeeping/PeaceCat.gf b/examples/peacekeeping/PeaceCat.gf
deleted file mode 100644
index 71ee4c0aa..000000000
--- a/examples/peacekeeping/PeaceCat.gf
+++ /dev/null
@@ -1,20 +0,0 @@
-abstract PeaceCat = {
-
-  cat
-    N; A; V; V2; V3; Pron;
-    IP; IAdv;
-    Adv; NP; CN; Imp; Det; Num ; 
-    Card ; Art ; --a
-    MassN ;
-    Phrase ;
-    PhraseWritten ;
-    PhraseSpoken ;
-    Sent ; 
-    Quest ; 
-    MassCN ; 
-
-  fun 
-    Written : Phrase -> PhraseWritten ;
-    Spoken : Phrase -> PhraseSpoken ;
-
-}
diff --git a/examples/peacekeeping/PeaceCatI.gf b/examples/peacekeeping/PeaceCatI.gf
deleted file mode 100644
index 7941de276..000000000
--- a/examples/peacekeeping/PeaceCatI.gf
+++ /dev/null
@@ -1,31 +0,0 @@
-incomplete concrete PeaceCatI of PeaceCat = 
-  open Lang, PeaceRes, Prelude in {
-
-  lincat
-    N = N; A = A; V = V; V2 = V2; V3 = V3; Pron = Pron;
-    Card = Card ; Art = Art ; --a
-    IP = IP; IAdv = IAdv;
-    Adv = Adv; NP = NP; CN = CN; Imp = Imp; Det = Det; Num = Num;
-
-    MassN = N ;
-    Phrase = { s : Str; p : Punct } ;
-    PhraseWritten = { s : Str } ;
-    PhraseSpoken = { s : Str } ;
-
-    Sent = {s : SForm => Str} ; 
-    Quest = { s : Str } ;
-    MassCN = CN ;
-
-  lin 
-    Written x = mkWritten x.s x.p ;
-    Spoken x = { s = x.s } ;
-
-  oper
-    mkWritten : Str -> Punct -> { s : Str } ;
-    mkWritten x p = case p of {
-      FullStop => { s = x ++ "." } ; --TFullStop (ss s) TEmpty ;
-      QuestMark => { s = x ++ "?" } ; --TQuestMark (ss s) TEmpty ;
-      ExclMark => { s = x ++ "!" } --TExclMark (ss s) TEmpty 
-    } ;
-
-}
diff --git a/examples/peacekeeping/PeaceLexCommon.gf b/examples/peacekeeping/PeaceLexCommon.gf
deleted file mode 100644
index cec47c235..000000000
--- a/examples/peacekeeping/PeaceLexCommon.gf
+++ /dev/null
@@ -1,93 +0,0 @@
-abstract PeaceLexCommon = PeaceCat ** {
-
-  fun
-
-    -- Pronouns
-
-    i_Pron : Pron ;
-    youSg_Pron : Pron ;
-    he_Pron : Pron ;
-    we_Pron : Pron ;
-    youPl_Pron : Pron ;
-    they_Pron : Pron ;
-    whoPl_IP : IP ;
-    whoSg_IP : IP ;
-    whatPl_IP : IP ;
-    whatSg_IP : IP ;
-
-    this_NP : NP ;
-    that_NP : NP ;
-
-    -- Determiners
-
-    the_Art : Art ; --a
-    a_Art : Art ; --a
-    -- aSg_Det : Det ;
-    -- aPl_Det : Det ;
-    -- theSg_Det : Det ;
-    -- thePl_Det : Det ; --a
-
-    that_Det : Det ;
-    those_Det : Det ;
-    this_Det : Det ;
-    these_Det : Det ;
-
-    -- Adverbs
-
-    here_Adv : Adv ;
-    there_Adv : Adv ;
-    where_IAdv : IAdv ;
-    when_IAdv : IAdv ;
-
-    -- Numerals
-
--- Causes too much ambiguity
---    one_Det : Det ;
-    two_Num : Card ; --a
-    three_Num : Card ;
-    four_Num : Card ;
-    five_Num : Card ;
-
-    -- Adjectives
-
-    black_A : A ;
-    blue_A : A ;
-    cold_A : A ;
-    green_A : A ;
-    hot_A : A ;
-    red_A : A ;
-    small_A : A ;
-    white_A : A ;
-    yellow_A : A ;
-
-    -- Nouns
-
-    airplane_N : N ;
-    animal_N : N ;
-    blood_N : MassN ;
-    boat_N : N ;
-    boy_N : N ;
-    child_N : N ;
-    factory_N : N ;
-    foot_N : N ;
-    girl_N : N ;
-    hand_N : N ;
-    head_N : N ;
-    house_N : N ;
-    leg_N : N ;
-    man_N : N ;
-    road_N : N ;
-    water_N : MassN ;
-    woman_N : N;
-
-    -- Verbs
-    breathe_V : V ;
-    eat_V2 : V2 ;
-    drink_V2 : V2 ;
-    give_V3 : V3 ;
-    have_V2 : V2;
-    see_V2 : V2 ;
-    sleep_V : V ;
-    walk_V : V ;
-
-}
diff --git a/examples/peacekeeping/PeaceLexCommonI.gf b/examples/peacekeeping/PeaceLexCommonI.gf
deleted file mode 100644
index 21dcac350..000000000
--- a/examples/peacekeeping/PeaceLexCommonI.gf
+++ /dev/null
@@ -1,84 +0,0 @@
-incomplete concrete PeaceLexCommonI of PeaceLexCommon = PeaceCatI ** 
-  open Lang, Constructors in {
-
-  lin
-
-    -- Pronouns
-
-    i_Pron = i_Pron ;
-    youSg_Pron = youSg_Pron ;
-    he_Pron = he_Pron ;
-    we_Pron = we_Pron ;
-    youPl_Pron = youPl_Pron ;
-    they_Pron = they_Pron ;
-    whoPl_IP = whoPl_IP ;
-    whoSg_IP = whoSg_IP ;
-    whatPl_IP = whatPl_IP ;
-    whatSg_IP = whatSg_IP ;
-
-    this_NP = mkNP this_Quant ;
-    that_NP = mkNP that_Quant ;
-
-    -- Determiners
-
-    a_Art =  IndefArt ;
-    the_Art = DefArt ;
-    that_Det = mkDet that_Quant ;
-    those_Det = mkDet that_Quant plNum ;
-    this_Det = mkDet this_Quant ;
-    these_Det = mkDet this_Quant plNum ;
- 
-    -- Adverbs
-    here_Adv = here_Adv;
-    there_Adv = there_Adv;
-    where_IAdv = where_IAdv;
-    when_IAdv = when_IAdv;
- 
-    -- Numerals
---    one_Det = DetSg one_Quant NoOrd ;
-    two_Num = NumNumeral (num (pot2as3 (pot1as2 (pot0as1 (pot0 n2))))) ;
-    three_Num = NumNumeral (num (pot2as3 (pot1as2 (pot0as1 (pot0 n3))))) ;
-    four_Num = NumNumeral (num (pot2as3 (pot1as2 (pot0as1 (pot0 n4))))) ;
-    five_Num = NumNumeral (num (pot2as3 (pot1as2 (pot0as1 (pot0 n5))))) ;
- 
-    -- Adjectives
-    black_A = black_A ;
-    blue_A = blue_A ;
-    cold_A = cold_A ;
-    green_A = green_A ;
-    hot_A = hot_A ;
-    red_A = red_A ;
-    small_A = small_A ;
-    white_A = white_A ;
-    yellow_A = yellow_A ;
-
-    -- Nouns
-    airplane_N = airplane_N ;
-    animal_N = animal_N ;
-    blood_N = blood_N ;
-    boat_N = boat_N ;
-    boy_N = boy_N ;
-    child_N = child_N ;
-    factory_N = factory_N ;
-    foot_N = foot_N ;
-    girl_N = girl_N ;
-    hand_N = hand_N ;
-    head_N = head_N ;
-    house_N = house_N ;
-    leg_N = leg_N ;
-    man_N = man_N ;
-    road_N = road_N ;
-    water_N = water_N ;
-    woman_N = woman_N ;
-
-    -- Verbs
-    breathe_V = breathe_V ;
-    drink_V2 = drink_V2 ;
-    eat_V2 = eat_V2 ;
-    give_V3 = give_V3;
-    have_V2 = have_V2;
-    see_V2 = see_V2 ;
-    sleep_V = sleep_V ;
-    walk_V = walk_V ;
-
-}
diff --git a/examples/peacekeeping/PeaceLexExt.gf b/examples/peacekeeping/PeaceLexExt.gf
deleted file mode 100644
index 984440ef6..000000000
--- a/examples/peacekeeping/PeaceLexExt.gf
+++ /dev/null
@@ -1,47 +0,0 @@
-abstract PeaceLexExt = PeaceCat ** {
-
-  fun
-
-    -- Adjectives
-
-    dangerous_A : A ;
-    dead_A : A ;
-    hungry_A : A ;
-    large_A : A ;
-    sick_A : A ;
-
-    -- Nouns
-
-    air_N : MassN ;
-    arm_N : N ;
-    building_N : N ;
-    car_N : N ;
-    corpse_N : N ;
-    doctor_N : N ;
-    doctor_N : N ;
-    enemy_N : N ;
-    face_N : N ;
-    food_N : MassN ;
-    friend_N : N ;
-    ground_N : N ;
-    knife_N : N ;
-    landmine_N : N ;
-    map_N : N ;
-    medicine_N : MassN ;
-    police8officer_N : N ;
-    skin_N : MassN ;
-    soldier_N : N ;
-    toy_N : N ;
-    translation8machine_N : N ;
-    weapon_N : N;
-
-    -- Verbs
-    cooperate_V2 : V2 ;
-    cough_V : V ;
-    drop_V2 : V2 ;
-    hurt_V : V ;
-    need_V2 : V2;
-    own_V2 : V2 ;
-    show_V3 : V3 ;
-
-}
\ No newline at end of file
diff --git a/examples/peacekeeping/PeacePhrases.gf b/examples/peacekeeping/PeacePhrases.gf
deleted file mode 100644
index e883e9e19..000000000
--- a/examples/peacekeeping/PeacePhrases.gf
+++ /dev/null
@@ -1,9 +0,0 @@
-abstract PeacePhrases = PeaceCat ** {
-
-  fun
-    Hello : Phrase ;
-    GoodMorning : Phrase ;
-    GoodEvening : Phrase ;
-    WhatIsNamePron : Pron -> Phrase ;
-
-}
\ No newline at end of file
diff --git a/examples/peacekeeping/PeaceRes.gf b/examples/peacekeeping/PeaceRes.gf
deleted file mode 100644
index f39107a1e..000000000
--- a/examples/peacekeeping/PeaceRes.gf
+++ /dev/null
@@ -1,13 +0,0 @@
-resource PeaceRes = {
-
-  param Punct = FullStop | QuestMark | ExclMark ;
-
-  param SForm = SPos | SNeg | SQuest ;
-
-  oper
-    stop, quest, excl : Str -> { s : Str; p : Punct } ;
-    stop x = { s = x; p = FullStop } ;
-    quest x = { s = x; p = QuestMark } ;
-    excl x = { s = x; p = ExclMark } ;
-
-}
\ No newline at end of file
diff --git a/examples/peacekeeping/PeaceSpoken.gf b/examples/peacekeeping/PeaceSpoken.gf
deleted file mode 100644
index be4efd406..000000000
--- a/examples/peacekeeping/PeaceSpoken.gf
+++ /dev/null
@@ -1,5 +0,0 @@
-abstract PeaceSpoken = Peace ** {
-
-  flags startcat = PhraseSpoken ; 
-
-}
\ No newline at end of file
diff --git a/examples/peacekeeping/PeaceSyntax.gf b/examples/peacekeeping/PeaceSyntax.gf
deleted file mode 100644
index 2cc7a8c93..000000000
--- a/examples/peacekeeping/PeaceSyntax.gf
+++ /dev/null
@@ -1,56 +0,0 @@
-abstract PeaceSyntax = PeaceCat ** {
-
-  fun
-    PhrPos    : Sent -> Phrase ;
-    PhrNeg    : Sent -> Phrase ;
-    PhrQuest  : Quest -> Phrase ;
-    PhrImp    : Imp  -> Phrase ;    
-    PhrImpNeg : Imp  -> Phrase ;    
-
-    PhrYes : Phrase ;
-    PhrNo : Phrase ;
-
-    QuestSent : Sent -> Quest ;
-
-    QuestIP_V : V -> IP -> Quest ;
-    QuestIP_V2 : V2 -> IP -> NP -> Quest ;
-    QuestIP_V2Mass : V2 -> IP -> MassCN -> Quest ;
-    QuestIP_V3 : V3 -> IP -> NP -> NP -> Quest ;
-    QuestIP_V3Mass : V3 -> IP -> MassCN -> NP -> Quest ;
-    QuestIP_A : A -> IP -> Quest ;
-    QuestIAdv_V : V -> NP -> IAdv -> Quest ;
-    QuestIAdv_V2 : V2 -> NP -> NP -> IAdv -> Quest ;
-    QuestIAdv_NP : NP -> IAdv -> Quest ;
-
-    SentV  : V  -> NP -> Sent ;
-    SentV2 : V2 -> NP -> NP -> Sent ;
-    SentV2Mass : V2 -> NP -> MassCN -> Sent ;
-    SentV3 : V3 -> NP -> NP -> NP -> Sent ;
-    SentV3Mass : V3 -> NP -> MassCN -> NP -> Sent ;
-    SentA  : A  -> NP -> Sent ;
-    SentNP : NP -> NP -> Sent ;
-
-    SentAdvV  : V  -> NP -> Adv -> Sent ;
-    SentAdvV2 : V2 -> NP -> NP -> Adv -> Sent ;
-
-    ImpV  : V -> Imp ;
-    ImpV2 : V2 -> NP -> Imp ;
-    ImpV2Mass : V2 -> MassCN -> Imp ;
-    ImpV3 : V3 -> NP -> NP -> Imp ;
-    ImpV3Mass : V3 -> MassCN -> NP -> Imp ;
-
-    UsePron : Pron -> NP ;
-    PossPronCNSg : Pron -> CN -> NP ;
-    PossPronCNPl : Pron -> CN -> NP ;
-    ArtCNSg : Art -> CN -> NP ; --a
-    ArtCNPl : Art -> CN -> NP ; --a
-    DetCN : Det -> CN -> NP ;
-    NumCN : Card -> CN -> NP ;  --a
-
-    UseN  : N -> CN ;
-    ModCN : A -> CN -> CN ;
-
-    UseMassN : MassN -> MassCN ;
-    ModMass : A -> MassCN -> MassCN ;
-
-}
diff --git a/examples/peacekeeping/PeaceSyntaxI.gf b/examples/peacekeeping/PeaceSyntaxI.gf
deleted file mode 100644
index 7e738eea5..000000000
--- a/examples/peacekeeping/PeaceSyntaxI.gf
+++ /dev/null
@@ -1,79 +0,0 @@
-incomplete concrete PeaceSyntaxI of PeaceSyntax = 
-  PeaceCatI ** open Lang,Constructors,PeaceRes in {
-
-  flags 
-    unlexer = text ; lexer = text ;
-
-  lin
-    PhrPos sent = stop (sent.s!SPos) ;
-    PhrNeg sent = stop (sent.s!SNeg) ;
-    PhrQuest q = quest q.s ;
-    PhrImp imp = excl (mkPhr (mkUtt imp)).s;
-    PhrImpNeg imp = excl (mkPhr (mkUtt negativePol imp)).s;
-    
-    PhrYes = stop yes_Utt.s ;
-    PhrNo = stop no_Utt.s ;
-
-
-    QuestSent sent = { s = sent.s!SQuest } ; 
-    QuestIP_V v ip = mkQuest (QuestVP ip (UseV v)) ;
-    QuestIP_V2 v2 ip x = mkQuest (QuestVP ip (mkVP v2 x)) ;
-    QuestIP_V2Mass v2 ip x = mkQuest (QuestVP ip (mkVP v2 (MassNP x))) ;
-    QuestIP_V3 v3 ip x y = mkQuest (QuestVP ip (mkVP v3 x y)) ;
-    QuestIP_V3Mass v3 ip x y = mkQuest (QuestVP ip (mkVP v3 (MassNP x) y)) ;
-    QuestIP_A a ip = mkQuest (QuestVP ip (UseComp (CompAP (PositA a))));
-    QuestIAdv_NP x ia = mkQuest (QuestIComp (CompIAdv ia) x);
-
-    QuestIAdv_V v x ia = mkQuest (QuestIAdv ia (PredVP x (UseV v)));
-    QuestIAdv_V2 v x y ia = mkQuest (QuestIAdv ia (PredVP x (ComplV2 v y)));
-
-
-    SentV  v np = mkSent (mkCl np v) ;
-
-    SentV2 v2 x y = mkSent (mkCl x v2 y) ;
-    SentV2Mass v2 x y = mkSent (mkCl x v2 (MassNP y)) ;
-    SentV3 v3 x y z = mkSent (mkCl x v3 y z) ;
-    SentV3Mass v3 x y z = mkSent (mkCl x v3 (MassNP y) z) ;
-    SentA  a x = mkSent (mkCl x a) ;
-    SentNP np x = mkSent (mkCl x np) ;
-
-    SentAdvV  v x adv = mkSent (mkCl x (mkVP (mkVP v) adv)) ;
-    SentAdvV2 v2 x y adv = mkSent (mkCl x (mkVP (mkVP v2 y) adv)) ;
-
-    ImpV v = mkImp v ;
-    ImpV2 v2 x = mkImp v2 x ;
-    ImpV2Mass v2 x = mkImp v2 (MassNP x) ;
-    ImpV3 v3 x y = mkImp (mkVP v3 x y) ;
-    ImpV3Mass v3 x y = mkImp (mkVP v3 (MassNP x) y) ;
-
-    UsePron p = mkNP p ;
-    PossPronCNSg p n = mkNP (mkDet p) n ;
-    PossPronCNPl p n = mkNP (mkDet p plNum) n ;
-    DetCN d n = mkNP d n ;
-    NumCN k cn = mkNP a_Art k cn ;
-    ArtCNSg = DetArtSg ;
-    ArtCNPl = DetArtPl ;
-
-    UseN n = mkCN n ;
-    ModCN a cn = mkCN a cn ;
-
-    UseMassN mn = mkCN mn ;
-    ModMass a cn = mkCN a cn ;
-
-  oper
-    mkSent : Lang.Cl -> Sent ;
-    mkSent cl = 
-      {
-        s = table {
-          SPos   => Predef.toStr Lang.S  (mkS cl) ;
-          SNeg   => Predef.toStr Lang.S  (mkS negativePol cl) ;
-          SQuest => Predef.toStr Lang.QS (mkQS cl)
-          } ;
-        lock_Sent = <>
-      } ;
-
-    mkQuest : Lang.QCl -> Quest ;
-    mkQuest q = { s = Predef.toStr Lang.QS (mkQS q);
-		  lock_Quest = <> } ;
-
-}
diff --git a/examples/peacekeeping/README b/examples/peacekeeping/README
deleted file mode 100644
index f17025853..000000000
--- a/examples/peacekeeping/README
+++ /dev/null
@@ -1,14 +0,0 @@
-
-
-
-Some things we could use for inspiration:
-
-Spanish Phrase Book for First-Aid Trained Activists
-http://bostoncoop.net/balm/phrasebook1.pdf
-
-Emergency multilingual phrasebook
-http://www.dh.gov.uk/PublicationsAndStatistics/Publications/PublicationsPolicyAndGuidance/PublicationsPolicyAndGuidanceArticle/fs/en?CONTENT_ID=4073230&chk=8XboAN
-
-Ogden's Basic English:
-
-http://ogden.basic-english.org/words.html
\ No newline at end of file
diff --git a/examples/peacekeeping/english/PeaceCat_Eng.gf b/examples/peacekeeping/english/PeaceCat_Eng.gf
deleted file mode 100644
index 0f3e59bf5..000000000
--- a/examples/peacekeeping/english/PeaceCat_Eng.gf
+++ /dev/null
@@ -1,3 +0,0 @@
---# -path=.:present:prelude
-
-concrete PeaceCat_Eng of PeaceCat = PeaceCatI with (Lang = LangEng);
\ No newline at end of file
diff --git a/examples/peacekeeping/english/PeaceLexCommon_Eng.gf b/examples/peacekeeping/english/PeaceLexCommon_Eng.gf
deleted file mode 100644
index 4a047facd..000000000
--- a/examples/peacekeeping/english/PeaceLexCommon_Eng.gf
+++ /dev/null
@@ -1,6 +0,0 @@
---# -path=.:present:prelude
-
-concrete PeaceLexCommon_Eng of PeaceLexCommon = 
-  PeaceCat_Eng ** PeaceLexCommonI with (Lang = LangEng), 
-  (Constructors = ConstructorsEng) ;
-
diff --git a/examples/peacekeeping/english/PeaceLexExt_Eng.gf b/examples/peacekeeping/english/PeaceLexExt_Eng.gf
deleted file mode 100644
index 6ecfcf341..000000000
--- a/examples/peacekeeping/english/PeaceLexExt_Eng.gf
+++ /dev/null
@@ -1,48 +0,0 @@
---# -path=.:present:prelude
-
-concrete PeaceLexExt_Eng of PeaceLexExt = 
-  PeaceCat_Eng ** open ParadigmsEng, IrregEng, 
-                       LexiconEng, StructuralEng in {
-
-  lin
-
-    -- Adjectives
-    dangerous_A = regA "dangerous" ;
-    dead_A = regA "dead" ;
-    hungry_A = regA "hungry" ;
-    large_A = regA "large" ;
-    sick_A = regA "sick" ;
-
-    -- Nouns
-    air_N = regN "air" ;
-    arm_N = regN "arm" ;
-    building_N = regN "building" ;
-    car_N = regN "car" ;
-    corpse_N = regN "corpse" ;
-    doctor_N = regN "doctor";
-    enemy_N = regN "enemy";
-    face_N = regN "face" ;
-    food_N = regN "food";
-    friend_N = regN "friend";
-    ground_N = regN "ground" ;
-    knife_N = mk2N "knife" "knives" ;
-    landmine_N = regN "landmine" ;
-    map_N = regN "map" ;
-    medicine_N = regN "medicine" ;
-    police8officer_N = compoundN "police" (regN "officer") ;
-    skin_N = regN "skin" ;
-    soldier_N = regN "soldier" ;
-    toy_N = regN "toy" ;
-    translation8machine_N = compoundN "translation" (regN "machine") ;
-    weapon_N = regN "weapon";
-
-    -- Verbs
-    cooperate_V2 = mkV2 (regV "cooperate") (mkPrep "with") ;
-    cough_V = regV "cough" ;
-    drop_V2 = dirV2 (regDuplV "drop") ;
-    hurt_V = hurt_V ;
-    need_V2 = dirV2 (regV "need");
-    own_V2 = dirV2 (regV "own") ;
-    show_V3 = dirdirV3 (regV "show") ;
-
-}
diff --git a/examples/peacekeeping/english/PeacePhrases_Eng.gf b/examples/peacekeeping/english/PeacePhrases_Eng.gf
deleted file mode 100644
index 8bcf41ce0..000000000
--- a/examples/peacekeeping/english/PeacePhrases_Eng.gf
+++ /dev/null
@@ -1,12 +0,0 @@
---# -path=.:..:present:prelude
-
-concrete PeacePhrases_Eng of PeacePhrases = 
-  PeaceCat_Eng ** open ResEng, PeaceRes in {
-
-lin
-    Hello = stop "hello" ;
-    GoodMorning = stop ["good morning"];
-    GoodEvening = stop ["good evening"] ;
-    WhatIsNamePron p = quest (["what is"] ++ p.s!Gen ++ "name") ;
-
-}
\ No newline at end of file
diff --git a/examples/peacekeeping/english/PeaceSpoken_Eng.gf b/examples/peacekeeping/english/PeaceSpoken_Eng.gf
deleted file mode 100644
index d18b43945..000000000
--- a/examples/peacekeeping/english/PeaceSpoken_Eng.gf
+++ /dev/null
@@ -1,4 +0,0 @@
---# -path=.:..:present:prelude
-
-concrete PeaceSpoken_Eng of PeaceSpoken = 
-  Peace_Eng;
diff --git a/examples/peacekeeping/english/PeaceSyntax_Eng.gf b/examples/peacekeeping/english/PeaceSyntax_Eng.gf
deleted file mode 100644
index 46c26f183..000000000
--- a/examples/peacekeeping/english/PeaceSyntax_Eng.gf
+++ /dev/null
@@ -1,6 +0,0 @@
---# -path=.:present:prelude
-
-concrete PeaceSyntax_Eng of PeaceSyntax = PeaceCat_Eng ** PeaceSyntaxI with
-  (Constructors = ConstructorsEng),
-  (Lang = LangEng) ;
-
diff --git a/examples/peacekeeping/english/Peace_Eng.gf b/examples/peacekeeping/english/Peace_Eng.gf
deleted file mode 100644
index 87dd076ee..000000000
--- a/examples/peacekeeping/english/Peace_Eng.gf
+++ /dev/null
@@ -1,5 +0,0 @@
---# -path=.:..:present:prelude
-
-concrete Peace_Eng of Peace = 
-  PeaceSyntax_Eng, PeaceLexCommon_Eng, 
-  PeaceLexExt_Eng, PeacePhrases_Eng;
\ No newline at end of file
diff --git a/examples/peacekeeping/finnish/PeaceCat_Fin.gf b/examples/peacekeeping/finnish/PeaceCat_Fin.gf
deleted file mode 100644
index 1a0c6ac9c..000000000
--- a/examples/peacekeeping/finnish/PeaceCat_Fin.gf
+++ /dev/null
@@ -1,3 +0,0 @@
---# -path=.:present:prelude
-
-concrete PeaceCat_Fin of PeaceCat = PeaceCatI with (Lang = LangFin);
diff --git a/examples/peacekeeping/finnish/PeaceLexCommon_Fin.gf b/examples/peacekeeping/finnish/PeaceLexCommon_Fin.gf
deleted file mode 100644
index faf70724b..000000000
--- a/examples/peacekeeping/finnish/PeaceLexCommon_Fin.gf
+++ /dev/null
@@ -1,6 +0,0 @@
---# -path=.:present:prelude
-
-concrete PeaceLexCommon_Fin of PeaceLexCommon = 
-  PeaceCat_Fin ** PeaceLexCommonI with 
-  (Lang = LangFin), (Constructors = ConstructorsFin) ;
-
diff --git a/examples/peacekeeping/finnish/PeaceLexExt_Fin.gf b/examples/peacekeeping/finnish/PeaceLexExt_Fin.gf
deleted file mode 100644
index 637b52d65..000000000
--- a/examples/peacekeeping/finnish/PeaceLexExt_Fin.gf
+++ /dev/null
@@ -1,44 +0,0 @@
---# -path=.:present:prelude
-
-concrete PeaceLexExt_Fin of PeaceLexExt = 
-  PeaceCat_Fin ** open ParadigmsFin in {
-
-  lin
-
-    -- Adjectives
-    dangerous_A = mkA "vaarallinen" ;
-    dead_A = mkA (mkN "kuollut" "kuolleita") ;
-    hungry_A = mkA "nälkäinen" ;
-    large_A = mkA "iso" ;
-    sick_A = mkA "sairas" ;
-
-    -- Nouns
-    air_N = mkN "ilma" ;
-    arm_N = mk3N "käsi" "käden" "käsiä" ;
-    building_N = mkN "rakennus" ;
-    car_N = mkN "auto" ;
-    corpse_N = mkN "ruumis" ;
-    doctor_N = mkN "lääkäri";
-    enemy_N = mkN "vihollinen";
-    face_N = mkN "naama" ; ---- kasvot
-    food_N = mkN "ruoka";
-    friend_N = mkN "ystävä";
-    ground_N = mkN "maa" ;
-    knife_N = mk2N "veitsi" "veitsiä" ; ---- veistä
-    landmine_N = mkN "maamiina" ;
-    map_N = mkN "kartta" ;
-    medicine_N = mkN "lääke" ;
-    police8officer_N = mkN "poliisi" ;
-    skin_N = mkN "iho" ;
-    soldier_N = mkN "sotilas" ;
-    weapon_N = mkN "ase";
-
-    -- Verbs
-    cough_V = mkV "yskiä" ;
-    drop_V2 = dirV2 (mkV "pudottaa") ;
-    hurt_V = mkV "sattua" ;
-    need_V2 = dirV2 (mkV "tarvita");
-    own_V2 = dirV2 (mkV "omistaa") ;
-    show_V3 = dirdirV3 (mkV "näyttää") ;
-
-}
diff --git a/examples/peacekeeping/finnish/PeacePhrases_Fin.gf b/examples/peacekeeping/finnish/PeacePhrases_Fin.gf
deleted file mode 100644
index 1949e30e7..000000000
--- a/examples/peacekeeping/finnish/PeacePhrases_Fin.gf
+++ /dev/null
@@ -1,13 +0,0 @@
---# -path=.:..:present:prelude
-
-concrete PeacePhrases_Fin of PeacePhrases = 
-  PeaceCat_Fin ** open LangFin, ParadigmsFin, ConstructorsFin, PeaceRes in {
-
-lin
-    Hello = stop "terve" ;
-    GoodMorning = stop ["hyvää huomenta"] ;
-    GoodEvening = stop ["hyvää iltaa"] ;
-    WhatIsNamePron p = quest (
-       mkPhr (mkUtt (mkQS (mkQCl whatSg_IP (mkVP (mkNP (mkDet p) name_N)))))).s ;
-
-}
diff --git a/examples/peacekeeping/finnish/PeaceSpoken_Fin.gf b/examples/peacekeeping/finnish/PeaceSpoken_Fin.gf
deleted file mode 100644
index 95cdd7de9..000000000
--- a/examples/peacekeeping/finnish/PeaceSpoken_Fin.gf
+++ /dev/null
@@ -1,3 +0,0 @@
---# -path=.:..:present:prelude
-
-concrete PeaceSpoken_Fin of PeaceSpoken = Peace_Fin;
diff --git a/examples/peacekeeping/finnish/PeaceSyntax_Fin.gf b/examples/peacekeeping/finnish/PeaceSyntax_Fin.gf
deleted file mode 100644
index 3e728dbf8..000000000
--- a/examples/peacekeeping/finnish/PeaceSyntax_Fin.gf
+++ /dev/null
@@ -1,5 +0,0 @@
---# -path=.:present:prelude
-
-concrete PeaceSyntax_Fin of PeaceSyntax = PeaceCat_Fin ** PeaceSyntaxI with
-  (Lang = LangFin), (Constructors = ConstructorsFin) ;
-
diff --git a/examples/peacekeeping/finnish/Peace_Fin.gf b/examples/peacekeeping/finnish/Peace_Fin.gf
deleted file mode 100644
index 905ee2bf8..000000000
--- a/examples/peacekeeping/finnish/Peace_Fin.gf
+++ /dev/null
@@ -1,5 +0,0 @@
---# -path=.:..:present:prelude
-
-concrete Peace_Fin of Peace = 
-  PeaceSyntax_Fin, PeaceLexCommon_Fin, 
-  PeaceLexExt_Fin, PeacePhrases_Fin;
diff --git a/examples/peacekeeping/swedish/PeaceCat_Swe.gf b/examples/peacekeeping/swedish/PeaceCat_Swe.gf
deleted file mode 100644
index e056dc86a..000000000
--- a/examples/peacekeeping/swedish/PeaceCat_Swe.gf
+++ /dev/null
@@ -1,3 +0,0 @@
---# -path=.:present:prelude
-
-concrete PeaceCat_Swe of PeaceCat = PeaceCatI with (Lang = LangSwe);
\ No newline at end of file
diff --git a/examples/peacekeeping/swedish/PeaceLexCommon_Swe.gf b/examples/peacekeeping/swedish/PeaceLexCommon_Swe.gf
deleted file mode 100644
index 7d34010eb..000000000
--- a/examples/peacekeeping/swedish/PeaceLexCommon_Swe.gf
+++ /dev/null
@@ -1,6 +0,0 @@
---# -path=.:present:prelude
-
-concrete PeaceLexCommon_Swe of PeaceLexCommon = 
-  PeaceCat_Swe ** PeaceLexCommonI with 
-  (Lang = LangSwe), (Constructors = ConstructorsSwe) ; ;
-
diff --git a/examples/peacekeeping/swedish/PeaceLexExt_Swe.gf b/examples/peacekeeping/swedish/PeaceLexExt_Swe.gf
deleted file mode 100644
index 5f40fc6b6..000000000
--- a/examples/peacekeeping/swedish/PeaceLexExt_Swe.gf
+++ /dev/null
@@ -1,48 +0,0 @@
---# -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") ;
-
-}
diff --git a/examples/peacekeeping/swedish/PeacePhrases_Swe.gf b/examples/peacekeeping/swedish/PeacePhrases_Swe.gf
deleted file mode 100644
index 7f9d88014..000000000
--- a/examples/peacekeeping/swedish/PeacePhrases_Swe.gf
+++ /dev/null
@@ -1,12 +0,0 @@
---# -path=.:..:present:prelude
-
-concrete PeacePhrases_Swe of PeacePhrases = 
-  PeaceCat_Swe ** open CommonScand, PeaceRes in {
-
-lin
-    Hello = stop "hej" ;
-    GoodMorning = stop ["god morgon"] ;
-    GoodEvening = stop ["god kväll"] ;
-    WhatIsNamePron p = stop (["vad heter"] ++ p.s!NPNom) ;
-
-}
\ No newline at end of file
diff --git a/examples/peacekeeping/swedish/PeaceSpoken_Swe.gf b/examples/peacekeeping/swedish/PeaceSpoken_Swe.gf
deleted file mode 100644
index 51ed8392c..000000000
--- a/examples/peacekeeping/swedish/PeaceSpoken_Swe.gf
+++ /dev/null
@@ -1,4 +0,0 @@
---# -path=.:..:present:prelude
-
-concrete PeaceSpoken_Swe of PeaceSpoken = 
-  Peace_Swe;
\ No newline at end of file
diff --git a/examples/peacekeeping/swedish/PeaceSyntax_Swe.gf b/examples/peacekeeping/swedish/PeaceSyntax_Swe.gf
deleted file mode 100644
index bfa0f0a1d..000000000
--- a/examples/peacekeeping/swedish/PeaceSyntax_Swe.gf
+++ /dev/null
@@ -1,5 +0,0 @@
---# -path=.:present:prelude
-
-concrete PeaceSyntax_Swe of PeaceSyntax = PeaceCat_Swe ** PeaceSyntaxI with
-  (Lang = LangSwe), (Constructors = ConstructorsSwe) ;
-
diff --git a/examples/peacekeeping/swedish/Peace_Swe.gf b/examples/peacekeeping/swedish/Peace_Swe.gf
deleted file mode 100644
index 7c7b2c213..000000000
--- a/examples/peacekeeping/swedish/Peace_Swe.gf
+++ /dev/null
@@ -1,5 +0,0 @@
---# -path=.:..:present:prelude
-
-concrete Peace_Swe of Peace = 
-  PeaceSyntax_Swe, PeaceLexCommon_Swe, 
-  PeaceLexExt_Swe, PeacePhrases_Swe;
\ No newline at end of file