lexical corrections in PhrasebookNor

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

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" ;