GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-09-24 19:23:39 -06:00
Code Issues Packages Projects Releases Wiki Activity
Files
1d0636f32b852a7ece2731da1b9573d121541fbd
gf-rgl/src/armenian/MorphoHye.gf
T

7467 lines
299 KiB
Plaintext
Raw Blame History

This file contains ambiguous Unicode characters
This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
resource MorphoHye = open CatHye, ResHye, Predef in {
oper
mkV001 : Str -> V ;
mkV001 base =
case base of {
base_1+"ել" => lin V
{ s = base_1+"ել" ;
causative = base_1+"եցնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => "կ"+base_1+"եի" ;
Pl => "կ"+base_1+"եինք"
} ;
P2 => table {
Sg => "կ"+base_1+"եիր" ;
Pl => "կ"+base_1+"եիք"
} ;
P3 => table {
Sg => "կ"+base_1+"եր" ;
Pl => "կ"+base_1+"եին"
}
} ;
Non_past => table {
P1 => table {
Sg => "կ"+base_1+"եմ" ;
Pl => "կ"+base_1+"ենք"
} ;
P2 => table {
Sg => "կ"+base_1+"ես" ;
Pl => "կ"+base_1+"եք"
} ;
P3 => table {
Sg => "կ"+base_1+"ի" ;
Pl => "կ"+base_1+"են"
}
}
} ;
converb = { imperfective = base_1+"ում" ;
futCon1 =base_1+"ելու" ;
futCon2 = base_1+"ելիք" ;
negative = base_1+"ի" ;
perfective = base_1+"ել" ;
simultaneous = base_1+"ելիս"
} ;
imperative = table {
Sg => base_1+"ի՛ր" ;
Pl => base_1+"ե՛ք"
} ;
passive = base_1+"վել" ;
past = table {
P1 => table {
Sg => base_1+"եցի" ;
Pl => base_1+"եցինք"
} ;
P2 => table {
Sg => base_1+"եցիր" ;
Pl => base_1+"եցիք"
} ;
P3 => table {
Sg => base_1+"եց" ;
Pl => base_1+"եցին"
}
} ;
participle = table {
Resultative => base_1+"ած" ;
Subject => base_1+"ող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+"եի" ;
Pl => base_1+"եինք"
} ;
P2 => table {
Sg => base_1+"եիր" ;
Pl => base_1+"եիք"
} ;
P3 => table {
Sg => base_1+"եր" ;
Pl => base_1+"եին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"եմ" ;
Pl => base_1+"ենք"
} ;
P2 => table {
Sg => base_1+"ես" ;
Pl => base_1+"եք"
} ;
P3 => table {
Sg => base_1+"ի" ;
Pl => base_1+"են"
}
}
}
};
_ => error "Can't apply paradigm mkV001"
} ;
mkV002 : Str -> V ;
mkV002 base =
case base of {
base_1+"ալ" => lin V
{ s = base_1+"ալ" ;
causative = base_1+"ացնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => "կ"+base_1+"այի" ;
Pl => "կ"+base_1+"այինք"
} ;
P2 => table {
Sg => "կ"+base_1+"այիր" ;
Pl => "կ"+base_1+"այիք"
} ;
P3 => table {
Sg => "կ"+base_1+"ար" ;
Pl => "կ"+base_1+"ային"
}
} ;
Non_past => table {
P1 => table {
Sg => "կ"+base_1+"ամ" ;
Pl => "կ"+base_1+"անք"
} ;
P2 => table {
Sg => "կ"+base_1+"աս" ;
Pl => "կ"+base_1+"աք"
} ;
P3 => table {
Sg => "կ"+base_1+"ա" ;
Pl => "կ"+base_1+"ան"
}
}
} ;
converb = { imperfective = base_1+"ում" ;
futCon1 =base_1+"ալու" ;
futCon2 = base_1+"ալիք" ;
negative = base_1+"ա" ;
perfective = base_1+"ացել" ;
simultaneous = base_1+"ալիս"
} ;
imperative = table {
Sg => base_1+"ա՛" ;
Pl => base_1+"ացե՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => base_1+"ացի" ;
Pl => base_1+"ացինք"
} ;
P2 => table {
Sg => base_1+"ացիր" ;
Pl => base_1+"ացիք"
} ;
P3 => table {
Sg => base_1+"աց" ;
Pl => base_1+"ացին"
}
} ;
participle = table {
Resultative => base_1+"ացած" ;
Subject => base_1+"ացող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+"այի" ;
Pl => base_1+"այինք"
} ;
P2 => table {
Sg => base_1+"այիր" ;
Pl => base_1+"այիք"
} ;
P3 => table {
Sg => base_1+"ար" ;
Pl => base_1+"ային"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"ամ" ;
Pl => base_1+"անք"
} ;
P2 => table {
Sg => base_1+"աս" ;
Pl => base_1+"աք"
} ;
P3 => table {
Sg => base_1+"ա" ;
Pl => base_1+"ան"
}
}
}
};
_ => error "Can't apply paradigm mkV002"
} ;
mkV003 : Str -> V ;
mkV003 base =
case base of {
base_1+"նել" => lin V
{ s = base_1+"նել" ;
causative = base ; --guessed
conditional = table {
Perfect => table {
P1 => table {
Sg => "կ"+base_1+"նեի" ;
Pl => "կ"+base_1+"նեինք"
} ;
P2 => table {
Sg => "կ"+base_1+"նեիր" ;
Pl => "կ"+base_1+"նեիք"
} ;
P3 => table {
Sg => "կ"+base_1+"ներ" ;
Pl => "կ"+base_1+"նեին"
}
} ;
Non_past => table {
P1 => table {
Sg => "կ"+base_1+"նեմ" ;
Pl => "կ"+base_1+"նենք"
} ;
P2 => table {
Sg => "կ"+base_1+"նես" ;
Pl => "կ"+base_1+"նեք"
} ;
P3 => table {
Sg => "կ"+base_1+"նի" ;
Pl => "կ"+base_1+"նեն"
}
}
} ;
converb = { imperfective = base_1+"նում" ;
futCon1 =base_1+"նելու" ;
futCon2 = base_1+"նելիք" ;
negative = base_1+"նի" ;
perfective = base_1+"րել" ;
simultaneous = base_1+"նելիս"
} ;
imperative = table {
Sg => base_1+"րո՛ւ" ;
Pl => base_1+"րե՛ք"
} ;
passive = base_1+"վել" ;
past = table {
P1 => table {
Sg => base_1+"րի" ;
Pl => base_1+"րինք"
} ;
P2 => table {
Sg => base_1+"րիր" ;
Pl => base_1+"րիք"
} ;
P3 => table {
Sg => base_1+"րեց" ;
Pl => base_1+"րին"
}
} ;
participle = table {
Resultative => base_1+"րած" ;
Subject => base_1+"նող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+"նեի" ;
Pl => base_1+"նեինք"
} ;
P2 => table {
Sg => base_1+"նեիր" ;
Pl => base_1+"նեիք"
} ;
P3 => table {
Sg => base_1+"ներ" ;
Pl => base_1+"նեին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"նեմ" ;
Pl => base_1+"նենք"
} ;
P2 => table {
Sg => base_1+"նես" ;
Pl => base_1+"նեք"
} ;
P3 => table {
Sg => base_1+"նի" ;
Pl => base_1+"նեն"
}
}
}
};
_ => error "Can't apply paradigm mkV003"
} ;
mkV004 : Str -> V ;
mkV004 base =
case base of {
base_1+"նալ" => lin V
{ s = base_1+"նալ" ;
causative = base_1+"ցնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => "կ"+base_1+"նայի" ;
Pl => "կ"+base_1+"նայինք"
} ;
P2 => table {
Sg => "կ"+base_1+"նայիր" ;
Pl => "կ"+base_1+"նայիք"
} ;
P3 => table {
Sg => "կ"+base_1+"նար" ;
Pl => "կ"+base_1+"նային"
}
} ;
Non_past => table {
P1 => table {
Sg => "կ"+base_1+"նամ" ;
Pl => "կ"+base_1+"նանք"
} ;
P2 => table {
Sg => "կ"+base_1+"նաս" ;
Pl => "կ"+base_1+"նաք"
} ;
P3 => table {
Sg => "կ"+base_1+"նա" ;
Pl => "կ"+base_1+"նան"
}
}
} ;
converb = { imperfective = base_1+"նում" ;
futCon1 =base_1+"նալու" ;
futCon2 = base_1+"նալիք" ;
negative = base_1+"նա" ;
perfective = base_1+"ցել" ;
simultaneous = base_1+"նալիս"
} ;
imperative = table {
Sg => base_1+"ցի՛ր" ;
Pl => base_1+"ցե՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => base_1+"ցա" ;
Pl => base_1+"ցանք"
} ;
P2 => table {
Sg => base_1+"ցար" ;
Pl => base_1+"ցաք"
} ;
P3 => table {
Sg => base_1+"ցավ" ;
Pl => base_1+"ցան"
}
} ;
participle = table {
Resultative => base_1+"ցած" ;
Subject => base_1+"ցող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+"նայի" ;
Pl => base_1+"նայինք"
} ;
P2 => table {
Sg => base_1+"նայիր" ;
Pl => base_1+"նայիք"
} ;
P3 => table {
Sg => base_1+"նար" ;
Pl => base_1+"նային"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"նամ" ;
Pl => base_1+"նանք"
} ;
P2 => table {
Sg => base_1+"նաս" ;
Pl => base_1+"նաք"
} ;
P3 => table {
Sg => base_1+"նա" ;
Pl => base_1+"նան"
}
}
}
};
_ => error "Can't apply paradigm mkV004"
} ;
mkV005 : Str -> V ;
mkV005 base =
case base of {
base_1+"ռնալ" => lin V
{ s = base_1+"ռնալ" ;
causative = base_1+"րձնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => "կ"+base_1+"ռնայի" ;
Pl => "կ"+base_1+"ռնայինք"
} ;
P2 => table {
Sg => "կ"+base_1+"ռնայիր" ;
Pl => "կ"+base_1+"ռնայիք"
} ;
P3 => table {
Sg => "կ"+base_1+"ռնար" ;
Pl => "կ"+base_1+"ռնային"
}
} ;
Non_past => table {
P1 => table {
Sg => "կ"+base_1+"ռնամ" ;
Pl => "կ"+base_1+"ռնանք"
} ;
P2 => table {
Sg => "կ"+base_1+"ռնաս" ;
Pl => "կ"+base_1+"ռնաք"
} ;
P3 => table {
Sg => "կ"+base_1+"ռնա" ;
Pl => "կ"+base_1+"ռնան"
}
}
} ;
converb = { imperfective = base_1+"ռնում" ;
futCon1 =base_1+"ռնալու" ;
futCon2 = base_1+"ռնալիք" ;
negative = base_1+"ռնա" ;
perfective = base_1+"րձել" ;
simultaneous = base_1+"ռնալիս"
} ;
imperative = table {
Sg => base_1+"րձի՛ր" ;
Pl => base_1+"րձե՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => base_1+"րձեցի" ;
Pl => base_1+"րձեցինք"
} ;
P2 => table {
Sg => base_1+"րձեցիր" ;
Pl => base_1+"րձեցիք"
} ;
P3 => table {
Sg => base_1+"րձեց" ;
Pl => base_1+"րձեցին"
}
} ;
participle = table {
Resultative => base_1+"րձած" ;
Subject => base_1+"րձող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+"ռնայի" ;
Pl => base_1+"ռնայինք"
} ;
P2 => table {
Sg => base_1+"ռնայիր" ;
Pl => base_1+"ռնայիք"
} ;
P3 => table {
Sg => base_1+"ռնար" ;
Pl => base_1+"ռնային"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"ռնամ" ;
Pl => base_1+"ռնանք"
} ;
P2 => table {
Sg => base_1+"ռնաս" ;
Pl => base_1+"ռնաք"
} ;
P3 => table {
Sg => base_1+"ռնա" ;
Pl => base_1+"ռնան"
}
}
}
};
_ => error "Can't apply paradigm mkV005"
} ;
mkV006 : Str -> V ;
mkV006 base =
case base of {
"երթալ" => lin V
{ s = "երթալ" ;
causative = "գնացնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => "կերթայի" ;
Pl => "կերթայինք"
} ;
P2 => table {
Sg => "կերթայիր" ;
Pl => "կերթայիք"
} ;
P3 => table {
Sg => "կերթար" ;
Pl => "կերթային"
}
} ;
Non_past => table {
P1 => table {
Sg => "կերթամ" ;
Pl => "կերթանք"
} ;
P2 => table {
Sg => "կերթաս" ;
Pl => "կերթաք"
} ;
P3 => table {
Sg => "կերթա" ;
Pl => "կերթան"
}
}
} ;
converb = { imperfective = "երթում" ;
futCon1 ="երթալու" ;
futCon2 = "երթալիք" ;
negative = "երթա" ;
perfective = "գնացել" ;
simultaneous = "երթալիս"
} ;
imperative = table {
Sg => "երթա՛" ;
Pl => "գնացե՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => "գնացի" ;
Pl => "գնացինք"
} ;
P2 => table {
Sg => "գնացիր" ;
Pl => "գնացիք"
} ;
P3 => table {
Sg => "գնաց" ;
Pl => "գնացին"
}
} ;
participle = table {
Resultative => "գնացած" ;
Subject => "գնացող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => "երթայի" ;
Pl => "երթայինք"
} ;
P2 => table {
Sg => "երթայիր" ;
Pl => "երթայիք"
} ;
P3 => table {
Sg => "երթար" ;
Pl => "երթային"
}
} ;
Non_past => table {
P1 => table {
Sg => "երթամ" ;
Pl => "երթանք"
} ;
P2 => table {
Sg => "երթաս" ;
Pl => "երթաք"
} ;
P3 => table {
Sg => "երթա" ;
Pl => "երթան"
}
}
}
};
_ => error "Can't apply paradigm mkV006"
} ;
mkV007 : Str -> V ;
mkV007 base =
case base of {
"էթալ" => lin V
{ s = "էթալ" ;
causative = "գնացնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => "կէթայի" ;
Pl => "կէթայինք"
} ;
P2 => table {
Sg => "կէթայիր" ;
Pl => "կէթայիք"
} ;
P3 => table {
Sg => "կէթար" ;
Pl => "կէթային"
}
} ;
Non_past => table {
P1 => table {
Sg => "կէթամ" ;
Pl => "կէթանք"
} ;
P2 => table {
Sg => "կէթաս" ;
Pl => "կէթաք"
} ;
P3 => table {
Sg => "կէթա" ;
Pl => "կէթան"
}
}
} ;
converb = { imperfective = "էթում" ;
futCon1 ="էթալու" ;
futCon2 = "էթալիք" ;
negative = "էթա" ;
perfective = "գնացել" ;
simultaneous = "էթալիս"
} ;
imperative = table {
Sg => "էթա՛" ;
Pl => "գնացե՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => "գնացի" ;
Pl => "գնացինք"
} ;
P2 => table {
Sg => "գնացիր" ;
Pl => "գնացիք"
} ;
P3 => table {
Sg => "գնաց" ;
Pl => "գնացին"
}
} ;
participle = table {
Resultative => "գնացած" ;
Subject => "գնացող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => "էթայի" ;
Pl => "էթայինք"
} ;
P2 => table {
Sg => "էթայիր" ;
Pl => "էթայիք"
} ;
P3 => table {
Sg => "էթար" ;
Pl => "էթային"
}
} ;
Non_past => table {
P1 => table {
Sg => "էթամ" ;
Pl => "էթանք"
} ;
P2 => table {
Sg => "էթաս" ;
Pl => "էթաք"
} ;
P3 => table {
Sg => "էթա" ;
Pl => "էթան"
}
}
}
};
_ => error "Can't apply paradigm mkV007"
} ;
mkV008 : Str -> V ;
mkV008 base =
case base of {
base_1+"նել" => lin V
{ s = base_1+"նել" ;
causative = base_1+"ցնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => "կ"+base_1+"նեի" ;
Pl => "կ"+base_1+"նեինք"
} ;
P2 => table {
Sg => "կ"+base_1+"նեիր" ;
Pl => "կ"+base_1+"նեիք"
} ;
P3 => table {
Sg => "կ"+base_1+"ներ" ;
Pl => "կ"+base_1+"նեին"
}
} ;
Non_past => table {
P1 => table {
Sg => "կ"+base_1+"նեմ" ;
Pl => "կ"+base_1+"նենք"
} ;
P2 => table {
Sg => "կ"+base_1+"նես" ;
Pl => "կ"+base_1+"նեք"
} ;
P3 => table {
Sg => "կ"+base_1+"նի" ;
Pl => "կ"+base_1+"նեն"
}
}
} ;
converb = { imperfective = base_1+"նում" ;
futCon1 =base_1+"նելու" ;
futCon2 = base_1+"նելիք" ;
negative = base_1+"նի" ;
perfective = base_1+"ել" ;
simultaneous = base_1+"նելիս"
} ;
imperative = table {
Sg => base_1+"ի՛ր" ;
Pl => base_1+"ե՛ք"
} ;
passive = base_1+"նվել" ;
past = table {
P1 => table {
Sg => base_1+"ա" ;
Pl => base_1+"անք"
} ;
P2 => table {
Sg => base_1+"ար" ;
Pl => base_1+"աք"
} ;
P3 => table {
Sg => base_1+"ավ" ;
Pl => base_1+"ան"
}
} ;
participle = table {
Resultative => base_1+"ած" ;
Subject => base_1+"նող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+"նեի" ;
Pl => base_1+"նեինք"
} ;
P2 => table {
Sg => base_1+"նեիր" ;
Pl => base_1+"նեիք"
} ;
P3 => table {
Sg => base_1+"ներ" ;
Pl => base_1+"նեին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"նեմ" ;
Pl => base_1+"նենք"
} ;
P2 => table {
Sg => base_1+"նես" ;
Pl => base_1+"նեք"
} ;
P3 => table {
Sg => base_1+"նի" ;
Pl => base_1+"նեն"
}
}
}
};
_ => error "Can't apply paradigm mkV008"
} ;
mkV009 : Str -> V ;
mkV009 base =
case base of {
"ըլնել" => lin V
{ s = "ըլնել" ;
causative = base ; --guessed
conditional = table {
Perfect => table {
P1 => table {
Sg => "կըլնեի" ;
Pl => "կըլնեինք"
} ;
P2 => table {
Sg => "կըլնեիր" ;
Pl => "կըլնեիք"
} ;
P3 => table {
Sg => "կըլներ" ;
Pl => "կըլնեին"
}
} ;
Non_past => table {
P1 => table {
Sg => "կըլնեմ" ;
Pl => "կըլնենք"
} ;
P2 => table {
Sg => "կըլնես" ;
Pl => "կըլնեք"
} ;
P3 => table {
Sg => "կըլնի" ;
Pl => "կըլնեն"
}
}
} ;
converb = { imperfective = "ըլնում" ;
futCon1 ="ըլնելու" ;
futCon2 = "ըլնելիք" ;
negative = "ըլնի" ;
perfective = "էղել" ;
simultaneous = "ըլնելիս"
} ;
imperative = table {
Sg => "էղի՛ր" ;
Pl => "էղե՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => "էղա" ;
Pl => "էղանք"
} ;
P2 => table {
Sg => "էղար" ;
Pl => "էղաք"
} ;
P3 => table {
Sg => "էղավ" ;
Pl => "էղան"
}
} ;
participle = table {
Resultative => "էղած" ;
Subject => "ըլնող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => "ըլնեի" ;
Pl => "ըլնեինք"
} ;
P2 => table {
Sg => "ըլնեիր" ;
Pl => "ըլնեիք"
} ;
P3 => table {
Sg => "ըլներ" ;
Pl => "ըլնեին"
}
} ;
Non_past => table {
P1 => table {
Sg => "ըլնեմ" ;
Pl => "ըլնենք"
} ;
P2 => table {
Sg => "ըլնես" ;
Pl => "ըլնեք"
} ;
P3 => table {
Sg => "ըլնի" ;
Pl => "ըլնեն"
}
}
}
};
_ => error "Can't apply paradigm mkV009"
} ;
mkV010 : Str -> V ;
mkV010 base =
case base of {
base_1+"նալ" => lin V
{ s = base_1+"նալ" ;
causative = base_1+"ցնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => "կ"+base_1+"նայի" ;
Pl => "կ"+base_1+"նայինք"
} ;
P2 => table {
Sg => "կ"+base_1+"նայիր" ;
Pl => "կ"+base_1+"նայիք"
} ;
P3 => table {
Sg => "կ"+base_1+"նար" ;
Pl => "կ"+base_1+"նային"
}
} ;
Non_past => table {
P1 => table {
Sg => "կ"+base_1+"նամ" ;
Pl => "կ"+base_1+"նանք"
} ;
P2 => table {
Sg => "կ"+base_1+"նաս" ;
Pl => "կ"+base_1+"նաք"
} ;
P3 => table {
Sg => "կ"+base_1+"նա" ;
Pl => "կ"+base_1+"նան"
}
}
} ;
converb = { imperfective = base_1+"նում" ;
futCon1 =base_1+"նալու" ;
futCon2 = base_1+"նալիք" ;
negative = base_1+"նա" ;
perfective = base_1+"ցել" ;
simultaneous = base_1+"նալիս"
} ;
imperative = table {
Sg => base_1+"՛" ;
Pl => base_1+"ցե՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => base_1+"ցի" ;
Pl => base_1+"ցինք"
} ;
P2 => table {
Sg => base_1+"ցիր" ;
Pl => base_1+"ցիք"
} ;
P3 => table {
Sg => base_1+"ց" ;
Pl => base_1+"ցին"
}
} ;
participle = table {
Resultative => base_1+"ցած" ;
Subject => base_1+"ցող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+"նայի" ;
Pl => base_1+"նայինք"
} ;
P2 => table {
Sg => base_1+"նայիր" ;
Pl => base_1+"նայիք"
} ;
P3 => table {
Sg => base_1+"նար" ;
Pl => base_1+"նային"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"նամ" ;
Pl => base_1+"նանք"
} ;
P2 => table {
Sg => base_1+"նաս" ;
Pl => base_1+"նաք"
} ;
P3 => table {
Sg => base_1+"նա" ;
Pl => base_1+"նան"
}
}
}
};
_ => error "Can't apply paradigm mkV010"
} ;
mkV011 : Str -> V ;
mkV011 base =
case base of {
base_1+"ալ" => lin V
{ s = base_1+"ալ" ;
causative = base_1+"ացնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => "կ"+base_1+"այի" ;
Pl => "կ"+base_1+"այինք"
} ;
P2 => table {
Sg => "կ"+base_1+"այիր" ;
Pl => "կ"+base_1+"այիք"
} ;
P3 => table {
Sg => "կ"+base_1+"ար" ;
Pl => "կ"+base_1+"ային"
}
} ;
Non_past => table {
P1 => table {
Sg => "կ"+base_1+"ամ" ;
Pl => "կ"+base_1+"անք"
} ;
P2 => table {
Sg => "կ"+base_1+"աս" ;
Pl => "կ"+base_1+"աք"
} ;
P3 => table {
Sg => "կ"+base_1+"այ" ;
Pl => "կ"+base_1+"ան"
}
}
} ;
converb = { imperfective = base_1+"ում" ;
futCon1 =base_1+"ալու" ;
futCon2 = base_1+"ալիք" ;
negative = base_1+"այ" ;
perfective = base_1+"ացել" ;
simultaneous = base_1+"ալիս"
} ;
imperative = table {
Sg => base_1+"ա՛" ;
Pl => base_1+"ացէ՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => base_1+"ացի" ;
Pl => base_1+"ացինք"
} ;
P2 => table {
Sg => base_1+"ացիր" ;
Pl => base_1+"ացիք"
} ;
P3 => table {
Sg => base_1+"աց" ;
Pl => base_1+"ացին"
}
} ;
participle = table {
Resultative => base_1+"ացած" ;
Subject => base_1+"ացող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+"այի" ;
Pl => base_1+"այինք"
} ;
P2 => table {
Sg => base_1+"այիր" ;
Pl => base_1+"այիք"
} ;
P3 => table {
Sg => base_1+"ար" ;
Pl => base_1+"ային"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"ամ" ;
Pl => base_1+"անք"
} ;
P2 => table {
Sg => base_1+"աս" ;
Pl => base_1+"աք"
} ;
P3 => table {
Sg => base_1+"այ" ;
Pl => base_1+"ան"
}
}
}
};
_ => error "Can't apply paradigm mkV011"
} ;
mkV012 : Str -> V ;
mkV012 base =
case base of {
base_1+"ել" => lin V
{ s = base_1+"ել" ;
causative = base_1+"եցնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => "կ"+base_1+"էի" ;
Pl => "կ"+base_1+"էինք"
} ;
P2 => table {
Sg => "կ"+base_1+"էիր" ;
Pl => "կ"+base_1+"էիք"
} ;
P3 => table {
Sg => "կ"+base_1+"էր" ;
Pl => "կ"+base_1+"էին"
}
} ;
Non_past => table {
P1 => table {
Sg => "կ"+base_1+"եմ" ;
Pl => "կ"+base_1+"ենք"
} ;
P2 => table {
Sg => "կ"+base_1+"ես" ;
Pl => "կ"+base_1+"էք"
} ;
P3 => table {
Sg => "կ"+base_1+"ի" ;
Pl => "կ"+base_1+"են"
}
}
} ;
converb = { imperfective = base_1+"ում" ;
futCon1 =base_1+"ելու" ;
futCon2 = base_1+"ելիք" ;
negative = base_1+"ի" ;
perfective = base_1+"ել" ;
simultaneous = base_1+"ելիս"
} ;
imperative = table {
Sg => base_1+"ի՛ր" ;
Pl => base_1+"է՛ք"
} ;
passive = base_1+"ուել" ;
past = table {
P1 => table {
Sg => base_1+"եցի" ;
Pl => base_1+"եցինք"
} ;
P2 => table {
Sg => base_1+"եցիր" ;
Pl => base_1+"եցիք"
} ;
P3 => table {
Sg => base_1+"եց" ;
Pl => base_1+"եցին"
}
} ;
participle = table {
Resultative => base_1+"ած" ;
Subject => base_1+"ող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+"էի" ;
Pl => base_1+"էինք"
} ;
P2 => table {
Sg => base_1+"էիր" ;
Pl => base_1+"էիք"
} ;
P3 => table {
Sg => base_1+"էր" ;
Pl => base_1+"էին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"եմ" ;
Pl => base_1+"ենք"
} ;
P2 => table {
Sg => base_1+"ես" ;
Pl => base_1+"էք"
} ;
P3 => table {
Sg => base_1+"ի" ;
Pl => base_1+"են"
}
}
}
};
_ => error "Can't apply paradigm mkV012"
} ;
mkV013 : Str -> V ;
mkV013 base =
case base of {
base_1@?+base_2+"ել" => lin V
{ s = base_1+base_2+"ել" ;
causative = base_1+base_2+"եցնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => base_1+"կ"+base_2+"եի" ;
Pl => base_1+"կ"+base_2+"եինք"
} ;
P2 => table {
Sg => base_1+"կ"+base_2+"եիր" ;
Pl => base_1+"կ"+base_2+"եիք"
} ;
P3 => table {
Sg => base_1+"կ"+base_2+"եր" ;
Pl => base_1+"կ"+base_2+"եին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"կ"+base_2+"եմ" ;
Pl => base_1+"կ"+base_2+"ենք"
} ;
P2 => table {
Sg => base_1+"կ"+base_2+"ես" ;
Pl => base_1+"կ"+base_2+"եք"
} ;
P3 => table {
Sg => base_1+"կ"+base_2+"ի" ;
Pl => base_1+"կ"+base_2+"են"
}
}
} ;
converb = { imperfective = base_1+base_2+"ում" ;
futCon1 =base_1+base_2+"ելու" ;
futCon2 = base_1+base_2+"ելիք" ;
negative = base_1+base_2+"ի" ;
perfective = base_1+base_2+"ել" ;
simultaneous = base_1+base_2+"ելիս"
} ;
imperative = table {
Sg => base_1+base_2+"ի՛ր" ;
Pl => base_1+base_2+"ե՛ք"
} ;
passive = base_1+base_2+"վել" ;
past = table {
P1 => table {
Sg => base_1+base_2+"եցի" ;
Pl => base_1+base_2+"եցինք"
} ;
P2 => table {
Sg => base_1+base_2+"եցիր" ;
Pl => base_1+base_2+"եցիք"
} ;
P3 => table {
Sg => base_1+base_2+"եց" ;
Pl => base_1+base_2+"եցին"
}
} ;
participle = table {
Resultative => base_1+base_2+"ած" ;
Subject => base_1+base_2+"ող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+base_2+"եի" ;
Pl => base_1+base_2+"եինք"
} ;
P2 => table {
Sg => base_1+base_2+"եիր" ;
Pl => base_1+base_2+"եիք"
} ;
P3 => table {
Sg => base_1+base_2+"եր" ;
Pl => base_1+base_2+"եին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+base_2+"եմ" ;
Pl => base_1+base_2+"ենք"
} ;
P2 => table {
Sg => base_1+base_2+"ես" ;
Pl => base_1+base_2+"եք"
} ;
P3 => table {
Sg => base_1+base_2+"ի" ;
Pl => base_1+base_2+"են"
}
}
}
};
_ => error "Can't apply paradigm mkV013"
} ;
mkV014 : Str -> V ;
mkV014 base =
case base of {
base_1+base_2@(?+?)+"նել" => lin V
{ s = base_1+base_2+"նել" ;
causative = base ; --guessed
conditional = table {
Perfect => table {
P1 => table {
Sg => base_1+"կ"+base_2+"նեի" ;
Pl => base_1+"կ"+base_2+"նեինք"
} ;
P2 => table {
Sg => base_1+"կ"+base_2+"նեիր" ;
Pl => base_1+"կ"+base_2+"նեիք"
} ;
P3 => table {
Sg => base_1+"կ"+base_2+"ներ" ;
Pl => base_1+"կ"+base_2+"նեին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"կ"+base_2+"նեմ" ;
Pl => base_1+"կ"+base_2+"նենք"
} ;
P2 => table {
Sg => base_1+"կ"+base_2+"նես" ;
Pl => base_1+"կ"+base_2+"նեք"
} ;
P3 => table {
Sg => base_1+"կ"+base_2+"նի" ;
Pl => base_1+"կ"+base_2+"նեն"
}
}
} ;
converb = { imperfective = base_1+base_2+"նում" ;
futCon1 =base_1+base_2+"նելու" ;
futCon2 = base_1+base_2+"նելիք" ;
negative = base_1+base_2+"նի" ;
perfective = base_1+base_2+"ել" ;
simultaneous = base_1+base_2+"նելիս"
} ;
imperative = table {
Sg => base_1+base_2+"ի՛ր" ;
Pl => base_1+base_2+"ե՛ք"
} ;
passive = base_1+base_2+"նվել" ;
past = table {
P1 => table {
Sg => base_1+base_2+"ա" ;
Pl => base_1+base_2+"անք"
} ;
P2 => table {
Sg => base_1+base_2+"ար" ;
Pl => base_1+base_2+"աք"
} ;
P3 => table {
Sg => base_1+base_2+"ավ" ;
Pl => base_1+base_2+"ան"
}
} ;
participle = table {
Resultative => base_1+base_2+"ած" ;
Subject => base_1+base_2+"նող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+base_2+"նեի" ;
Pl => base_1+base_2+"նեինք"
} ;
P2 => table {
Sg => base_1+base_2+"նեիր" ;
Pl => base_1+base_2+"նեիք"
} ;
P3 => table {
Sg => base_1+base_2+"ներ" ;
Pl => base_1+base_2+"նեին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+base_2+"նեմ" ;
Pl => base_1+base_2+"նենք"
} ;
P2 => table {
Sg => base_1+base_2+"նես" ;
Pl => base_1+base_2+"նեք"
} ;
P3 => table {
Sg => base_1+base_2+"նի" ;
Pl => base_1+base_2+"նեն"
}
}
}
};
_ => error "Can't apply paradigm mkV014"
} ;
mkV015 : Str -> V ;
mkV015 base =
case base of {
base_1@?+base_2+"նալ" => lin V
{ s = base_1+base_2+"նալ" ;
causative = base_1+base_2+"ցնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => base_1+"կ"+base_2+"նայի" ;
Pl => base_1+"կ"+base_2+"նայինք"
} ;
P2 => table {
Sg => base_1+"կ"+base_2+"նայիր" ;
Pl => base_1+"կ"+base_2+"նայիք"
} ;
P3 => table {
Sg => base_1+"կ"+base_2+"նար" ;
Pl => base_1+"կ"+base_2+"նային"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"կ"+base_2+"նամ" ;
Pl => base_1+"կ"+base_2+"նանք"
} ;
P2 => table {
Sg => base_1+"կ"+base_2+"նաս" ;
Pl => base_1+"կ"+base_2+"նաք"
} ;
P3 => table {
Sg => base_1+"կ"+base_2+"նա" ;
Pl => base_1+"կ"+base_2+"նան"
}
}
} ;
converb = { imperfective = base_1+base_2+"նում" ;
futCon1 =base_1+base_2+"նալու" ;
futCon2 = base_1+base_2+"նալիք" ;
negative = base_1+base_2+"նա" ;
perfective = base_1+base_2+"ցել" ;
simultaneous = base_1+base_2+"նալիս"
} ;
imperative = table {
Sg => base_1+base_2+"ցի՛ր" ;
Pl => base_1+base_2+"ցե՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => base_1+base_2+"ցա" ;
Pl => base_1+base_2+"ցանք"
} ;
P2 => table {
Sg => base_1+base_2+"ցար" ;
Pl => base_1+base_2+"ցաք"
} ;
P3 => table {
Sg => base_1+base_2+"ցավ" ;
Pl => base_1+base_2+"ցան"
}
} ;
participle = table {
Resultative => base_1+base_2+"ցած" ;
Subject => base_1+base_2+"ցող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+base_2+"նայի" ;
Pl => base_1+base_2+"նայինք"
} ;
P2 => table {
Sg => base_1+base_2+"նայիր" ;
Pl => base_1+base_2+"նայիք"
} ;
P3 => table {
Sg => base_1+base_2+"նար" ;
Pl => base_1+base_2+"նային"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+base_2+"նամ" ;
Pl => base_1+base_2+"նանք"
} ;
P2 => table {
Sg => base_1+base_2+"նաս" ;
Pl => base_1+base_2+"նաք"
} ;
P3 => table {
Sg => base_1+base_2+"նա" ;
Pl => base_1+base_2+"նան"
}
}
}
};
_ => error "Can't apply paradigm mkV015"
} ;
mkV016 : Str -> V ;
mkV016 base =
case base of {
base_1+base_2@(?+?+?+?)+"ել" => lin V
{ s = base_1+base_2+"ել" ;
causative = base ; --guessed
conditional = table {
Perfect => table {
P1 => table {
Sg => base_1+"կ"+base_2+"էի" ;
Pl => base_1+"կ"+base_2+"էինք"
} ;
P2 => table {
Sg => base_1+"կ"+base_2+"էիր" ;
Pl => base_1+"կ"+base_2+"էիք"
} ;
P3 => table {
Sg => base_1+"կ"+base_2+"էր" ;
Pl => base_1+"կ"+base_2+"էին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"կ"+base_2+"եմ" ;
Pl => base_1+"կ"+base_2+"ենք"
} ;
P2 => table {
Sg => base_1+"կ"+base_2+"ես" ;
Pl => base_1+"կ"+base_2+"էք"
} ;
P3 => table {
Sg => base_1+"կ"+base_2+"ի" ;
Pl => base_1+"կ"+base_2+"են"
}
}
} ;
converb = { imperfective = base_1+base_2+"ում" ;
futCon1 =base_1+base_2+"ելու" ;
futCon2 = base_1+base_2+"ելիք" ;
negative = base_1+base_2+"ի" ;
perfective = base_1+base_2+"ել" ;
simultaneous = base_1+base_2+"ելիս"
} ;
imperative = table {
Sg => base_1+base_2+"ի՛ր" ;
Pl => base_1+base_2+"է՛ք"
} ;
passive = base_1+base_2+"ուել" ;
past = table {
P1 => table {
Sg => base_1+base_2+"եցի" ;
Pl => base_1+base_2+"եցինք"
} ;
P2 => table {
Sg => base_1+base_2+"եցիր" ;
Pl => base_1+base_2+"եցիք"
} ;
P3 => table {
Sg => base_1+base_2+"եց" ;
Pl => base_1+base_2+"եցին"
}
} ;
participle = table {
Resultative => base_1+base_2+"ած" ;
Subject => base_1+base_2+"ող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+base_2+"էի" ;
Pl => base_1+base_2+"էինք"
} ;
P2 => table {
Sg => base_1+base_2+"էիր" ;
Pl => base_1+base_2+"էիք"
} ;
P3 => table {
Sg => base_1+base_2+"էր" ;
Pl => base_1+base_2+"էին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+base_2+"եմ" ;
Pl => base_1+base_2+"ենք"
} ;
P2 => table {
Sg => base_1+base_2+"ես" ;
Pl => base_1+base_2+"էք"
} ;
P3 => table {
Sg => base_1+base_2+"ի" ;
Pl => base_1+base_2+"են"
}
}
}
};
_ => error "Can't apply paradigm mkV016"
} ;
mkV017 : Str -> V ;
mkV017 base =
case base of {
base_1+base_2@(?+?+?)+"նել" => lin V
{ s = base_1+base_2+"նել" ;
causative = base ; --guessed
conditional = table {
Perfect => table {
P1 => table {
Sg => base_1+"կ"+base_2+"նեի" ;
Pl => base_1+"կ"+base_2+"նեինք"
} ;
P2 => table {
Sg => base_1+"կ"+base_2+"նեիր" ;
Pl => base_1+"կ"+base_2+"նեիք"
} ;
P3 => table {
Sg => base_1+"կ"+base_2+"ներ" ;
Pl => base_1+"կ"+base_2+"նեին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"կ"+base_2+"նեմ" ;
Pl => base_1+"կ"+base_2+"նենք"
} ;
P2 => table {
Sg => base_1+"կ"+base_2+"նես" ;
Pl => base_1+"կ"+base_2+"նեք"
} ;
P3 => table {
Sg => base_1+"կ"+base_2+"նի" ;
Pl => base_1+"կ"+base_2+"նեն"
}
}
} ;
converb = { imperfective = base_1+base_2+"նում" ;
futCon1 =base_1+base_2+"նելու" ;
futCon2 = base_1+base_2+"նելիք" ;
negative = base_1+base_2+"նի" ;
perfective = base_1+base_2+"րել" ;
simultaneous = base_1+base_2+"նելիս"
} ;
imperative = table {
Sg => base_1+base_2+"րո՛ւ" ;
Pl => base_1+base_2+"րե՛ք"
} ;
passive = base_1+base_2+"վել" ;
past = table {
P1 => table {
Sg => base_1+base_2+"րի" ;
Pl => base_1+base_2+"րինք"
} ;
P2 => table {
Sg => base_1+base_2+"րիր" ;
Pl => base_1+base_2+"րիք"
} ;
P3 => table {
Sg => base_1+base_2+"րեց" ;
Pl => base_1+base_2+"րին"
}
} ;
participle = table {
Resultative => base_1+base_2+"րած" ;
Subject => base_1+base_2+"նող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+base_2+"նեի" ;
Pl => base_1+base_2+"նեինք"
} ;
P2 => table {
Sg => base_1+base_2+"նեիր" ;
Pl => base_1+base_2+"նեիք"
} ;
P3 => table {
Sg => base_1+base_2+"ներ" ;
Pl => base_1+base_2+"նեին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+base_2+"նեմ" ;
Pl => base_1+base_2+"նենք"
} ;
P2 => table {
Sg => base_1+base_2+"նես" ;
Pl => base_1+base_2+"նեք"
} ;
P3 => table {
Sg => base_1+base_2+"նի" ;
Pl => base_1+base_2+"նեն"
}
}
}
};
_ => error "Can't apply paradigm mkV017"
} ;
mkV018 : Str -> V ;
mkV018 base =
case base of {
base_1+"ել" => lin V
{ s = base_1+"ել" ;
causative = base ;
conditional = table {
Perfect => table {
P1 => table {
Sg => base_1+"կեի" ;
Pl => base_1+"կեինք"
} ;
P2 => table {
Sg => base_1+"կեիր" ;
Pl => base_1+"կեիք"
} ;
P3 => table {
Sg => base_1+"կեր" ;
Pl => base_1+"կեին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"կեմ" ;
Pl => base_1+"կենք"
} ;
P2 => table {
Sg => base_1+"կես" ;
Pl => base_1+"կեք"
} ;
P3 => table {
Sg => base_1+"կի" ;
Pl => base_1+"կեն"
}
}
} ;
converb = { imperfective = base_1+"ում" ;
futCon1 =base_1+"ելու" ;
futCon2 = base_1+"ելիք" ;
negative = base_1+"ի" ;
perfective = base_1+"ել" ;
simultaneous = base_1+"ելիս"
} ;
imperative = table {
Sg => base_1+"ի՛ր" ;
Pl => base_1+"ե՛ք"
} ;
passive = base_1+"վել" ;
past = table {
P1 => table {
Sg => base_1+"եցի" ;
Pl => base_1+"եցինք"
} ;
P2 => table {
Sg => base_1+"եցիր" ;
Pl => base_1+"եցիք"
} ;
P3 => table {
Sg => base_1+"եց" ;
Pl => base_1+"եցին"
}
} ;
participle = table {
Resultative => base_1+"ած" ;
Subject => base_1+"ող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+"եի" ;
Pl => base_1+"եինք"
} ;
P2 => table {
Sg => base_1+"եիր" ;
Pl => base_1+"եիք"
} ;
P3 => table {
Sg => base_1+"եր" ;
Pl => base_1+"եին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"եմ" ;
Pl => base_1+"ենք"
} ;
P2 => table {
Sg => base_1+"ես" ;
Pl => base_1+"եք"
} ;
P3 => table {
Sg => base_1+"ի" ;
Pl => base_1+"են"
}
}
}
};
_ => error "Can't apply paradigm mkV018"
} ;
mkV019 : Str -> V ;
mkV019 base =
case base of {
base_1+base_2@(?+?+?)+"ալ" => lin V
{ s = base_1+base_2+"ալ" ;
causative = base_1+base_2+"ացնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => base_1+"կ"+base_2+"այի" ;
Pl => base_1+"կ"+base_2+"այինք"
} ;
P2 => table {
Sg => base_1+"կ"+base_2+"այիր" ;
Pl => base_1+"կ"+base_2+"այիք"
} ;
P3 => table {
Sg => base_1+"կ"+base_2+"ար" ;
Pl => base_1+"կ"+base_2+"ային"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"կ"+base_2+"ամ" ;
Pl => base_1+"կ"+base_2+"անք"
} ;
P2 => table {
Sg => base_1+"կ"+base_2+"աս" ;
Pl => base_1+"կ"+base_2+"աք"
} ;
P3 => table {
Sg => base_1+"կ"+base_2+"ա" ;
Pl => base_1+"կ"+base_2+"ան"
}
}
} ;
converb = { imperfective = base_1+base_2+"ում" ;
futCon1 =base_1+base_2+"ալու" ;
futCon2 = base_1+base_2+"ալիք" ;
negative = base_1+base_2+"ա" ;
perfective = base_1+base_2+"ացել" ;
simultaneous = base_1+base_2+"ալիս"
} ;
imperative = table {
Sg => base_1+base_2+"ա՛" ;
Pl => base_1+base_2+"ացե՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => base_1+base_2+"ացի" ;
Pl => base_1+base_2+"ացինք"
} ;
P2 => table {
Sg => base_1+base_2+"ացիր" ;
Pl => base_1+base_2+"ացիք"
} ;
P3 => table {
Sg => base_1+base_2+"աց" ;
Pl => base_1+base_2+"ացին"
}
} ;
participle = table {
Resultative => base_1+base_2+"ացած" ;
Subject => base_1+base_2+"ացող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+base_2+"այի" ;
Pl => base_1+base_2+"այինք"
} ;
P2 => table {
Sg => base_1+base_2+"այիր" ;
Pl => base_1+base_2+"այիք"
} ;
P3 => table {
Sg => base_1+base_2+"ար" ;
Pl => base_1+base_2+"ային"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+base_2+"ամ" ;
Pl => base_1+base_2+"անք"
} ;
P2 => table {
Sg => base_1+base_2+"աս" ;
Pl => base_1+base_2+"աք"
} ;
P3 => table {
Sg => base_1+base_2+"ա" ;
Pl => base_1+base_2+"ան"
}
}
}
};
_ => error "Can't apply paradigm mkV019"
} ;
mkV020 : Str -> V ;
mkV020 base =
case base of {
base_1+"նալ" => lin V
{ s = base_1+"նալ" ;
causative = base_1+"ցնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => "կ"+base_1+"նայի" ;
Pl => "կ"+base_1+"նայինք"
} ;
P2 => table {
Sg => "կ"+base_1+"նայիր" ;
Pl => "կ"+base_1+"նայիք"
} ;
P3 => table {
Sg => "կ"+base_1+"նար" ;
Pl => "կ"+base_1+"նային"
}
} ;
Non_past => table {
P1 => table {
Sg => "կ"+base_1+"նամ" ;
Pl => "կ"+base_1+"նանք"
} ;
P2 => table {
Sg => "կ"+base_1+"նաս" ;
Pl => "կ"+base_1+"նաք"
} ;
P3 => table {
Sg => "կ"+base_1+"նայ" ;
Pl => "կ"+base_1+"նան"
}
}
} ;
converb = { imperfective = base_1+"նում" ;
futCon1 =base_1+"նալու" ;
futCon2 = base_1+"նալիք" ;
negative = base_1+"նայ" ;
perfective = base_1+"ցել" ;
simultaneous = base_1+"նալիս"
} ;
imperative = table {
Sg => base_1+"ցի՛ր" ;
Pl => base_1+"ցէ՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => base_1+"ցայ" ;
Pl => base_1+"ցանք"
} ;
P2 => table {
Sg => base_1+"ցար" ;
Pl => base_1+"ցաք"
} ;
P3 => table {
Sg => base_1+"ցաւ" ;
Pl => base_1+"ցան"
}
} ;
participle = table {
Resultative => base_1+"ցած" ;
Subject => base_1+"ցող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+"նայի" ;
Pl => base_1+"նայինք"
} ;
P2 => table {
Sg => base_1+"նայիր" ;
Pl => base_1+"նայիք"
} ;
P3 => table {
Sg => base_1+"նար" ;
Pl => base_1+"նային"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"նամ" ;
Pl => base_1+"նանք"
} ;
P2 => table {
Sg => base_1+"նաս" ;
Pl => base_1+"նաք"
} ;
P3 => table {
Sg => base_1+"նայ" ;
Pl => base_1+"նան"
}
}
}
};
_ => error "Can't apply paradigm mkV020"
} ;
mkV021 : Str -> V ;
mkV021 base =
case base of {
base_1+base_2@(?+?)+"ել" => lin V
{ s = base_1+base_2+"ել" ;
causative = base ;
conditional = table {
Perfect => table {
P1 => table {
Sg => "կ"+base_1+base_2+"էի" ;
Pl => "կ"+base_1+base_2+"էինք"
} ;
P2 => table {
Sg => "կ"+base_1+base_2+"էիր" ;
Pl => "կ"+base_1+base_2+"էիք"
} ;
P3 => table {
Sg => "կ"+base_1+base_2+"էր" ;
Pl => "կ"+base_1+base_2+"էին"
}
} ;
Non_past => table {
P1 => table {
Sg => "կ"+base_1+base_2+"եմ" ;
Pl => "կ"+base_1+base_2+"ենք"
} ;
P2 => table {
Sg => "կ"+base_1+base_2+"ես" ;
Pl => "կ"+base_1+base_2+"էք"
} ;
P3 => table {
Sg => "կ"+base_1+base_2+"ի" ;
Pl => "կ"+base_1+base_2+"են"
}
}
} ;
converb = { imperfective = base_1+"ւ"+base_2+"մ" ;
futCon1 =base_1+base_2+"ելու" ;
futCon2 = base_1+base_2+"ելիք" ;
negative = base_1+base_2+"ի" ;
perfective = base_1+base_2+"ել" ;
simultaneous = base_1+base_2+"ելիս"
} ;
imperative = table {
Sg => base_1+base_2+"ի՛ր" ;
Pl => base_1+base_2+"է՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => base_1+base_2+"եցի" ;
Pl => base_1+base_2+"եցինք"
} ;
P2 => table {
Sg => base_1+base_2+"եցիր" ;
Pl => base_1+base_2+"եցիք"
} ;
P3 => table {
Sg => base_1+base_2+"եց" ;
Pl => base_1+base_2+"եցին"
}
} ;
participle = table {
Resultative => base_1+base_2+"ած" ;
Subject => base_1+base_2+"ող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+base_2+"էի" ;
Pl => base_1+base_2+"էինք"
} ;
P2 => table {
Sg => base_1+base_2+"էիր" ;
Pl => base_1+base_2+"էիք"
} ;
P3 => table {
Sg => base_1+base_2+"էր" ;
Pl => base_1+base_2+"էին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+base_2+"եմ" ;
Pl => base_1+base_2+"ենք"
} ;
P2 => table {
Sg => base_1+base_2+"ես" ;
Pl => base_1+base_2+"էք"
} ;
P3 => table {
Sg => base_1+base_2+"ի" ;
Pl => base_1+base_2+"են"
}
}
}
};
_ => error "Can't apply paradigm mkV021"
} ;
mkV022 : Str -> V ;
mkV022 base =
case base of {
base_1+"ռնալ" => lin V
{ s = base_1+"ռնալ" ;
causative = base_1+"րձնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => "կ"+base_1+"ռնայի" ;
Pl => "կ"+base_1+"ռնայինք"
} ;
P2 => table {
Sg => "կ"+base_1+"ռնայիր" ;
Pl => "կ"+base_1+"ռնայիք"
} ;
P3 => table {
Sg => "կ"+base_1+"ռնար" ;
Pl => "կ"+base_1+"ռնային"
}
} ;
Non_past => table {
P1 => table {
Sg => "կ"+base_1+"ռնամ" ;
Pl => "կ"+base_1+"ռնանք"
} ;
P2 => table {
Sg => "կ"+base_1+"ռնաս" ;
Pl => "կ"+base_1+"ռնաք"
} ;
P3 => table {
Sg => "կ"+base_1+"ռնա" ;
Pl => "կ"+base_1+"ռնան"
}
}
} ;
converb = { imperfective = base_1+"ռնում" ;
futCon1 =base_1+"ռնալու" ;
futCon2 = base_1+"ռնալիք" ;
negative = base_1+"ռնա" ;
perfective = base_1+"րձել" ;
simultaneous = base_1+"ռնալիս"
} ;
imperative = table {
Sg => base_1+"րձի՛ր" ;
Pl => base_1+"րձե՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => base_1+"րձա" ;
Pl => base_1+"րձանք"
} ;
P2 => table {
Sg => base_1+"րձար" ;
Pl => base_1+"րձաք"
} ;
P3 => table {
Sg => base_1+"րձավ" ;
Pl => base_1+"րձան"
}
} ;
participle = table {
Resultative => base_1+"րձած" ;
Subject => base_1+"րձող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+"ռնայի" ;
Pl => base_1+"ռնայինք"
} ;
P2 => table {
Sg => base_1+"ռնայիր" ;
Pl => base_1+"ռնայիք"
} ;
P3 => table {
Sg => base_1+"ռնար" ;
Pl => base_1+"ռնային"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"ռնամ" ;
Pl => base_1+"ռնանք"
} ;
P2 => table {
Sg => base_1+"ռնաս" ;
Pl => base_1+"ռնաք"
} ;
P3 => table {
Sg => base_1+"ռնա" ;
Pl => base_1+"ռնան"
}
}
}
};
_ => error "Can't apply paradigm mkV022"
} ;
mkV023 : Str -> V ;
mkV023 base =
case base of {
base_1+"նալ" => lin V
{ s = base_1+"նալ" ;
causative = base_1+"սնել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => "կ"+base_1+"նայի" ;
Pl => "կ"+base_1+"նայինք"
} ;
P2 => table {
Sg => "կ"+base_1+"նայիր" ;
Pl => "կ"+base_1+"նայիք"
} ;
P3 => table {
Sg => "կ"+base_1+"նար" ;
Pl => "կ"+base_1+"նային"
}
} ;
Non_past => table {
P1 => table {
Sg => "կ"+base_1+"նամ" ;
Pl => "կ"+base_1+"նանք"
} ;
P2 => table {
Sg => "կ"+base_1+"նաս" ;
Pl => "կ"+base_1+"նաք"
} ;
P3 => table {
Sg => "կ"+base_1+"նա" ;
Pl => "կ"+base_1+"նան"
}
}
} ;
converb = { imperfective = base_1+"նում" ;
futCon1 =base_1+"նալու" ;
futCon2 = base_1+"նալիք" ;
negative = base_1+"նա" ;
perfective = base_1+"սել" ;
simultaneous = base_1+"նալիս"
} ;
imperative = table {
Sg => base ;
Pl => base_1+"սե՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => base_1+"սա" ;
Pl => base_1+"սանք"
} ;
P2 => table {
Sg => base_1+"սար" ;
Pl => base_1+"սաք"
} ;
P3 => table {
Sg => base_1+"սավ" ;
Pl => base_1+"սան"
}
} ;
participle = table {
Resultative => base_1+"սած" ;
Subject => base_1+"սող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+"նայի" ;
Pl => base_1+"նայինք"
} ;
P2 => table {
Sg => base_1+"նայիր" ;
Pl => base_1+"նայիք"
} ;
P3 => table {
Sg => base_1+"նար" ;
Pl => base_1+"նային"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"նամ" ;
Pl => base_1+"նանք"
} ;
P2 => table {
Sg => base_1+"նաս" ;
Pl => base_1+"նաք"
} ;
P3 => table {
Sg => base_1+"նա" ;
Pl => base_1+"նան"
}
}
}
};
_ => error "Can't apply paradigm mkV023"
} ;
mkV024 : Str -> V ;
mkV024 base =
case base of {
base_1+"նալ" => lin V
{ s = base_1+"նալ" ;
causative = base_1+"նել" ;
conditional = table {
Perfect => table {
P1 => table {
Sg => "կ"+base_1+"նայի" ;
Pl => "կ"+base_1+"նայինք"
} ;
P2 => table {
Sg => "կ"+base_1+"նայիր" ;
Pl => "կ"+base_1+"նայիք"
} ;
P3 => table {
Sg => "կ"+base_1+"նար" ;
Pl => "կ"+base_1+"նային"
}
} ;
Non_past => table {
P1 => table {
Sg => "կ"+base_1+"նամ" ;
Pl => "կ"+base_1+"նանք"
} ;
P2 => table {
Sg => "կ"+base_1+"նաս" ;
Pl => "կ"+base_1+"նաք"
} ;
P3 => table {
Sg => "կ"+base_1+"նա" ;
Pl => "կ"+base_1+"նան"
}
}
} ;
converb = { imperfective = base_1+"նում" ;
futCon1 =base_1+"նալու" ;
futCon2 = base_1+"նալիք" ;
negative = base_1+"նա" ;
perfective = base_1+"ել" ;
simultaneous = base_1+"նալիս"
} ;
imperative = table {
Sg => base ;
Pl => base_1+"ե՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => base_1+"ա" ;
Pl => base_1+"անք"
} ;
P2 => table {
Sg => base_1+"ար" ;
Pl => base_1+"աք"
} ;
P3 => table {
Sg => base_1+"ավ" ;
Pl => base_1+"ան"
}
} ;
participle = table {
Resultative => base_1+"ած" ;
Subject => base_1+"ող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+"նայի" ;
Pl => base_1+"նայինք"
} ;
P2 => table {
Sg => base_1+"նայիր" ;
Pl => base_1+"նայիք"
} ;
P3 => table {
Sg => base_1+"նար" ;
Pl => base_1+"նային"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+"նամ" ;
Pl => base_1+"նանք"
} ;
P2 => table {
Sg => base_1+"նաս" ;
Pl => base_1+"նաք"
} ;
P3 => table {
Sg => base_1+"նա" ;
Pl => base_1+"նան"
}
}
}
};
_ => error "Can't apply paradigm mkV024"
} ;
mkV025 : Str -> V ;
mkV025 base =
case base of {
base_1+base_2@?+"ել" => lin V
{ s = base_1+base_2+"ել" ;
causative = base ; --guessed
conditional = table {
Perfect => table {
P1 => table {
Sg => "կ"+base_1+base_2+"եի" ;
Pl => "կ"+base_1+base_2+"եինք"
} ;
P2 => table {
Sg => "կ"+base_1+base_2+"եիր" ;
Pl => "կ"+base_1+base_2+"եիք"
} ;
P3 => table {
Sg => "կ"+base_1+base_2+"եր" ;
Pl => "կ"+base_1+base_2+"եին"
}
} ;
Non_past => table {
P1 => table {
Sg => "կ"+base_1+base_2+"եմ" ;
Pl => "կ"+base_1+base_2+"ենք"
} ;
P2 => table {
Sg => "կ"+base_1+base_2+"ես" ;
Pl => "կ"+base_1+base_2+"եք"
} ;
P3 => table {
Sg => "կ"+base_1+base_2+"ի" ;
Pl => "կ"+base_1+base_2+"են"
}
}
} ;
converb = { imperfective = base_1+base_2+"ում" ;
futCon1 =base_1+base_2+"ելու" ;
futCon2 = base_1+base_2+"ելիք" ;
negative = base_1+base_2+"ի" ;
perfective = base_1+base_2+"ել" ;
simultaneous = base_1+base_2+"ելիս"
} ;
imperative = table {
Sg => base_1+"՛"+base_2 ;
Pl => base_1+base_2+"ե՛ք"
} ;
passive = base ; --guessed
past = table {
P1 => table {
Sg => base_1+base_2+"եցի" ;
Pl => base_1+base_2+"եցինք"
} ;
P2 => table {
Sg => base_1+base_2+"եցիր" ;
Pl => base_1+base_2+"եցիք"
} ;
P3 => table {
Sg => base_1+base_2+"եց" ;
Pl => base_1+base_2+"եցին"
}
} ;
participle = table {
Resultative => base_1+base_2+"ած" ;
Subject => base_1+base_2+"ող"
} ;
subjunctive = table {
Perfect => table {
P1 => table {
Sg => base_1+base_2+"եի" ;
Pl => base_1+base_2+"եինք"
} ;
P2 => table {
Sg => base_1+base_2+"եիր" ;
Pl => base_1+base_2+"եիք"
} ;
P3 => table {
Sg => base_1+base_2+"եր" ;
Pl => base_1+base_2+"եին"
}
} ;
Non_past => table {
P1 => table {
Sg => base_1+base_2+"եմ" ;
Pl => base_1+base_2+"ենք"
} ;
P2 => table {
Sg => base_1+base_2+"ես" ;
Pl => base_1+base_2+"եք"
} ;
P3 => table {
Sg => base_1+base_2+"ի" ;
Pl => base_1+base_2+"են"
}
}
}
};
_ => error "Can't apply paradigm mkV025"
} ;
mkN001 : Str -> N ;
mkN001 base = lin N {
s = table {
Nom => table {
Sg => base ;
Pl => base+"ներ"
} ;
Dat => table {
Sg => base+"ի" ;
Pl => base+"ների"
} ;
Ablat => table {
Sg => base+"ից" ;
Pl => base+"ներից"
} ;
Instr => table {
Sg => base+"ով" ;
Pl => base+"ներով"
} ;
Loc => table {
Sg => base+"ում" ;
Pl => base+"ներում"
}
} ;
def_dat = table {
Sg => base+"ին" ;
Pl => base+"ներին"
} ;
def_nom = table {
Sg => base+"ը" ;
Pl => base+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base+"ս" ;
Pl => base+"ներս"
} ;
Dat => table {
Sg => base+"իս" ;
Pl => base+"ներիս"
} ;
Ablat => table {
Sg => base+"իցս" ;
Pl => base+"ներիցս"
} ;
Instr => table {
Sg => base+"ովս" ;
Pl => base+"ներովս"
} ;
Loc => table {
Sg => base+"ումս" ;
Pl => base+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base+"դ" ;
Pl => base+"ներդ"
} ;
Dat => table {
Sg => base+"իդ" ;
Pl => base+"ներիդ"
} ;
Ablat => table {
Sg => base+"իցդ" ;
Pl => base+"ներիցդ"
} ;
Instr => table {
Sg => base+"ովդ" ;
Pl => base+"ներովդ"
} ;
Loc => table {
Sg => base+"ումդ" ;
Pl => base+"ներումդ"
}
}
};
mkN002 : Str -> N ;
mkN002 base = lin N {
s = table {
Nom => table {
Sg => base ;
Pl => base+"ներ"
} ;
Dat => table {
Sg => base+"յի" ;
Pl => base+"ների"
} ;
Ablat => table {
Sg => base+"յից" ;
Pl => base+"ներից"
} ;
Instr => table {
Sg => base+"յով" ;
Pl => base+"ներով"
} ;
Loc => table {
Sg => base+"յում" ;
Pl => base+"ներում"
}
} ;
def_dat = table {
Sg => base+"յին" ;
Pl => base+"ներին"
} ;
def_nom = table {
Sg => base+"ն" ;
Pl => base+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base+"ս" ;
Pl => base+"ներս"
} ;
Dat => table {
Sg => base+"յիս" ;
Pl => base+"ներիս"
} ;
Ablat => table {
Sg => base+"յիցս" ;
Pl => base+"ներիցս"
} ;
Instr => table {
Sg => base+"յովս" ;
Pl => base+"ներովս"
} ;
Loc => table {
Sg => base+"յումս" ;
Pl => base+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base+"դ" ;
Pl => base+"ներդ"
} ;
Dat => table {
Sg => base+"յիդ" ;
Pl => base+"ներիդ"
} ;
Ablat => table {
Sg => base+"յիցդ" ;
Pl => base+"ներիցդ"
} ;
Instr => table {
Sg => base+"յովդ" ;
Pl => base+"ներովդ"
} ;
Loc => table {
Sg => base+"յումդ" ;
Pl => base+"ներումդ"
}
}
} ;
mkN003 : Str -> N ;
mkN003 base =
case base of {
base_1+"ի" => lin N
{ s = table {
Nom => table {
Sg => base_1+"ի" ;
Pl => base_1+"իներ"
} ;
Dat => table {
Sg => base_1+"ու" ;
Pl => base_1+"իների"
} ;
Ablat => table {
Sg => base_1+"ուց" ;
Pl => base_1+"իներից"
} ;
Instr => table {
Sg => base_1+"ով" ;
Pl => base_1+"իներով"
} ;
Loc => table {
Sg => base_1+"ում" ;
Pl => base_1+"իներում"
}
} ;
def_dat = table {
Sg => base_1+"ուն" ;
Pl => base_1+"իներին"
} ;
def_nom = table {
Sg => base_1+"ին" ;
Pl => base_1+"իները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"իս" ;
Pl => base_1+"իներս"
} ;
Dat => table {
Sg => base_1+"ուս" ;
Pl => base_1+"իներիս"
} ;
Ablat => table {
Sg => base_1+"ուցս" ;
Pl => base_1+"իներիցս"
} ;
Instr => table {
Sg => base_1+"ովս" ;
Pl => base_1+"իներովս"
} ;
Loc => table {
Sg => base_1+"ումս" ;
Pl => base_1+"իներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"իդ" ;
Pl => base_1+"իներդ"
} ;
Dat => table {
Sg => base_1+"ուդ" ;
Pl => base_1+"իներիդ"
} ;
Ablat => table {
Sg => base_1+"ուցդ" ;
Pl => base_1+"իներիցդ"
} ;
Instr => table {
Sg => base_1+"ովդ" ;
Pl => base_1+"իներովդ"
} ;
Loc => table {
Sg => base_1+"ումդ" ;
Pl => base_1+"իներումդ"
}
}
};
_ => error "Can't apply paradigm mkN003"
} ;
mkN004 : Str -> N ;
mkN004 base =
case base of {
base_1+"ու"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"ու"+base_2 ;
Pl => base_1+"ու"+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+base_2+"ան" ;
Pl => base_1+"ու"+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+"ու"+base_2+"ից" ;
Pl => base_1+"ու"+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+base_2+"ամբ" ;
Pl => base_1+"ու"+base_2+"ներով"
} ;
Loc => table {
Sg => base_1+"ու"+base_2+"ում" ;
Pl => base_1+"ու"+base_2+"ներում"
}
} ;
def_dat = table {
Sg => base_1+base_2+"անը" ;
Pl => base_1+"ու"+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+"ու"+base_2+"ը" ;
Pl => base_1+"ու"+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"ս" ;
Pl => base_1+"ու"+base_2+"ներս"
} ;
Dat => table {
Sg => base_1+base_2+"անս" ;
Pl => base_1+"ու"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+"ու"+base_2+"իցս" ;
Pl => base_1+"ու"+base_2+"ներիցս"
} ;
Instr => table {
Sg => base_1+"ու"+base_2+"ովս" ;
Pl => base_1+"ու"+base_2+"ներովս"
} ;
Loc => table {
Sg => base_1+"ու"+base_2+"ումս" ;
Pl => base_1+"ու"+base_2+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"դ" ;
Pl => base_1+"ու"+base_2+"ներդ"
} ;
Dat => table {
Sg => base_1+base_2+"անդ" ;
Pl => base_1+"ու"+base_2+"ներիդ"
} ;
Ablat => table {
Sg => base_1+"ու"+base_2+"իցդ" ;
Pl => base_1+"ու"+base_2+"ներիցդ"
} ;
Instr => table {
Sg => base_1+"ու"+base_2+"ովդ" ;
Pl => base_1+"ու"+base_2+"ներովդ"
} ;
Loc => table {
Sg => base_1+"ու"+base_2+"ումդ" ;
Pl => base_1+"ու"+base_2+"ներումդ"
}
}
};
_ => error "Can't apply paradigm mkN004"
} ;
mkN005 : Str -> N ;
mkN005 base =
case base of {
base_1+"ու"+base_2@("ղթ"|"րչ"|"ղտ"|"մբ"|"րմ"|"նջ"|"նդ"|"րձ"|"րդ"|"րծք"|?) => lin N
{ s = table {
Nom => table {
Sg => base_1+"ու"+base_2 ;
Pl => base_1+base_2+"եր"
} ;
Dat => table {
Sg => base_1+base_2+"ի" ;
Pl => base_1+base_2+"երի"
} ;
Ablat => table {
Sg => base_1+base_2+"ից" ;
Pl => base_1+base_2+"երից"
} ;
Instr => table {
Sg => base_1+base_2+"ով" ;
Pl => base_1+base_2+"երով"
} ;
Loc => table {
Sg => base_1+base_2+"ում" ;
Pl => base_1+base_2+"երում"
}
} ;
def_dat = table {
Sg => base_1+base_2+"ին" ;
Pl => base_1+base_2+"երին"
} ;
def_nom = table {
Sg => base_1+"ու"+base_2+"ը" ;
Pl => base_1+base_2+"երը"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"ս" ;
Pl => base_1+base_2+"երս"
} ;
Dat => table {
Sg => base_1+base_2+"իս" ;
Pl => base_1+base_2+"երիս"
} ;
Ablat => table {
Sg => base_1+base_2+"իցս" ;
Pl => base_1+base_2+"երիցս"
} ;
Instr => table {
Sg => base_1+base_2+"ովս" ;
Pl => base_1+base_2+"երովս"
} ;
Loc => table {
Sg => base_1+base_2+"ումս" ;
Pl => base_1+base_2+"երումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"դ" ;
Pl => base_1+base_2+"երդ"
} ;
Dat => table {
Sg => base_1+base_2+"իդ" ;
Pl => base_1+base_2+"երիդ"
} ;
Ablat => table {
Sg => base_1+base_2+"իցդ" ;
Pl => base_1+base_2+"երիցդ"
} ;
Instr => table {
Sg => base_1+base_2+"ովդ" ;
Pl => base_1+base_2+"երովդ"
} ;
Loc => table {
Sg => base_1+base_2+"ումդ" ;
Pl => base_1+base_2+"երումդ"
}
}
};
_ => error "Can't apply paradigm mkN005"
} ;
mkN006 : Str -> N ;
mkN006 base =
case base of {
base_1 => lin N
{ s = table {
Nom => table {
Sg => base_1 ;
Pl => base_1+"ներ"
} ;
Dat => table {
Sg => base_1+"ի" ;
Pl => base_1+"ների"
} ;
Ablat => table {
Sg => base_1+"ից" ;
Pl => base_1+"ներից"
} ;
Instr => table {
Sg => base_1+"ով" ;
Pl => base_1+"ներով"
} ;
Loc => table {
Sg => base_1+"ում" ;
Pl => base_1+"ներում"
}
} ;
def_dat = table {
Sg => base_1+"ին" ;
Pl => base_1+"ներին"
} ;
def_nom = table {
Sg => base_1+"ն" ;
Pl => base_1+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ս" ;
Pl => base_1+"ներս"
} ;
Dat => table {
Sg => base_1+"իս" ;
Pl => base_1+"ներիս"
} ;
Ablat => table {
Sg => base_1+"իցս" ;
Pl => base_1+"ներիցս"
} ;
Instr => table {
Sg => base_1+"ովս" ;
Pl => base_1+"ներովս"
} ;
Loc => table {
Sg => base_1+"ումս" ;
Pl => base_1+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"դ" ;
Pl => base_1+"ներդ"
} ;
Dat => table {
Sg => base_1+"իդ" ;
Pl => base_1+"ներիդ"
} ;
Ablat => table {
Sg => base_1+"իցդ" ;
Pl => base_1+"ներիցդ"
} ;
Instr => table {
Sg => base_1+"ովդ" ;
Pl => base_1+"ներովդ"
} ;
Loc => table {
Sg => base_1+"ումդ" ;
Pl => base_1+"ներումդ"
}
}
};
_ => error "Can't apply paradigm mkN006"
} ;
mkN007 : Str -> N ;
mkN007 base = lin N {
s = table {
Nom => table {
Sg => base ;
Pl => base+"եր"
} ;
Dat => table {
Sg => base+"ի" ;
Pl => base+"երի"
} ;
Ablat => table {
Sg => base+"ից" ;
Pl => base+"երից"
} ;
Instr => table {
Sg => base+"ով" ;
Pl => base+"երով"
} ;
Loc => table {
Sg => base+"ում" ;
Pl => base+"երում"
}
} ;
def_dat = table {
Sg => base+"ին" ;
Pl => base+"երին"
} ;
def_nom = table {
Sg => base+"ը" ;
Pl => base+"երը"
} ;
poss1 = table {
Nom => table {
Sg => base+"ս" ;
Pl => base+"երս"
} ;
Dat => table {
Sg => base+"իս" ;
Pl => base+"երիս"
} ;
Ablat => table {
Sg => base+"իցս" ;
Pl => base+"երիցս"
} ;
Instr => table {
Sg => base+"ովս" ;
Pl => base+"երովս"
} ;
Loc => table {
Sg => base+"ումս" ;
Pl => base+"երումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base+"դ" ;
Pl => base+"երդ"
} ;
Dat => table {
Sg => base+"իդ" ;
Pl => base+"երիդ"
} ;
Ablat => table {
Sg => base+"իցդ" ;
Pl => base+"երիցդ"
} ;
Instr => table {
Sg => base+"ովդ" ;
Pl => base+"երովդ"
} ;
Loc => table {
Sg => base+"ումդ" ;
Pl => base+"երումդ"
}
}
} ;
mkN008 : Str -> N ;
mkN008 base =
case base of {
base_1+"իւն" => lin N
{ s = table {
Nom => table {
Sg => base_1+"իւն" ;
Pl => base_1+"իւններ"
} ;
Dat => table {
Sg => base_1+"եան" ;
Pl => base_1+"իւնների"
} ;
Ablat => table {
Sg => base_1+"իւնից" ;
Pl => base_1+"իւններից"
} ;
Instr => table {
Sg => base_1+"եամբ" ;
Pl => base_1+"իւններով"
} ;
Loc => table {
Sg => base_1+"իւնում" ;
Pl => base_1+"իւններում"
}
} ;
def_dat = table {
Sg => base_1+"եանը" ;
Pl => base_1+"իւններին"
} ;
def_nom = table {
Sg => base_1+"իւնը" ;
Pl => base_1+"իւնները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"իւնս" ;
Pl => base_1+"իւններս"
} ;
Dat => table {
Sg => base_1+"եանս" ;
Pl => base_1+"իւններիս"
} ;
Ablat => table {
Sg => base_1+"իւնիցս" ;
Pl => base_1+"իւններիցս"
} ;
Instr => table {
Sg => base_1+"եամբս" ;
Pl => base_1+"իւններովս"
} ;
Loc => table {
Sg => base_1+"իւնումս" ;
Pl => base_1+"իւններումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"իւնդ" ;
Pl => base_1+"իւններդ"
} ;
Dat => table {
Sg => base_1+"եանդ" ;
Pl => base_1+"իւններիդ"
} ;
Ablat => table {
Sg => base_1+"իւնիցդ" ;
Pl => base_1+"իւններիցդ"
} ;
Instr => table {
Sg => base_1+"եամբդ" ;
Pl => base_1+"իւններովդ"
} ;
Loc => table {
Sg => base_1+"իւնումդ" ;
Pl => base_1+"իւններումդ"
}
}
};
_ => error "Can't apply paradigm mkN008"
} ;
mkN009 : Str -> N ;
mkN009 base =
case base of {
base_1+"ուն" => lin N
{ s = table {
Nom => table {
Sg => base_1+"ուն" ;
Pl => base_1+"ուններ"
} ;
Dat => table {
Sg => base_1+"վան" ;
Pl => base_1+"ունների"
} ;
Ablat => table {
Sg => base_1+"ունից" ;
Pl => base_1+"ուններից"
} ;
Instr => table {
Sg => base_1+"վամբ" ;
Pl => base_1+"ուններով"
} ;
Loc => table {
Sg => base_1+"ունում" ;
Pl => base_1+"ուններում"
}
} ;
def_dat = table {
Sg => base_1+"վանը" ;
Pl => base_1+"ուններին"
} ;
def_nom = table {
Sg => base_1+"ունը" ;
Pl => base_1+"ունները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ունս" ;
Pl => base_1+"ուններս"
} ;
Dat => table {
Sg => base_1+"վանս" ;
Pl => base_1+"ուններիս"
} ;
Ablat => table {
Sg => base_1+"ունիցս" ;
Pl => base_1+"ուններիցս"
} ;
Instr => table {
Sg => base_1+"ունովս" ;
Pl => base_1+"ուններովս"
} ;
Loc => table {
Sg => base_1+"ունումս" ;
Pl => base_1+"ուններումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ունդ" ;
Pl => base_1+"ուններդ"
} ;
Dat => table {
Sg => base_1+"վանդ" ;
Pl => base_1+"ուններիդ"
} ;
Ablat => table {
Sg => base_1+"ունիցդ" ;
Pl => base_1+"ուններիցդ"
} ;
Instr => table {
Sg => base_1+"ունովդ" ;
Pl => base_1+"ուններովդ"
} ;
Loc => table {
Sg => base_1+"ունումդ" ;
Pl => base_1+"ուններումդ"
}
}
};
_ => error "Can't apply paradigm mkN009"
} ;
mkN010 : Str -> N ;
mkN010 base =
case base of {
base_1+"ուն" => lin N
{ s = table {
Nom => table {
Sg => base_1+"ուն" ;
Pl => base_1+"ուններ"
} ;
Dat => table {
Sg => base_1+"ան" ;
Pl => base_1+"ունների"
} ;
Ablat => table {
Sg => base_1+"ունից" ;
Pl => base_1+"ուններից"
} ;
Instr => table {
Sg => base_1+"ամբ" ;
Pl => base_1+"ուններով"
} ;
Loc => table {
Sg => base_1+"ունում" ;
Pl => base_1+"ուններում"
}
} ;
def_dat = table {
Sg => base_1+"անը" ;
Pl => base_1+"ուններին"
} ;
def_nom = table {
Sg => base_1+"ունը" ;
Pl => base_1+"ունները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ունս" ;
Pl => base_1+"ուններս"
} ;
Dat => table {
Sg => base_1+"անս" ;
Pl => base_1+"ուններիս"
} ;
Ablat => table {
Sg => base_1+"ունիցս" ;
Pl => base_1+"ուններիցս"
} ;
Instr => table {
Sg => base_1+"ամբս" ;
Pl => base_1+"ուններովս"
} ;
Loc => table {
Sg => base_1+"ունումս" ;
Pl => base_1+"ուններումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ունդ" ;
Pl => base_1+"ուններդ"
} ;
Dat => table {
Sg => base_1+"անդ" ;
Pl => base_1+"ուններիդ"
} ;
Ablat => table {
Sg => base_1+"ունիցդ" ;
Pl => base_1+"ուններիցդ"
} ;
Instr => table {
Sg => base_1+"ամբդ" ;
Pl => base_1+"ուններովդ"
} ;
Loc => table {
Sg => base_1+"ունումդ" ;
Pl => base_1+"ուններումդ"
}
}
};
_ => error "Can't apply paradigm mkN010"
} ;
mkN011 : Str -> N ;
mkN011 base =
case base of {
base_1+"ե"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"ե"+base_2 ;
Pl => base_1+"ե"+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+"ո"+base_2 ;
Pl => base_1+"ե"+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+"ո"+base_2+"ից" ;
Pl => base_1+"ե"+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+"ո"+base_2+"ով" ;
Pl => base_1+"ե"+base_2+"ներով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+"ո"+base_2+"ը" ;
Pl => base_1+"ե"+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+"ե"+base_2+"ը" ;
Pl => base_1+"ե"+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ե"+base_2+"ս" ;
Pl => base_1+"ե"+base_2+"ներս"
} ;
Dat => table {
Sg => base_1+"ո"+base_2+"ս" ;
Pl => base_1+"ե"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+"ո"+base_2+"իցս" ;
Pl => base_1+"ե"+base_2+"ներիցս"
} ;
Instr => table {
Sg => base_1+"ո"+base_2+"ովս" ;
Pl => base_1+"ե"+base_2+"ներովս"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ե"+base_2+"դ" ;
Pl => base_1+"ե"+base_2+"ներդ"
} ;
Dat => table {
Sg => base_1+"ո"+base_2+"դ" ;
Pl => base_1+"ե"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+"ո"+base_2+"իցդ" ;
Pl => base_1+"ե"+base_2+"ներիցդ"
} ;
Instr => table {
Sg => base_1+"ո"+base_2+"ովդ" ;
Pl => base_1+"ե"+base_2+"ներովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN011"
} ;
mkN012 : Str -> N ;
mkN012 base =
case base of {
base_1+"ու" => lin N
{ s = table {
Nom => table {
Sg => base_1+"ու" ;
Pl => base_1+"ուներ"
} ;
Dat => table {
Sg => base_1+"վի" ;
Pl => base_1+"ուների"
} ;
Ablat => table {
Sg => base_1+"վից" ;
Pl => base_1+"ուներից"
} ;
Instr => table {
Sg => base_1+"վով" ;
Pl => base_1+"ուներով"
} ;
Loc => table {
Sg => base_1+"վում" ;
Pl => base_1+"ուներում"
}
} ;
def_dat = table {
Sg => base_1+"վին" ;
Pl => base_1+"ուներին"
} ;
def_nom = table {
Sg => base_1+"ուն" ;
Pl => base_1+"ուները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ուս" ;
Pl => base_1+"ուներս"
} ;
Dat => table {
Sg => base_1+"վիս" ;
Pl => base_1+"ուներիս"
} ;
Ablat => table {
Sg => base_1+"վիցս" ;
Pl => base_1+"ուներիցս"
} ;
Instr => table {
Sg => base_1+"վովս" ;
Pl => base_1+"ուներովս"
} ;
Loc => table {
Sg => base_1+"վումս" ;
Pl => base_1+"ուներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ուդ" ;
Pl => base_1+"ուներդ"
} ;
Dat => table {
Sg => base_1+"վիդ" ;
Pl => base_1+"ուներիդ"
} ;
Ablat => table {
Sg => base_1+"վիցդ" ;
Pl => base_1+"ուներիցդ"
} ;
Instr => table {
Sg => base_1+"վովդ" ;
Pl => base_1+"ուներովդ"
} ;
Loc => table {
Sg => base_1+"վումդ" ;
Pl => base_1+"ուներումդ"
}
}
};
_ => error "Can't apply paradigm mkN012"
} ;
mkN013 : Str -> N ;
mkN013 base =
case base of {
base_1+"ի"+base_2@("շկ"|"ստ"|"նք"|"նձ"|"նջ"|"սպ"|?) => lin N
{ s = table {
Nom => table {
Sg => base_1+"ի"+base_2 ;
Pl => base_1+"ի"+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+base_2+"ի" ;
Pl => base_1+"ի"+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+base_2+"ից" ;
Pl => base_1+"ի"+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+base_2+"ով" ;
Pl => base_1+"ի"+base_2+"ներով"
} ;
Loc => table {
Sg => base_1+base_2+"ում" ;
Pl => base_1+"ի"+base_2+"ներում"
}
} ;
def_dat = table {
Sg => base_1+base_2+"ին" ;
Pl => base_1+"ի"+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+"ի"+base_2+"ը" ;
Pl => base_1+"ի"+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"ս" ;
Pl => base_1+"ի"+base_2+"ներս"
} ;
Dat => table {
Sg => base_1+base_2+"իս" ;
Pl => base_1+"ի"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+base_2+"իցս" ;
Pl => base_1+"ի"+base_2+"ներիցս"
} ;
Instr => table {
Sg => base_1+base_2+"ովս" ;
Pl => base_1+"ի"+base_2+"ներովս"
} ;
Loc => table {
Sg => base_1+base_2+"ումս" ;
Pl => base_1+"ի"+base_2+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"դ" ;
Pl => base_1+"ի"+base_2+"ներդ"
} ;
Dat => table {
Sg => base_1+base_2+"իդ" ;
Pl => base_1+"ի"+base_2+"ներիդ"
} ;
Ablat => table {
Sg => base_1+base_2+"իցդ" ;
Pl => base_1+"ի"+base_2+"ներիցդ"
} ;
Instr => table {
Sg => base_1+base_2+"ովդ" ;
Pl => base_1+"ի"+base_2+"ներովդ"
} ;
Loc => table {
Sg => base_1+base_2+"ումդ" ;
Pl => base_1+"ի"+base_2+"ներումդ"
}
}
};
_ => error "Can't apply paradigm mkN013"
} ;
mkN014 : Str -> N ;
mkN014 base =
case base of {
base_1+"ի"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"ի"+base_2 ;
Pl => base --guessed
} ;
Dat => table {
Sg => base_1+base_2+"վա" ;
Pl => base --guessed
} ;
Ablat => table {
Sg => base_1+base_2+"վանից" ;
Pl => base --guessed
} ;
Instr => table {
Sg => base_1+base_2+"ով" ;
Pl => base --guessed
} ;
Loc => table {
Sg => base_1+base_2+"ում" ;
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+base_2+"վան" ;
Pl => base --guessed
} ;
def_nom = table {
Sg => base_1+"ի"+base_2+"ը" ;
Pl => base --guessed
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"ս" ;
Pl => base --guessed
} ;
Dat => table {
Sg => base_1+base_2+"վաս" ;
Pl => base --guessed
} ;
Ablat => table {
Sg => base_1+base_2+"վանիցս" ;
Pl => base --guessed
} ;
Instr => table {
Sg => base_1+base_2+"ովս" ;
Pl => base --guessed
} ;
Loc => table {
Sg => base_1+base_2+"ումս" ;
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"դ" ;
Pl => base --guessed
} ;
Dat => table {
Sg => base_1+base_2+"վադ" ;
Pl => base --guessed
} ;
Ablat => table {
Sg => base_1+base_2+"վանիցդ" ;
Pl => base --guessed
} ;
Instr => table {
Sg => base_1+base_2+"ովդ" ;
Pl => base --guessed
} ;
Loc => table {
Sg => base_1+base_2+"ումդ" ;
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN014"
} ;
mkN015 : Str -> N ;
mkN015 base =
case base of {
base_1+"ի"+base_2@("նչ"|"շտ"|"րք"|"րտ"|"րգ"|"նդ"|?) => lin N
{ s = table {
Nom => table {
Sg => base_1+"ի"+base_2 ;
Pl => base_1+base_2+"եր"
} ;
Dat => table {
Sg => base_1+base_2+"ի" ;
Pl => base_1+base_2+"երի"
} ;
Ablat => table {
Sg => base_1+base_2+"ից" ;
Pl => base_1+base_2+"երից"
} ;
Instr => table {
Sg => base_1+base_2+"ով" ;
Pl => base_1+base_2+"երով"
} ;
Loc => table {
Sg => base_1+base_2+"ում" ;
Pl => base_1+base_2+"երում"
}
} ;
def_dat = table {
Sg => base_1+base_2+"ին" ;
Pl => base_1+base_2+"երին"
} ;
def_nom = table {
Sg => base_1+"ի"+base_2+"ը" ;
Pl => base_1+base_2+"երը"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"ս" ;
Pl => base_1+base_2+"երս"
} ;
Dat => table {
Sg => base_1+base_2+"իս" ;
Pl => base_1+base_2+"երիս"
} ;
Ablat => table {
Sg => base_1+base_2+"իցս" ;
Pl => base_1+base_2+"երիցս"
} ;
Instr => table {
Sg => base_1+base_2+"ովս" ;
Pl => base_1+base_2+"երովս"
} ;
Loc => table {
Sg => base_1+base_2+"ումս" ;
Pl => base_1+base_2+"երումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"դ" ;
Pl => base_1+base_2+"երդ"
} ;
Dat => table {
Sg => base_1+base_2+"իդ" ;
Pl => base_1+base_2+"երիդ"
} ;
Ablat => table {
Sg => base_1+base_2+"իցդ" ;
Pl => base_1+base_2+"երիցդ"
} ;
Instr => table {
Sg => base_1+base_2+"ովդ" ;
Pl => base_1+base_2+"երովդ"
} ;
Loc => table {
Sg => base_1+base_2+"ումդ" ;
Pl => base_1+base_2+"երումդ"
}
}
};
_ => error "Can't apply paradigm mkN015"
} ;
mkN016 : Str -> N ;
mkN016 base = lin N {
s = table {
Nom => table {
Sg => base ;
Pl => base
} ;
Dat => table {
Sg => base+"վա" ;
Pl => base
} ;
Ablat => table {
Sg => base+"վանից" ;
Pl => base+"ներից" --guessed
} ;
Instr => table {
Sg => base+"ով" ;
Pl => base
} ;
Loc => table {
Sg => base+"ում" ;
Pl => base
}
} ;
def_dat = table {
Sg => base+"վան" ;
Pl => base
} ;
def_nom = table {
Sg => base+"ը" ;
Pl => base
} ;
poss1 = table {
Nom => table {
Sg => base+"ս" ;
Pl => base
} ;
Dat => table {
Sg => base+"վաս" ;
Pl => base
} ;
Ablat => table {
Sg => base+"վանիցս" ;
Pl => base+"ներիցս" --guessed
} ;
Instr => table {
Sg => base+"ովս" ;
Pl => base
} ;
Loc => table {
Sg => base+"ումս" ;
Pl => base
}
} ;
poss2 = table {
Nom => table {
Sg => base+"դ" ;
Pl => base+"ներդ" --guessed
} ;
Dat => table {
Sg => base+"վադ" ;
Pl => base
} ;
Ablat => table {
Sg => base+"վանիցդ" ;
Pl => base
} ;
Instr => table {
Sg => base+"ովդ" ;
Pl => base
} ;
Loc => table {
Sg => base+"ումդ" ;
Pl => base
}
}
} ;
mkN017 : Str -> N ;
mkN017 base = lin N {
s = table {
Nom => table {
Sg => base ;
Pl => base+"եր"
} ;
Dat => table {
Sg => base+"ի" ;
Pl => base+"երի"
} ;
Ablat => table {
Sg => base+"ից" ;
Pl => base+"երից"
} ;
Instr => table {
Sg => base+"ով" ;
Pl => base+"երով"
} ;
Loc => table {
Sg => base+"ում" ;
Pl => base+"երում"
}
} ;
def_dat = table {
Sg => base+"ին" ;
Pl => base+"երին"
} ;
def_nom = table {
Sg => base+"ն" ;
Pl => base+"երը"
} ;
poss1 = table {
Nom => table {
Sg => base+"ս" ;
Pl => base+"երս"
} ;
Dat => table {
Sg => base+"իս" ;
Pl => base+"երիս"
} ;
Ablat => table {
Sg => base+"իցս" ;
Pl => base+"երիցս"
} ;
Instr => table {
Sg => base+"ովս" ;
Pl => base+"երովս"
} ;
Loc => table {
Sg => base+"ումս" ;
Pl => base+"երումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base+"դ" ;
Pl => base+"երդ"
} ;
Dat => table {
Sg => base+"իդ" ;
Pl => base+"երիդ"
} ;
Ablat => table {
Sg => base+"իցդ" ;
Pl => base+"երիցդ"
} ;
Instr => table {
Sg => base+"ովդ" ;
Pl => base+"երովդ"
} ;
Loc => table {
Sg => base+"ումդ" ;
Pl => base+"երումդ"
}
}
} ;
mkN018 : Str -> N ;
mkN018 base = lin N {
s = table {
Nom => table {
Sg => base ;
Pl => base+"ներ"
} ;
Dat => table {
Sg => base+"ոջ" ;
Pl => base+"ների"
} ;
Ablat => table {
Sg => base+"ոջից" ;
Pl => base+"ներից"
} ;
Instr => table {
Sg => base+"ոջով" ;
Pl => base+"ներով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base+"ոջը" ;
Pl => base+"ներին"
} ;
def_nom = table {
Sg => base+"ը" ;
Pl => base+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base+"ս" ;
Pl => base+"ներս"
} ;
Dat => table {
Sg => base+"ոջս" ;
Pl => base+"ներիս"
} ;
Ablat => table {
Sg => base+"ոջիցս" ;
Pl => base+"ներիցս"
} ;
Instr => table {
Sg => base+"ոջովս" ;
Pl => base+"ներովս"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base+"դ" ;
Pl => base+"ներդ"
} ;
Dat => table {
Sg => base+"ոջդ" ;
Pl => base+"ներիդ"
} ;
Ablat => table {
Sg => base+"ոջիցդ" ;
Pl => base+"ներիցդ"
} ;
Instr => table {
Sg => base+"ոջովդ" ;
Pl => base+"ներովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
} ;
mkN019 : Str -> N ;
mkN019 base =
case base of {
base_1+"ձն"+base_2@?+"նուն" => lin N
{ s = table {
Nom => table {
Sg => base_1+"ձն"+base_2+"նուն" ;
Pl => base_1+"ձն"+base_2+"նուններ"
} ;
Dat => table {
Sg => base_1+"վ"+base_2+"ն" ;
Pl => base_1+"ձն"+base_2+"նունների"
} ;
Ablat => table {
Sg => base_1+"ձն"+base_2+"նունից" ;
Pl => base_1+"ձն"+base_2+"նուններից"
} ;
Instr => table {
Sg => base_1+"վ"+base_2+"մբ" ;
Pl => base_1+"ձն"+base_2+"նուններով"
} ;
Loc => table {
Sg => base_1+"ձն"+base_2+"նունում" ;
Pl => base_1+"ձն"+base_2+"նուններում"
}
} ;
def_dat = table {
Sg => base_1+"վ"+base_2+"նը" ;
Pl => base_1+"ձն"+base_2+"նուններին"
} ;
def_nom = table {
Sg => base_1+"ձն"+base_2+"նունը" ;
Pl => base_1+"ձն"+base_2+"նունները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ձն"+base_2+"նունս" ;
Pl => base_1+"ձն"+base_2+"նուններս"
} ;
Dat => table {
Sg => base_1+"վ"+base_2+"նս" ;
Pl => base_1+"ձն"+base_2+"նուններիս"
} ;
Ablat => table {
Sg => base_1+"ձն"+base_2+"նունիցս" ;
Pl => base_1+"ձն"+base_2+"նուններիցս"
} ;
Instr => table {
Sg => base_1+"ձն"+base_2+"նունովս" ;
Pl => base_1+"ձն"+base_2+"նուններովս"
} ;
Loc => table {
Sg => base_1+"ձն"+base_2+"նունումս" ;
Pl => base_1+"ձն"+base_2+"նուններումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ձն"+base_2+"նունդ" ;
Pl => base_1+"ձն"+base_2+"նուններդ"
} ;
Dat => table {
Sg => base_1+"վ"+base_2+"նդ" ;
Pl => base_1+"ձն"+base_2+"նուններիդ"
} ;
Ablat => table {
Sg => base_1+"ձն"+base_2+"նունիցդ" ;
Pl => base_1+"ձն"+base_2+"նուններիցդ"
} ;
Instr => table {
Sg => base_1+"ձն"+base_2+"նունովդ" ;
Pl => base_1+"ձն"+base_2+"նուններովդ"
} ;
Loc => table {
Sg => base_1+"ձն"+base_2+"նունումդ" ;
Pl => base_1+"ձն"+base_2+"նուններումդ"
}
}
};
_ => error "Can't apply paradigm mkN019"
} ;
mkN020 : Str -> N ;
mkN020 base =
case base of {
base_1+"ու"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"ու"+base_2 ;
Pl => base_1+"ու"+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+base_2+"ան" ;
Pl => base_1+"ու"+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+"ու"+base_2+"ից" ;
Pl => base_1+"ու"+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+"ու"+base_2+"ով" ;
Pl => base_1+"ու"+base_2+"ներով"
} ;
Loc => table {
Sg => base_1+"ու"+base_2+"ում" ;
Pl => base_1+"ու"+base_2+"ներում"
}
} ;
def_dat = table {
Sg => base_1+base_2+"անը" ;
Pl => base_1+"ու"+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+"ու"+base_2+"ը" ;
Pl => base_1+"ու"+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"ս" ;
Pl => base_1+"ու"+base_2+"ներս"
} ;
Dat => table {
Sg => base_1+base_2+"անս" ;
Pl => base_1+"ու"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+"ու"+base_2+"իցս" ;
Pl => base_1+"ու"+base_2+"ներիցս"
} ;
Instr => table {
Sg => base_1+"ու"+base_2+"ովս" ;
Pl => base_1+"ու"+base_2+"ներովս"
} ;
Loc => table {
Sg => base_1+"ու"+base_2+"ումս" ;
Pl => base_1+"ու"+base_2+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"դ" ;
Pl => base_1+"ու"+base_2+"ներդ"
} ;
Dat => table {
Sg => base_1+base_2+"անդ" ;
Pl => base_1+"ու"+base_2+"ներիդ"
} ;
Ablat => table {
Sg => base_1+"ու"+base_2+"իցդ" ;
Pl => base_1+"ու"+base_2+"ներիցդ"
} ;
Instr => table {
Sg => base_1+"ու"+base_2+"ովդ" ;
Pl => base_1+"ու"+base_2+"ներովդ"
} ;
Loc => table {
Sg => base_1+"ու"+base_2+"ումդ" ;
Pl => base_1+"ու"+base_2+"ներումդ"
}
}
};
_ => error "Can't apply paradigm mkN020"
} ;
mkN021 : Str -> N ;
mkN021 base =
case base of {
base_1+"վա"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"վա"+base_2 ;
Pl => base_1+"վա"+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+base_2+"ո" ;
Pl => base_1+"վա"+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+base_2+"ուց" ;
Pl => base_1+"վա"+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+base_2+"ով" ;
Pl => base_1+"վա"+base_2+"ներով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+base_2+"ուն" ;
Pl => base_1+"վա"+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+"վա"+base_2+"ը" ;
Pl => base_1+"վա"+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base ; --guessed
Pl => base --guessed
} ;
Dat => table {
Sg => base ; --guessed
Pl => base --guessed
} ;
Ablat => table {
Sg => base ; --guessed
Pl => base --guessed
} ;
Instr => table {
Sg => base ; --guessed
Pl => base --guessed
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base ; --guessed
Pl => base --guessed
} ;
Dat => table {
Sg => base ; --guessed
Pl => base --guessed
} ;
Ablat => table {
Sg => base ; --guessed
Pl => base --guessed
} ;
Instr => table {
Sg => base ; --guessed
Pl => base --guessed
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN021"
} ;
mkN022 : Str -> N ;
mkN022 base =
case base of {
base_1+"եւ"+base_2@(?+?+?+?)+"ի"+base_3@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"եւ"+base_2+"ի"+base_3 ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ներ"
} ;
Dat => table {
Sg => base_1+"և"+base_2+base_3+"ի" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ների"
} ;
Ablat => table {
Sg => base_1+"և"+base_2+base_3+"ից" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ներից"
} ;
Instr => table {
Sg => base_1+"և"+base_2+base_3+"ով" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ներով"
} ;
Loc => table {
Sg => base_1+"և"+base_2+base_3+"ում" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ներում"
}
} ;
def_dat = table {
Sg => base_1+"և"+base_2+base_3+"ին" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ներին"
} ;
def_nom = table {
Sg => base_1+"եւ"+base_2+"ի"+base_3+"ը" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"եւ"+base_2+"ի"+base_3+"ս" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ներս"
} ;
Dat => table {
Sg => base_1+"և"+base_2+base_3+"իս" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ներիս"
} ;
Ablat => table {
Sg => base_1+"և"+base_2+base_3+"իցս" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ներիցս"
} ;
Instr => table {
Sg => base_1+"և"+base_2+base_3+"ովս" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ներովս"
} ;
Loc => table {
Sg => base_1+"և"+base_2+base_3+"ումս" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"եւ"+base_2+"ի"+base_3+"դ" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ներդ"
} ;
Dat => table {
Sg => base_1+"և"+base_2+base_3+"իդ" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ներիդ"
} ;
Ablat => table {
Sg => base_1+"և"+base_2+base_3+"իցդ" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ներիցդ"
} ;
Instr => table {
Sg => base_1+"և"+base_2+base_3+"ովդ" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ներովդ"
} ;
Loc => table {
Sg => base_1+"և"+base_2+base_3+"ումդ" ;
Pl => base_1+"եւ"+base_2+"ի"+base_3+"ներումդ"
}
}
};
_ => error "Can't apply paradigm mkN022"
} ;
mkN023 : Str -> N ;
mkN023 base =
case base of {
base_1+"ու"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"ու"+base_2 ;
Pl => base_1+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+base_2+"ան" ;
Pl => base_1+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+base_2+"նից" ;
Pl => base_1+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+base_2+"նով" ;
Pl => base_1+base_2+"ներով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+base_2+"անը" ;
Pl => base_1+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+"ու"+base_2+"ը" ;
Pl => base_1+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"ս" ;
Pl => base_1+base_2+"ներս"
} ;
Dat => table {
Sg => base_1+base_2+"անս" ;
Pl => base_1+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+base_2+"նիցս" ;
Pl => base_1+base_2+"ներիցս"
} ;
Instr => table {
Sg => base_1+base_2+"նովս" ;
Pl => base_1+base_2+"ներովս"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"դ" ;
Pl => base_1+base_2+"ներդ"
} ;
Dat => table {
Sg => base_1+base_2+"անդ" ;
Pl => base_1+base_2+"ներիդ"
} ;
Ablat => table {
Sg => base_1+base_2+"նիցդ" ;
Pl => base_1+base_2+"ներիցդ"
} ;
Instr => table {
Sg => base_1+base_2+"նովդ" ;
Pl => base_1+base_2+"ներովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN023"
} ;
mkN024 : Str -> N ;
mkN024 base =
case base of {
base_1+"ու"+base_2@(?+?)+base_3@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"ու"+base_2+base_3 ;
Pl => base_1+base_2+base_3+"եր"
} ;
Dat => table {
Sg => base_1+base_2+"ե"+base_3 ;
Pl => base_1+base_2+base_3+"երի"
} ;
Ablat => table {
Sg => base_1+base_2+base_3+"ից" ;
Pl => base_1+base_2+base_3+"երից"
} ;
Instr => table {
Sg => base_1+base_2+base_3+"ով" ;
Pl => base_1+base_2+base_3+"երով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+base_2+"ե"+base_3+"ը" ;
Pl => base_1+base_2+base_3+"երին"
} ;
def_nom = table {
Sg => base_1+"ու"+base_2+base_3+"ը" ;
Pl => base_1+base_2+base_3+"երը"
} ;
poss1 = table {
Nom => table {
Sg => base ;
Pl => base
} ;
Dat => table {
Sg => base ;
Pl => base
} ;
Ablat => table {
Sg => base ;
Pl => base
} ;
Instr => table {
Sg => base ;
Pl => base
} ;
Loc => table {
Sg => base ;
Pl => base
}
} ;
poss2 = table {
Nom => table {
Sg => base ;
Pl => base
} ;
Dat => table {
Sg => base ;
Pl => base
} ;
Ablat => table {
Sg => base ;
Pl => base
} ;
Instr => table {
Sg => base ;
Pl => base
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN024"
} ;
mkN025 : Str -> N ;
mkN025 base =
case base of {
base_1+base_2@?+"ւյր" => lin N
{ s = table {
Nom => table {
Sg => base_1+base_2+"ւյր" ;
Pl => base_1+base_2+"ւյրեր"
} ;
Dat => table {
Sg => base_1+"ր"+base_2+"ջ" ;
Pl => base_1+base_2+"ւյրերի"
} ;
Ablat => table {
Sg => base_1+"ր"+base_2+"ջից" ;
Pl => base_1+base_2+"ւյրերից"
} ;
Instr => table {
Sg => base_1+"ր"+base_2+"ջով" ;
Pl => base_1+base_2+"ւյրերով"
} ;
Loc => table {
Sg => base ;
Pl => base
}
} ;
def_dat = table {
Sg => base_1+"ր"+base_2+"ջը" ;
Pl => base_1+base_2+"ւյրերին"
} ;
def_nom = table {
Sg => base_1+base_2+"ւյրը" ;
Pl => base_1+base_2+"ւյրերը"
} ;
poss1 = table {
Nom => table {
Sg => base_1+base_2+"ւյրս" ;
Pl => base_1+base_2+"ւյրերս"
} ;
Dat => table {
Sg => base_1+"ր"+base_2+"ջս" ;
Pl => base_1+base_2+"ւյրերիս"
} ;
Ablat => table {
Sg => base_1+"ր"+base_2+"ջիցս" ;
Pl => base_1+base_2+"ւյրերիցս"
} ;
Instr => table {
Sg => base_1+"ր"+base_2+"ջովս" ;
Pl => base_1+base_2+"ւյրերովս"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+base_2+"ւյրդ" ;
Pl => base_1+base_2+"ւյրերդ"
} ;
Dat => table {
Sg => base_1+"ր"+base_2+"ջդ" ;
Pl => base_1+base_2+"ւյրերիդ"
} ;
Ablat => table {
Sg => base_1+"ր"+base_2+"ջիցդ" ;
Pl => base_1+base_2+"ւյրերիցդ"
} ;
Instr => table {
Sg => base_1+"ր"+base_2+"ջովդ" ;
Pl => base_1+base_2+"ւյրերովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN025"
} ;
mkN026 : Str -> N ;
mkN026 base =
case base of {
base_1 => lin N
{ s = table {
Nom => table {
Sg => base_1 ;
Pl => base
} ;
Dat => table {
Sg => base_1+"ան" ;
Pl => base
} ;
Ablat => table {
Sg => base_1+"նից" ;
Pl => base_1+"ներից" --guessed
} ;
Instr => table {
Sg => base_1+"նով" ;
Pl => base
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+"անը" ;
Pl => base
} ;
def_nom = table {
Sg => base_1+"ը" ;
Pl => base
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ս" ;
Pl => base
} ;
Dat => table {
Sg => base_1+"անս" ;
Pl => base
} ;
Ablat => table {
Sg => base_1+"նիցս" ;
Pl => base_1+"ներիցս" --guessed
} ;
Instr => table {
Sg => base_1+"նովս" ;
Pl => base
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"դ" ;
Pl => base_1+"ներդ" --guessed
} ;
Dat => table {
Sg => base_1+"անդ" ;
Pl => base
} ;
Ablat => table {
Sg => base_1+"նիցդ" ;
Pl => base
} ;
Instr => table {
Sg => base_1+"նովդ" ;
Pl => base
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN026"
} ;
mkN027 : Str -> N ;
mkN027 base =
case base of {
base_1 => lin N
{ s = table {
Nom => table {
Sg => base_1 ;
Pl => base_1+"եր"
} ;
Dat => table {
Sg => base_1+"ու" ;
Pl => base_1+"երի"
} ;
Ablat => table {
Sg => base_1+"ուց" ;
Pl => base_1+"երից"
} ;
Instr => table {
Sg => base_1+"ով" ;
Pl => base_1+"երով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+"ուն" ;
Pl => base_1+"երին"
} ;
def_nom = table {
Sg => base_1+"ն" ;
Pl => base_1+"երը"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ս" ;
Pl => base_1+"երս"
} ;
Dat => table {
Sg => base_1+"ուս" ;
Pl => base_1+"երիս"
} ;
Ablat => table {
Sg => base_1+"ուցս" ;
Pl => base_1+"երիցս"
} ;
Instr => table {
Sg => base_1+"ովս" ;
Pl => base_1+"երովս"
} ;
Loc => table {
Sg => base_1+"ումս" ;
Pl => base_1+"երումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"դ" ;
Pl => base_1+"երդ"
} ;
Dat => table {
Sg => base_1+"ուդ" ;
Pl => base_1+"երիդ"
} ;
Ablat => table {
Sg => base_1+"ուցդ" ;
Pl => base_1+"երիցդ"
} ;
Instr => table {
Sg => base_1+"ովդ" ;
Pl => base_1+"երովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN027"
} ;
mkN028 : Str -> N ;
mkN028 base =
case base of {
base_1+"ու"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"ու"+base_2 ;
Pl => base_1+base_2+"եր"
} ;
Dat => table {
Sg => base_1+"ա"+base_2 ;
Pl => base_1+base_2+"երի"
} ;
Ablat => table {
Sg => base_1+base_2+"ից" ;
Pl => base_1+base_2+"երից"
} ;
Instr => table {
Sg => base_1+base_2+"ով" ;
Pl => base_1+base_2+"երով"
} ;
Loc => table {
Sg => base_1+base_2+"ում" ;
Pl => base_1+base_2+"երում"
}
} ;
def_dat = table {
Sg => base_1+"ա"+base_2+"ը" ;
Pl => base_1+base_2+"երին"
} ;
def_nom = table {
Sg => base_1+"ու"+base_2+"ը" ;
Pl => base_1+base_2+"երը"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"ս" ;
Pl => base_1+base_2+"երս"
} ;
Dat => table {
Sg => base_1+"ա"+base_2+"ս" ;
Pl => base_1+base_2+"երիս"
} ;
Ablat => table {
Sg => base_1+base_2+"իցս" ;
Pl => base_1+base_2+"երիցս"
} ;
Instr => table {
Sg => base_1+base_2+"ովս" ;
Pl => base_1+base_2+"երովս"
} ;
Loc => table {
Sg => base_1+base_2+"ումս" ;
Pl => base_1+base_2+"երումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"դ" ;
Pl => base_1+base_2+"երդ"
} ;
Dat => table {
Sg => base_1+"ա"+base_2+"դ" ;
Pl => base_1+base_2+"երիդ"
} ;
Ablat => table {
Sg => base_1+base_2+"իցդ" ;
Pl => base_1+base_2+"երիցդ"
} ;
Instr => table {
Sg => base_1+base_2+"ովդ" ;
Pl => base_1+base_2+"երովդ"
} ;
Loc => table {
Sg => base_1+base_2+"ումդ" ;
Pl => base_1+base_2+"երումդ"
}
}
};
_ => error "Can't apply paradigm mkN028"
} ;
mkN029 : Str -> N ;
mkN029 base =
case base of {
base_1+"եւու"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"եւու"+base_2 ;
Pl => base_1+"եւու"+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+"և"+base_2+"ան" ;
Pl => base_1+"եւու"+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+"եւու"+base_2+"ից" ;
Pl => base_1+"եւու"+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+"և"+base_2+"ամբ" ;
Pl => base_1+"եւու"+base_2+"ներով"
} ;
Loc => table {
Sg => base_1+"եւու"+base_2+"ում" ;
Pl => base_1+"եւու"+base_2+"ներում"
}
} ;
def_dat = table {
Sg => base_1+"և"+base_2+"անը" ;
Pl => base_1+"եւու"+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+"եւու"+base_2+"ը" ;
Pl => base_1+"եւու"+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"եւու"+base_2+"ս" ;
Pl => base_1+"եւու"+base_2+"ներս"
} ;
Dat => table {
Sg => base_1+"և"+base_2+"անս" ;
Pl => base_1+"եւու"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+"եւու"+base_2+"իցս" ;
Pl => base_1+"եւու"+base_2+"ներիցս"
} ;
Instr => table {
Sg => base_1+"եւու"+base_2+"ովս" ;
Pl => base_1+"եւու"+base_2+"ներովս"
} ;
Loc => table {
Sg => base_1+"եւու"+base_2+"ումս" ;
Pl => base_1+"եւու"+base_2+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"եւու"+base_2+"դ" ;
Pl => base_1+"եւու"+base_2+"ներդ"
} ;
Dat => table {
Sg => base_1+"և"+base_2+"անդ" ;
Pl => base_1+"եւու"+base_2+"ներիդ"
} ;
Ablat => table {
Sg => base_1+"եւու"+base_2+"իցդ" ;
Pl => base_1+"եւու"+base_2+"ներիցդ"
} ;
Instr => table {
Sg => base_1+"եւու"+base_2+"ովդ" ;
Pl => base_1+"եւու"+base_2+"ներովդ"
} ;
Loc => table {
Sg => base_1+"եւու"+base_2+"ումդ" ;
Pl => base_1+"եւու"+base_2+"ներումդ"
}
}
};
_ => error "Can't apply paradigm mkN029"
} ;
mkN030 : Str -> N ;
mkN030 base =
case base of {
base_1+"ու"+base_2@(?+?) => lin N
{ s = table {
Nom => table {
Sg => base_1+"ու"+base_2 ;
Pl => base_1+"ու"+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+base_2+"յան" ;
Pl => base_1+"ու"+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+base_2+"ից" ;
Pl => base_1+"ու"+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+base_2+"յամբ" ;
Pl => base_1+"ու"+base_2+"ներով"
} ;
Loc => table {
Sg => base_1+base_2+"ում" ;
Pl => base_1+"ու"+base_2+"ներում"
}
} ;
def_dat = table {
Sg => base_1+base_2+"յանը" ;
Pl => base_1+"ու"+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+"ու"+base_2+"ը" ;
Pl => base_1+"ու"+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"ս" ;
Pl => base_1+"ու"+base_2+"ներս"
} ;
Dat => table {
Sg => base_1+base_2+"յանս" ;
Pl => base_1+"ու"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+base_2+"իցս" ;
Pl => base_1+"ու"+base_2+"ներիցս"
} ;
Instr => table {
Sg => base_1+base_2+"ովս" ;
Pl => base_1+"ու"+base_2+"ներովս"
} ;
Loc => table {
Sg => base_1+base_2+"ումս" ;
Pl => base_1+"ու"+base_2+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"դ" ;
Pl => base_1+"ու"+base_2+"ներդ"
} ;
Dat => table {
Sg => base_1+base_2+"յանդ" ;
Pl => base_1+"ու"+base_2+"ներիդ"
} ;
Ablat => table {
Sg => base_1+base_2+"իցդ" ;
Pl => base_1+"ու"+base_2+"ներիցդ"
} ;
Instr => table {
Sg => base_1+base_2+"ովդ" ;
Pl => base_1+"ու"+base_2+"ներովդ"
} ;
Loc => table {
Sg => base_1+base_2+"ումդ" ;
Pl => base_1+"ու"+base_2+"ներումդ"
}
}
};
_ => error "Can't apply paradigm mkN030"
} ;
mkN031 : Str -> N ;
mkN031 base =
case base of {
base_1+"ու"+base_2@("շտ"|"րդ"|?) => lin N
{ s = table {
Nom => table {
Sg => base_1+"ու"+base_2 ;
Pl => base_1+"ու"+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+base_2+"ի" ;
Pl => base_1+"ու"+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+base_2+"ից" ;
Pl => base_1+"ու"+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+base_2+"ով" ;
Pl => base_1+"ու"+base_2+"ներով"
} ;
Loc => table {
Sg => base_1+base_2+"ում" ;
Pl => base_1+"ու"+base_2+"ներում"
}
} ;
def_dat = table {
Sg => base_1+base_2+"ին" ;
Pl => base_1+"ու"+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+"ու"+base_2+"ը" ;
Pl => base_1+"ու"+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"ս" ;
Pl => base_1+"ու"+base_2+"ներս"
} ;
Dat => table {
Sg => base_1+base_2+"իս" ;
Pl => base_1+"ու"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+base_2+"իցս" ;
Pl => base_1+"ու"+base_2+"ներիցս"
} ;
Instr => table {
Sg => base_1+base_2+"ովս" ;
Pl => base_1+"ու"+base_2+"ներովս"
} ;
Loc => table {
Sg => base_1+base_2+"ումս" ;
Pl => base_1+"ու"+base_2+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"դ" ;
Pl => base_1+"ու"+base_2+"ներդ"
} ;
Dat => table {
Sg => base_1+base_2+"իդ" ;
Pl => base_1+"ու"+base_2+"ներիդ"
} ;
Ablat => table {
Sg => base_1+base_2+"իցդ" ;
Pl => base_1+"ու"+base_2+"ներիցդ"
} ;
Instr => table {
Sg => base_1+base_2+"ովդ" ;
Pl => base_1+"ու"+base_2+"ներովդ"
} ;
Loc => table {
Sg => base_1+base_2+"ումդ" ;
Pl => base_1+"ու"+base_2+"ներումդ"
}
}
};
_ => error "Can't apply paradigm mkN031"
} ;
mkN032 : Str -> N ;
mkN032 base =
case base of {
base_1+"ուն" => lin N
{ s = table {
Nom => table {
Sg => base_1+"ուն" ;
Pl => base_1+"ուններ"
} ;
Dat => table {
Sg => base_1+"վա" ;
Pl => base_1+"ունների"
} ;
Ablat => table {
Sg => base_1+"վանից" ;
Pl => base_1+"ուններից"
} ;
Instr => table {
Sg => base_1+"ունով" ;
Pl => base_1+"ուններով"
} ;
Loc => table {
Sg => base ;
Pl => base_1+"ուններում"
}
} ;
def_dat = table {
Sg => base_1+"վան" ;
Pl => base_1+"ուններին"
} ;
def_nom = table {
Sg => base_1+"ունը" ;
Pl => base_1+"ունները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ունս" ;
Pl => base_1+"ուններս"
} ;
Dat => table {
Sg => base_1+"վաս" ;
Pl => base_1+"ուններիս"
} ;
Ablat => table {
Sg => base_1+"վանիցս" ;
Pl => base_1+"ուններիցս"
} ;
Instr => table {
Sg => base_1+"ունովս" ;
Pl => base_1+"ուններովս"
} ;
Loc => table {
Sg => base ;
Pl => base_1+"ուններումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ունդ" ;
Pl => base_1+"ուններդ"
} ;
Dat => table {
Sg => base_1+"վադ" ;
Pl => base_1+"ուններիդ"
} ;
Ablat => table {
Sg => base_1+"վանիցդ" ;
Pl => base_1+"ուններիցդ"
} ;
Instr => table {
Sg => base_1+"ունովդ" ;
Pl => base_1+"ուններովդ"
} ;
Loc => table {
Sg => base ;
Pl => base_1+"ուններումդ"
}
}
};
_ => error "Can't apply paradigm mkN032"
} ;
mkN033 : Str -> N ;
mkN033 base =
case base of {
base_1+"ու" => lin N
{ s = table {
Nom => table {
Sg => base_1+"ու" ;
Pl => base_1+"վեր"
} ;
Dat => table {
Sg => base_1+"վի" ;
Pl => base_1+"վերի"
} ;
Ablat => table {
Sg => base_1+"վից" ;
Pl => base_1+"վերից"
} ;
Instr => table {
Sg => base_1+"վով" ;
Pl => base_1+"վերով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+"վին" ;
Pl => base_1+"վերին"
} ;
def_nom = table {
Sg => base_1+"ուն" ;
Pl => base_1+"վերը"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ուս" ;
Pl => base_1+"վերս"
} ;
Dat => table {
Sg => base_1+"վիս" ;
Pl => base_1+"վերիս"
} ;
Ablat => table {
Sg => base_1+"վիցս" ;
Pl => base_1+"վերիցս"
} ;
Instr => table {
Sg => base_1+"վովս" ;
Pl => base_1+"վերովս"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ուդ" ;
Pl => base_1+"վերդ"
} ;
Dat => table {
Sg => base_1+"վիդ" ;
Pl => base_1+"վերիդ"
} ;
Ablat => table {
Sg => base_1+"վիցդ" ;
Pl => base_1+"վերիցդ"
} ;
Instr => table {
Sg => base_1+"վովդ" ;
Pl => base_1+"վերովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN033"
} ;
mkN034 : Str -> N ;
mkN034 base =
case base of {
base_1+"ի"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"ի"+base_2 ;
Pl => base_1+"ա"+base_2+"այք"
} ;
Dat => table {
Sg => base_1+base_2+"ոջ" ;
Pl => base_1+"ա"+base_2+"անց"
} ;
Ablat => table {
Sg => base_1+base_2+"ոջից" ;
Pl => base_1+"ա"+base_2+"անցից"
} ;
Instr => table {
Sg => base_1+base_2+"ոջով" ;
Pl => base_1+"ա"+base_2+"անցով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+base_2+"ոջը" ;
Pl => base
} ;
def_nom = table {
Sg => base_1+"ի"+base_2+"ը" ;
Pl => base
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"ս" ;
Pl => base_1+"ա"+base_2+"այքս"
} ;
Dat => table {
Sg => base_1+base_2+"ոջս" ;
Pl => base_1+"ա"+base_2+"անցս"
} ;
Ablat => table {
Sg => base_1+base_2+"ոջիցս" ;
Pl => base_1+"ա"+base_2+"անցիցս"
} ;
Instr => table {
Sg => base_1+base_2+"ոջովս" ;
Pl => base_1+"ա"+base_2+"անցովս"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"դ" ;
Pl => base_1+"ա"+base_2+"այքդ"
} ;
Dat => table {
Sg => base_1+base_2+"ոջդ" ;
Pl => base_1+"ա"+base_2+"անցդ"
} ;
Ablat => table {
Sg => base_1+base_2+"ոջիցդ" ;
Pl => base_1+"ա"+base_2+"անցիցդ"
} ;
Instr => table {
Sg => base_1+base_2+"ոջովդ" ;
Pl => base_1+"ա"+base_2+"անցովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN034"
} ;
mkN035 : Str -> N ;
mkN035 base =
case base of {
base_1+"ի"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"ի"+base_2 ;
Pl => base_1+"ի"+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+base_2+"ա" ;
Pl => base_1+"ի"+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+base_2+"անից" ;
Pl => base_1+"ի"+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+base_2+"անով" ;
Pl => base_1+"ի"+base_2+"ներով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+base_2+"ան" ;
Pl => base_1+"ի"+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+"ի"+base_2+"ը" ;
Pl => base_1+"ի"+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"ս" ;
Pl => base_1+"ի"+base_2+"ներս"
} ;
Dat => table {
Sg => base_1+base_2+"անս" ;
Pl => base_1+"ի"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+base_2+"անիցս" ;
Pl => base_1+"ի"+base_2+"ներիցս"
} ;
Instr => table {
Sg => base_1+base_2+"անովս" ;
Pl => base_1+"ի"+base_2+"ներովս"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"դ" ;
Pl => base_1+"ի"+base_2+"ներդ"
} ;
Dat => table {
Sg => base_1+base_2+"անդ" ;
Pl => base_1+"ի"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+base_2+"անիցդ" ;
Pl => base_1+"ի"+base_2+"ներիցդ"
} ;
Instr => table {
Sg => base_1+base_2+"անովդ" ;
Pl => base_1+"ի"+base_2+"ներովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN035"
} ;
mkN036 : Str -> N ;
mkN036 base =
case base of {
base_1+"այ"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"այ"+base_2 ;
Pl => base_1+"այ"+base_2+"եր"
} ;
Dat => table {
Sg => base_1+"ո"+base_2 ;
Pl => base_1+"այ"+base_2+"երի"
} ;
Ablat => table {
Sg => base_1+"ո"+base_2+"ից" ;
Pl => base_1+"այ"+base_2+"երից"
} ;
Instr => table {
Sg => base_1+"ո"+base_2+"ով" ;
Pl => base_1+"այ"+base_2+"երով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+"ո"+base_2+"ը" ;
Pl => base_1+"այ"+base_2+"երին"
} ;
def_nom = table {
Sg => base_1+"այ"+base_2+"ը" ;
Pl => base_1+"այ"+base_2+"երը"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"այ"+base_2+"ս" ;
Pl => base_1+"այ"+base_2+"երս"
} ;
Dat => table {
Sg => base_1+"ո"+base_2+"ս" ;
Pl => base_1+"այ"+base_2+"երիս"
} ;
Ablat => table {
Sg => base_1+"ո"+base_2+"իցս" ;
Pl => base_1+"այ"+base_2+"երիցս"
} ;
Instr => table {
Sg => base_1+"ո"+base_2+"ովս" ;
Pl => base_1+"այ"+base_2+"երովս"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"այ"+base_2+"դ" ;
Pl => base_1+"այ"+base_2+"երդ"
} ;
Dat => table {
Sg => base_1+"ո"+base_2+"դ" ;
Pl => base_1+"այ"+base_2+"երիդ"
} ;
Ablat => table {
Sg => base_1+"ո"+base_2+"իցդ" ;
Pl => base_1+"այ"+base_2+"երիցդ"
} ;
Instr => table {
Sg => base_1+"ո"+base_2+"ովդ" ;
Pl => base_1+"այ"+base_2+"երովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN036"
} ;
mkN037 : Str -> N ;
mkN037 base =
case base of {
base_1+"ե"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"ե"+base_2 ;
Pl => base_1+"ե"+base_2+"եր"
} ;
Dat => table {
Sg => base_1+"ո"+base_2 ;
Pl => base_1+"ե"+base_2+"երի"
} ;
Ablat => table {
Sg => base_1+"ո"+base_2+"ից" ;
Pl => base_1+"ե"+base_2+"երից"
} ;
Instr => table {
Sg => base_1+"ո"+base_2+"ով" ;
Pl => base_1+"ե"+base_2+"երով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+"ո"+base_2+"ը" ;
Pl => base_1+"ե"+base_2+"երին"
} ;
def_nom = table {
Sg => base_1+"ե"+base_2+"ը" ;
Pl => base_1+"ե"+base_2+"երը"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ե"+base_2+"ս" ;
Pl => base_1+"ե"+base_2+"երս"
} ;
Dat => table {
Sg => base_1+"ո"+base_2+"ս" ;
Pl => base_1+"ե"+base_2+"երիս"
} ;
Ablat => table {
Sg => base_1+"ո"+base_2+"իցս" ;
Pl => base_1+"ե"+base_2+"երիցս"
} ;
Instr => table {
Sg => base_1+"ո"+base_2+"ովս" ;
Pl => base_1+"ե"+base_2+"երովս"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ե"+base_2+"դ" ;
Pl => base_1+"ե"+base_2+"երդ"
} ;
Dat => table {
Sg => base_1+"ո"+base_2+"դ" ;
Pl => base_1+"ե"+base_2+"երիդ"
} ;
Ablat => table {
Sg => base_1+"ո"+base_2+"իցդ" ;
Pl => base_1+"ե"+base_2+"երիցդ"
} ;
Instr => table {
Sg => base_1+"ո"+base_2+"ովդ" ;
Pl => base_1+"ե"+base_2+"երովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN037"
} ;
mkN038 : Str -> N ;
mkN038 base =
case base of {
base_1+"ու" => lin N
{ s = table {
Nom => table {
Sg => base_1+"ու" ;
Pl => base
} ;
Dat => table {
Sg => base_1+"վա" ;
Pl => base
} ;
Ablat => table {
Sg => base_1+"վանից" ;
Pl => base
} ;
Instr => table {
Sg => base_1+"ով" ;
Pl => base
} ;
Loc => table {
Sg => base_1+"ում" ;
Pl => base
}
} ;
def_dat = table {
Sg => base_1+"վան" ;
Pl => base
} ;
def_nom = table {
Sg => base_1+"ուն" ;
Pl => base
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ուս" ;
Pl => base
} ;
Dat => table {
Sg => base_1+"վաս" ;
Pl => base
} ;
Ablat => table {
Sg => base_1+"վանիցս" ;
Pl => base
} ;
Instr => table {
Sg => base_1+"ովս" ;
Pl => base
} ;
Loc => table {
Sg => base_1+"ումս" ;
Pl => base
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ուդ" ;
Pl => base
} ;
Dat => table {
Sg => base_1+"վադ" ;
Pl => base
} ;
Ablat => table {
Sg => base_1+"վանիցդ" ;
Pl => base
} ;
Instr => table {
Sg => base_1+"ովդ" ;
Pl => base
} ;
Loc => table {
Sg => base_1+"ումդ" ;
Pl => base
}
}
};
_ => error "Can't apply paradigm mkN038"
} ;
mkN039 : Str -> N ;
mkN039 base =
case base of {
base_1+base_2@?+"ւյր" => lin N
{ s = table {
Nom => table {
Sg => base_1+base_2+"ւյր" ;
Pl => base_1+base_2+"ւյրներ"
} ;
Dat => table {
Sg => base_1+"ր"+base_2+"ջ" ;
Pl => base_1+base_2+"ւյրների"
} ;
Ablat => table {
Sg => base_1+"ր"+base_2+"ջից" ;
Pl => base_1+base_2+"ւյրներից"
} ;
Instr => table {
Sg => base_1+"ր"+base_2+"ջով" ;
Pl => base_1+base_2+"ւյրներով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+"ր"+base_2+"ջը" ;
Pl => base_1+base_2+"ւյրներին"
} ;
def_nom = table {
Sg => base_1+base_2+"ւյրը" ;
Pl => base_1+base_2+"ւյրները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+base_2+"ւյրս" ;
Pl => base_1+base_2+"ւյրներս"
} ;
Dat => table {
Sg => base_1+"ր"+base_2+"ջս" ;
Pl => base_1+base_2+"ւյրներիս"
} ;
Ablat => table {
Sg => base_1+"ր"+base_2+"ջիցս" ;
Pl => base_1+base_2+"ւյրներիցս"
} ;
Instr => table {
Sg => base_1+"ր"+base_2+"ջովս" ;
Pl => base_1+base_2+"ւյրներովս"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+base_2+"ւյրդ" ;
Pl => base_1+base_2+"ւյրներդ"
} ;
Dat => table {
Sg => base_1+"ր"+base_2+"ջդ" ;
Pl => base_1+base_2+"ւյրներիդ"
} ;
Ablat => table {
Sg => base_1+"ր"+base_2+"ջիցդ" ;
Pl => base_1+base_2+"ւյրներիցդ"
} ;
Instr => table {
Sg => base_1+"ր"+base_2+"ջովդ" ;
Pl => base_1+base_2+"ւյրներովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN039"
} ;
mkN040 : Str -> N ;
mkN040 base =
case base of {
base_1+"այ"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"այ"+base_2 ;
Pl => base_1+"այ"+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+"ո"+base_2 ;
Pl => base_1+"այ"+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+"ո"+base_2+"ից" ;
Pl => base_1+"այ"+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+"ո"+base_2+"ով" ;
Pl => base_1+"այ"+base_2+"ներով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+"ո"+base_2+"ը" ;
Pl => base_1+"այ"+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+"այ"+base_2+"ը" ;
Pl => base_1+"այ"+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"այ"+base_2+"ս" ;
Pl => base_1+"այ"+base_2+"ներս"
} ;
Dat => table {
Sg => base_1+"ո"+base_2+"ս" ;
Pl => base_1+"այ"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+"ո"+base_2+"իցս" ;
Pl => base_1+"այ"+base_2+"ներիցս"
} ;
Instr => table {
Sg => base_1+"ո"+base_2+"ովս" ;
Pl => base_1+"այ"+base_2+"ներովս"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"այ"+base_2+"դ" ;
Pl => base_1+"այ"+base_2+"ներդ"
} ;
Dat => table {
Sg => base_1+"ո"+base_2+"դ" ;
Pl => base_1+"այ"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+"ո"+base_2+"իցդ" ;
Pl => base_1+"այ"+base_2+"ներիցդ"
} ;
Instr => table {
Sg => base_1+"ո"+base_2+"ովդ" ;
Pl => base_1+"այ"+base_2+"ներովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN040"
} ;
mkN041 : Str -> N ;
mkN041 base =
case base of {
base_1+"ե"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"ե"+base_2 ;
Pl => base
} ;
Dat => table {
Sg => base_1+"ի"+base_2+"ի" ;
Pl => base
} ;
Ablat => table {
Sg => base_1+"ի"+base_2+"ից" ;
Pl => base
} ;
Instr => table {
Sg => base_1+"ի"+base_2+"ով" ;
Pl => base
} ;
Loc => table {
Sg => base_1+"ի"+base_2+"ում" ;
Pl => base
}
} ;
def_dat = table {
Sg => base_1+"ի"+base_2+"ին" ;
Pl => base
} ;
def_nom = table {
Sg => base_1+"ե"+base_2+"ը" ;
Pl => base
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ե"+base_2+"ս" ;
Pl => base
} ;
Dat => table {
Sg => base_1+"ի"+base_2+"իս" ;
Pl => base
} ;
Ablat => table {
Sg => base_1+"ի"+base_2+"իցս" ;
Pl => base
} ;
Instr => table {
Sg => base_1+"ի"+base_2+"ովս" ;
Pl => base
} ;
Loc => table {
Sg => base_1+"ի"+base_2+"ումս" ;
Pl => base
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ե"+base_2+"դ" ;
Pl => base
} ;
Dat => table {
Sg => base_1+"ի"+base_2+"իդ" ;
Pl => base
} ;
Ablat => table {
Sg => base_1+"ի"+base_2+"իցդ" ;
Pl => base
} ;
Instr => table {
Sg => base_1+"ի"+base_2+"ովդ" ;
Pl => base
} ;
Loc => table {
Sg => base_1+"ի"+base_2+"ումդ" ;
Pl => base
}
}
};
_ => error "Can't apply paradigm mkN041"
} ;
mkN042 : Str -> N ;
mkN042 base =
case base of {
base_1+"ի" => lin N
{ s = table {
Nom => table {
Sg => base_1+"ի" ;
Pl => base_1+"իներ"
} ;
Dat => table {
Sg => base_1+"ու" ;
Pl => base_1+"իների"
} ;
Ablat => table {
Sg => base_1+"ուց" ;
Pl => base_1+"իներից"
} ;
Instr => table {
Sg => base_1+"ով" ;
Pl => base_1+"իներով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+"ուն" ;
Pl => base_1+"իներին"
} ;
def_nom = table {
Sg => base_1+"ին" ;
Pl => base_1+"իները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"իս" ;
Pl => base_1+"իներս"
} ;
Dat => table {
Sg => base_1+"ուս" ;
Pl => base_1+"ունս"
} ;
Ablat => table {
Sg => base_1+"ուցս" ;
Pl => base_1+"իներիցս"
} ;
Instr => table {
Sg => base_1+"ովս" ;
Pl => base_1+"իներովս"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"իդ" ;
Pl => base_1+"իներդ"
} ;
Dat => table {
Sg => base_1+"ուդ" ;
Pl => base_1+"իներիդ"
} ;
Ablat => table {
Sg => base_1+"ուցդ" ;
Pl => base_1+"իներիցդ"
} ;
Instr => table {
Sg => base_1+"ովդ" ;
Pl => base_1+"իներովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN042"
} ;
mkN043 : Str -> N ;
mkN043 base =
case base of {
base_1+"ե"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"ե"+base_2 ;
Pl => base_1+"ե"+base_2+"եր"
} ;
Dat => table {
Sg => base_1+"ի"+base_2+"ոջ" ;
Pl => base_1+"ե"+base_2+"երի"
} ;
Ablat => table {
Sg => base_1+"ի"+base_2+"ոջից" ;
Pl => base_1+"ե"+base_2+"երից"
} ;
Instr => table {
Sg => base_1+"ի"+base_2+"ոջով" ;
Pl => base_1+"ե"+base_2+"երով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+"ի"+base_2+"ոջը" ;
Pl => base_1+"ե"+base_2+"երին"
} ;
def_nom = table {
Sg => base_1+"ե"+base_2+"ը" ;
Pl => base_1+"ե"+base_2+"երը"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ե"+base_2+"ս" ;
Pl => base_1+"ե"+base_2+"երս"
} ;
Dat => table {
Sg => base_1+"ի"+base_2+"ոջս" ;
Pl => base_1+"ե"+base_2+"երիս"
} ;
Ablat => table {
Sg => base_1+"ի"+base_2+"ոջիցս" ;
Pl => base_1+"ե"+base_2+"երիցս"
} ;
Instr => table {
Sg => base_1+"ի"+base_2+"ոջովս" ;
Pl => base_1+"ե"+base_2+"երովս"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ե"+base_2+"դ" ;
Pl => base_1+"ե"+base_2+"երդ"
} ;
Dat => table {
Sg => base_1+"ի"+base_2+"ոջդ" ;
Pl => base_1+"ե"+base_2+"երիդ"
} ;
Ablat => table {
Sg => base_1+"ի"+base_2+"ոջիցդ" ;
Pl => base_1+"ե"+base_2+"երիցդ"
} ;
Instr => table {
Sg => base_1+"ի"+base_2+"ոջովդ" ;
Pl => base_1+"ե"+base_2+"երովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN043"
} ;
mkN044 : Str -> N ;
mkN044 base =
case base of {
base_1+"ու"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"ու"+base_2 ;
Pl => base
} ;
Dat => table {
Sg => base_1+base_2+"ոջ" ;
Pl => base
} ;
Ablat => table {
Sg => base_1+base_2+"ոջից" ;
Pl => base
} ;
Instr => table {
Sg => base_1+base_2+"ոջով" ;
Pl => base
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+base_2+"ոջը" ;
Pl => base
} ;
def_nom = table {
Sg => base_1+"ու"+base_2+"ը" ;
Pl => base
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"ս" ;
Pl => base
} ;
Dat => table {
Sg => base_1+base_2+"ոջս" ;
Pl => base
} ;
Ablat => table {
Sg => base_1+base_2+"ոջիցս" ;
Pl => base
} ;
Instr => table {
Sg => base_1+base_2+"ոջովս" ;
Pl => base
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"դ" ;
Pl => base
} ;
Dat => table {
Sg => base_1+base_2+"ոջդ" ;
Pl => base
} ;
Ablat => table {
Sg => base_1+base_2+"ոջիցդ" ;
Pl => base
} ;
Instr => table {
Sg => base_1+base_2+"ոջովդ" ;
Pl => base
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN044"
} ;
mkN045 : Str -> N ;
mkN045 base =
case base of {
base_1+"ը" => lin N
{ s = table {
Nom => table {
Sg => base_1+"ը" ;
Pl => base
} ;
Dat => table {
Sg => base_1+"վա" ;
Pl => base
} ;
Ablat => table {
Sg => base_1+"վանից" ;
Pl => base
} ;
Instr => table {
Sg => base_1+"ով" ;
Pl => base
} ;
Loc => table {
Sg => base_1+"ում" ;
Pl => base
}
} ;
def_dat = table {
Sg => base_1+"վան" ;
Pl => base
} ;
def_nom = table {
Sg => base_1+"ը" ;
Pl => base
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ըս" ;
Pl => base
} ;
Dat => table {
Sg => base_1+"վաս" ;
Pl => base
} ;
Ablat => table {
Sg => base_1+"վանիցս" ;
Pl => base
} ;
Instr => table {
Sg => base_1+"ովս" ;
Pl => base
} ;
Loc => table {
Sg => base_1+"ումս" ;
Pl => base
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ըդ" ;
Pl => base
} ;
Dat => table {
Sg => base_1+"վադ" ;
Pl => base
} ;
Ablat => table {
Sg => base_1+"վանիցդ" ;
Pl => base
} ;
Instr => table {
Sg => base_1+"ովդ" ;
Pl => base
} ;
Loc => table {
Sg => base_1+"ումդ" ;
Pl => base
}
}
};
_ => error "Can't apply paradigm mkN045"
} ;
mkN046 : Str -> N ;
mkN046 base =
case base of {
base_1+"ի"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"ի"+base_2 ;
Pl => base_1+"ա"+base_2+"այք" --guessed
} ;
Dat => table {
Sg => base_1+base_2+"ոջ" ;
Pl => base_1+"ա"+base_2+"անց" --guessed
} ;
Ablat => table {
Sg => base_1+base_2+"ոջից" ;
Pl => base_1+"ա"+base_2+"անցից" --guessed
} ;
Instr => table {
Sg => base_1+base_2+"ոջով" ;
Pl => base_1+"ա"+base_2+"անցով" --guessed
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+base_2+"ոջը" ;
Pl => base_1+"ի"+base_2+"ներին" --guessed
} ;
def_nom = table {
Sg => base_1+"ի"+base_2+"ը" ;
Pl => base_1+"ի"+base_2+"ները" --guessed
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"ս" ;
Pl => base_1+"ա"+base_2+"այքս" --guessed
} ;
Dat => table {
Sg => base_1+base_2+"ոջս" ;
Pl => base_1+"ա"+base_2+"անցս" --guessed
} ;
Ablat => table {
Sg => base_1+base_2+"ոջիցս" ;
Pl => base_1+"ա"+base_2+"անցիցս" --guessed
} ;
Instr => table {
Sg => base_1+base_2+"ոջովս" ;
Pl => base_1+"ա"+base_2+"անցովս" --guessed
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"դ" ;
Pl => base_1+"ա"+base_2+"այքդ" --guessed
} ;
Dat => table {
Sg => base_1+base_2+"ոջդ" ;
Pl => base_1+"ա"+base_2+"անցդ" --guessed
} ;
Ablat => table {
Sg => base_1+base_2+"ոջիցդ" ;
Pl => base_1+"ա"+base_2+"անցիցդ" --guessed
} ;
Instr => table {
Sg => base_1+base_2+"ոջովդ" ;
Pl => base_1+"ա"+base_2+"անցովդ" --guessed
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN046"
} ;
mkN047 : Str -> N ;
mkN047 base =
case base of {
base_1 => lin N
{ s = table {
Nom => table {
Sg => base_1 ;
Pl => base_1+"իկ"
} ;
Dat => table {
Sg => base_1+"ու" ;
Pl => base_1+"կանց"
} ;
Ablat => table {
Sg => base_1+"ուց" ;
Pl => base_1+"կանցից"
} ;
Instr => table {
Sg => base_1+"ով" ;
Pl => base_1+"կանցով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+"ուն" ;
Pl => base
} ;
def_nom = table {
Sg => base_1+"ը" ;
Pl => base
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ս" ;
Pl => base_1+"իկս"
} ;
Dat => table {
Sg => base_1+"ուս" ;
Pl => base_1+"կանցս"
} ;
Ablat => table {
Sg => base_1+"ուցս" ;
Pl => base_1+"կանցիցս"
} ;
Instr => table {
Sg => base_1+"ովս" ;
Pl => base_1+"կանցովս"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"դ" ;
Pl => base_1+"իկդ"
} ;
Dat => table {
Sg => base_1+"ուդ" ;
Pl => base_1+"կանցդ"
} ;
Ablat => table {
Sg => base_1+"ուցդ" ;
Pl => base_1+"կանցիցդ"
} ;
Instr => table {
Sg => base_1+"ովդ" ;
Pl => base_1+"կանցովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN047"
} ;
mkN048 : Str -> N ;
mkN048 base =
case base of {
base_1+"ու"+base_2@(?+?) => lin N
{ s = table {
Nom => table {
Sg => base_1+"ու"+base_2 ;
Pl => base_1+"ու"+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+base_2+"յան" ;
Pl => base_1+"ու"+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+"ու"+base_2+"ից" ;
Pl => base_1+"ու"+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+base_2+"յամբ" ;
Pl => base_1+"ու"+base_2+"ներով"
} ;
Loc => table {
Sg => base_1+"ու"+base_2+"ում" ;
Pl => base_1+"ու"+base_2+"ներում"
}
} ;
def_dat = table {
Sg => base_1+base_2+"յանը" ;
Pl => base_1+"ու"+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+"ու"+base_2+"ը" ;
Pl => base_1+"ու"+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"ս" ;
Pl => base_1+"ու"+base_2+"ներս"
} ;
Dat => table {
Sg => base_1+base_2+"յանս" ;
Pl => base_1+"ու"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+"ու"+base_2+"իցս" ;
Pl => base_1+"ու"+base_2+"ներիցս"
} ;
Instr => table {
Sg => base_1+"ու"+base_2+"ովս" ;
Pl => base_1+"ու"+base_2+"ներովս"
} ;
Loc => table {
Sg => base_1+"ու"+base_2+"ումս" ;
Pl => base_1+"ու"+base_2+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"դ" ;
Pl => base_1+"ու"+base_2+"ներդ"
} ;
Dat => table {
Sg => base_1+base_2+"յանդ" ;
Pl => base_1+"ու"+base_2+"ներիդ"
} ;
Ablat => table {
Sg => base_1+"ու"+base_2+"իցդ" ;
Pl => base_1+"ու"+base_2+"ներիցդ"
} ;
Instr => table {
Sg => base_1+"ու"+base_2+"ովդ" ;
Pl => base_1+"ու"+base_2+"ներովդ"
} ;
Loc => table {
Sg => base_1+"ու"+base_2+"ումդ" ;
Pl => base_1+"ու"+base_2+"ներումդ"
}
}
};
_ => error "Can't apply paradigm mkN048"
} ;
mkN049 : Str -> N ;
mkN049 base =
case base of {
base_1+"ի"+base_2@? => lin N
{ s = table {
Nom => table {
Sg => base_1+"ի"+base_2 ;
Pl => base_1+"ի"+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+base_2+"ոջ" ;
Pl => base_1+"ի"+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+base_2+"ոջից" ;
Pl => base_1+"ի"+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+base_2+"ոջով" ;
Pl => base_1+"ի"+base_2+"ներով"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
def_dat = table {
Sg => base_1+base_2+"ոջը" ;
Pl => base_1+"ի"+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+"ի"+base_2+"ը" ;
Pl => base_1+"ի"+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"ս" ;
Pl => base_1+"ի"+base_2+"ներս"
} ;
Dat => table {
Sg => base_1+base_2+"ոջս" ;
Pl => base_1+"ի"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+base_2+"ոջիցս" ;
Pl => base_1+"ի"+base_2+"ներիցս"
} ;
Instr => table {
Sg => base_1+base_2+"ոջովս" ;
Pl => base_1+"ի"+base_2+"ներովս"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"դ" ;
Pl => base_1+"ի"+base_2+"ներդ"
} ;
Dat => table {
Sg => base_1+base_2+"ոջդ" ;
Pl => base_1+"ի"+base_2+"ներիդ"
} ;
Ablat => table {
Sg => base_1+base_2+"ոջիցդ" ;
Pl => base_1+"ի"+base_2+"ներիցդ"
} ;
Instr => table {
Sg => base_1+base_2+"ոջովդ" ;
Pl => base_1+"ի"+base_2+"ներովդ"
} ;
Loc => table {
Sg => base ; --guessed
Pl => base --guessed
}
}
};
_ => error "Can't apply paradigm mkN049"
} ;
mkA001 : Str -> A ;
mkA001 base = lin A {
s = table {
Nom => table {
Sg => base ;
Pl => base+"ներ"
} ;
Dat => table {
Sg => base+"ի" ;
Pl => base+"ների"
} ;
Ablat => table {
Sg => base+"ից" ;
Pl => base+"ներից"
} ;
Instr => table {
Sg => base+"ով" ;
Pl => base+"ներով"
} ;
Loc => table {
Sg => base+"ում" ;
Pl => base+"ներում"
}
} ;
def_dat = table {
Sg => base+"ին" ;
Pl => base+"ներին"
} ;
def_nom = table {
Sg => base+"ը" ;
Pl => base+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base+"ս" ;
Pl => base+"ներս"
} ;
Dat => table {
Sg => base+"իս" ;
Pl => base+"ներիս"
} ;
Ablat => table {
Sg => base+"իցս" ;
Pl => base+"ներիցս"
} ;
Instr => table {
Sg => base+"ովս" ;
Pl => base+"ներովս"
} ;
Loc => table {
Sg => base+"ումս" ;
Pl => base+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base+"դ" ;
Pl => base+"ներդ"
} ;
Dat => table {
Sg => base+"իդ" ;
Pl => base+"ներիդ"
} ;
Ablat => table {
Sg => base+"իցդ" ;
Pl => base+"ներիցդ"
} ;
Instr => table {
Sg => base+"ովդ" ;
Pl => base+"ներովդ"
} ;
Loc => table {
Sg => base+"ումդ" ;
Pl => base+"ներումդ"
}
}
} ;
mkA002 : Str -> A ;
mkA002 base = lin A {
s = table {
Nom => table {
Sg => base ;
Pl => base+"ներ"
} ;
Dat => table {
Sg => base+"ի" ;
Pl => base+"ների"
} ;
Ablat => table {
Sg => base+"ից" ;
Pl => base+"ներից"
} ;
Instr => table {
Sg => base+"ով" ;
Pl => base+"ներով"
} ;
Loc => table {
Sg => base+"ում" ;
Pl => base+"ներում"
}
} ;
def_dat = table {
Sg => base+"ին" ;
Pl => base+"ներին"
} ;
def_nom = table {
Sg => base+"ն" ;
Pl => base+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base+"ս" ;
Pl => base+"ներս"
} ;
Dat => table {
Sg => base+"իս" ;
Pl => base+"ներիս"
} ;
Ablat => table {
Sg => base+"իցս" ;
Pl => base+"ներիցս"
} ;
Instr => table {
Sg => base+"ովս" ;
Pl => base+"ներովս"
} ;
Loc => table {
Sg => base+"ումս" ;
Pl => base+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base+"դ" ;
Pl => base+"ներդ"
} ;
Dat => table {
Sg => base+"իդ" ;
Pl => base+"ներիդ"
} ;
Ablat => table {
Sg => base+"իցդ" ;
Pl => base+"ներիցդ"
} ;
Instr => table {
Sg => base+"ովդ" ;
Pl => base+"ներովդ"
} ;
Loc => table {
Sg => base+"ումդ" ;
Pl => base+"ներումդ"
}
}
} ;
mkA003 : Str -> A ;
mkA003 base =
case base of {
base_1+"ի" => lin A
{ s = table {
Nom => table {
Sg => base_1+"ի" ;
Pl => base_1+"իներ"
} ;
Dat => table {
Sg => base_1+"ու" ;
Pl => base_1+"իների"
} ;
Ablat => table {
Sg => base_1+"ուց" ;
Pl => base_1+"իներից"
} ;
Instr => table {
Sg => base_1+"ով" ;
Pl => base_1+"իներով"
} ;
Loc => table {
Sg => base_1+"ում" ;
Pl => base_1+"իներում"
}
} ;
def_dat = table {
Sg => base_1+"ուն" ;
Pl => base_1+"իներին"
} ;
def_nom = table {
Sg => base_1+"ին" ;
Pl => base_1+"իները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"իս" ;
Pl => base_1+"իներս"
} ;
Dat => table {
Sg => base_1+"ուս" ;
Pl => base_1+"իներիս"
} ;
Ablat => table {
Sg => base_1+"ուցս" ;
Pl => base_1+"իներիցս"
} ;
Instr => table {
Sg => base_1+"ովս" ;
Pl => base_1+"իներովս"
} ;
Loc => table {
Sg => base_1+"ումս" ;
Pl => base_1+"իներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"իդ" ;
Pl => base_1+"իներդ"
} ;
Dat => table {
Sg => base_1+"ուդ" ;
Pl => base_1+"իներիդ"
} ;
Ablat => table {
Sg => base_1+"ուցդ" ;
Pl => base_1+"իներիցդ"
} ;
Instr => table {
Sg => base_1+"ովդ" ;
Pl => base_1+"իներովդ"
} ;
Loc => table {
Sg => base_1+"ումդ" ;
Pl => base_1+"իներումդ"
}
}
};
_ => error "Can't apply paradigm mkA003"
} ;
mkA004 : Str -> A ;
mkA004 base = lin A {
s = table {
Nom => table {
Sg => base ;
Pl => base+"ներ"
} ;
Dat => table {
Sg => base+"յի" ;
Pl => base+"ների"
} ;
Ablat => table {
Sg => base+"յից" ;
Pl => base+"ներից"
} ;
Instr => table {
Sg => base+"յով" ;
Pl => base+"ներով"
} ;
Loc => table {
Sg => base+"յում" ;
Pl => base+"ներում"
}
} ;
def_dat = table {
Sg => base+"յին" ;
Pl => base+"ներին"
} ;
def_nom = table {
Sg => base+"ն" ;
Pl => base+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base+"ս" ;
Pl => base+"ներս"
} ;
Dat => table {
Sg => base+"յիս" ;
Pl => base+"ներիս"
} ;
Ablat => table {
Sg => base+"յիցս" ;
Pl => base+"ներիցս"
} ;
Instr => table {
Sg => base+"յովս" ;
Pl => base+"ներովս"
} ;
Loc => table {
Sg => base+"յումս" ;
Pl => base+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base+"դ" ;
Pl => base+"ներդ"
} ;
Dat => table {
Sg => base+"յիդ" ;
Pl => base+"ներիդ"
} ;
Ablat => table {
Sg => base+"յիցդ" ;
Pl => base+"ներիցդ"
} ;
Instr => table {
Sg => base+"յովդ" ;
Pl => base+"ներովդ"
} ;
Loc => table {
Sg => base+"յումդ" ;
Pl => base+"ներումդ"
}
}
} ;
mkA005 : Str -> A ;
mkA005 base = lin A {
s = table {
Nom => table {
Sg => base ;
Pl => base+"եր"
} ;
Dat => table {
Sg => base+"ի" ;
Pl => base+"երի"
} ;
Ablat => table {
Sg => base+"ից" ;
Pl => base+"երից"
} ;
Instr => table {
Sg => base+"ով" ;
Pl => base+"երով"
} ;
Loc => table {
Sg => base+"ում" ;
Pl => base+"երում"
}
} ;
def_dat = table {
Sg => base+"ին" ;
Pl => base+"երին"
} ;
def_nom = table {
Sg => base+"ը" ;
Pl => base+"երը"
} ;
poss1 = table {
Nom => table {
Sg => base+"ս" ;
Pl => base+"երս"
} ;
Dat => table {
Sg => base+"իս" ;
Pl => base+"երիս"
} ;
Ablat => table {
Sg => base+"իցս" ;
Pl => base+"երիցս"
} ;
Instr => table {
Sg => base+"ովս" ;
Pl => base+"երովս"
} ;
Loc => table {
Sg => base+"ումս" ;
Pl => base+"երումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base+"դ" ;
Pl => base+"երդ"
} ;
Dat => table {
Sg => base+"իդ" ;
Pl => base+"երիդ"
} ;
Ablat => table {
Sg => base+"իցդ" ;
Pl => base+"երիցդ"
} ;
Instr => table {
Sg => base+"ովդ" ;
Pl => base+"երովդ"
} ;
Loc => table {
Sg => base+"ումդ" ;
Pl => base+"երումդ"
}
}
} ;
mkA006 : Str -> A ;
mkA006 base =
case base of {
base_1+"ի"+base_2@("շտ"|?) => lin A
{ s = table {
Nom => table {
Sg => base_1+"ի"+base_2 ;
Pl => base_1+"ի"+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+base_2+"ի" ;
Pl => base_1+"ի"+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+base_2+"ից" ;
Pl => base_1+"ի"+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+base_2+"ով" ;
Pl => base_1+"ի"+base_2+"ներով"
} ;
Loc => table {
Sg => base_1+base_2+"ում" ;
Pl => base_1+"ի"+base_2+"ներում"
}
} ;
def_dat = table {
Sg => base_1+base_2+"ին" ;
Pl => base_1+"ի"+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+"ի"+base_2+"ը" ;
Pl => base_1+"ի"+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"ս" ;
Pl => base_1+"ի"+base_2+"ներս"
} ;
Dat => table {
Sg => base_1+base_2+"իս" ;
Pl => base_1+"ի"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+base_2+"իցս" ;
Pl => base_1+"ի"+base_2+"ներիցս"
} ;
Instr => table {
Sg => base_1+base_2+"ովս" ;
Pl => base_1+"ի"+base_2+"ներովս"
} ;
Loc => table {
Sg => base_1+base_2+"ումս" ;
Pl => base_1+"ի"+base_2+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"դ" ;
Pl => base_1+"ի"+base_2+"ներդ"
} ;
Dat => table {
Sg => base_1+base_2+"իդ" ;
Pl => base_1+"ի"+base_2+"ներիդ"
} ;
Ablat => table {
Sg => base_1+base_2+"իցդ" ;
Pl => base_1+"ի"+base_2+"ներիցդ"
} ;
Instr => table {
Sg => base_1+base_2+"ովդ" ;
Pl => base_1+"ի"+base_2+"ներովդ"
} ;
Loc => table {
Sg => base_1+base_2+"ումդ" ;
Pl => base_1+"ի"+base_2+"ներումդ"
}
}
};
_ => error "Can't apply paradigm mkA006"
} ;
mkA007 : Str -> A ;
mkA007 base =
case base of {
base_1+base_2@(?+?+?+?+?) => lin A
{ s = table {
Nom => table {
Sg => base_1+base_2 ;
Pl => base_1+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+"յ"+base_2+"յի" ;
Pl => base_1+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+"յ"+base_2+"յից" ;
Pl => base_1+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+"յ"+base_2+"յով" ;
Pl => base_1+base_2+"ներով"
} ;
Loc => table {
Sg => base ;
Pl => base
}
} ;
def_dat = table {
Sg => base_1+"յ"+base_2+"յին" ;
Pl => base_1+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+base_2+"ն" ;
Pl => base_1+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+base_2+"ս" ;
Pl => base_1+base_2+"ներս"
} ;
Dat => table {
Sg => base_1+"յ"+base_2+"յիս" ;
Pl => base_1+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+"յ"+base_2+"յիցս" ;
Pl => base_1+base_2+"ներիցս"
} ;
Instr => table {
Sg => base_1+"յ"+base_2+"յովս" ;
Pl => base_1+base_2+"ներովս"
} ;
Loc => table {
Sg => base ;
Pl => base
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+base_2+"դ" ;
Pl => base_1+base_2+"ներդ"
} ;
Dat => table {
Sg => base_1+"յ"+base_2+"յիդ" ;
Pl => base_1+base_2+"ներիդ"
} ;
Ablat => table {
Sg => base_1+"յ"+base_2+"յիցդ" ;
Pl => base_1+base_2+"ներիցդ"
} ;
Instr => table {
Sg => base_1+"յ"+base_2+"յովդ" ;
Pl => base_1+base_2+"ներովդ"
} ;
Loc => table {
Sg => base ;
Pl => base
}
}
};
_ => error "Can't apply paradigm mkA007"
} ;
mkA008 : Str -> A ;
mkA008 base =
case base of {
base_1+"ու"+base_2@("նչ"|?) => lin A
{ s = table {
Nom => table {
Sg => base_1+"ու"+base_2 ;
Pl => base_1+"ու"+base_2+"ներ"
} ;
Dat => table {
Sg => base_1+base_2+"ի" ;
Pl => base_1+"ու"+base_2+"ների"
} ;
Ablat => table {
Sg => base_1+base_2+"ից" ;
Pl => base_1+"ու"+base_2+"ներից"
} ;
Instr => table {
Sg => base_1+base_2+"ով" ;
Pl => base_1+"ու"+base_2+"ներով"
} ;
Loc => table {
Sg => base_1+base_2+"ում" ;
Pl => base_1+"ու"+base_2+"ներում"
}
} ;
def_dat = table {
Sg => base_1+base_2+"ին" ;
Pl => base_1+"ու"+base_2+"ներին"
} ;
def_nom = table {
Sg => base_1+"ու"+base_2+"ը" ;
Pl => base_1+"ու"+base_2+"ները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"ս" ;
Pl => base_1+"ու"+base_2+"ներս"
} ;
Dat => table {
Sg => base_1+base_2+"իս" ;
Pl => base_1+"ու"+base_2+"ներիս"
} ;
Ablat => table {
Sg => base_1+base_2+"իցս" ;
Pl => base_1+"ու"+base_2+"ներիցս"
} ;
Instr => table {
Sg => base_1+base_2+"ովս" ;
Pl => base_1+"ու"+base_2+"ներովս"
} ;
Loc => table {
Sg => base_1+base_2+"ումս" ;
Pl => base_1+"ու"+base_2+"ներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"դ" ;
Pl => base_1+"ու"+base_2+"ներդ"
} ;
Dat => table {
Sg => base_1+base_2+"իդ" ;
Pl => base_1+"ու"+base_2+"ներիդ"
} ;
Ablat => table {
Sg => base_1+base_2+"իցդ" ;
Pl => base_1+"ու"+base_2+"ներիցդ"
} ;
Instr => table {
Sg => base_1+base_2+"ովդ" ;
Pl => base_1+"ու"+base_2+"ներովդ"
} ;
Loc => table {
Sg => base_1+base_2+"ումդ" ;
Pl => base_1+"ու"+base_2+"ներումդ"
}
}
};
_ => error "Can't apply paradigm mkA008"
} ;
mkA009 : Str -> A ;
mkA009 base =
case base of {
base_1+"ու" => lin A
{ s = table {
Nom => table {
Sg => base_1+"ու" ;
Pl => base_1+"ուներ"
} ;
Dat => table {
Sg => base_1+"վի" ;
Pl => base_1+"ուների"
} ;
Ablat => table {
Sg => base_1+"վից" ;
Pl => base_1+"ուներից"
} ;
Instr => table {
Sg => base_1+"վով" ;
Pl => base_1+"ուներով"
} ;
Loc => table {
Sg => base_1+"վում" ;
Pl => base_1+"ուներում"
}
} ;
def_dat = table {
Sg => base_1+"վին" ;
Pl => base_1+"ուներին"
} ;
def_nom = table {
Sg => base_1+"ուն" ;
Pl => base_1+"ուները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ուս" ;
Pl => base_1+"ուներս"
} ;
Dat => table {
Sg => base_1+"վիս" ;
Pl => base_1+"ուներիս"
} ;
Ablat => table {
Sg => base_1+"վիցս" ;
Pl => base_1+"ուներիցս"
} ;
Instr => table {
Sg => base_1+"վովս" ;
Pl => base_1+"ուներովս"
} ;
Loc => table {
Sg => base_1+"վումս" ;
Pl => base_1+"ուներումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ուդ" ;
Pl => base_1+"ուներդ"
} ;
Dat => table {
Sg => base_1+"վիդ" ;
Pl => base_1+"ուներիդ"
} ;
Ablat => table {
Sg => base_1+"վիցդ" ;
Pl => base_1+"ուներիցդ"
} ;
Instr => table {
Sg => base_1+"վովդ" ;
Pl => base_1+"ուներովդ"
} ;
Loc => table {
Sg => base_1+"վումդ" ;
Pl => base_1+"ուներումդ"
}
}
};
_ => error "Can't apply paradigm mkA009"
} ;
mkA010 : Str -> A ;
mkA010 base =
case base of {
base_1@?+"ի"+base_2 => lin A
{ s = table {
Nom => table {
Sg => base_1+"ի"+base_2 ;
Pl => base_1+base_2+"եր"
} ;
Dat => table {
Sg => base_1+base_2+"ի" ;
Pl => base_1+base_2+"երի"
} ;
Ablat => table {
Sg => base_1+base_2+"ից" ;
Pl => base_1+base_2+"երից"
} ;
Instr => table {
Sg => base_1+base_2+"ով" ;
Pl => base_1+base_2+"երով"
} ;
Loc => table {
Sg => base_1+base_2+"ում" ;
Pl => base_1+base_2+"երում"
}
} ;
def_dat = table {
Sg => base_1+base_2+"ին" ;
Pl => base_1+base_2+"երին"
} ;
def_nom = table {
Sg => base_1+"ի"+base_2+"ը" ;
Pl => base_1+base_2+"երը"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"ս" ;
Pl => base_1+base_2+"երս"
} ;
Dat => table {
Sg => base_1+base_2+"իս" ;
Pl => base_1+base_2+"երիս"
} ;
Ablat => table {
Sg => base_1+base_2+"իցս" ;
Pl => base_1+base_2+"երիցս"
} ;
Instr => table {
Sg => base_1+base_2+"ովս" ;
Pl => base_1+base_2+"երովս"
} ;
Loc => table {
Sg => base_1+base_2+"ումս" ;
Pl => base_1+base_2+"երումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ի"+base_2+"դ" ;
Pl => base_1+base_2+"երդ"
} ;
Dat => table {
Sg => base_1+base_2+"իդ" ;
Pl => base_1+base_2+"երիդ"
} ;
Ablat => table {
Sg => base_1+base_2+"իցդ" ;
Pl => base_1+base_2+"երիցդ"
} ;
Instr => table {
Sg => base_1+base_2+"ովդ" ;
Pl => base_1+base_2+"երովդ"
} ;
Loc => table {
Sg => base_1+base_2+"ումդ" ;
Pl => base_1+base_2+"երումդ"
}
}
};
_ => error "Can't apply paradigm mkA010"
} ;
mkA011 : Str -> A ;
mkA011 base =
case base of {
base_1+"ու"+base_2@? => lin A
{ s = table {
Nom => table {
Sg => base_1+"ու"+base_2 ;
Pl => base_1+base_2+"եր"
} ;
Dat => table {
Sg => base_1+base_2+"ի" ;
Pl => base_1+base_2+"երի"
} ;
Ablat => table {
Sg => base_1+base_2+"ից" ;
Pl => base_1+base_2+"երից"
} ;
Instr => table {
Sg => base_1+base_2+"ով" ;
Pl => base_1+base_2+"երով"
} ;
Loc => table {
Sg => base_1+base_2+"ում" ;
Pl => base_1+base_2+"երում"
}
} ;
def_dat = table {
Sg => base_1+base_2+"ին" ;
Pl => base_1+base_2+"երին"
} ;
def_nom = table {
Sg => base_1+"ու"+base_2+"ը" ;
Pl => base_1+base_2+"երը"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"ս" ;
Pl => base_1+base_2+"երս"
} ;
Dat => table {
Sg => base_1+base_2+"իս" ;
Pl => base_1+base_2+"երիս"
} ;
Ablat => table {
Sg => base_1+base_2+"իցս" ;
Pl => base_1+base_2+"երիցս"
} ;
Instr => table {
Sg => base_1+base_2+"ովս" ;
Pl => base_1+base_2+"երովս"
} ;
Loc => table {
Sg => base_1+base_2+"ումս" ;
Pl => base_1+base_2+"երումս"
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"ու"+base_2+"դ" ;
Pl => base_1+base_2+"երդ"
} ;
Dat => table {
Sg => base_1+base_2+"իդ" ;
Pl => base_1+base_2+"երիդ"
} ;
Ablat => table {
Sg => base_1+base_2+"իցդ" ;
Pl => base_1+base_2+"երիցդ"
} ;
Instr => table {
Sg => base_1+base_2+"ովդ" ;
Pl => base_1+base_2+"երովդ"
} ;
Loc => table {
Sg => base_1+base_2+"ումդ" ;
Pl => base_1+base_2+"երումդ"
}
}
};
_ => error "Can't apply paradigm mkA011"
} ;
mkA012 : Str -> A ;
mkA012 base =
case base of {
base_1+"ի" => lin A
{ s = table {
Nom => table {
Sg => base_1+"ի" ;
Pl => base_1+"իներ"
} ;
Dat => table {
Sg => base_1+"ի" ;
Pl => base_1+"իների"
} ;
Ablat => table {
Sg => base_1+"ից" ;
Pl => base_1+"իներից"
} ;
Instr => table {
Sg => base_1+"ով" ;
Pl => base_1+"իներով"
} ;
Loc => table {
Sg => base ;
Pl => base
}
} ;
def_dat = table {
Sg => base_1+"ին" ;
Pl => base_1+"իներին"
} ;
def_nom = table {
Sg => base_1+"ին" ;
Pl => base_1+"իները"
} ;
poss1 = table {
Nom => table {
Sg => base_1+"իս" ;
Pl => base_1+"իներս"
} ;
Dat => table {
Sg => base_1+"իս" ;
Pl => base_1+"իներիս"
} ;
Ablat => table {
Sg => base_1+"իցս" ;
Pl => base_1+"իներիցս"
} ;
Instr => table {
Sg => base_1+"ովս" ;
Pl => base_1+"իներովս"
} ;
Loc => table {
Sg => base ;
Pl => base
}
} ;
poss2 = table {
Nom => table {
Sg => base_1+"իդ" ;
Pl => base_1+"իներդ"
} ;
Dat => table {
Sg => base_1+"իդ" ;
Pl => base_1+"իներիդ"
} ;
Ablat => table {
Sg => base_1+"իցդ" ;
Pl => base_1+"իներիցդ"
} ;
Instr => table {
Sg => base_1+"ովդ" ;
Pl => base_1+"իներովդ"
} ;
Loc => table {
Sg => base ;
Pl => base
}
}
};
_ => error "Can't apply paradigm mkA012"
} ;
}
Reference in New Issue View Git Blame Copy Permalink