mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-23 18:02:54 -06:00
fixed unstressed e in Swedish fifth declension
This commit is contained in:
@@ -401,8 +401,12 @@ oper
|
|||||||
mk4N rike (rike + "t") (rike + "n") (rike + "na") ;
|
mk4N rike (rike + "t") (rike + "n") (rike + "na") ;
|
||||||
|
|
||||||
decl5Noun : Str -> N = \lik ->
|
decl5Noun : Str -> N = \lik ->
|
||||||
case Predef.dp 3 lik of {
|
case lik of {
|
||||||
"are" => mk4N lik (lik + "n") lik (init lik + "na") ; -- kikare
|
nu + "mme" + l@("l" | "r") =>
|
||||||
|
mk4N lik (nu + "m" + l + "et") lik (nu + "m" + l + "en") ;
|
||||||
|
vad@(?+?+?+_) + "e" + l@("l" | "r") =>
|
||||||
|
mk4N lik (vad + l + "et") lik (vad + l + "en") ;
|
||||||
|
_ + "are" => mk4N lik (lik + "n") lik (init lik + "na") ; -- kikare
|
||||||
_ => mk4N lik (lik + "et") lik (lik + "en")
|
_ => mk4N lik (lik + "et") lik (lik + "en")
|
||||||
} ;
|
} ;
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user