GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-21 00:52:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

swedish lexicon fixes

Browse Source
This commit is contained in:
aarne
2006-01-25 20:27:38 +00:00
parent 75e6f51bbc
commit 5052c9bab0
2 changed files with 7 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
lib/resource-1.0/swedish/ParadigmsSwe.gf
View File

@@ -318,9 +318,10 @@ oper
decl2Noun : Str -> N = \bil ->
let
bb : Str * Str = case bil of {
pojk + "e" => <pojk + "ar", bil + "n"> ;
nyck + "e" + l@("l" | "r" | "n") => <nyck + l + "ar",bil + "n"> ;
_ => <bil + "ar", bil + "en">
pojk + "e" => <pojk + "ar", bil + "n"> ;
nyck + "e" + l@("l" | "r") => <nyck + l + "ar",bil + "n"> ;
sock + "e" + "n" => <sock + "nar", sock + "nen"> ;
_ => <bil + "ar", bil + "en">
} ;
in mkN bil bb.p2 bb.p1 (bb.p1 + "na") ;