started Swadesh in 1.0: Eng and Swe ready (also stoneage1)

4 files changed, 537 insertions, 0 deletions

diff --git a/examples/stoneage1/Stoneage.gf b/examples/stoneage1/Stoneage.gf
new file mode 100644
index 000000000..a1c03281c
--- /dev/null
+++ b/examples/stoneage1/Stoneage.gf
@@ -0,0 +1,279 @@
+abstract Stoneage = {
+
+cat
+  S ;
+  NP ;
+  CN ;
+
+fun
+
+  -- Sentence conjunction
+
+--  AndS : S -> S -> S ;
+
+  -- NP conjunction
+
+--  AndNP : NP -> NP -> NP ;
+
+  -- Actions with an object
+
+  Drink : NP -> NP -> S ;
+  Eat : NP -> NP -> S ;
+  Bite : NP -> NP -> S ;
+  Suck : NP -> NP -> S ;
+  See : NP -> NP -> S ;
+  Hear : NP -> NP -> S ;
+  Know : NP -> NP -> S ;
+  Smell : NP -> NP -> S ;
+  Fear : NP -> NP -> S ;
+  Kill : NP -> NP -> S ;
+  Fight : NP -> NP -> S ;
+  Hunt : NP -> NP -> S ;
+  Hit : NP -> NP -> S ;
+  Cut : NP -> NP -> S ;
+  Split : NP -> NP -> S ;
+  Stab : NP -> NP -> S ;
+  Scratch : NP -> NP -> S ;
+  Hold : NP -> NP -> S ;
+  Squeeze : NP -> NP -> S ;
+  Rub : NP -> NP -> S ;
+  Wash : NP -> NP -> S ;
+  Wipe : NP -> NP -> S ;
+  Pull : NP -> NP -> S ;
+  Push : NP -> NP -> S ;
+  Throw : NP -> NP -> S ;
+  Tie : NP -> NP -> S ;
+  Count : NP -> NP -> S ;
+
+  -- Actions without an object
+
+  Think : NP -> S ;
+  Spit : NP -> S ;
+  Vomit : NP -> S ;
+  Blow : NP -> S ;
+  Breathe : NP -> S ;
+  Laugh : NP -> S ;
+  Sleep : NP -> S ;
+  Live : NP -> S ;
+  Die : NP -> S ;
+  Dig : NP -> S ;
+  Swim : NP -> S ;
+  Fly : NP -> S ;
+  Walk : NP -> S ;
+  Come : NP -> S ;
+  Lie : NP -> S ;
+  Sit : NP -> S ;
+  Stand : NP -> S ;
+  Turn : NP -> S ;
+  Fall : NP -> S ;
+  Sing : NP -> S ;
+  Sew : NP -> S ;
+  Play : NP -> S ;
+  Float : NP -> S ;
+  Flow : NP -> S ;
+  Freeze : NP -> S ;
+  Swell : NP -> S ;
+  Burn : NP -> S ;
+
+  -- Actions with an object and a recipient
+
+  Give : NP -> NP -> NP -> S ; -- subject object recipient
+
+--  Say
+--  FearThat
+
+  -- Determiners
+
+  The_One : CN -> NP ;
+  The_Many : CN -> NP ;
+  A : CN -> NP ;
+  This : CN -> NP ;
+  That : CN -> NP ;
+  All : CN -> NP ;
+  Many : CN -> NP ;
+  Some_One : CN -> NP ;
+  Some_Many : CN -> NP ;
+  Few : CN -> NP ;
+  Other : CN -> NP ;
+
+  One : CN -> NP ;
+  Two : CN -> NP ;
+  Three : CN -> NP ;
+  Four : CN -> NP ;
+  Five : CN -> NP ;
+
+  -- Pronouns
+ 
+  I : NP ;
+  You_One : NP ;
+  He : NP ;
+  We : NP ;
+  You_Many : NP ;
+  They : NP ;
+
+  -- People
+  Woman : CN ;
+  Man : CN ;
+  Person : CN ;
+  Child : CN ;
+  Wife : CN ;
+  Husband : CN ;
+  Mother : CN ;
+  Father : CN ;
+
+  -- Animals
+  Animal : CN ;
+  Fish : CN ;
+  Bird : CN ;
+  Dog : CN ;
+  Louse : CN ;
+  Snake : CN ;
+  Worm : CN ;
+
+  -- Plants
+  Tree : CN ;
+  Forest : CN ;
+  Stick : CN ;
+  Fruit : CN ;
+  Seed : CN ;
+  Leaf : CN ;
+  Root : CN ;
+  Bark : CN ;
+  Flower : CN ;
+  Grass : CN ;
+
+  -- Materials
+  Rope : CN ;
+  Skin : CN ;
+  Meat : CN ;
+  Blood : CN ;
+  Bone : CN ;
+  Fat : CN ;
+  Egg : CN ;
+  Horn : CN ;
+  Tail : CN ;
+  Feather : CN ;
+
+  -- Body parts
+  Hair : CN ;
+  Head : CN ;
+  Ear : CN ;
+  Eye : CN ;
+  Nose : CN ;
+  Mouth : CN ;
+  Tooth : CN ;
+  Tongue : CN ;
+  Fingernail : CN ;
+  Foot : CN ;
+  Leg : CN ;
+  Knee : CN ;
+  Hand : CN ;
+  Wing : CN ;
+  Belly : CN ;
+  Guts : CN ;
+  Neck : CN ;
+  Back : CN ;
+  Breast : CN ;
+  Heart : CN ;
+  Liver : CN ;
+
+  -- Heavenly bodies
+  Sun : CN ;
+  Moon : CN ;
+  Star : CN ;
+
+  -- Water
+  Water : CN ;
+  Rain : CN ;
+  River : CN ;
+  Lake : CN ;
+  Sea : CN ;
+
+  -- Minerals 
+  Salt : CN ;
+  Stone : CN ;
+  Sand : CN ;
+  Dust : CN ;
+  Earth : CN ;
+
+  -- Weather
+  Cloud : CN ;
+  Fog : CN ;
+  Sky : CN ;
+  Wind : CN ;
+  Snow : CN ;
+  Ice : CN ;
+
+  -- Fire
+  Smoke : CN ;
+  Fire : CN ;
+  Ashes : CN ;
+
+  -- Terrain
+  Road : CN ;
+  Mountain : CN ;
+
+  -- Time
+  Night : CN ;
+  Day : CN ;
+  Year : CN ;
+
+  Name : CN ;
+
+--  NameOf : NP -> CN ;
+----  MotherOf : NP -> CN ;
+----  FatherOf : NP -> CN ;
+
+  -- Shape
+  Big : CN -> CN ;
+  Long : CN -> CN ;
+  Wide : CN -> CN ;
+  Thick : CN -> CN ;
+  Heavy : CN -> CN ;
+  Small : CN -> CN ;
+  Short : CN -> CN ;
+  Narrow : CN -> CN ;
+  Thin : CN -> CN ;
+  Straight : CN -> CN ;
+  Round : CN -> CN ;
+
+  -- Color
+  Red : CN -> CN ;
+  Green : CN -> CN ;
+  Yellow : CN -> CN ;
+  White : CN -> CN ;
+  Black : CN -> CN ;
+
+  -- Temperature
+  Warm : CN -> CN ;
+  Cold : CN -> CN ;
+
+  Full : CN -> CN ;
+
+  -- Age
+  New : CN -> CN ;
+  Old : CN -> CN ;
+
+  -- Quality
+  Good : CN -> CN ;
+  Bad : CN -> CN ;
+  Rotten : CN -> CN ;
+
+  -- Texture
+  Dirty : CN -> CN ;
+  Sharp : CN -> CN ;
+  Dull : CN -> CN ;
+  Smooth : CN -> CN ;
+  Wet : CN -> CN ;
+  Dry : CN -> CN ;
+
+  -- Truthfulness
+  Correct : CN -> CN ;
+
+  -- Position
+  Near : CN -> CN ;
+ -- Far : CN -> CN ;
+  Right : CN -> CN ;
+  Left : CN -> CN ;
+
+}
\ No newline at end of file
diff --git a/examples/stoneage1/StoneageEng.gf b/examples/stoneage1/StoneageEng.gf
new file mode 100644
index 000000000..fa1c52f10
--- /dev/null
+++ b/examples/stoneage1/StoneageEng.gf
@@ -0,0 +1,6 @@
+--# -path=.:compiled:resource-1.0/swadesh
+
+concrete StoneageEng of Stoneage = StoneageI with
+  (Lang = LangEng),
+  (Swadesh = SwadeshEng) ;
+
diff --git a/examples/stoneage1/StoneageI.gf b/examples/stoneage1/StoneageI.gf
new file mode 100644
index 000000000..54e66bbc3
--- /dev/null
+++ b/examples/stoneage1/StoneageI.gf
@@ -0,0 +1,246 @@
+incomplete concrete StoneageI of Stoneage = open Lang, Swadesh in { 
+
+flags
+  startcat=S ;
+
+lincat
+  S = Phr ;
+  NP = NP ;
+  N = N;
+  CN = CN ;
+
+lin
+
+  Think = PresV think_V ;
+  Spit = PresV spit_V ;
+  Vomit = PresV vomit_V ;
+  Blow = PresV blow_V ;
+  Breathe = PresV breathe_V ;
+  Laugh = PresV laugh_V ;
+  Sleep = PresV sleep_V ;
+  Live = PresV live_V ;
+  Die = PresV die_V ;
+  Dig = PresV dig_V ;
+  Swim = PresV swim_V ;
+  Fly = PresV fly_V ;
+  Walk = PresV walk_V ;
+  Come = PresV come_V ;
+  Lie = PresV lie_V ;
+  Sit = PresV sit_V ;
+  Stand = PresV stand_V ;
+  Turn = PresV turn_V ;
+  Fall = PresV fall_V ;
+  Sing = PresV sing_V ;
+  Sew = PresV sew_V ;
+  Play = PresV play_V ;
+  Float = PresV float_V ;
+  Flow = PresV flow_V ;
+  Freeze = PresV freeze_V ;
+  Swell = PresV swell_V ;
+  Burn = PresV burn_V ;
+
+
+  Drink = PresV2 drink_V ;
+  Eat = PresV2 eat_V ;
+  Bite = PresV2 bite_V ;
+  Suck = PresV2 suck_V ;
+  See = PresV2 see_V ;
+  Hear = PresV2 hear_V ;
+  Know = PresV2 know_V ;
+  Smell = PresV2 smell_V ;
+  Fear = PresV2 fear_V ;
+  Kill = PresV2 kill_V ;
+  Fight = PresV2 fight_V ;
+  Hunt = PresV2 hunt_V ;
+  Hit = PresV2 hit_V ;
+  Cut = PresV2 cut_V ;
+  Split = PresV2 split_V ;
+  Stab = PresV2 stab_V ;
+  Scratch = PresV2 scratch_V ;
+  Hold = PresV2 hold_V ;
+  Squeeze = PresV2 squeeze_V ;
+  Rub = PresV2 rub_V ;
+  Wash = PresV2 wash_V ;
+  Wipe = PresV2 wipe_V ;
+  Pull = PresV2 pull_V ;
+  Push = PresV2 push_V ;
+  Throw = PresV2 throw_V ;
+  Tie = PresV2 tie_V ;
+  Count = PresV2 count_V ;
+
+  Give = PresV3 give_V ;
+
+
+--  Say = ;
+
+  The_One = DetCN (DetSg (SgQuant DefArt) NoOrd) ;
+  The_Many = DetCN (DetPl (PlQuant DefArt) NoNum NoOrd) ;
+  A = DetCN (DetSg (SgQuant IndefArt) NoOrd) ;
+  This = DetCN this_Det ;
+  That = DetCN that_Det ;
+  All = DetCN all_Det ;
+  Many = DetCN many_Det ;
+  Some_One = DetCN someSg_Det ;
+  Some_Many = DetCN somePl_Det ;
+  Few = DetCN few_Det ;
+  Other = DetCN other_Det ;
+
+  One = DetCN (DetSg one_Quant NoOrd) ;
+  Two = DetCN (DetPl (PlQuant IndefArt) two_Num NoOrd) ;
+  Three = DetCN (DetPl (PlQuant IndefArt) three_Num NoOrd) ;
+  Four = DetCN (DetPl (PlQuant IndefArt) four_Num NoOrd) ;
+  Five = DetCN (DetPl (PlQuant IndefArt) five_Num NoOrd) ;
+
+  -- Pronouns
+
+  I = UsePron i_NP ;
+  You_One = UsePron youSg_NP ;
+  He = UsePron he_NP ;
+  We = UsePron we_NP ;
+  You_Many = UsePron youPl_NP ;
+  They = UsePron they_NP ;
+
+  -- Nouns
+
+  Woman = UseN woman_N ;
+  Man = UseN man_N ;
+  Person = UseN person_N ;
+  Child = UseN child_N ;
+  Wife = UseN wife_N ;
+  Husband = UseN husband_N ;
+  Mother = UseN mother_N ;
+  Father = UseN father_N ;
+  Animal = UseN animal_N ;
+  Fish = UseN fish_N ;
+  Bird = UseN bird_N ;
+  Dog = UseN dog_N ;
+  Louse = UseN louse_N ;
+  Snake = UseN snake_N ;
+  Worm = UseN worm_N ;
+  Tree = UseN tree_N ;
+  Forest = UseN forest_N ;
+  Stick = UseN stick_N ;
+  Fruit = UseN fruit_N ;
+  Seed = UseN seed_N ;
+  Leaf = UseN leaf_N ;
+  Root = UseN root_N ;
+  Bark = UseN bark_N ;
+  Flower = UseN flower_N ;
+  Grass = UseN grass_N ;
+  Rope = UseN rope_N ;
+  Skin = UseN skin_N ;
+  Meat = UseN meat_N ;
+  Blood = UseN blood_N ;
+  Bone = UseN bone_N ;
+  Fat = UseN fat_N ;
+  Egg = UseN egg_N ;
+  Horn = UseN horn_N ;
+  Tail = UseN tail_N ;
+  Feather = UseN feather_N ;
+  Hair = UseN hair_N ;
+  Head = UseN head_N ;
+  Ear = UseN ear_N ;
+  Eye = UseN eye_N ;
+  Nose = UseN nose_N ;
+  Mouth = UseN mouth_N ;
+  Tooth = UseN tooth_N ;
+  Tongue = UseN tongue_N ;
+  Fingernail = UseN fingernail_N ;
+  Foot = UseN foot_N ;
+  Leg = UseN leg_N ;
+  Knee = UseN knee_N ;
+  Hand = UseN hand_N ;
+  Wing = UseN wing_N ;
+  Belly = UseN belly_N ;
+  Guts = UseN guts_N ;
+  Neck = UseN neck_N ;
+  Back = UseN back_N ;
+  Breast = UseN breast_N ;
+  Heart = UseN heart_N ;
+  Liver = UseN liver_N ;
+  Sun = UseN sun_N ;
+  Moon = UseN moon_N ;
+  Star = UseN star_N ;
+  Water = UseN water_N ;
+  Rain = UseN rain_N ;
+  River = UseN river_N ;
+  Lake = UseN lake_N ;
+  Sea = UseN sea_N ;
+  Salt = UseN salt_N ;
+  Stone = UseN stone_N ;
+  Sand = UseN sand_N ;
+  Dust = UseN dust_N ;
+  Earth = UseN earth_N ;
+  Cloud = UseN cloud_N ;
+  Fog = UseN fog_N ;
+  Sky = UseN sky_N ;
+  Wind = UseN wind_N ;
+  Snow = UseN snow_N ;
+  Ice = UseN ice_N ;
+  Smoke = UseN smoke_N ;
+  Fire = UseN fire_N ;
+  Ashes = UseN ashes_N ;
+  Road = UseN road_N ;
+  Mountain = UseN mountain_N ;
+  Night = UseN night_N ;
+  Day = UseN day_N ;
+  Year = UseN year_N ;
+  Name = UseN name_N ;
+
+--  NameOf = AppN2 name_N2 ;
+----  MotherOf = AppN2 (mkN2 mother_N "of") ;
+----  FatherOf = AppN2 (mkN2 father_N "of") ;
+
+  Big = ModA big_A ;
+  Long = ModA long_A ;
+  Wide = ModA wide_A ;
+  Thick = ModA thick_A ;
+  Heavy = ModA heavy_A ;
+  Small = ModA small_A ;
+  Short = ModA short_A ;
+  Narrow = ModA narrow_A ;
+  Thin = ModA thin_A ;
+  Red = ModA red_A ;
+  Green = ModA green_A ;
+  Yellow = ModA yellow_A ;
+  White = ModA white_A ;
+  Black = ModA black_A ;
+  Warm = ModA warm_A ;
+  Cold = ModA cold_A ;
+  Full = ModA full_A ;
+  New = ModA new_A ;
+  Old = ModA old_A ;
+  Good = ModA good_A ;
+  Bad = ModA bad_A ;
+  Rotten = ModA rotten_A ;
+  Dirty = ModA dirty_A ;
+  Straight = ModA straight_A ;
+  Round = ModA round_A ;
+  Sharp = ModA sharp_A ;
+  Dull = ModA dull_A ;
+  Smooth = ModA smooth_A ;
+  Wet = ModA wet_A ;
+  Dry = ModA dry_A ;
+  Correct = ModA correct_A ;
+  Near = ModA near_A ;
+
+  Right = ModA right_A ;
+  Left = ModA left_A ;
+
+oper
+
+  PresV : V -> NP -> Phr = \v,s -> 
+    PhrUtt NoPConj (UttS (UseCl TPres ASimul PPos 
+      (PredVP s (UseV v)))) NoVoc ;
+  PresV2 : V2 -> NP -> NP -> Phr = \v,s,o -> 
+    PhrUtt NoPConj (UttS (UseCl TPres ASimul PPos 
+      (PredVP s (ComplV2 v o)))) NoVoc ;
+  PresV3 : V3 -> NP -> NP -> NP -> Phr = \v,s,o,r -> 
+    PhrUtt NoPConj (UttS (UseCl TPres ASimul PPos 
+      (PredVP s (ComplV3 v o r)))) NoVoc ;
+
+  ModA : A -> CN -> CN = \a ->
+    AdjCN (PositA a) ;
+
+
+}
diff --git a/examples/stoneage1/StoneageSwe.gf b/examples/stoneage1/StoneageSwe.gf
new file mode 100644
index 000000000..16ef024c5
--- /dev/null
+++ b/examples/stoneage1/StoneageSwe.gf
@@ -0,0 +1,6 @@
+--# -path=.:compiled:resource-1.0/swadesh
+
+concrete StoneageSwe of Stoneage = StoneageI with
+  (Lang = LangSwe),
+  (Swadesh = SwadeshSwe) ;
+