forked from GitHub/gf-core
smart paradigm of Swe compound form: more rules for words ending "e", "tet"
This commit is contained in:
@@ -399,12 +399,12 @@ oper
|
|||||||
s = nounForms apa apan apor aporna ;
|
s = nounForms apa apan apor aporna ;
|
||||||
g = g ;
|
g = g ;
|
||||||
co = case apa of {
|
co = case apa of {
|
||||||
ap + "e" => case g of {
|
ap@(? + ? + ?) + "e" => case g of {
|
||||||
Neutr => apa + "s" ; -- rikes
|
Neutr => apa + "s" ; -- rikes
|
||||||
_ => ap -- pojk
|
_ => ap -- pojk
|
||||||
} ;
|
} ;
|
||||||
ap + "a" => ap ; -- flick
|
ap@(? + ?) + "a" => ap ; -- flick
|
||||||
? + ? + ? + _ + ("ing" | "ion" | "het") => apa + "s" ; -- regerings, stations, frihets
|
? + ? + ? + _ + ("ing" | "ion" | "het" | "tet") => apa + "s" ; -- regerings, stations, frihets, fakultets
|
||||||
_ => apa
|
_ => apa
|
||||||
}
|
}
|
||||||
} ;
|
} ;
|
||||||
|
|||||||
Reference in New Issue
Block a user