mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-09 04:59:31 -06:00
started Swadesh in 1.0: Eng and Swe ready (also stoneage1)
This commit is contained in:
aarne
279
examples/stoneage1/Stoneage.gf
Normal file
279
examples/stoneage1/Stoneage.gf
Normal file
@@ -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 ;
|
||||
|
||||
}
|
||||
6
examples/stoneage1/StoneageEng.gf
Normal file
6
examples/stoneage1/StoneageEng.gf
Normal file
@@ -0,0 +1,6 @@
|
||||
--# -path=.:compiled:resource-1.0/swadesh
|
||||
|
||||
concrete StoneageEng of Stoneage = StoneageI with
|
||||
(Lang = LangEng),
|
||||
(Swadesh = SwadeshEng) ;
|
||||
|
||||
246
examples/stoneage1/StoneageI.gf
Normal file
246
examples/stoneage1/StoneageI.gf
Normal file
@@ -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) ;
|
||||
|
||||
|
||||
}
|
||||
6
examples/stoneage1/StoneageSwe.gf
Normal file
6
examples/stoneage1/StoneageSwe.gf
Normal file
@@ -0,0 +1,6 @@
|
||||
--# -path=.:compiled:resource-1.0/swadesh
|
||||
|
||||
concrete StoneageSwe of Stoneage = StoneageI with
|
||||
(Lang = LangSwe),
|
||||
(Swadesh = SwadeshSwe) ;
|
||||
|
||||
18
lib/resource-1.0/swadesh/MkV2.hs
Normal file
18
lib/resource-1.0/swadesh/MkV2.hs
Normal file
@@ -0,0 +1,18 @@
|
||||
-- to make certain verbs transitive
|
||||
|
||||
mkV2 file = do
|
||||
ls <- readFile file >>= return . lines
|
||||
mapM_ (putStrLn . mkOne) ls
|
||||
|
||||
mkOne li = case words li of
|
||||
v : e : ws | elem v v2s ->
|
||||
" " ++ unwords (v : e : "dirV2" : ["(" ++ unwords (init ws) ++ ") ;"])
|
||||
_ -> li
|
||||
|
||||
|
||||
|
||||
-- grep dirV2 SwadeshEng.gf >v2s
|
||||
-- readFile "v2s" >>= print . map (head . words) . lines
|
||||
|
||||
v2s = ["bite_V","breathe_V","count_V","cut_V","drink_V","eat_V","fear_V","fight_V","hear_V","hit_V","hold_V","hunt_V","kill_V","know_V","pull_V","push_V","rub_V","scratch_V","see_V","smell_V","split_V","squeeze_V","stab_V","suck_V","throw_V","tie_V","wash_V","wipe_V"]
|
||||
|
||||
243
lib/resource-1.0/swadesh/Swadesh.gf
Normal file
243
lib/resource-1.0/swadesh/Swadesh.gf
Normal file
@@ -0,0 +1,243 @@
|
||||
-- Swadesh 207
|
||||
abstract Swadesh = Cat ** {
|
||||
fun
|
||||
|
||||
-- Pronouns
|
||||
|
||||
i_NP : Pron ;
|
||||
youSg_NP : Pron ;
|
||||
he_NP : Pron ;
|
||||
we_NP : Pron ;
|
||||
youPl_NP : Pron ;
|
||||
they_NP : Pron ;
|
||||
whoPl_IP : IP ; -- only one who in Swadesh 207
|
||||
whoSg_IP : IP ;
|
||||
whatPl_IP : IP ; -- only one what in Swadesh 207
|
||||
whatSg_IP : IP ;
|
||||
|
||||
-- Determiners
|
||||
|
||||
that_Det : Det ;
|
||||
this_Det : Det ;
|
||||
all_Det : Det ;
|
||||
many_Det : Det ;
|
||||
some_Det : Det ;
|
||||
few_Det : Det ;
|
||||
other_Det : Det ;
|
||||
|
||||
-- Adverbs
|
||||
|
||||
here_Adv : Adv ;
|
||||
there_Adv : Adv ;
|
||||
where_IAdv : IAdv ;
|
||||
when_IAdv : IAdv ;
|
||||
how_IAdv : IAdv ;
|
||||
far_Adv : Adv ;
|
||||
|
||||
-- Conjunctions
|
||||
|
||||
and_Conj : Conj ;
|
||||
|
||||
-- Prepositions
|
||||
|
||||
at_Prep : Prep ;
|
||||
in_Prep : Prep ;
|
||||
with_Prep : Prep ;
|
||||
|
||||
-- not -- ?
|
||||
-- if -- ?
|
||||
-- because -- ?
|
||||
|
||||
-- Numerals
|
||||
|
||||
one_Num : Num ;
|
||||
two_Num : Num ;
|
||||
three_Num : Num ;
|
||||
four_Num : Num ;
|
||||
five_Num : Num ;
|
||||
|
||||
-- Adjectives
|
||||
|
||||
bad_A : A ;
|
||||
big_A : A ;
|
||||
black_A : A ;
|
||||
cold_A : A ;
|
||||
correct_A : A ;
|
||||
dirty_A : A ;
|
||||
dry_A : A ;
|
||||
dull_A : A ;
|
||||
full_A : A ;
|
||||
good_A : A ;
|
||||
green_A : A ;
|
||||
heavy_A : A ;
|
||||
long_A : A ;
|
||||
narrow_A : A ;
|
||||
near_A : A ;
|
||||
new_A : A ;
|
||||
old_A : A ;
|
||||
red_A : A ;
|
||||
rotten_A : A ;
|
||||
round_A : A ;
|
||||
sharp_A : A ;
|
||||
short_A : A ;
|
||||
small_A : A ;
|
||||
smooth_A : A ;
|
||||
straight_A : A ;
|
||||
thick_A : A ;
|
||||
thin_A : A ;
|
||||
warm_A : A ;
|
||||
wet_A : A ;
|
||||
white_A : A ;
|
||||
wide_A : A ;
|
||||
yellow_A : A ;
|
||||
|
||||
left_A : A ;
|
||||
right_A : A ;
|
||||
|
||||
-- Nouns
|
||||
|
||||
animal_N : N ;
|
||||
ashes_N : N ;
|
||||
back_N : N ;
|
||||
bark_N : N ;
|
||||
belly_N : N ;
|
||||
bird_N : N ;
|
||||
blood_N : N ;
|
||||
bone_N : N ;
|
||||
breast_N : N ;
|
||||
child_N : N ;
|
||||
cloud_N : N ;
|
||||
day_N : N ;
|
||||
dog_N : N ;
|
||||
dust_N : N ;
|
||||
ear_N : N ;
|
||||
earth_N : N ;
|
||||
egg_N : N ;
|
||||
eye_N : N ;
|
||||
fat_N : N ;
|
||||
father_N : N ;
|
||||
feather_N : N ;
|
||||
fingernail_N : N ;
|
||||
fire_N : N ;
|
||||
fish_N : N ;
|
||||
flower_N : N ;
|
||||
fog_N : N ;
|
||||
foot_N : N ;
|
||||
forest_N : N ;
|
||||
fruit_N : N ;
|
||||
grass_N : N ;
|
||||
guts_N : N ;
|
||||
hair_N : N ;
|
||||
hand_N : N ;
|
||||
head_N : N ;
|
||||
heart_N : N ;
|
||||
horn_N : N ;
|
||||
husband_N : N ;
|
||||
ice_N : N ;
|
||||
knee_N : N ;
|
||||
lake_N : N ;
|
||||
leaf_N : N ;
|
||||
leg_N : N ;
|
||||
liver_N : N ;
|
||||
louse_N : N ;
|
||||
man_N : N ;
|
||||
meat_N : N ;
|
||||
moon_N : N ;
|
||||
mother_N : N ;
|
||||
mountain_N : N ;
|
||||
mouth_N : N ;
|
||||
name_N : N ;
|
||||
neck_N : N ;
|
||||
night_N : N ;
|
||||
nose_N : N ;
|
||||
person_N : N ;
|
||||
rain_N : N ;
|
||||
river_N : N ;
|
||||
road_N : N ;
|
||||
root_N : N ;
|
||||
rope_N : N ;
|
||||
salt_N : N ;
|
||||
sand_N : N ;
|
||||
sea_N : N ;
|
||||
seed_N : N ;
|
||||
skin_N : N ;
|
||||
sky_N : N ;
|
||||
smoke_N : N ;
|
||||
snake_N : N ;
|
||||
snow_N : N ;
|
||||
star_N : N ;
|
||||
stick_N : N ;
|
||||
stone_N : N ;
|
||||
sun_N : N ;
|
||||
tail_N : N ;
|
||||
tongue_N : N ;
|
||||
tooth_N : N ;
|
||||
tree_N : N ;
|
||||
water_N : N ;
|
||||
wife_N : N ;
|
||||
wind_N : N ;
|
||||
wing_N : N ;
|
||||
woman_N : N ;
|
||||
worm_N : N ;
|
||||
year_N : N ;
|
||||
|
||||
-- Verbs
|
||||
|
||||
bite_V : V2 ;
|
||||
blow_V : V ;
|
||||
breathe_V : V ;
|
||||
burn_V : V ;
|
||||
come_V : V ;
|
||||
count_V : V2 ;
|
||||
cut_V : V2 ;
|
||||
die_V : V ;
|
||||
dig_V : V ;
|
||||
drink_V : V2 ;
|
||||
eat_V : V2 ;
|
||||
fall_V : V ;
|
||||
fear_V : V2 ;
|
||||
fight_V : V2 ;
|
||||
float_V : V ;
|
||||
flow_V : V ;
|
||||
fly_V : V ;
|
||||
freeze_V : V ;
|
||||
give_V : V3 ;
|
||||
hear_V : V2 ;
|
||||
hit_V : V2 ;
|
||||
hold_V : V2 ;
|
||||
hunt_V : V2 ;
|
||||
kill_V : V2 ;
|
||||
know_V : V2 ;
|
||||
laugh_V : V ;
|
||||
lie_V : V ;
|
||||
live_V : V ;
|
||||
play_V : V ;
|
||||
pull_V : V2 ;
|
||||
push_V : V2 ;
|
||||
rub_V : V2 ;
|
||||
say_V : V ;
|
||||
scratch_V : V2 ;
|
||||
see_V : V2 ;
|
||||
sew_V : V ;
|
||||
sing_V : V ;
|
||||
sit_V : V ;
|
||||
sleep_V : V ;
|
||||
smell_V : V2 ;
|
||||
spit_V : V ;
|
||||
split_V : V2 ;
|
||||
squeeze_V : V2 ;
|
||||
stab_V : V2 ;
|
||||
stand_V : V ;
|
||||
suck_V : V2 ;
|
||||
swell_V : V ;
|
||||
swim_V : V ;
|
||||
think_V : V ;
|
||||
throw_V : V2 ;
|
||||
tie_V : V2 ;
|
||||
turn_V : V ;
|
||||
vomit_V : V ;
|
||||
walk_V : V ;
|
||||
wash_V : V2 ;
|
||||
wipe_V : V2 ;
|
||||
|
||||
}
|
||||
245
lib/resource-1.0/swadesh/SwadeshEng.gf
Normal file
245
lib/resource-1.0/swadesh/SwadeshEng.gf
Normal file
@@ -0,0 +1,245 @@
|
||||
--# -path=.:../abstract:../common:../english:../../prelude
|
||||
|
||||
concrete SwadeshEng of Swadesh = CatEng
|
||||
** open MorphoEng, LangEng, ParadigmsEng, IrregEng, Prelude in {
|
||||
|
||||
lin
|
||||
|
||||
-- Pronouns
|
||||
|
||||
i_NP = i_Pron ;
|
||||
youSg_NP = youSg_Pron ;
|
||||
he_NP = he_Pron ;
|
||||
we_NP = we_Pron ;
|
||||
youPl_NP = youPl_Pron ;
|
||||
they_NP = they_Pron ;
|
||||
whoPl_IP = whoPl_IP ;
|
||||
whoSg_IP = whoSg_IP ;
|
||||
whatPl_IP = whatPl_IP ;
|
||||
whatSg_IP = whatSg_IP ;
|
||||
|
||||
-- Determiners
|
||||
|
||||
this_Det = DetSg (SgQuant this_Quant) NoOrd ;
|
||||
that_Det = DetSg (SgQuant that_Quant) NoOrd ;
|
||||
all_Det = mkDeterminer Pl "all" ;
|
||||
many_Det = many_Det ;
|
||||
some_Det = someSg_Det ;
|
||||
few_Det = mkDeterminer Pl "few" ;
|
||||
other_Det = mkDeterminer Pl "other" ;
|
||||
|
||||
|
||||
-- Adverbs
|
||||
|
||||
here_Adv = here_Adv;
|
||||
there_Adv = there_Adv;
|
||||
where_IAdv = where_IAdv;
|
||||
when_IAdv = when_IAdv;
|
||||
how_IAdv = how_IAdv;
|
||||
far_Adv = mkAdv "far" ;
|
||||
|
||||
-- not : Adv ; -- ?
|
||||
|
||||
-- Conjunctions
|
||||
|
||||
and_Conj = and_Conj ;
|
||||
|
||||
-- Prepositions
|
||||
|
||||
at_Prep = ss "at" ;
|
||||
in_Prep = ss "in" ;
|
||||
with_Prep = ss "with" ;
|
||||
|
||||
-- Numerals
|
||||
|
||||
one_Num = NumNumeral (num (pot2as3 (pot1as2 (pot0as1 pot01)))) ;
|
||||
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
|
||||
|
||||
bad_A = bad_A ;
|
||||
big_A = big_A ;
|
||||
black_A = black_A ;
|
||||
cold_A = cold_A ;
|
||||
correct_A = (regA "correct") ;
|
||||
dirty_A = dirty_A ;
|
||||
dry_A = regA "dry" ;
|
||||
dull_A = regA "dull" ;
|
||||
full_A = regA "full" ;
|
||||
good_A = good_A ;
|
||||
green_A = green_A ;
|
||||
heavy_A = regA "heavy" ;
|
||||
long_A = long_A ;
|
||||
narrow_A = narrow_A ;
|
||||
near_A = regA "near" ;
|
||||
new_A = new_A ;
|
||||
old_A = old_A ;
|
||||
red_A = red_A ;
|
||||
rotten_A = (regA "rotten") ;
|
||||
round_A = regA "round" ;
|
||||
sharp_A = regA "sharp" ;
|
||||
short_A = short_A ;
|
||||
small_A = small_A ;
|
||||
smooth_A = regA "smooth" ;
|
||||
straight_A = regA "straight" ;
|
||||
thick_A = thick_A ;
|
||||
thin_A = thin_A ;
|
||||
warm_A = warm_A ;
|
||||
wet_A = regA "wet" ; ----
|
||||
white_A = white_A ;
|
||||
wide_A = regA "wide" ;
|
||||
yellow_A = yellow_A ;
|
||||
|
||||
left_A = regA "left" ;
|
||||
right_A = regA "right" ;
|
||||
|
||||
-- Nouns
|
||||
|
||||
animal_N = regN "animal" ;
|
||||
ashes_N = regN "ash" ; -- FIXME: plural only?
|
||||
back_N = regN "back" ;
|
||||
bark_N = regN "bark" ;
|
||||
belly_N = regN "belly" ;
|
||||
bird_N = bird_N;
|
||||
blood_N = regN "blood" ;
|
||||
bone_N = regN "bone" ;
|
||||
breast_N = regN "breast" ;
|
||||
child_N = child_N ;
|
||||
cloud_N = regN "cloud" ;
|
||||
day_N = regN "day" ;
|
||||
dog_N = dog_N ;
|
||||
dust_N = regN "dust" ;
|
||||
ear_N = regN "ear" ;
|
||||
earth_N = regN "earth" ;
|
||||
egg_N = regN "egg" ;
|
||||
eye_N = regN "eye" ;
|
||||
fat_N = regN "fat" ;
|
||||
father_N = UseN2 father_N2 ;
|
||||
feather_N = regN "feather" ;
|
||||
fingernail_N = regN "fingernail" ;
|
||||
fire_N = regN "fire" ;
|
||||
fish_N = fish_N ;
|
||||
flower_N = regN "flower" ;
|
||||
fog_N = regN "fog" ;
|
||||
foot_N = mk2N "foot" "feet" ;
|
||||
forest_N = regN "forest" ;
|
||||
fruit_N = fruit_N ;
|
||||
grass_N = regN "grass" ;
|
||||
guts_N = regN "gut" ; -- FIXME: no singular
|
||||
hair_N = regN "hair" ;
|
||||
hand_N = regN "hand" ;
|
||||
head_N = regN "head" ;
|
||||
heart_N = regN "heart" ;
|
||||
horn_N = regN "horn" ;
|
||||
husband_N = genderN masculine (regN "husband") ;
|
||||
ice_N = regN "ice" ;
|
||||
knee_N = regN "knee" ;
|
||||
lake_N = lake_N ;
|
||||
leaf_N = mk2N "leaf" "leaves" ;
|
||||
leg_N = regN "leg" ;
|
||||
liver_N = regN "liver" ;
|
||||
louse_N = mk2N "louse" "lice" ;
|
||||
man_N = man_N ;
|
||||
meat_N = meat_N ;
|
||||
moon_N = moon_N ;
|
||||
mother_N = UseN2 mother_N2 ;
|
||||
mountain_N = mountain_N ;
|
||||
mouth_N = regN "mouth" ;
|
||||
name_N = regN "name" ;
|
||||
neck_N = regN "neck" ;
|
||||
night_N = regN "night" ;
|
||||
nose_N = regN "nose" ;
|
||||
person_N = genderN human (regN "person") ;
|
||||
rain_N = regN "rain" ;
|
||||
river_N = river_N ;
|
||||
road_N = regN "road" ;
|
||||
root_N = regN "root" ;
|
||||
rope_N = regN "rope" ;
|
||||
salt_N = regN "salt" ;
|
||||
sand_N = regN "sand" ;
|
||||
sea_N = sea_N ;
|
||||
seed_N = regN "seed" ;
|
||||
skin_N = regN "skin" ;
|
||||
sky_N = regN "sky" ;
|
||||
smoke_N = regN "smoke" ;
|
||||
snake_N = snake_N ;
|
||||
snow_N = regN "snow" ;
|
||||
star_N = star_N ;
|
||||
stick_N = regN "stick" ;
|
||||
stone_N = stone_N ;
|
||||
sun_N = sun_N ;
|
||||
tail_N = regN "tail" ;
|
||||
tongue_N = regN "tongue" ;
|
||||
tooth_N = mk2N "tooth" "teeth" ;
|
||||
tree_N = tree_N ;
|
||||
water_N = water_N ;
|
||||
wife_N = genderN feminine (mk2N "wife" "wives") ;
|
||||
wind_N = regN "wind" ;
|
||||
wing_N = regN "wing" ;
|
||||
woman_N = woman_N ;
|
||||
worm_N = regN "worm" ;
|
||||
year_N = regN "year" ;
|
||||
|
||||
-- Verbs
|
||||
|
||||
bite_V = dirV2 bite_V ;
|
||||
blow_V = blow_V ;
|
||||
breathe_V = dirV2 (regV "breathe") ;
|
||||
burn_V = burn_V ;
|
||||
come_V = come_V ;
|
||||
count_V = dirV2 (regV "count") ;
|
||||
cut_V = dirV2 cut_V ;
|
||||
die_V = die_V ;
|
||||
dig_V = dig_V ;
|
||||
drink_V = dirV2 drink_V ;
|
||||
eat_V = dirV2 eat_V ;
|
||||
fall_V = fall_V ;
|
||||
fear_V = dirV2 (regV "fear") ;
|
||||
fight_V = dirV2 fight_V ;
|
||||
float_V = regV "float" ;
|
||||
flow_V = regV "flow" ;
|
||||
fly_V = fly_V ;
|
||||
freeze_V = freeze_V ;
|
||||
give_V = dirdirV3 give_V ;
|
||||
hear_V = dirV2 hear_V ;
|
||||
hit_V = dirV2 hit_V ;
|
||||
hold_V = dirV2 hold_V ;
|
||||
hunt_V = dirV2 (regV "hunt") ;
|
||||
kill_V = dirV2 (regV "kill") ;
|
||||
know_V = dirV2 know_V ;
|
||||
laugh_V = regV "laugh" ;
|
||||
lie_V = lie_V ;
|
||||
live_V = live_V ;
|
||||
play_V = regV "play" ;
|
||||
pull_V = dirV2 (regV "pull") ;
|
||||
push_V = dirV2 (regV "push") ;
|
||||
rub_V = dirV2 (regDuplV "rub") ;
|
||||
say_V = say_V ;
|
||||
scratch_V = dirV2 (regV "scratch") ;
|
||||
see_V = dirV2 see_V ;
|
||||
sew_V = sew_V ;
|
||||
sing_V = sing_V ;
|
||||
sit_V = sit_V ;
|
||||
sleep_V = sleep_V ;
|
||||
smell_V = dirV2 (regV "smell") ;
|
||||
spit_V = spit_V ;
|
||||
split_V = dirV2 split_V ;
|
||||
squeeze_V = dirV2 (regV "squeeze") ;
|
||||
stab_V = dirV2 (regDuplV "stab") ;
|
||||
stand_V = stand_V ;
|
||||
suck_V = dirV2 (regV "suck") ;
|
||||
swell_V = swell_V ;
|
||||
swim_V = swim_V ;
|
||||
think_V = think_V ;
|
||||
throw_V = dirV2 throw_V ;
|
||||
tie_V = dirV2 (regV "tie") ;
|
||||
turn_V = regV "turn" ;
|
||||
vomit_V = regV "vomit" ;
|
||||
walk_V = walk_V ;
|
||||
wash_V = dirV2 (regV "wash") ;
|
||||
wipe_V = dirV2 (regV "wipe") ;
|
||||
|
||||
}
|
||||
250
lib/resource-1.0/swadesh/SwadeshFin.gf
Normal file
250
lib/resource-1.0/swadesh/SwadeshFin.gf
Normal file
@@ -0,0 +1,250 @@
|
||||
--# -path=.:../abstract:../../prelude
|
||||
|
||||
concrete SwadeshFin of Swadesh = CatFin
|
||||
** open ResourceFin, SyntaxFin, ParadigmsFin,
|
||||
BasicFin, Prelude in {
|
||||
|
||||
flags optimize=values ;
|
||||
|
||||
lin
|
||||
|
||||
-- Pronouns
|
||||
|
||||
i_NP = i_Pron ;
|
||||
youSg_NP = youSg_Pron ;
|
||||
he_NP = he_Pron ;
|
||||
we_NP = we_Pron ;
|
||||
youPl_NP = youPl_Pron ;
|
||||
they_NP = they_Pron ;
|
||||
whoPl_IP = whoPl_IP ;
|
||||
whoSg_IP = whoSg_IP ;
|
||||
whatPl_IP = whatPl_IP ;
|
||||
whatSg_IP = whatSg_IP ;
|
||||
|
||||
-- Determiners
|
||||
|
||||
this_Det = this_Det ;
|
||||
that_Det = that_Det ;
|
||||
all_Det = ResourceFin.all_NDet ;
|
||||
many_Det = many_Det ;
|
||||
some_Det = someSg_Det ;
|
||||
few_Det = mkDeterminer Pl (\\c => (nhn (sTalo "muutama")).s ! NCase Pl c) ;
|
||||
other_Det = mkDeterminer Pl (\\c => (nhn (sPuu "muu")).s ! NCase Pl c) ;
|
||||
|
||||
|
||||
-- Adverbs
|
||||
|
||||
here_Adv = here_Adv;
|
||||
there_Adv = there_Adv;
|
||||
where_IAdv = where_IAdv;
|
||||
when_IAdv = when_IAdv;
|
||||
how_IAdv = how_IAdv;
|
||||
|
||||
-- not : Adv ; -- ?
|
||||
|
||||
-- Conjunctions
|
||||
|
||||
and_Conj = and_Conj ;
|
||||
|
||||
-- Prepositions
|
||||
|
||||
at_Prep = prepCase Adess ;
|
||||
in_Prep = prepCase Iness ;
|
||||
with_Prep = prepPostpGen "kanssa" ;
|
||||
|
||||
-- Numerals
|
||||
|
||||
one_Num = NumNumeral (num (pot2as3 (pot1as2 (pot0as1 pot01)))) ;
|
||||
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
|
||||
|
||||
bad_A = bad_A ;
|
||||
big_A = big_A ;
|
||||
black_A = black_A ;
|
||||
cold_A = cold_A ;
|
||||
correct_A = regA "oikea" ;
|
||||
dirty_A = dirty_A ;
|
||||
dry_A = mkA (regN "kuiva") "kuivempi" "kuivin" ;
|
||||
dull_A = mkA (regN "tylsä") "tylsempi" "tylsin" ;
|
||||
far_A = regA "kaukainen" ;
|
||||
full_A = mkA (reg3N "täysi" "täyden" "täysiä") "täydempi" "täysin" ;
|
||||
good_A = good_A ;
|
||||
green_A = green_A ;
|
||||
heavy_A = regA "raskas" ;
|
||||
long_A = long_A ;
|
||||
narrow_A = narrow_A ;
|
||||
near_A = regA "läheinen" ;
|
||||
new_A = new_A ;
|
||||
old_A = old_A ;
|
||||
red_A = red_A ;
|
||||
rotten_A = regA "mätä" ;
|
||||
round_A = regA "pyöreä" ;
|
||||
sharp_A = regA "terävä" ;
|
||||
short_A = short_A ;
|
||||
small_A = small_A ;
|
||||
smooth_A = regA "sileä" ;
|
||||
straight_A = mkA (regN "suora") "suorempi" "suorin" ;
|
||||
thick_A = thick_A ;
|
||||
thin_A = thin_A ;
|
||||
warm_A = warm_A ;
|
||||
wet_A = mkA (regN "märkä") "märempi" "märin" ;
|
||||
white_A = white_A ;
|
||||
wide_A = regA "leveä" ;
|
||||
yellow_A = yellow_A ;
|
||||
|
||||
left_A = mkA (regN "vasen") ; ----
|
||||
right_A = mkA (regN "oikea") ;
|
||||
|
||||
-- Nouns
|
||||
|
||||
animal_N = reg3N "eläin" "eläimen" "eläimiä" ;
|
||||
ashes_N = regN "tuhka" ;
|
||||
back_N = regN "selkä" ;
|
||||
bark_N = regN "kaarna" ;
|
||||
belly_N = regN "vatsa" ;
|
||||
bird_N = bird_N;
|
||||
blood_N = nMeri "veri" ;
|
||||
bone_N = regN "luu" ;
|
||||
breast_N = regN "rinta" ;
|
||||
child_N = child_N ;
|
||||
cloud_N = reg2N "pilvi" "pilviä" ;
|
||||
day_N = regN "päivä" ;
|
||||
dog_N = dog_N ;
|
||||
dust_N = regN "pöly" ;
|
||||
ear_N = regN "korva" ;
|
||||
earth_N = regN "maa" ;
|
||||
egg_N = regN "muna" ;
|
||||
eye_N = regN "silmä" ;
|
||||
fat_N = regN "rasva" ;
|
||||
father_N = regN "isä" ;
|
||||
feather_N = reg3N "höyhen" "höyhenen" "höyheniä" ;
|
||||
fingernail_N = reg3N "kynsi" "kynnen" "kynsiä" ;
|
||||
fire_N = reg2N "tuli" "tulia" ;
|
||||
fish_N = fish_N ;
|
||||
flower_N = regN "kukka" ;
|
||||
fog_N = regN "sumu" ;
|
||||
foot_N = regN "jalka" ;
|
||||
forest_N = regN "metsä" ;
|
||||
fruit_N = fruit_N ;
|
||||
grass_N = regN "ruoho" ;
|
||||
guts_N = regN "sisälmys" ; --- suoli
|
||||
hair_N = regN "hius" ;
|
||||
hand_N = reg3N "käsi" "käden" "käsiä" ;
|
||||
head_N = regN "pää" ;
|
||||
heart_N = reg3N "sydän" "sydämen" "sydämiä" ;
|
||||
horn_N = reg2N "sarvi" "sarvia" ;
|
||||
husband_N = man_N ; --- aviomies
|
||||
ice_N = regN "jää" ;
|
||||
knee_N = reg2N "polvi" "polvia" ;
|
||||
lake_N = lake_N ;
|
||||
leaf_N = reg2N "lehti" "lehtiä" ;
|
||||
leg_N = regN "jalka" ; --- sääri
|
||||
liver_N = regN "maksa" ;
|
||||
louse_N = regN "lude" ;
|
||||
man_N = man_N ;
|
||||
meat_N = meat_N ;
|
||||
moon_N = moon_N ;
|
||||
mother_N = regN "äiti" ;
|
||||
mountain_N = mountain_N ;
|
||||
mouth_N = regN "suu" ;
|
||||
name_N = reg2N "nimi" "nimiä" ;
|
||||
neck_N = regN "niska" ;
|
||||
night_N = regN "yö" ;
|
||||
nose_N = regN "nenä" ;
|
||||
person_N = regN "henkilö" ;
|
||||
rain_N = regN "sade" ;
|
||||
river_N = river_N ;
|
||||
road_N = regN "tie" ;
|
||||
root_N = reg2N "juuri" "juuria" ;
|
||||
rope_N = reg3N "köysi" "köyden" "köysiä" ;
|
||||
salt_N = regN "suola" ;
|
||||
sand_N = regN "hiekka" ;
|
||||
sea_N = sea_N ;
|
||||
seed_N = regN "siemen" ;
|
||||
skin_N = regN "nahka" ;
|
||||
sky_N = reg3N "taivas" "taivaan" "taivaita" ;
|
||||
smoke_N = regN "savu" ;
|
||||
snake_N = snake_N ;
|
||||
snow_N = sgpartN (nMeri "lumi") "lunta" ;
|
||||
star_N = star_N ;
|
||||
stick_N = regN "keppi" ;
|
||||
stone_N = stone_N ;
|
||||
sun_N = sun_N ;
|
||||
tail_N = regN "häntä" ;
|
||||
tongue_N = reg2N "kieli" "kieliä" ;
|
||||
tooth_N = regN "hammas" ;
|
||||
tree_N = tree_N ;
|
||||
water_N = water_N ;
|
||||
wife_N = regN "vaimo" ;
|
||||
wind_N = reg2N "tuuli" "tuulia" ;
|
||||
wing_N = reg2N "siipi" "siipiä" ;
|
||||
woman_N = woman_N ;
|
||||
worm_N = regN "mato" ;
|
||||
year_N = reg3N "vuosi" "vuoden" "vuosia" ;
|
||||
|
||||
-- Verbs
|
||||
|
||||
bite_V = regV "purra" ;
|
||||
blow_V = regV "puhaltaa" ;
|
||||
breathe_V = regV "hengittää" ;
|
||||
burn_V = regV "palaa" ;
|
||||
come_V = BasicFin.come_V ;
|
||||
count_V = regV "laskea" ;
|
||||
cut_V = reg3V "leikata" "leikkaan" "leikkasi" ;
|
||||
die_V = regV "kuolla";
|
||||
dig_V = regV "kaivaa" ;
|
||||
drink_V = UseV2 drink_V2 ;
|
||||
eat_V = UseV2 eat_V2 ;
|
||||
fall_V = reg3V "pudota" "putoan" "putosi" ;
|
||||
fear_V = reg3V "pelätä" "pelkään" "pelkäsi" ;
|
||||
fight_V = regV "taistella" ;
|
||||
float_V = regV "kellua" ;
|
||||
flow_V = reg3V "virrata" "virtaan" "virtasi" ;
|
||||
fly_V = regV "lentää" ;
|
||||
freeze_V = regV "jäätyä" ;
|
||||
give_V = regV "antaa" ;
|
||||
hear_V = UseV2 hear_V2 ;
|
||||
hit_V = regV "lyödä" ;
|
||||
hold_V = regV "pitää" ;
|
||||
hunt_V = regV "metsästää" ;
|
||||
kill_V = regV "tappaa" ;
|
||||
know_V =reg2V "tietää" "tiesin" ;
|
||||
laugh_V = reg3V "nauraa" "nauran" "nauroi" ;
|
||||
lie_V = reg3V "maata" "makaan" "makasi" ;
|
||||
live_V = live_V ;
|
||||
play_V = UseV2 play_V2 ;
|
||||
pull_V = regV "vetää" ;
|
||||
push_V = regV "työntää" ;
|
||||
rub_V = regV "hieroa" ;
|
||||
say_V = regV "sanoa" ;
|
||||
scratch_V = regV "raapia" ;
|
||||
see_V = UseV2 see_V2 ;
|
||||
sew_V = regV "kylvää" ;
|
||||
sing_V = regV "laulaa" ;
|
||||
sit_V = regV "istua" ;
|
||||
sleep_V = sleep_V ;
|
||||
smell_V = reg2V "haistaa" "haistoi" ;
|
||||
spit_V = regV "sylkeä" ;
|
||||
split_V = reg2V "halkaista" "halkaisi" ;
|
||||
squeeze_V = regV "puristaa" ;
|
||||
stab_V = regV "pistää" ;
|
||||
stand_V = mkV "seistä" "seisoo" "seison" "seisovat" "seiskää" "seistään"
|
||||
"seisoi" "seisoin" "seisoisi" "seissyt" "seisty" "seistyn" ; --- *seisoivät
|
||||
suck_V = regV "imeä" ;
|
||||
swell_V = mkV "turvota" "turpoaa" "turpoan" "turpoavat" "turvotkaa" "turvotaan"
|
||||
"turposi" "turposin" "turpoaisi" "turvonnut" "turvottu" "turvotun" ;
|
||||
swim_V = reg3V "uida" "uin" "ui" ;
|
||||
think_V = reg3V "ajatella" "ajattelen" "ajatteli" ;
|
||||
throw_V = regV "heittää" ;
|
||||
tie_V = regV "sitoa" ;
|
||||
turn_V = regV "kääntyä" ;
|
||||
vomit_V = regV "oksentaa" ;
|
||||
walk_V = walk_V ;
|
||||
wash_V = regV "pestä" ;
|
||||
wipe_V = regV "pyyhkiä" ;
|
||||
|
||||
}
|
||||
246
lib/resource-1.0/swadesh/SwadeshFre.gf
Normal file
246
lib/resource-1.0/swadesh/SwadeshFre.gf
Normal file
@@ -0,0 +1,246 @@
|
||||
--# -path=.:../abstract:../../prelude:../romance
|
||||
|
||||
concrete SwadeshFre of Swadesh = CatFre
|
||||
** open StructuralFre, RulesFre, SyntaxFre, ParadigmsFre, VerbsFre,
|
||||
BasicFre, Prelude in {
|
||||
|
||||
lin
|
||||
|
||||
-- Pronouns
|
||||
|
||||
i_NP = i_Pron ;
|
||||
youSg_NP = youSg_Pron ;
|
||||
he_NP = he_Pron ;
|
||||
we_NP = we_Pron ;
|
||||
youPl_NP = youPl_Pron ;
|
||||
they_NP = they_Pron ;
|
||||
whoPl_IP = whoPl_IP ;
|
||||
whoSg_IP = whoSg_IP ;
|
||||
whatPl_IP = whatPl_IP ;
|
||||
whatSg_IP = whatSg_IP ;
|
||||
|
||||
-- Determiners
|
||||
|
||||
this_Det = this_Det ;
|
||||
that_Det = that_Det ;
|
||||
all_Det = all_NDet ;
|
||||
many_Det = many_Det ;
|
||||
some_Det = someSg_Det ;
|
||||
few_Det = mkDeterminer1 Pl ("peu" ++ elisDe) ;
|
||||
other_Det = mkDeterminer1 Pl ["d'autres"] ;
|
||||
|
||||
|
||||
-- Adverbs
|
||||
|
||||
here_Adv = here_Adv;
|
||||
there_Adv = there_Adv;
|
||||
where_IAdv = where_IAdv;
|
||||
when_IAdv = when_IAdv;
|
||||
how_IAdv = how_IAdv;
|
||||
|
||||
-- not : Adv ; -- ?
|
||||
|
||||
-- Conjunctions
|
||||
|
||||
and_Conj = and_Conj ;
|
||||
|
||||
-- Prepositions
|
||||
|
||||
at_Prep = justCase dative.p1 ;
|
||||
in_Prep = StructuralFre.in_Prep ;
|
||||
with_Prep = StructuralFre.with_Prep ;
|
||||
|
||||
-- Numerals
|
||||
|
||||
one_Num = NumNumeral (num (pot2as3 (pot1as2 (pot0as1 pot01)))) ;
|
||||
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
|
||||
|
||||
bad_A = bad_A ;
|
||||
big_A = big_A ;
|
||||
black_A = black_A ;
|
||||
cold_A = cold_A ;
|
||||
correct_A = regA "correct" ;
|
||||
dirty_A = dirty_A ;
|
||||
dry_A = compA (mkA "sec" "sèche" "secs" "sèches") ;
|
||||
dull_A = regA "émoussé" ;
|
||||
far_A = regA "lointain" ;
|
||||
full_A = regA "plein" ;
|
||||
good_A = good_A ;
|
||||
green_A = green_A ;
|
||||
heavy_A = regA "lourd" ;
|
||||
long_A = long_A ;
|
||||
narrow_A = narrow_A ;
|
||||
near_A = regA "proche" ;
|
||||
new_A = new_A ;
|
||||
old_A = old_A ;
|
||||
red_A = red_A ;
|
||||
rotten_A = regA "pourri" ;
|
||||
round_A = regA "rond" ;
|
||||
sharp_A = regA "tranchant" ;
|
||||
short_A = short_A ;
|
||||
small_A = small_A ;
|
||||
smooth_A = regA "lisse" ;
|
||||
straight_A = regA "droite" ;
|
||||
thick_A = thick_A ;
|
||||
thin_A = thin_A ;
|
||||
warm_A = warm_A ;
|
||||
wet_A = regA "mouillé" ;
|
||||
white_A = white_A ;
|
||||
wide_A = regA "large" ;
|
||||
yellow_A = yellow_A ;
|
||||
|
||||
left_A = regA "gauche" ;
|
||||
right_A = regA "droite" ;
|
||||
|
||||
-- Nouns
|
||||
|
||||
animal_N = regN "animal" masculine ;
|
||||
ashes_N = regN "cendre" masculine ;
|
||||
back_N = regN "dos" masculine ;
|
||||
bark_N = regN "écorce" feminine ;
|
||||
belly_N = regN "ventre" masculine ;
|
||||
bird_N = bird_N;
|
||||
blood_N = regN "sang" masculine ;
|
||||
bone_N = regN "os" masculine ;
|
||||
breast_N = regN "sein" masculine ; --- poitrine
|
||||
child_N = child_N ;
|
||||
cloud_N = regN "nuage" masculine ;
|
||||
day_N = regN "jour" masculine ;
|
||||
dog_N = dog_N ;
|
||||
dust_N = regN "poussière" feminine ;
|
||||
ear_N = regN "oreille" feminine ;
|
||||
earth_N = regN "terre" feminine ;
|
||||
egg_N = regN "oeuf" masculine ;
|
||||
eye_N = mkN "oeil" "yeux" masculine ;
|
||||
fat_N = regN "graisse" feminine ;
|
||||
father_N = UseN2 father_N2 ;
|
||||
feather_N = regN "plume" feminine ;
|
||||
fingernail_N = regN "ongle" masculine ;
|
||||
fire_N = regN "feu" masculine ;
|
||||
fish_N = fish_N ;
|
||||
flower_N = regN "fleur" feminine ;
|
||||
fog_N = regN "brouillard" masculine ;
|
||||
foot_N = regN "pied" masculine ;
|
||||
forest_N = regN "forêt" feminine ;
|
||||
fruit_N = fruit_N ;
|
||||
grass_N = regN "herbe" feminine ;
|
||||
guts_N = regN "entraille" feminine ;
|
||||
hair_N = regN "cheveu" masculine ;
|
||||
hand_N = regN "main" feminine ;
|
||||
head_N = regN "tête" feminine ;
|
||||
heart_N = regN "coeur" masculine ;
|
||||
horn_N = regN "corne" masculine ;
|
||||
husband_N = regN "mari" masculine ;
|
||||
ice_N = regN "glace" feminine ;
|
||||
knee_N = regN "genou" masculine ;
|
||||
lake_N = lake_N ;
|
||||
leaf_N = regN "feuille" feminine ;
|
||||
leg_N = regN "jambe" feminine ;
|
||||
liver_N = regN "foie" masculine ;
|
||||
louse_N = regN "pou" masculine ;
|
||||
man_N = man_N ;
|
||||
meat_N = meat_N ;
|
||||
moon_N = moon_N ;
|
||||
mother_N = UseN2 mother_N2 ;
|
||||
mountain_N = mountain_N ;
|
||||
mouth_N = regN "bouche" feminine ;
|
||||
name_N = regN "nom" masculine ;
|
||||
neck_N = mkN "cou" "cous" masculine ;
|
||||
night_N = regN "nuit" feminine ;
|
||||
nose_N = regN "nez" masculine ;
|
||||
person_N = regN "personne" feminine ;
|
||||
rain_N = regN "pluie" feminine ;
|
||||
river_N = river_N ;
|
||||
road_N = regN "route" feminine ;
|
||||
root_N = regN "racine" feminine ;
|
||||
rope_N = regN "corde" feminine ;
|
||||
salt_N = regN "sel" masculine ;
|
||||
sand_N = regN "sable" masculine ;
|
||||
sea_N = sea_N ;
|
||||
seed_N = regN "graine" feminine ;
|
||||
skin_N = regN "peau" masculine ;
|
||||
sky_N = mkN "ciel" "cieux" masculine ;
|
||||
smoke_N = regN "fumée" feminine ;
|
||||
snake_N = snake_N ;
|
||||
snow_N = regN "neige" feminine ;
|
||||
star_N = star_N ;
|
||||
stick_N = regN "bâton" masculine ;
|
||||
stone_N = stone_N ;
|
||||
sun_N = sun_N ;
|
||||
tail_N = regN "queue" feminine ;
|
||||
tongue_N = regN "langue" feminine ;
|
||||
tooth_N = regN "dent" feminine ;
|
||||
tree_N = tree_N ;
|
||||
water_N = water_N ;
|
||||
wife_N = regN "femme" feminine ;
|
||||
wind_N = regN "vent" masculine ;
|
||||
wing_N = regN "aile" feminine ;
|
||||
woman_N = woman_N ;
|
||||
worm_N = regN "ver" masculine ;
|
||||
year_N = regN "an" masculine ; --- année
|
||||
|
||||
-- Verbs
|
||||
|
||||
bite_V = UseV2 mordre_V2 ;
|
||||
blow_V = regV "souffler" ;
|
||||
breathe_V = regV "respirer" ;
|
||||
burn_V = regV "brûler" ;
|
||||
come_V = venir_V ;
|
||||
count_V = regV "conter" ;
|
||||
cut_V = regV "tailler" ;
|
||||
die_V = mourir_V ;
|
||||
dig_V = regV "creuser" ;
|
||||
drink_V = UseV2 boire_V2 ;
|
||||
eat_V = regV "manger" ;
|
||||
fall_V = regV "tomber" ;
|
||||
fear_V = UseV2 craindre_V2 ;
|
||||
fight_V = regV "lutter" ;
|
||||
float_V = regV "flotter" ;
|
||||
flow_V = regV "couler" ;
|
||||
fly_V = regV "voler" ;
|
||||
freeze_V = reg3V "geler" "gèle" "gèlera" ;
|
||||
give_V = regV "donner" ;
|
||||
hear_V = UseV2 entendre_V2 ;
|
||||
hit_V = regV "frapper" ;
|
||||
hold_V = UseV2 tenir_V2 ;
|
||||
hunt_V = regV "chasser" ;
|
||||
kill_V = regV "tuer" ;
|
||||
know_V = UseV2 savoir_V2 ; --- connaître
|
||||
laugh_V = UseV2 rire_V2 ;
|
||||
lie_V = UseV2 étendre_V2 ; ---- reflexive
|
||||
live_V = UseV2 vivre_V2 ;
|
||||
play_V = regV "jouer" ;
|
||||
pull_V = regV "tirer" ;
|
||||
push_V = regV "pousser" ;
|
||||
rub_V = regV "frotter" ;
|
||||
say_V = UseV2 dire_V2 ;
|
||||
scratch_V = regV "gratter" ;
|
||||
see_V = UseV2 voir_V2 ;
|
||||
sew_V = UseV2 coudre_V2 ;
|
||||
sing_V = regV "chanter" ;
|
||||
sit_V = UseV2 asseoir_V2 ; --- refl
|
||||
sleep_V = UseV2 dormir_V2 ;
|
||||
smell_V = UseV2 sentir_V2 ;
|
||||
spit_V = regV "cracher" ;
|
||||
split_V = UseV2 fendre_V2 ;
|
||||
squeeze_V = regV "serrer" ;
|
||||
stab_V = regV "poignarder" ;
|
||||
stand_V = reg3V "lever" "lève" "lèvera" ; ---- refl ----
|
||||
suck_V = regV "sucer" ;
|
||||
swell_V = regV "gonfler" ;
|
||||
swim_V = regV "nager" ;
|
||||
think_V = regV "penser" ;
|
||||
throw_V = regV "jeter" ;
|
||||
tie_V = regV "lier" ;
|
||||
turn_V = regV "tourner" ;
|
||||
vomit_V = regV "vomir" ;
|
||||
walk_V = regV "marcher" ;
|
||||
wash_V = regV "laver" ;
|
||||
wipe_V = regV "essuyer" ;
|
||||
|
||||
}
|
||||
246
lib/resource-1.0/swadesh/SwadeshIta.gf
Normal file
246
lib/resource-1.0/swadesh/SwadeshIta.gf
Normal file
@@ -0,0 +1,246 @@
|
||||
--# -path=.:../abstract:../../prelude:../romance
|
||||
|
||||
concrete SwadeshIta of Swadesh = CatIta
|
||||
** open StructuralIta, RulesIta, SyntaxIta, ParadigmsIta,
|
||||
BasicIta, BeschIta, Prelude in {
|
||||
|
||||
lin
|
||||
|
||||
-- Pronouns
|
||||
|
||||
i_NP = i_Pron ;
|
||||
youSg_NP = youSg_Pron ;
|
||||
he_NP = he_Pron ;
|
||||
we_NP = we_Pron ;
|
||||
youPl_NP = youPl_Pron ;
|
||||
they_NP = they_Pron ;
|
||||
whoPl_IP = whoPl_IP ;
|
||||
whoSg_IP = whoSg_IP ;
|
||||
whatPl_IP = whatPl_IP ;
|
||||
whatSg_IP = whatSg_IP ;
|
||||
|
||||
-- Determiners
|
||||
|
||||
this_Det = this_Det ;
|
||||
that_Det = that_Det ;
|
||||
all_Det = all_NDet ;
|
||||
many_Det = many_Det ;
|
||||
some_Det = someSg_Det ;
|
||||
few_Det = mkDeterminer Pl "pochi" "poche" ;
|
||||
other_Det = mkDeterminer Pl "altri" "altre" ;
|
||||
|
||||
|
||||
-- Adverbs
|
||||
|
||||
here_Adv = here_Adv;
|
||||
there_Adv = there_Adv;
|
||||
where_IAdv = where_IAdv;
|
||||
when_IAdv = when_IAdv;
|
||||
how_IAdv = how_IAdv;
|
||||
|
||||
-- not : Adv ; -- ?
|
||||
|
||||
-- Conjunctions
|
||||
|
||||
and_Conj = and_Conj ;
|
||||
|
||||
-- Prepositions
|
||||
|
||||
at_Prep = justCase dative.p1 ;
|
||||
in_Prep = StructuralIta.in_Prep ;
|
||||
with_Prep = StructuralIta.with_Prep ;
|
||||
|
||||
-- Numerals
|
||||
|
||||
one_Num = NumNumeral (num (pot2as3 (pot1as2 (pot0as1 pot01)))) ;
|
||||
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
|
||||
|
||||
bad_A = bad_A ;
|
||||
big_A = big_A ;
|
||||
black_A = black_A ;
|
||||
cold_A = cold_A ;
|
||||
correct_A = regA "corretto" ;
|
||||
dirty_A = dirty_A ;
|
||||
dry_A = regA "secco" ;
|
||||
dull_A = regA "noioso" ;
|
||||
far_A = regA "lontano" ;
|
||||
full_A = regA "pieno" ;
|
||||
good_A = good_A ;
|
||||
green_A = green_A ;
|
||||
heavy_A = regA "pesante" ;
|
||||
long_A = long_A ;
|
||||
narrow_A = narrow_A ;
|
||||
near_A = regA "vicino" ;
|
||||
new_A = new_A ;
|
||||
old_A = old_A ;
|
||||
red_A = red_A ;
|
||||
rotten_A = regA "marcio" ;
|
||||
round_A = regA "rotondo" ;
|
||||
sharp_A = regA "aguzzo" ;
|
||||
short_A = short_A ;
|
||||
small_A = small_A ;
|
||||
smooth_A = regA "liscio" ;
|
||||
straight_A = regA "diretto" ;
|
||||
thick_A = thick_A ;
|
||||
thin_A = thin_A ;
|
||||
warm_A = warm_A ;
|
||||
wet_A = regA "bagnato" ;
|
||||
white_A = white_A ;
|
||||
wide_A = regA "largo" ;
|
||||
yellow_A = yellow_A ;
|
||||
|
||||
left_A = regA "sinistro" ;
|
||||
right_A = regA "destro" ;
|
||||
|
||||
-- Nouns
|
||||
|
||||
animal_N = regN "animale" ;
|
||||
ashes_N = regN "cenere" ;
|
||||
back_N = regN "schiena" ;
|
||||
bark_N = regN "corteccia" ;
|
||||
belly_N = regN "pancia" ;
|
||||
bird_N = bird_N;
|
||||
blood_N = regN "sangue" ;
|
||||
bone_N = regN "osso" ;
|
||||
breast_N = regN "seno" ;
|
||||
child_N = child_N ;
|
||||
cloud_N = regN "nuvola" ;
|
||||
day_N = regN "giorno" ;
|
||||
dog_N = dog_N ;
|
||||
dust_N = regN "polvere" ;
|
||||
ear_N = regN "orecchio" ;
|
||||
earth_N = regN "terra" ;
|
||||
egg_N = mkN "uovo" "uova" masculine ; -- fem in Pl
|
||||
eye_N = regN "occhio" ;
|
||||
fat_N = regN "grasso" ;
|
||||
father_N = UseN2 father_N2 ;
|
||||
feather_N = regN "piuma" ;
|
||||
fingernail_N = regN "unghia" ;
|
||||
fire_N = regN "fuoco" ;
|
||||
fish_N = fish_N ;
|
||||
flower_N = regN "fiore" ;
|
||||
fog_N = regN "nebbia" ;
|
||||
foot_N = regN "piede" ;
|
||||
forest_N = regN "bosco" ;
|
||||
fruit_N = fruit_N ;
|
||||
grass_N = regN "erba" ;
|
||||
guts_N = regN "intestino" ;
|
||||
hair_N = regN "capello" ;
|
||||
hand_N = femN (regN "mano") ;
|
||||
head_N = regN "testa" ;
|
||||
heart_N = regN "cuore" ;
|
||||
horn_N = regN "corno" ;
|
||||
husband_N = regN "marito" ;
|
||||
ice_N = regN "ghiaccio" ;
|
||||
knee_N = regN "ginocchio" ;
|
||||
lake_N = lake_N ;
|
||||
leaf_N = regN "foglia" ;
|
||||
leg_N = regN "gamba" ;
|
||||
liver_N = regN "fegato" ;
|
||||
louse_N = regN "pidocchio" ;
|
||||
man_N = man_N ;
|
||||
meat_N = meat_N ;
|
||||
moon_N = moon_N ;
|
||||
mother_N = UseN2 mother_N2 ;
|
||||
mountain_N = mountain_N ;
|
||||
mouth_N = regN "bocca" ;
|
||||
name_N = regN "nome" ;
|
||||
neck_N = regN "collo" ;
|
||||
night_N = femN (regN "notte") ;
|
||||
nose_N = regN "naso" ;
|
||||
person_N = regN "persona" ;
|
||||
rain_N = regN "pioggia" ;
|
||||
river_N = river_N ;
|
||||
road_N = regN "strada" ;
|
||||
root_N = femN (regN "radice") ;
|
||||
rope_N = regN "corda" ;
|
||||
salt_N = regN "sale" ;
|
||||
sand_N = regN "sabbia" ;
|
||||
sea_N = sea_N ;
|
||||
seed_N = regN "seme" ;
|
||||
skin_N = femN (regN "pelle") ;
|
||||
sky_N = regN "cielo" ;
|
||||
smoke_N = regN "fumo" ;
|
||||
snake_N = snake_N ;
|
||||
snow_N = femN (regN "neve") ;
|
||||
star_N = star_N ;
|
||||
stick_N = regN "bastone" ;
|
||||
stone_N = stone_N ;
|
||||
sun_N = sun_N ;
|
||||
tail_N = regN "coda" ;
|
||||
tongue_N = regN "lingua" ;
|
||||
tooth_N = regN "dente" ;
|
||||
tree_N = tree_N ;
|
||||
water_N = water_N ;
|
||||
wife_N = regN "donna" ;
|
||||
wind_N = regN "vento" ;
|
||||
wing_N = regN "ala" ;
|
||||
woman_N = woman_N ;
|
||||
worm_N = regN "verme" ;
|
||||
year_N = regN "anno" ;
|
||||
|
||||
-- Verbs
|
||||
|
||||
bite_V = verboV (esplodere_51 "mordere") ;
|
||||
blow_V = regV "soffiare" ;
|
||||
breathe_V = regV "respirare" ;
|
||||
burn_V = regV "bruciare" ;
|
||||
come_V = BasicIta.come_V ;
|
||||
count_V = regV "contare" ;
|
||||
cut_V = regV "tagliare" ;
|
||||
die_V = BasicIta.die_V ;
|
||||
dig_V = regV "scavare" ;
|
||||
drink_V = drink_V2 ;
|
||||
eat_V = regV "mangiare" ;
|
||||
fall_V = essereV (verboV (cadere_28 "cadere")) ;
|
||||
fear_V = fear_VS ;
|
||||
fight_V = regV "lottare" ;
|
||||
float_V = regV "galleggiare" ;
|
||||
flow_V = verboV (finire_100 "fluire") ;
|
||||
fly_V = regV "volare" ;
|
||||
freeze_V = regV "gelare" ;
|
||||
give_V = verboV (dare_15 "dare") ;
|
||||
hear_V = hear_V2 ;
|
||||
hit_V = regV "colpire" ;
|
||||
hold_V = verboV (venire_110 "tenire") ;
|
||||
hunt_V = regV "cacciare" ;
|
||||
kill_V = verboV (ridere_74 "uccidere") ;
|
||||
know_V = know_V2 ;
|
||||
laugh_V = verboV (ridere_74 "ridere") ;
|
||||
lie_V = verboV (piacere_64 "giacere") ;
|
||||
live_V = live_V ;
|
||||
play_V = regV "giocare" ;
|
||||
pull_V = regV "tirare" ;
|
||||
push_V = verboV (cingere_31 "spingere") ;
|
||||
rub_V = regV "strofinare" ;
|
||||
say_V = say_VS ;
|
||||
scratch_V = regV "graffiare" ;
|
||||
see_V = see_V2 ;
|
||||
sew_V = verboV (cucire_103 "cucire") ;
|
||||
sing_V = regV "cantare" ;
|
||||
sit_V = verboV (sedere_84 "sedere") ; --- refl?
|
||||
sleep_V = sleep_V ;
|
||||
smell_V = verboV (sentire_99 "sentire") ;
|
||||
spit_V = regV "sputare" ;
|
||||
split_V = verboV (ridere_74 "dividere") ;
|
||||
squeeze_V = verboV (temere_20 "spremere") ;
|
||||
stab_V = regV "pugnalare" ;
|
||||
stand_V = verboV (stare_16 "stare") ; ---- in piedi
|
||||
suck_V = regV "succhiare" ;
|
||||
swell_V = regV "gonfiare" ;
|
||||
swim_V = regV "nuotare" ;
|
||||
think_V = regV "pensare" ;
|
||||
throw_V = regV "gettare" ;
|
||||
tie_V = regV "legare" ;
|
||||
turn_V = regV "tornare" ;
|
||||
vomit_V = regV "vomitare" ;
|
||||
walk_V = regV "camminare" ;
|
||||
wash_V = regV "lavare" ;
|
||||
wipe_V = regV "asciugare" ;
|
||||
|
||||
}
|
||||
249
lib/resource-1.0/swadesh/SwadeshNor.gf
Normal file
249
lib/resource-1.0/swadesh/SwadeshNor.gf
Normal file
@@ -0,0 +1,249 @@
|
||||
--# -path=.:../abstract:../scandinavian:../../prelude
|
||||
|
||||
concrete SwadeshNor of Swadesh = CatNor
|
||||
** open ResourceNor, SyntaxNor, ParadigmsNor, VerbsNor,
|
||||
BasicNor, Prelude in {
|
||||
|
||||
lin
|
||||
|
||||
-- Pronouns
|
||||
|
||||
i_NP = i_Pron ;
|
||||
youSg_NP = youSg_Pron ;
|
||||
he_NP = he_Pron ;
|
||||
we_NP = we_Pron ;
|
||||
youPl_NP = youPl_Pron ;
|
||||
they_NP = they_Pron ;
|
||||
whoPl_IP = whoPl_IP ;
|
||||
whoSg_IP = whoSg_IP ;
|
||||
whatPl_IP = whatPl_IP ;
|
||||
whatSg_IP = whatSg_IP ;
|
||||
|
||||
-- Determiners
|
||||
|
||||
this_Det = this_Det ;
|
||||
that_Det = that_Det ;
|
||||
all_Det = all_NDet ;
|
||||
many_Det = many_Det ;
|
||||
some_Det = someSg_Det ;
|
||||
few_Det = mkDeterminerPl "få" IndefP ;
|
||||
other_Det = mkDeterminerPl "andre" IndefP ;
|
||||
|
||||
|
||||
-- Adverbs
|
||||
|
||||
here_Adv = here_Adv ;
|
||||
there_Adv = there_Adv ;
|
||||
where_IAdv = where_IAdv ;
|
||||
when_IAdv = when_IAdv ;
|
||||
how_IAdv = how_IAdv ;
|
||||
|
||||
-- not : Adv ; -- ?
|
||||
|
||||
-- Conjunctions
|
||||
|
||||
and_Conj = and_Conj ;
|
||||
|
||||
-- Prepositions
|
||||
|
||||
at_Prep = ss "ved" ;
|
||||
in_Prep = ss "i" ;
|
||||
with_Prep = ss "med" ;
|
||||
|
||||
-- Numerals
|
||||
|
||||
one_Num = NumNumeral (num (pot2as3 (pot1as2 (pot0as1 pot01)))) ;
|
||||
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
|
||||
|
||||
bad_A = bad_A ;
|
||||
big_A = big_A ;
|
||||
black_A = black_A ;
|
||||
cold_A = cold_A ;
|
||||
correct_A = regA "riktig" ;
|
||||
dirty_A = dirty_A ;
|
||||
dry_A = mk2A "tørr" "tørt" ;
|
||||
dull_A = regA "sløv" ;
|
||||
far_A = regA "fjern" ;
|
||||
full_A = regA "full" ;
|
||||
good_A = good_A ;
|
||||
green_A = green_A ;
|
||||
heavy_A = irregA "tung" "tyngre" "tyngst" ;
|
||||
left_A = mkA "venstre" "venstre" "venstre" ;
|
||||
long_A = long_A ;
|
||||
narrow_A = narrow_A ;
|
||||
near_A = mkA "nære" "nære" "nære" "nærmere" "nærmest" ;
|
||||
new_A = new_A ;
|
||||
old_A = old_A ;
|
||||
red_A = red_A ;
|
||||
right_A = mkA "høyre" "høyre" "høyre" ;
|
||||
rotten_A = mk3A "råtten" "råttent" "råtne" ;
|
||||
round_A = regA "rund" ;
|
||||
sharp_A = mk2A "kvass" "kvast" ;
|
||||
short_A = short_A ;
|
||||
small_A = small_A ;
|
||||
smooth_A = mk2A "slett" "slett" ;
|
||||
straight_A = regA "rak" ;
|
||||
thick_A = thick_A ;
|
||||
thin_A = thin_A ;
|
||||
warm_A = warm_A ;
|
||||
wet_A = regA "våt" ;
|
||||
white_A = white_A ;
|
||||
wide_A = regA "bred" ;
|
||||
yellow_A = yellow_A ;
|
||||
|
||||
|
||||
-- Nouns
|
||||
|
||||
animal_N = mk2N "dyr" "dyret" ;
|
||||
ashes_N = mk2N "aske" "aska" ;
|
||||
back_N = mk2N "rygg" "ryggen" ;
|
||||
bark_N = mk2N "bark" "barken" ;
|
||||
belly_N = mk2N "mage" "magen" ;
|
||||
bird_N = bird_N ;
|
||||
blood_N = mk2N "blod" "blodet" ;
|
||||
bone_N = mk2N "bein" "beinet" ;
|
||||
breast_N = mk2N "bryst" "brystet" ;
|
||||
child_N = child_N ;
|
||||
cloud_N = mk2N "sky" "skya" ;
|
||||
day_N = mk2N "dag" "dagen" ;
|
||||
dog_N = dog_N ;
|
||||
dust_N = mk2N "støv" "støvet" ;
|
||||
ear_N = mk2N "øre" "øret" ;
|
||||
earth_N = mk2N "jord" "jorda" ;
|
||||
egg_N = mk2N "egg" "egget" ;
|
||||
eye_N = mkN "øye" "øyet" "øyne" "øynene" ;
|
||||
fat_N = mk2N "fett" "fettet" ;
|
||||
father_N = mkN "far" "faren" "fedre" "fedrene" ;
|
||||
-- father_N = UseN2 father_N2 ;
|
||||
feather_N = mk2N "fjør" "fjøra" ;
|
||||
fingernail_N = mk2N "negl" "neglen" ;
|
||||
fire_N = mk2N "ild" "ilden" ;
|
||||
fish_N = fish_N ;
|
||||
flower_N = mk2N "blomst" "blomsten" ;
|
||||
fog_N = mk2N "tåke" "tåka" ;
|
||||
foot_N = mk2N "fot" "føtter" ;
|
||||
forest_N = mk2N "skog" "skogen" ;
|
||||
fruit_N = fruit_N ;
|
||||
grass_N = mk2N "gras" "graset" ;
|
||||
guts_N = mk2N "tarm" "tarmen" ; ---- involler
|
||||
hair_N = mk2N "hår" "håret" ;
|
||||
hand_N = mk2N "hånd" "hånden" ;
|
||||
|
||||
head_N = mk2N "hode" "hodet" ;
|
||||
heart_N = mk2N "hjerte" "hjertet" ;
|
||||
horn_N = mk2N "horn" "hornet" ;
|
||||
husband_N = mkN "ektemann" "ektemannen" "ektemenn" "ektemennen" ;
|
||||
ice_N = mk2N "is" "isen" ;
|
||||
knee_N = mkN "kne" "kneet" "knær" "knæne" ;
|
||||
lake_N = lake_N ;
|
||||
leaf_N = mk2N "løv" "løvet" ;
|
||||
leg_N = mk2N "bein" "beinet" ;
|
||||
liver_N = mkN "lever" "leveren" "levrer" "levrene" ;
|
||||
louse_N = mk2N "lus" "lusa" ;
|
||||
man_N = man_N ;
|
||||
meat_N = meat_N ;
|
||||
moon_N = moon_N ;
|
||||
mother_N = mkN "mor" "moren" "mødre" "mødrene" ;
|
||||
-- mother_N = UseN2 mother_N2 ;
|
||||
mountain_N = mountain_N ;
|
||||
mouth_N = mk2N "munn" "munnen" ;
|
||||
name_N = mk2N "navn" "navnet" ;
|
||||
neck_N = mk2N "nakke" "nakken" ;
|
||||
night_N = mkN "natt" "natta" "netter" "nettene" ;
|
||||
nose_N = mk2N "nese" "nesen" ;
|
||||
person_N = mk2N "person" "personen" ;
|
||||
rain_N = mk2N "regn" "regnet" ;
|
||||
river_N = river_N ;
|
||||
road_N = mk2N "vei" "veien" ;
|
||||
root_N = mkN "rot" "rota" "røtter" "røttene" ;
|
||||
rope_N = mk2N "tau" "tauet" ;
|
||||
salt_N = mk2N "salt" "saltet" ;
|
||||
sand_N = mk2N "sand" "sanden" ;
|
||||
sea_N = sea_N ;
|
||||
seed_N = mk2N "frø" "frøet" ;
|
||||
skin_N = mk2N "skinn" "skinnet" ;
|
||||
sky_N = mkN "himmel" "himmelen" "himler" "himlene" ;
|
||||
smoke_N = mk2N "røyk" "røyken" ;
|
||||
snake_N = snake_N ;
|
||||
snow_N = mk2N "snø" "snøen" ;
|
||||
star_N = star_N ;
|
||||
stick_N = mk2N "pinne" "pinnen" ;
|
||||
stone_N = stone_N ;
|
||||
sun_N = sun_N ;
|
||||
tail_N = mk2N "hale" "halen" ;
|
||||
tongue_N = mk2N "tunge" "tunga" ;
|
||||
tooth_N = mkN "tann" "tanna" "tenner" "tennene" ;
|
||||
tree_N = tree_N ;
|
||||
water_N = water_N ;
|
||||
wife_N = mk2N "kone" "kona" ;
|
||||
wind_N = mk2N "vind" "vinden" ;
|
||||
wing_N = mk2N "vinge" "vingen" ;
|
||||
woman_N = woman_N ;
|
||||
worm_N = mk2N "mark" "marken" ;
|
||||
year_N = mk2N "år" "året" ;
|
||||
|
||||
-- Verbs
|
||||
|
||||
bite_V = VerbsNor.bite_V ;
|
||||
blow_V = mk2V "blåse" "blåste" ;
|
||||
breathe_V = regV "puste" ;
|
||||
burn_V = brenne_V ;
|
||||
come_V = komme_V ;
|
||||
count_V = regV "regne" ;
|
||||
cut_V = skjære_V ;
|
||||
die_V = dø_V ;
|
||||
dig_V = mk2V "grave" "gravde" ;
|
||||
drink_V = drikke_V ;
|
||||
eat_V = mk2V "spise" "spiste" ; ---- ete
|
||||
fall_V = falle_V ;
|
||||
fear_V = regV "frykte" ;
|
||||
fight_V = slåss_V ;
|
||||
float_V = flyte_V ;
|
||||
flow_V = renne_V ;
|
||||
fly_V = fly_V ;
|
||||
freeze_V = fryse_V ;
|
||||
give_V = gi_V ;
|
||||
hear_V = mk2V "høre" "hørde" ;
|
||||
hit_V = slå_V;
|
||||
hold_V = holde_V ;
|
||||
hunt_V = regV "jakte" ;
|
||||
kill_V = mk2V "drepe" "drepte" ;
|
||||
know_V = vite_V ;
|
||||
laugh_V = mkV "le" "ler" "les" "lo" "ledd" "le" ;
|
||||
lie_V = ligge_V ;
|
||||
live_V = mk2V "leve" "levde" ;
|
||||
play_V = mk2V "leke" "lekte" ;
|
||||
pull_V = dra_V ;
|
||||
push_V = irregV "skyve" "skjøv" "skjøvet" ;
|
||||
rub_V = gni_V ;
|
||||
say_V = si_V ;
|
||||
scratch_V = regV "klø" ;
|
||||
see_V = se_V ;
|
||||
sew_V = mk2V "sy" "sydde" ;
|
||||
sing_V = synge_V ;
|
||||
sit_V = sitte_V ;
|
||||
sleep_V = sove_V ;
|
||||
smell_V = regV "lukte" ;
|
||||
spit_V = regV "spytte" ;
|
||||
split_V = mk2V "kløyve" "kløyvde" ;
|
||||
squeeze_V = mk2V "klemme" "klemte" ;
|
||||
stab_V = stikke_V ;
|
||||
stand_V = stå_V ;
|
||||
suck_V = suge_V ;
|
||||
swell_V = partV (regV "hovne") "opp" ;
|
||||
swim_V = regV "simme" ;
|
||||
think_V = mk2V "tenke" "tenkte" ;
|
||||
throw_V = regV "kaste" ;
|
||||
tie_V = regV "knytte" ;
|
||||
turn_V = mk2V "vende" "vendte" ;
|
||||
vomit_V = partV (regV "kaste") "opp" ;
|
||||
walk_V = gå_V ;
|
||||
wash_V = regV "vaske" ;
|
||||
wipe_V = regV "tørke" ;
|
||||
|
||||
}
|
||||
247
lib/resource-1.0/swadesh/SwadeshRus.gf
Normal file
247
lib/resource-1.0/swadesh/SwadeshRus.gf
Normal file
@@ -0,0 +1,247 @@
|
||||
--# -path=.:../abstract:../../prelude
|
||||
|
||||
concrete SwadeshRus of Swadesh = CatRus
|
||||
** open ResourceRus, SyntaxRus, ParadigmsRus,
|
||||
BasicRus, Prelude in {
|
||||
flags coding=utf8 ;
|
||||
lin
|
||||
|
||||
-- Pronouns
|
||||
|
||||
i_NP = i_Pron ;
|
||||
youSg_NP = youSg_Pron ;
|
||||
he_NP = he_Pron ;
|
||||
we_NP = we_Pron ;
|
||||
youPl_NP = youPl_Pron ;
|
||||
they_NP = they_Pron ;
|
||||
whoPl_IP = whoPl_IP ;
|
||||
whoSg_IP = whoSg_IP ;
|
||||
whatPl_IP = whatPl_IP ;
|
||||
whatSg_IP = whatSg_IP ;
|
||||
|
||||
-- Determiners
|
||||
|
||||
this_Det = this_Det ;
|
||||
that_Det = that_Det ;
|
||||
all_Det = all_NDet ;
|
||||
many_Det = many_Det ;
|
||||
some_Det = someSg_Det ;
|
||||
few_Det = adjInvar "мало" ** {n = Sg; g = PNoGen; c= Nom} ;
|
||||
other_Det = drugojDet ** {n = Sg; g = PNoGen; c= Nom} ;
|
||||
|
||||
|
||||
-- Adverbs
|
||||
|
||||
here_Adv = here_Adv ;
|
||||
there_Adv = there_Adv ;
|
||||
where_IAdv = where_IAdv ;
|
||||
when_IAdv = when_IAdv ;
|
||||
how_IAdv = how_IAdv ;
|
||||
|
||||
-- not : Adv ; -- ?
|
||||
|
||||
-- Conjunctions
|
||||
|
||||
and_Conj = and_Conj ;
|
||||
|
||||
-- Prepositions
|
||||
|
||||
at_Prep = { s2 = "у" ; c = genitive} ;
|
||||
in_Prep = { s2 = "в" ; c = prepositional} ;
|
||||
with_Prep = { s2 = "с" ; c = instructive} ;
|
||||
|
||||
-- Numerals
|
||||
|
||||
one_Num = NumNumeral (num (pot2as3 (pot1as2 (pot0as1 pot01)))) ;
|
||||
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
|
||||
|
||||
bad_A = bad_A ;
|
||||
big_A = big_A ;
|
||||
black_A = black_A ;
|
||||
cold_A = cold_A ;
|
||||
correct_A = mkA (AStaruyj "правильн") "правильнее";
|
||||
dirty_A = dirty_A ;
|
||||
dry_A = mkA (AMolodoj "сух") "суше";
|
||||
dull_A = mkA (AStaruyj "скучн") "скучнее";
|
||||
far_A = mkA (AKhoroshij "далекий") "дальше";
|
||||
full_A = mkA (AStaruyj "полн") "полнее";
|
||||
good_A = good_A ;
|
||||
green_A = green_A ;
|
||||
heavy_A = mkA (AStaruyj "тяжел") "тяжелее";
|
||||
left_A = AStaruyj "лев";
|
||||
long_A = long_A ;
|
||||
narrow_A = narrow_A ;
|
||||
near_A = mkA (AMalenkij "близк") "ближе";
|
||||
new_A = new_A ;
|
||||
old_A = old_A ;
|
||||
red_A = red_A ;
|
||||
right_A = AStaruyj "прав";
|
||||
rotten_A = mkA (AMolodoj "гнил") "гнилее";
|
||||
round_A = mkA (AStaruyj "кругл") "круглее";
|
||||
sharp_A = mkA (AStaruyj "остр") "острее";
|
||||
short_A = short_A ;
|
||||
small_A = small_A ;
|
||||
smooth_A = mkA (AMalenkij "гладк") "глаже";
|
||||
straight_A = mkA (AMolodoj "прям") "прямее";
|
||||
thick_A = thick_A ;
|
||||
thin_A = thin_A ;
|
||||
warm_A = warm_A ;
|
||||
wet_A = mkA (AStaruyj "мокр") "мокрее";
|
||||
white_A = white_A ;
|
||||
wide_A = mkA (AMalenkij "широк") "шире";
|
||||
yellow_A = yellow_A ;
|
||||
|
||||
|
||||
-- Nouns
|
||||
|
||||
animal_N = nZhivotnoe "животн" ;
|
||||
ashes_N = nPepel "пеп" ;
|
||||
back_N = nMashina "спин" ;
|
||||
bark_N = mkN "лай" "лая" "лаю" "лай" "лаем" "лае" "лаи" "лаев" "лаям" "лаи" "лаями" "лаях" masculine inanimate;
|
||||
belly_N = nTelefon "живот" ;
|
||||
bird_N = bird_N ;
|
||||
blood_N = nBol "кров" ;
|
||||
bone_N = nBol "кост" ;
|
||||
breast_N = nBol "грудь" ;
|
||||
child_N = child_N ;
|
||||
cloud_N = nChislo "облак" ;
|
||||
day_N = mkN "день" "дня" "дню" "день" "днём" "дне" "дни" "дней" "дням" "дни" "днями" "днях" masculine inanimate ;
|
||||
dog_N = dog_N ;
|
||||
dust_N = nBol "пыл" ;
|
||||
ear_N = nChislo "ухо" ;
|
||||
earth_N = nTetya "земл" ;
|
||||
egg_N = nChislo "яйц" ;
|
||||
eye_N = nAdres "глаз" ;
|
||||
fat_N = nBank "жир" ;
|
||||
father_N = mkN "отец" "отца" "отцу" "отца" "отцом" "отце" "отцы" "отцов" "отцам" "отцов" "отцами" "отцах" masculine animate ;
|
||||
-- father_N = UseN2 father_N2 ;
|
||||
feather_N = mkN "перо" "пера" "перу" "пера" "пером" "пере" "перья" "перьев" "перьям" "перьев" "перьями" "перьях" neuter inanimate ;
|
||||
fingernail_N = mkN "ноготь" "ногтя" "ногтю" "ногтя" "ногтем" "ногте" "ногти" "ногтей" "ногтям" "ногтей" "ногтями" "ногтях" masculine inanimate ;
|
||||
fire_N = mkN "огонь" "огня" "огню" "огня" "огнём" "огне" "огни" "огней" "огням" "огней" "огнями" "огнях" masculine inanimate ;
|
||||
fish_N = fish_N ;
|
||||
flower_N = mkN "отец" "отца" "отцу" "отца" "отцом" "отце" "отцы" "отцов" "отцам" "отцов" "отцами" "отцах" masculine animate ;
|
||||
fog_N = nTelefon "туман" ;
|
||||
foot_N = nTetya "ступн" ;
|
||||
forest_N = nAdres "лес" ;
|
||||
fruit_N = fruit_N ;
|
||||
grass_N = nMashina "трав" ;
|
||||
guts_N = nBol "внутренност" ;
|
||||
hair_N = nTelefon "волос" ;
|
||||
hand_N = nNoga "рук" ;
|
||||
head_N = nMashina "голов" ;
|
||||
heart_N = mkN "сердце" "сердца" "сердцу" "сердца" "сердцем" "сердце" "сердца" "сердец" "сердцам" "сердец" "сердцами" "сердцах" neuter inanimate;
|
||||
horn_N = nAdres "рог" ;
|
||||
husband_N = mkN "муж" "мужа" "мужу" "мужа" "мужем" "муже" "мужья" "мужей" "мужьям" "мужей" "мужьями" "мужьях" masculine animate ;
|
||||
ice_N = mkN "лёд" "льда" "льду" "льда" "льдом" "льде" "льды" "льдов" "льдам" "льдов" "льдами" "льдах" masculine inanimate ;
|
||||
knee_N = mkN "колено" "колена" "колену" "колена" "коленом" "колене" "колени" "колен" "коленам" "колен" "коленями" "коленях" neuter inanimate ;
|
||||
lake_N = lake_N ;
|
||||
leaf_N = nStul "лист" ;
|
||||
leg_N = nNoga "ног" ;
|
||||
liver_N = nBol "печен" ;
|
||||
louse_N = mkN "вошь" "вши" "вши" "вошь" "вошью" "вше" "вши" "вшей" "вшам" "вшей" "вшами" "вшах" feminine animate ;
|
||||
man_N = man_N ;
|
||||
meat_N = meat_N ;
|
||||
moon_N = moon_N ;
|
||||
mother_N = mkN "мать" "матери" "матери" "мать" "матерью" "матери" "матери" "матерей" "матерям" "матерей" "матерями" "матерях" feminine animate ;
|
||||
--- mother_N = UseN2 mother_N2 ;
|
||||
mountain_N = mountain_N ;
|
||||
mouth_N = mkN "рот" "рта" "рту" "рот" "ртом" "рте" "рты" "ртов" "ртам" "рты" "ртами" "ртах" masculine inanimate;
|
||||
name_N = mkN "имя" "имени" "имени" "имя" "именем" "имени" "имена" "имён" "именам" "имена" "именами" "именах" neuter inanimate;
|
||||
neck_N = nTetya "ше" ;
|
||||
night_N = nBol "ноч" ;
|
||||
nose_N = nTelefon "нос" ;
|
||||
person_N = nBol "личность" ;
|
||||
rain_N = nNol "дожд" ;
|
||||
river_N = river_N ;
|
||||
road_N = nNoga "дорог" ;
|
||||
root_N = nUroven "кор" ;
|
||||
rope_N = nNoga "веревк" ;
|
||||
salt_N = nBol "сол" ;
|
||||
sand_N = mkN "песок" "песка" "песку" "песок" "песком" "песке" "пески" "песков" "пескам" "песков" "песками" "песках" masculine inanimate ;
|
||||
sea_N = sea_N ;
|
||||
seed_N = mkN "семя" "семени" "семении" "семя" "семенем" "семени" "семена" "семян" "семенам" "семена" "семенами" "семенах" neuter inanimate ;
|
||||
skin_N = nEdinica "кож" ;
|
||||
sky_N = mkN "небо" "неба" "небу" "небо" "небом" "небе" "небеса" "небес" "небесам" "небес" "небесами" "небесах" neuter inanimate ;
|
||||
smoke_N = nTelefon "дым" ;
|
||||
snake_N = snake_N ;
|
||||
snow_N = nAdres "снег" ;
|
||||
star_N = star_N ;
|
||||
stick_N = nNoga "палк" ;
|
||||
stone_N = stone_N ;
|
||||
sun_N = sun_N ;
|
||||
tail_N = nTelefon "хвост" ;
|
||||
tongue_N = nBank "язык" ;
|
||||
tooth_N = nTelefon "зуб" ;
|
||||
tree_N = tree_N ;
|
||||
water_N = water_N ;
|
||||
wife_N = nMashina "жен" ;
|
||||
wind_N = mkN "ветер" "ветра" "ветру" "ветер" "ветром" "ветра" "ветров" "ветра" "ветрам" "ветров" "ветрами" "ветрах" masculine inanimate ;
|
||||
wing_N = mkN "крыло" "крыла" "крылу" "крыло" "крылом" "крыле" "крылья" "крыльев" "крыльям" "крылья" "крыльями" "крыльях" neuter inanimate ;
|
||||
woman_N = woman_N ;
|
||||
worm_N = nNol "черв" ;
|
||||
year_N = nAdres "год" ;
|
||||
|
||||
-- Verbs
|
||||
|
||||
bite_V = mkRegVerb imperfective first "куса" "ю" "кусал" "кусай" "кусать";
|
||||
blow_V = mkRegVerb imperfective first "ду" "ю" "дул" "дуй" "дуть" ;
|
||||
breathe_V = mkRegVerb imperfective second "дыш" "у" "дышал" "дыши" "дышать" ;
|
||||
burn_V = mkRegVerb imperfective second "гор" "ю" "горел" "гори" "гореть" ;
|
||||
come_V = come_V ;
|
||||
count_V = mkRegVerb imperfective first "счита" "ю" "считал" "считай" "считать" ;
|
||||
cut_V = mkRegVerb imperfective first "реж" "у" "резал" "режь" "резать" ;
|
||||
die_V = die_V ;
|
||||
dig_V = mkRegVerb imperfective first "копа" "ю" "копал" "копай" "копать" ;
|
||||
drink_V = mkRegVerb imperfective firstE "пь" "ю" "пил" "пей" "пить" ;
|
||||
eat_V = mkVerbum imperfective "ем" "ешь" "ест" "едим" "едите" "едят" "ел" "ешь" "есть" ;
|
||||
fall_V = mkRegVerb imperfective first "пада" "ю" "падал" "падай" "падать" ;
|
||||
fear_V = mkRegVerb imperfective second "бо" "ю" "боял" "бой" "боять" ;
|
||||
fight_V = mkRegVerb imperfective firstE "дер" "у" "драл" "дери" "драть" ;
|
||||
float_V = mkRegVerb imperfective firstE "плыв" "у" "плыл" "плыви" "плыть" ;
|
||||
flow_V = mkRegVerb imperfective firstE "тек" "у" "тёк" "теки" "течь" ;
|
||||
fly_V = mkRegVerb imperfective second "лета" "ю" "летал" "летай" "летать" ;
|
||||
freeze_V = mkRegVerb imperfective first "замерза" "ю" "замерзал" "замерзай" "замерзать" ;
|
||||
give_V = mkRegVerb imperfective firstE "да" "ю" "давал" "давай" "давать" ;
|
||||
hear_V = mkRegVerb imperfective first "слыш" "у" "слышал" "слышь" "слышать" ;
|
||||
hit_V = mkRegVerb imperfective first "ударя" "ю" "ударял" "ударяй" "ударять" ;
|
||||
hold_V = mkRegVerb imperfective second "держ" "у" "держал" "держи" "держать" ;
|
||||
hunt_V = mkRegVerb imperfective second "охоч" "у" "охотил" "охоть" "охотить" ;
|
||||
kill_V = mkRegVerb imperfective first "убива" "ю" "убивал" "убивай" "убивать" ;
|
||||
know_V = mkRegVerb imperfective first "зна" "ю" "знал" "знай" "знать" ;
|
||||
laugh_V = mkRegVerb imperfective firstE "сме" "ю" "смеял" "смей" "смеять" ;
|
||||
lie_V = mkRegVerb imperfective firstE "лг" "у" "лгал" "лги" "лгать" ;
|
||||
live_V = live_V ;
|
||||
play_V = mkRegVerb imperfective first "игра" "ю" "играл" "играй" "играть" ;
|
||||
pull_V = mkRegVerb imperfective first "тян" "у" "тянул" "тяни" "тянуть" ;
|
||||
push_V = mkRegVerb imperfective first "толка" "ю" "толкал" "толкай" "толкать" ;
|
||||
rub_V = mkRegVerb imperfective firstE "тр" "у" "тёр" "три" "тереть" ;
|
||||
say_V = mkRegVerb imperfective second "говор" "ю" "говорил" "говори" "говорить";
|
||||
scratch_V = mkRegVerb imperfective first "чеш" "у" "чесал" "чеши" "чесать" ; see_V = mkRegVerb imperfective second "смотр" "ю" "смотрел" "смотри" "смотреть" ;
|
||||
sew_V = mkRegVerb imperfective firstE "шь" "ю" "шил" "шей" "шить" ;
|
||||
sing_V = mkRegVerb imperfective firstE "по" "ю" "пел" "пой" "петь" ;
|
||||
sit_V = mkVerbum imperfective "сижу" "сидишь" "сидит" "сидим" "сидите" "сидят" "сидел" "сиди" "сидеть" ;
|
||||
sleep_V = sleep_V ;
|
||||
smell_V = mkRegVerb imperfective first "пахн" "у" "пахнул" "пахни" "пахнуть" ;
|
||||
spit_V = mkRegVerb imperfective firstE "плю" "ю" "плевал" "плюй" "плевать" ;
|
||||
split_V = mkRegVerb imperfective first "разбива" "ю" "разбивал" "разбей" "разбивать" ;
|
||||
squeeze_V = mkRegVerb imperfective first "сжима" "ю" "сжимал" "сжимай" "сжимать" ;
|
||||
stab_V = mkRegVerb imperfective first "кол" "ю" "колол" "коли" "колоть" ;
|
||||
stand_V = mkRegVerb imperfective second "сто" "ю" "стоял" "стой" "стоять" ;
|
||||
suck_V = mkRegVerb imperfective firstE "сос" "у" "сосал" "соси" "сосать" ;
|
||||
swell_V = mkRegVerb imperfective first "опуха" "ю" "опухал" "опухай" "опухать" ;
|
||||
swim_V = mkRegVerb imperfective first "плава" "ю" "плавал" "плавай" "плавать" ;
|
||||
think_V = mkRegVerb imperfective first "дума" "ю" "думал" "думай" "думать" ;
|
||||
throw_V = mkRegVerb imperfective first "броса" "ю" "бросал" "бросай" "бросать" ;
|
||||
tie_V = mkRegVerb imperfective first "вяж" "у" "вязал" "вяжи" "вязать" ;
|
||||
turn_V = mkRegVerb imperfective first "поворачива" "ю" "поворачивал" "поворачивай" "поворачивать" ;
|
||||
vomit_V = mkRegVerb imperfective firstE "рв" "у" "рвал" "рви" "рвать" ;
|
||||
walk_V = walk_V ;
|
||||
wash_V = mkRegVerb imperfective first "мо" "ю" "мыл" "мой" "мыть" ;
|
||||
wipe_V = mkRegVerb imperfective first "вытира" "ю" "вытирал" "вытирай" "вытирать" ;
|
||||
|
||||
};
|
||||
248
lib/resource-1.0/swadesh/SwadeshSpa.gf
Normal file
248
lib/resource-1.0/swadesh/SwadeshSpa.gf
Normal file
@@ -0,0 +1,248 @@
|
||||
--# -path=.:../abstract:../../prelude:../romance
|
||||
|
||||
concrete SwadeshSpa of Swadesh = CatSpa
|
||||
** open StructuralSpa, RulesSpa, SyntaxSpa, ParadigmsSpa,
|
||||
BasicSpa, BeschSpa, Prelude in {
|
||||
|
||||
-- words contributed by Ana Bove, May 2005
|
||||
|
||||
lin
|
||||
|
||||
-- Pronouns
|
||||
|
||||
i_NP = i_Pron ;
|
||||
youSg_NP = youSg_Pron ;
|
||||
he_NP = he_Pron ;
|
||||
we_NP = we_Pron ;
|
||||
youPl_NP = youPl_Pron ;
|
||||
they_NP = they_Pron ;
|
||||
whoPl_IP = whoPl_IP ;
|
||||
whoSg_IP = whoSg_IP ;
|
||||
whatPl_IP = whatPl_IP ;
|
||||
whatSg_IP = whatSg_IP ;
|
||||
|
||||
-- Determiners
|
||||
|
||||
this_Det = this_Det ;
|
||||
that_Det = that_Det ;
|
||||
all_Det = all_NDet ;
|
||||
many_Det = many_Det ;
|
||||
some_Det = someSg_Det ;
|
||||
few_Det = mkDeterminer Pl "pocos" "pocas" ;
|
||||
other_Det = mkDeterminer Pl "otros" "otras" ;
|
||||
|
||||
|
||||
-- Adverbs
|
||||
|
||||
here_Adv = here_Adv;
|
||||
there_Adv = there_Adv;
|
||||
where_IAdv = where_IAdv;
|
||||
when_IAdv = when_IAdv;
|
||||
how_IAdv = how_IAdv;
|
||||
|
||||
-- not : Adv ; -- ?
|
||||
|
||||
-- Conjunctions
|
||||
|
||||
and_Conj = and_Conj ;
|
||||
|
||||
-- Prepositions
|
||||
|
||||
at_Prep = justCase dative.p1 ;
|
||||
in_Prep = StructuralSpa.in_Prep ;
|
||||
with_Prep = StructuralSpa.with_Prep ;
|
||||
|
||||
-- Numerals
|
||||
|
||||
one_Num = NumNumeral (num (pot2as3 (pot1as2 (pot0as1 pot01)))) ;
|
||||
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
|
||||
|
||||
bad_A = bad_A ;
|
||||
big_A = big_A ;
|
||||
black_A = black_A ;
|
||||
cold_A = cold_A ;
|
||||
correct_A = regA "correcto" ;
|
||||
dirty_A = dirty_A ;
|
||||
dry_A = regA "seco" ;
|
||||
dull_A = regA "desafilado" ;
|
||||
far_A = regA "lejos" ; ----?
|
||||
full_A = regA "lleno" ;
|
||||
good_A = good_A ;
|
||||
green_A = green_A ;
|
||||
heavy_A = regA "pesado" ;
|
||||
long_A = long_A ;
|
||||
narrow_A = narrow_A ;
|
||||
near_A = regA "cerca" ;
|
||||
new_A = new_A ;
|
||||
old_A = old_A ;
|
||||
red_A = red_A ;
|
||||
rotten_A = regA "podrido" ;
|
||||
round_A = regA "redondo" ;
|
||||
sharp_A = regA "filoso" ; -- afilado, puntiagudo
|
||||
short_A = short_A ;
|
||||
small_A = small_A ;
|
||||
smooth_A = regA "liso" ; -- suave
|
||||
straight_A = regA "directo" ;
|
||||
thick_A = thick_A ;
|
||||
thin_A = thin_A ;
|
||||
warm_A = warm_A ;
|
||||
wet_A = regA "mojado" ;
|
||||
white_A = white_A ;
|
||||
wide_A = regA "ancho" ; -- extenso
|
||||
yellow_A = yellow_A ;
|
||||
|
||||
left_A = regA "izquierda" ;
|
||||
right_A = regA "derecha" ;
|
||||
|
||||
-- Nouns
|
||||
|
||||
animal_N = regN "animal" ; -- masc (sometimes fem when adj)
|
||||
ashes_N = regN "ceniza" ;
|
||||
back_N = regN "espalda" ;
|
||||
bark_N = regN "corteza" ;
|
||||
belly_N = regN "panza" ; -- barriga
|
||||
bird_N = bird_N;
|
||||
blood_N = femN (regN "sangre") ;
|
||||
bone_N = regN "hueso" ;
|
||||
breast_N = regN "seno" ; -- pecho
|
||||
child_N = child_N ;
|
||||
cloud_N = femN (regN "nube") ;
|
||||
day_N = mascN (regN "día") ;
|
||||
dog_N = dog_N ;
|
||||
dust_N = regN "polvo" ;
|
||||
ear_N = regN "oreja" ;
|
||||
earth_N = regN "tierra" ;
|
||||
egg_N = regN "huevo" ;
|
||||
eye_N = regN "ojo" ;
|
||||
fat_N = regN "grasa" ;
|
||||
father_N = UseN2 father_N2 ;
|
||||
feather_N = regN "pluma" ;
|
||||
fingernail_N = regN "uña" ;
|
||||
fire_N = regN "fuego" ;
|
||||
fish_N = fish_N ;
|
||||
flower_N = femN (regN "flor") ;
|
||||
fog_N = regN "niebla" ;
|
||||
foot_N = regN "pie" ;
|
||||
forest_N = regN "bosque" ;
|
||||
fruit_N = fruit_N ;
|
||||
grass_N = regN "pasto" ; -- hierba, césped (masc)
|
||||
guts_N = regN "tripa" ; -- gut=intestino ---- pl.t. tripas
|
||||
hair_N = regN "cabello" ; -- pelo
|
||||
hand_N = femN (regN "mano") ;
|
||||
head_N = regN "cabeza" ;
|
||||
heart_N = mkN "corazón" "corazones" masculine ;
|
||||
horn_N = regN "cuerno" ;
|
||||
husband_N = regN "marido" ; -- esposo
|
||||
ice_N = regN "hielo" ;
|
||||
knee_N = regN "rodilla" ;
|
||||
lake_N = lake_N ;
|
||||
leaf_N = regN "hoja" ;
|
||||
leg_N = regN "pierna" ;
|
||||
liver_N = regN "hígado" ;
|
||||
louse_N = regN "piojo" ;
|
||||
man_N = man_N ;
|
||||
meat_N = meat_N ;
|
||||
moon_N = moon_N ;
|
||||
mother_N = UseN2 mother_N2 ;
|
||||
mountain_N = mountain_N ;
|
||||
mouth_N = regN "boca" ;
|
||||
name_N = regN "nombre" ;
|
||||
neck_N = regN "cuello" ;
|
||||
night_N = femN (regN "noche") ;
|
||||
nose_N = femN (regN "nariz") ;
|
||||
person_N = regN "persona" ;
|
||||
rain_N = regN "lluvia" ;
|
||||
river_N = river_N ;
|
||||
road_N = femN (regN "calle") ; -- camino
|
||||
root_N = femN (regN "raíz") ;
|
||||
rope_N = regN "cuerda" ;
|
||||
salt_N = femN (regN "sal") ;
|
||||
sand_N = regN "arena" ;
|
||||
sea_N = sea_N ;
|
||||
seed_N = regN "semilla" ;
|
||||
skin_N = femN (regN "piel") ; -- fem
|
||||
sky_N = regN "cielo" ;
|
||||
smoke_N = regN "humo" ;
|
||||
snake_N = snake_N ;
|
||||
snow_N = femN (regN "nieve") ; -- fem
|
||||
star_N = star_N ;
|
||||
stick_N = mkN "bastón" "bastones" masculine ; -- palo
|
||||
stone_N = stone_N ;
|
||||
sun_N = sun_N ;
|
||||
tail_N = regN "cola" ;
|
||||
tongue_N = regN "lengua" ;
|
||||
tooth_N = regN "diente" ;
|
||||
tree_N = tree_N ;
|
||||
water_N = water_N ;
|
||||
wife_N = regN "esposa" ;
|
||||
wind_N = regN "viento" ;
|
||||
wing_N = regN "ala" ;
|
||||
woman_N = woman_N ;
|
||||
worm_N = regN "gusano" ; -- lombriz (fem)
|
||||
year_N = regN "año" ;
|
||||
|
||||
-- Verbs
|
||||
|
||||
bite_V = verboV (morder_50b "morder") ;
|
||||
blow_V = regV "soplar" ;
|
||||
breathe_V = regV "respirar" ;
|
||||
burn_V = regV "quemar" ;
|
||||
come_V = BasicSpa.come_V ;
|
||||
count_V = verboV (contar_38b "contar") ;
|
||||
cut_V = regV "cortar" ;
|
||||
die_V = BasicSpa.die_V ;
|
||||
dig_V = regV "escarbar" ;
|
||||
drink_V = regV "tomar" ;
|
||||
eat_V = regV "comer" ;
|
||||
fall_V = verboV (caer_20 "caer") ;
|
||||
fear_V = fear_VS ;
|
||||
fight_V = regV "pelear" ;
|
||||
float_V = regV "flotar" ;
|
||||
flow_V = verboV (influir_45 "fluir") ; -- circular
|
||||
fly_V = regV "volar" ;
|
||||
freeze_V = regV "congelar" ;
|
||||
give_V = verboV (dar_27 "dar") ;
|
||||
hear_V = hear_V2 ;
|
||||
hit_V = regV "golpear" ; -- pegar
|
||||
hold_V = verboV (tener_4 "tener") ; -- agarrar
|
||||
hunt_V = regV "cazar" ;
|
||||
kill_V = regV "matar" ;
|
||||
know_V = know_V2 ;
|
||||
laugh_V = regV "reir" ; ----V reír_67
|
||||
lie_V = regV "mentir" ; -- "acostarse"
|
||||
live_V = live_V ;
|
||||
play_V = regV "jugar" ;
|
||||
pull_V = regV "tirar" ;
|
||||
push_V = regV "empujar" ;
|
||||
rub_V = regV "resfregar" ; -- frotar
|
||||
say_V = say_VS ;
|
||||
scratch_V = regV "rascar" ;
|
||||
see_V = see_V2 ;
|
||||
sew_V = regV "coser" ;
|
||||
sing_V = regV "cantar" ;
|
||||
sit_V = regV "sentar" ; ----V verboV (sedere_84 "sentarse") ;
|
||||
sleep_V = sleep_V ;
|
||||
smell_V = verboV (oler_52 "oler") ;
|
||||
spit_V = regV "escupir" ;
|
||||
split_V = regV "separar" ; -- dividir, partir
|
||||
squeeze_V = regV "exprimir" ;
|
||||
stab_V = regV "apuñalar" ;
|
||||
stand_V = verboV (estar_2 "estar") ; ---- "estar de pie" ;
|
||||
suck_V = regV "chupar" ;
|
||||
swell_V = regV "tragar" ;
|
||||
swim_V = regV "nadar" ;
|
||||
think_V = regV "pensar" ;
|
||||
throw_V = regV "tirar" ;
|
||||
tie_V = regV "atar" ;
|
||||
turn_V = regV "doblar" ;
|
||||
vomit_V = regV "vomitar" ;
|
||||
walk_V = regV "caminar" ;
|
||||
wash_V = regV "lavar" ;
|
||||
wipe_V = regV "secar" ;
|
||||
}
|
||||
249
lib/resource-1.0/swadesh/SwadeshSwe.gf
Normal file
249
lib/resource-1.0/swadesh/SwadeshSwe.gf
Normal file
@@ -0,0 +1,249 @@
|
||||
--# -path=.:../swedish:../common:../abstract:../scandinavian:../../prelude
|
||||
|
||||
concrete SwadeshSwe of Swadesh = CatSwe
|
||||
** open MorphoSwe, LangSwe, ParadigmsSwe, IrregSwe, Prelude in {
|
||||
|
||||
lin
|
||||
|
||||
-- Pronouns
|
||||
|
||||
i_NP = i_Pron ;
|
||||
youSg_NP = youSg_Pron ;
|
||||
he_NP = he_Pron ;
|
||||
we_NP = we_Pron ;
|
||||
youPl_NP = youPl_Pron ;
|
||||
they_NP = they_Pron ;
|
||||
whoPl_IP = whoPl_IP ;
|
||||
whoSg_IP = whoSg_IP ;
|
||||
whatPl_IP = whatPl_IP ;
|
||||
whatSg_IP = whatSg_IP ;
|
||||
|
||||
-- Determiners
|
||||
|
||||
this_Det = DetSg (SgQuant this_Quant) NoOrd ;
|
||||
that_Det = DetSg (SgQuant that_Quant) NoOrd ;
|
||||
all_Det = {s = \\_,_ => "alla" ; n = Pl ; det = DDef Indef} ;
|
||||
many_Det = many_Det ;
|
||||
some_Det = someSg_Det ;
|
||||
few_Det = {s = \\_,_ => "få" ; n = Pl ; det = DDef Indef} ;
|
||||
other_Det = {s = \\_,_ => "andra" ; n = Pl ; det = DDef Indef} ;
|
||||
|
||||
|
||||
-- Adverbs
|
||||
|
||||
here_Adv = here_Adv ;
|
||||
there_Adv = there_Adv ;
|
||||
where_IAdv = where_IAdv ;
|
||||
when_IAdv = when_IAdv ;
|
||||
how_IAdv = how_IAdv ;
|
||||
far_Adv = mkAdv ["långt borta"] ;
|
||||
|
||||
-- not : Adv ; -- ?
|
||||
|
||||
-- Conjunctions
|
||||
|
||||
and_Conj = and_Conj ;
|
||||
|
||||
-- Prepositions
|
||||
|
||||
at_Prep = ss "vid" ;
|
||||
in_Prep = ss "i" ;
|
||||
with_Prep = ss "med" ;
|
||||
|
||||
-- Numerals
|
||||
|
||||
one_Num = NumNumeral (num (pot2as3 (pot1as2 (pot0as1 pot01)))) ;
|
||||
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
|
||||
|
||||
bad_A = bad_A ;
|
||||
big_A = big_A ;
|
||||
black_A = black_A ;
|
||||
cold_A = cold_A ;
|
||||
correct_A = regA "riktig" ;
|
||||
dirty_A = dirty_A ;
|
||||
dry_A = regA "torr" ;
|
||||
dull_A = mk2A "slö" "slött";
|
||||
full_A = regA "full" ;
|
||||
good_A = good_A ;
|
||||
green_A = green_A ;
|
||||
heavy_A = irregA "tung" "tyngre" "tyngst" ;
|
||||
left_A = regA "vänster" ; ----
|
||||
long_A = long_A ;
|
||||
narrow_A = narrow_A ;
|
||||
near_A = mkA "nära" "nära" "nära" "nära"
|
||||
"närmare" "närmast" "närmaste" ;
|
||||
new_A = new_A ;
|
||||
old_A = old_A ;
|
||||
red_A = red_A ;
|
||||
right_A = regA "höger" ; ----
|
||||
rotten_A = mk3A "rutten" "ruttet" "ruttna" ;
|
||||
round_A = regA "rund" ;
|
||||
sharp_A = regA "vass" ;
|
||||
short_A = short_A ;
|
||||
small_A = small_A ;
|
||||
smooth_A = regA "slät" ;
|
||||
straight_A = regA "rak" ;
|
||||
thick_A = thick_A ;
|
||||
thin_A = thin_A ;
|
||||
warm_A = warm_A ;
|
||||
wet_A = regA "våt" ;
|
||||
white_A = white_A ;
|
||||
wide_A = mk2A "bred" "brett" ;
|
||||
yellow_A = yellow_A ;
|
||||
|
||||
|
||||
-- Nouns
|
||||
|
||||
animal_N = mk2N "djur" "djur" ;
|
||||
ashes_N = mk2N "aska" "askor" ;
|
||||
back_N = mk2N "rygg" "ryggar" ;
|
||||
bark_N = mk2N "bark" "barkar" ;
|
||||
belly_N = mk2N "mage" "magar" ;
|
||||
bird_N = bird_N ;
|
||||
blood_N = mk2N "blod" "blod" ;
|
||||
bone_N = mk2N "ben" "ben" ;
|
||||
breast_N = mk2N "bröst" "bröst" ;
|
||||
child_N = child_N ;
|
||||
cloud_N = mk2N "moln" "moln" ;
|
||||
day_N = mk2N "dag" "dagar" ;
|
||||
dog_N = dog_N ;
|
||||
dust_N = mk2N "damm" "damm" ;
|
||||
ear_N = mkN "öra" "örat" "öron" "öronen" ;
|
||||
earth_N = mk2N "jord" "jordar" ;
|
||||
egg_N = mk2N "ägg" "ägg" ;
|
||||
eye_N = mkN "öga" "ögat" "ögon" "ögonen" ;
|
||||
fat_N = mk2N "fett" "fett" ;
|
||||
father_N = (mkN "far" "fadern" "fäder" "fäderna") ;
|
||||
-- father_N = UseN2 father_N2 ;
|
||||
feather_N = mk2N "fjäder" "fjädrar" ;
|
||||
fingernail_N = mkN "nagel" "nageln" "naglar" "naglarna";
|
||||
fire_N = mk2N "eld" "eldar" ;
|
||||
fish_N = fish_N ;
|
||||
flower_N = mk2N "blomma" "blommor" ;
|
||||
fog_N = mk2N "dimma" "dimmor" ;
|
||||
foot_N = mk2N "fot" "fötter" ;
|
||||
forest_N = mk2N "skog" "skogar" ;
|
||||
fruit_N = fruit_N ;
|
||||
grass_N = mk2N "gräs" "gräs" ;
|
||||
guts_N = mk2N "inälva" "inälvor" ;
|
||||
hair_N = mk2N "hår" "hår" ;
|
||||
hand_N = mk2N "hand" "händer" ;
|
||||
head_N = mkN "huvud" "huvudet" "huvuden" "huvudena" ;
|
||||
heart_N = mkN "hjärta" "hjärtat" "hjärtan" "hjärtana" ;
|
||||
horn_N = mk2N "horn" "horn" ;
|
||||
husband_N = (mk2N "make" "makar") ;
|
||||
ice_N = mk2N "is" "isar" ;
|
||||
knee_N = mkN "knä" "knäet" "knän" "knäna" ;
|
||||
lake_N = lake_N ;
|
||||
leaf_N = mk2N "löv" "löv" ;
|
||||
leg_N = mk2N "ben" "ben" ;
|
||||
liver_N = mkN "lever" "levern" "levrar" "levrarna";
|
||||
louse_N = mkN "lus" "lusen" "löss" "lössen" ;
|
||||
man_N = man_N ;
|
||||
meat_N = meat_N ;
|
||||
moon_N = moon_N ;
|
||||
mother_N = mkN "mor" "modern" "mödrar" "mödrarna" ;
|
||||
-- mother_N = UseN2 mother_N2 ;
|
||||
mountain_N = mountain_N ;
|
||||
mouth_N = mk2N "mun" "munnar" ;
|
||||
name_N = mk2N "namn" "namn" ;
|
||||
neck_N = mk2N "nacke" "nackar" ;
|
||||
night_N = mk2N "natt" "nätter" ;
|
||||
nose_N = mk2N "näsa" "näsor" ;
|
||||
person_N = mk2N "person" "personer" ;
|
||||
rain_N = mk2N "regn" "regn" ;
|
||||
river_N = river_N ;
|
||||
road_N = mk2N "väg" "vägar" ;
|
||||
root_N = mk2N "rot" "rötter" ;
|
||||
rope_N = mk2N "rep" "rep" ;
|
||||
salt_N = mk2N "salt" "salter" ;
|
||||
sand_N = mk2N "sand" "sander" ;
|
||||
sea_N = sea_N ;
|
||||
seed_N = mkN "frö" "fröet" "frön" "fröna" ;
|
||||
skin_N = mk2N "skinn" "skinn" ;
|
||||
sky_N = mk2N "himmel" "himlar" ;
|
||||
smoke_N = mk2N "rök" "rökar" ;
|
||||
snake_N = snake_N ;
|
||||
snow_N = mkN "snö" "snön" "snöer" "snöerna" ;
|
||||
star_N = star_N ;
|
||||
stick_N = mk2N "pinne" "pinnar" ;
|
||||
stone_N = stone_N ;
|
||||
sun_N = sun_N ;
|
||||
tail_N = mk2N "svans" "svansar" ;
|
||||
tongue_N = mk2N "tunga" "tungor" ;
|
||||
tooth_N = mk2N "tand" "tänder" ;
|
||||
tree_N = tree_N ;
|
||||
water_N = water_N ;
|
||||
wife_N = mk2N "fru" "fruar" ;
|
||||
wind_N = mk2N "vind" "vindar" ;
|
||||
wing_N = mk2N "vinge" "vingar" ;
|
||||
woman_N = woman_N ;
|
||||
worm_N = mk2N "mask" "maskar" ;
|
||||
year_N = mk2N "år" "år" ;
|
||||
|
||||
-- Verbs
|
||||
|
||||
bite_V = dirV2 (bita_V) ;
|
||||
blow_V = mk2V "blåsa" "blåste" ;
|
||||
breathe_V = dirV2 (depV (regV "anda")) ;
|
||||
burn_V = brinna_V ; -- FIXME: bränna?
|
||||
come_V = komma_V ;
|
||||
count_V = dirV2 (regV "räkna") ;
|
||||
cut_V = dirV2 (skära_V) ;
|
||||
die_V = dö_V ;
|
||||
dig_V = mk2V "gräva" "grävde" ;
|
||||
drink_V = dirV2 (dricka_V) ;
|
||||
eat_V = dirV2 (äta_V) ;
|
||||
fall_V = falla_V ;
|
||||
fear_V = dirV2 (regV "frukta") ;
|
||||
-- FIXME: passive forms are very strange
|
||||
fight_V = dirV2 (mkV "slåss" "slåss" "slåss" "slogs" "slagits" "slagen") ;
|
||||
float_V = flyta_V ;
|
||||
flow_V = rinna_V ;
|
||||
fly_V = flyga_V ;
|
||||
freeze_V = frysa_V ;
|
||||
give_V = dirdirV3 giva_V ; ----
|
||||
hear_V = dirV2 (mk2V "höra" "hörde") ;
|
||||
hit_V = dirV2 (slå_V) ;
|
||||
hold_V = dirV2 (hålla_V) ;
|
||||
hunt_V = dirV2 (regV "jaga") ;
|
||||
kill_V = dirV2 (regV "döda") ;
|
||||
know_V = dirV2 (veta_V) ;
|
||||
laugh_V = regV "skratta" ;
|
||||
lie_V = ligga_V ;
|
||||
live_V = leva_V ;
|
||||
play_V = mk2V "leka" "lekte" ;
|
||||
pull_V = dirV2 (draga_V) ;
|
||||
push_V = dirV2 (mk2V "trycka" "tryckte") ;
|
||||
rub_V = dirV2 (gnida_V) ;
|
||||
say_V = säga_V ;
|
||||
scratch_V = dirV2 (regV "klia") ;
|
||||
see_V = dirV2 (se_V) ;
|
||||
sew_V = sy_V ;
|
||||
sing_V = sjunga_V ;
|
||||
sit_V = sitta_V ;
|
||||
sleep_V = sova_V ;
|
||||
smell_V = dirV2 (regV "lukta") ;
|
||||
spit_V = regV "spotta" ;
|
||||
split_V = dirV2 (klyva_V) ;
|
||||
squeeze_V = dirV2 (klämma_V) ;
|
||||
stab_V = dirV2 (sticka_V) ;
|
||||
stand_V = stå_V ;
|
||||
suck_V = dirV2 (suga_V) ;
|
||||
swell_V = svälla_V ;
|
||||
swim_V = regV "simma" ;
|
||||
think_V = mk2V "tänka" "tänkte" ;
|
||||
throw_V = dirV2 (regV "kasta") ;
|
||||
tie_V = dirV2 (knyta_V) ;
|
||||
turn_V = vända_V ;
|
||||
vomit_V = mk2V "spy" "spydde" ;
|
||||
walk_V = gå_V ;
|
||||
wash_V = dirV2 (regV "tvätta") ;
|
||||
wipe_V = dirV2 (regV "torka") ;
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user