fixes in the dictionaries inspired by a paper phrasebook

This commit is contained in:
kr.angelov
2013-12-18 09:18:55 +00:00
parent ffc26796ab
commit f534cc8dcb
8 changed files with 246 additions and 187 deletions

View File

@@ -357,12 +357,9 @@ oper
mkN : (museum,museet,museer,museerna : Str) -> N = mk4N ;
mkN : (museum,museet,museer,museerna : Str) -> Gender -> N = mk5N ;
mkN : (regering, makt : N) -> N = \a,b -> lin N {
s = \\n,d,c => a.co + b.s ! n ! d ! c ;
s = \\n,d,c => b.s ! n ! d ! c ;
g = b.g ;
co = case b.co of {
_ + "s" => a.co + b.co ;
co => a.co + co + "s"
}
co = ""
} ;
} ;