1
0
forked from GitHub/gf-rgl

Swedish paradigm fixes

This commit is contained in:
aarne
2006-02-28 17:53:00 +00:00
parent 5618f8abd3
commit 40a0b3b57b
3 changed files with 27 additions and 12 deletions

View File

@@ -18,6 +18,7 @@ resource MorphoSwe = CommonScand, ResSwe ** open Prelude, (Predef=Predef) in {
oper
ptPretAll : Str -> Str * Str = \funnen ->
case funnen of {
ko +"mmen" => <ko +"mmet", ko + "mna"> ;
vun +"nen" => <vun +"net", vun + "na"> ;
bjud + "en" => <bjud + "et", bjud + "na"> ;
se + "dd" => <se + "tt", se +"dda"> ;