diff options
| author | krasimir <krasimir@chalmers.se> | 2009-05-07 07:41:38 +0000 |
|---|---|---|
| committer | krasimir <krasimir@chalmers.se> | 2009-05-07 07:41:38 +0000 |
| commit | b0cbba9e0de788a3c3ff5f3819aa6c91b140fe9f (patch) | |
| tree | 57b5a493bb81bd67aa7fe75d33404185a76ef1b8 /next-lib/src/turkish/ParadigmsTur.gf | |
| parent | 112de09f6b9ebc47687234e834445e826a0b21b7 (diff) | |
Turkish: some more nouns in the lexicon and some work on the paradigms. still not complete
Diffstat (limited to 'next-lib/src/turkish/ParadigmsTur.gf')
| -rw-r--r-- | next-lib/src/turkish/ParadigmsTur.gf | 17 |
1 files changed, 10 insertions, 7 deletions
diff --git a/next-lib/src/turkish/ParadigmsTur.gf b/next-lib/src/turkish/ParadigmsTur.gf index 969a17bee..6d35ccdd8 100644 --- a/next-lib/src/turkish/ParadigmsTur.gf +++ b/next-lib/src/turkish/ParadigmsTur.gf @@ -49,13 +49,16 @@ oper regN : Str -> Noun = \base -> { s = \\n => table { - Nom => add_number n base ; - Acc => harmony4 (add_number n base) "i" ; - Dat => harmony2 (add_number n base) "e" ; - Gen => harmony4 (add_number n base) "in" ; - Loc => harmony2 (add_number n base) "de" ; - Ablat => add_number n base ; - Abess => add_number n base + Nom => add_number n base ; + Acc => harmony4 (add_number n base) "i" ; + Dat => harmony2 (add_number n base) "e" ; + Gen => harmony4 (add_number n base) "in" ; + Loc => harmony2 (add_number n base) "de" ; + Ablat => harmony2 (add_number n base) "den" ; + Abess p => case p of { + Pos => harmony4 (add_number n base) "li" ; + Neg => harmony4 (add_number n base) "siz" + } } ; gen = \\n => table { {n=Sg; p=P1} => harmony4 (add_number n base) "im" ; |
