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 77171607a9
commit d14589804e
3 changed files with 36 additions and 6 deletions

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"
} ;
}