fixed Finnish youPol complement number to Sg ; some encoding things in French

This commit is contained in:
aarne
2010-04-06 12:24:41 +00:00
parent b7a60b5e45
commit f6db1ad200
16 changed files with 114 additions and 81 deletions

View File

@@ -108,7 +108,7 @@ concrete WordsFin of Words = SentencesFin **
mkPlace : N -> Bool -> {name : CN ; at : Prep ; to : Prep} = \p,e -> {
name = mkCN p ;
at = casePrep (if_then_else Case e adessive inessive) ; -- True: external
to = casePrep (if_then_else Case e allative elative) ;
to = casePrep (if_then_else Case e allative illative) ;
} ;
open_Adv = ParadigmsFin.mkAdv "avoinna" ;