1
0
forked from GitHub/gf-core

lexical corrections in PhrasebookNor

This commit is contained in:
aarne
2010-05-28 13:29:35 +00:00
parent 8f9eb4f7f3
commit b3d6f01f40
2 changed files with 4 additions and 4 deletions

View File

@@ -7,12 +7,12 @@ concrete WordsNor of Words = SentencesNor **
-- kinds of food
Apple = mkCN L.apple_N ;
Apple = mkCN (mkN "eple" "eplet" "epler" "eplene") ;
Beer = mkCN L.beer_N ;
Bread = mkCN L.bread_N ;
Cheese = mkCN (mkN "ost" "osten" "oster" "ostene") ;
Chicken = mkCN (mkN "kylling" "kyllingen" "kyllinger" "kyllingene") ;
Coffee = mkCN (mkN "kaffe" "kaffen" "kaffe" "kaffe") ; -- av kaffe ?
Coffee = mkCN (mkN "kaffe" "kaffet" "kaffen" "kaffene") ; -- av kaffe ?
Fish = mkCN L.fish_N ;
Meat = mkCN (mkN "kjøtt" "kjøttet" "kjøtt" "kjøtta") ;
Milk = mkCN L.milk_N ;
@@ -87,7 +87,7 @@ concrete WordsNor of Words = SentencesNor **
Belgian = mkA "belgisk" ;
Belgium = mkNP (mkPN "Belgia") ;
Bulgarian = mkNat "bulgarsk" "Bulgaria" ;
Catalan = mkNat "katalansk" "Catalonia" ;
Catalan = mkNat "katalansk" "Katalonia" ;
Danish = mkNat "dansk" "Danmark" ;
Dutch = mkNat "nederlandsk" "Nederland" ;
English = mkNat "engelsk" "England" ;

View File

@@ -226,7 +226,7 @@ concrete WordsSwe of Words = SentencesSwe **
mkNPDay day (SyntaxSwe.mkAdv on_Prep day)
(SyntaxSwe.mkAdv on_Prep (mkNP a_Quant plNum (mkCN (mkN d)))) ;
mkPlace : N -> Str -> {name : CN ; at : Prep ; to : Prep} = \p,i ->
mkPlace : N -> Str -> {name : CN ; at : Prep ; to : Prep ; isPl : Bool} = \p,i ->
mkCNPlace (mkCN p) (mkPrep i) to_Prep ;
open_A = mkA "öppen" "öppet" ;