Swedish paradigm fixes

This commit is contained in:
aarne
2006-02-28 17:53:00 +00:00
parent c2fdbcdb4b
commit a0eb5378c7
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"> ;