diff --git a/examples/stoneage/StoneageFin.gf b/examples/stoneage/StoneageFin.gf
new file mode 100644
index 000000000..2b321cb00
--- /dev/null
+++ b/examples/stoneage/StoneageFin.gf
@@ -0,0 +1,241 @@
+--# -path=.:../../lib/resource/abstract:../../lib/resource/finnish:../../lib/prelude
+concrete StoneageFin of Stoneage 
+  = open SyntaxFin, ResourceFin, ParadigmsFin, SwadeshLexFin,
+  StoneageResFin in {
+
+flags
+  startcat=S; optimize=share;
+
+lincat
+  S = Phr ;
+  NP = NP ;
+  N = N;
+  CN = CN ;
+
+lin
+
+  -- Sentence conjunction
+
+--  AndS s1 s2 = { s = s1.s ++ and_Conj.s ++ s2.s } ** { lock_Phr = <> } ;
+
+  -- NP conjunction
+
+--  AndNP n1 n2 = ConjNP and_Conj (TwoNP n1 n2);
+
+
+  Drink = PresV2 (dirV2 drink_V) ;
+  Eat = PresV2 (dirV2 eat_V) ;
+  Bite = PresV2 (dirV2 bite_V) ;
+  Suck = PresV2 (dirV2 suck_V) ;
+-----  See = PresV2 (dirV2 see_V) ;
+  Hear = PresV2 (dirV2 hear_V) ;
+  Know = PresV2 (dirV2 know_V) ;
+  Smell = PresV2 (dirV2 smell_V) ;
+  Fear = PresV2 (dirV2 fear_V) ;
+  Kill = PresV2 (dirV2 kill_V) ;
+  Fight = PresV2 (dirV2 fight_V) ;
+  Hunt = PresV2 (dirV2 hunt_V) ;
+  Hit = PresV2 (dirV2 hit_V) ;
+  Cut = PresV2 (dirV2 cut_V) ;
+-----  Split = PresV2 (dirV2 split_V) ;
+  Stab = PresV2 (dirV2 stab_V) ;
+  Scratch = PresV2 (dirV2 scratch_V) ;
+  Hold = PresV2 (dirV2 hold_V) ;
+  Squeeze = PresV2 (dirV2 squeeze_V) ;
+  Rub = PresV2 (dirV2 rub_V) ;
+  Wash = PresV2 (dirV2 wash_V) ;
+  Wipe = PresV2 (dirV2 wipe_V) ;
+  Pull = PresV2 (dirV2 pull_V) ;
+  Push = PresV2 (dirV2 push_V) ;
+-----  Throw = PresV2 (dirV2 throw_V) ;
+-----  Tie = PresV2 (dirV2 tie_V) ;
+-----  Count = PresV2 (dirV2 count_V) ;
+
+-----  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 ;
+
+-----  Give = PresV3 (dirV3 give_V "to") ;
+
+--  Say = ;
+
+  The_One = DefOneNP ;
+-----  The_Many = DefNumNP NoNum ;
+  A = IndefOneNP ;
+  This = DetNP this_Det ;
+  That = DetNP that_Det ;
+-----  All = NDetNP all_NDet NoNum ;
+  Many = DetNP many_Det ;
+  Some_One = DetNP some_Det ;
+-----  Some_Many = NDetNP some_NDet NoNum ;
+-----  Few = DetNP few_Det ;
+-----  Other = DetNP other_Det ;
+
+  One = IndefNumNP one_Num ;
+  Two = IndefNumNP two_Num ;
+  Three = IndefNumNP three_Num ;
+  Four = IndefNumNP four_Num ;
+  Five = IndefNumNP five_Num ;
+
+  -- Pronouns
+
+  I = i_NP ;
+  You_One = thou_NP ;
+  He = he_NP ;
+-----  We = we_NP ;
+-----  You_Many = you_NP ;
+  They = 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 = ModPosA big_ADeg ;
+  Long = ModPosA long_ADeg ;
+  Wide = ModPosA wide_ADeg ;
+  Thick = ModPosA thick_ADeg ;
+  Heavy = ModPosA heavy_ADeg ;
+-----  Small = ModPosA small_ADeg ;
+  Short = ModPosA short_ADeg ;
+  Narrow = ModPosA narrow_ADeg ;
+  Thin = ModPosA thin_ADeg ;
+  Red = ModPosA red_ADeg ;
+  Green = ModPosA green_ADeg ;
+  Yellow = ModPosA yellow_ADeg ;
+  White = ModPosA white_ADeg ;
+  Black = ModPosA black_ADeg ;
+-----  Warm = ModPosA warm_ADeg ;
+  Cold = ModPosA cold_ADeg ;
+  Full = ModPosA full_ADeg ;
+  New = ModPosA new_ADeg ;
+  Old = ModPosA old_ADeg ;
+  Good = ModPosA good_ADeg ;
+  Bad = ModPosA bad_ADeg ;
+  Rotten = ModPosA rotten_ADeg ;
+  Dirty = ModPosA dirty_ADeg ;
+  Straight = ModPosA straight_ADeg ;
+  Round = ModPosA round_ADeg ;
+  Sharp = ModPosA sharp_ADeg ;
+  Dull = ModPosA dull_ADeg ;
+  Smooth = ModPosA smooth_ADeg ;
+  Wet = ModPosA wet_ADeg ;
+  Dry = ModPosA dry_ADeg ;
+  Correct = ModPosA correct_ADeg ;
+  Near = ModPosA near_ADeg ;
+--  Far = ModPosA far_ADeg ;
+
+  Right = ModAP (UseA right_A) ;
+  Left = ModAP (UseA left_A) ;
+
+}
\ No newline at end of file
diff --git a/examples/stoneage/StoneageResFin.gf b/examples/stoneage/StoneageResFin.gf
new file mode 100644
index 000000000..3542f5f07
--- /dev/null
+++ b/examples/stoneage/StoneageResFin.gf
@@ -0,0 +1,15 @@
+resource StoneageResFin = open ResourceFin, ParadigmsFin in {
+
+oper
+  PresV : V -> NP -> Phr = \v,s -> PresCl (SPredV s v) ;
+  PresV2 : V2 -> NP -> NP -> Phr = \v,s,o -> PresCl (SPredV2 s v o) ;
+  PresV3 : V3 -> NP -> NP -> NP -> Phr = \v,s,o,r -> PresCl (SPredV3 s v o r) ;
+  PresVasV2 : V -> NP -> NP -> Phr = \ v -> PresV2 (dirV2 v) ;
+
+  PresCl : Cl -> Phr = 
+    \c -> { s = (UseCl (PosTP TPresent ASimul) c).s } ** {lock_Phr = <>} ;
+ 
+  ModPosA : ADeg -> CN -> CN = \a -> ModAP (PositADeg a) ;
+  ModA : A -> CN -> CN = \a -> ModAP (UseA a) ;
+
+}