worst case of Fin mkA; default case endings for Fin symbol as PN

This commit is contained in:
aarne
2013-03-12 20:01:07 +00:00
parent 9853f280b7
commit 5e2d66a9ee
3 changed files with 36 additions and 6 deletions
+15
View File
@@ -951,5 +951,20 @@ oper
} ;
} ;
defaultCaseEnding : Case -> Str = \c -> case c of {
Nom => "" ;
Gen => "n" ;
Part => "a" ;
Transl => "ksi" ;
Ess => "na" ;
Iness => "ssa" ;
Elat => "sta" ;
Illat => "an" ;
Adess => "lla" ;
Ablat => "lta" ;
Allat => "lle" ;
Abess => "tta"
} ;
}