summaryrefslogtreecommitdiff
path: root/examples/phrasebook/WordsFin.gf
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2010-05-27 20:44:39 +0000
committeraarne <aarne@chalmers.se>2010-05-27 20:44:39 +0000
commitd156c5bccf33b3d143134520ee614b58d20565b3 (patch)
treef941f30889d56781d28920d0a70710e327255c60 /examples/phrasebook/WordsFin.gf
parent857c9e83a05339118014b738025547c8d1cfadf5 (diff)
adjustments in Phrasebook
Diffstat (limited to 'examples/phrasebook/WordsFin.gf')
-rw-r--r--examples/phrasebook/WordsFin.gf10
1 files changed, 5 insertions, 5 deletions
diff --git a/examples/phrasebook/WordsFin.gf b/examples/phrasebook/WordsFin.gf
index 8b5681cb8..b36461c7a 100644
--- a/examples/phrasebook/WordsFin.gf
+++ b/examples/phrasebook/WordsFin.gf
@@ -214,11 +214,11 @@ concrete WordsFin of Words = SentencesFin **
-- modifiers of places
TheBest = mkSuperl L.good_A ;
- TheClosest = mkSuperl L.near_A ;
- TheCheapest = mkSuperl (mkA "halpa") ;
- TheMostExpensive = mkSuperl (mkA "kallis") ;
+ TheClosest = mkSuperl (mkA (mkN "läheinen") "lähempi" "lähin") ;
+ TheCheapest = mkSuperl (mkA (mkN "halpa") "halvempi" "halvin") ;
+ TheMostExpensive = mkSuperl (mkA (mkN "kallis") "kalliimpi" "kallein") ;
TheMostPopular = mkSuperl (mkA "suosittu") ;
- TheWorst = mkSuperl L.bad_A ;
+ TheWorst = mkSuperl (mkA "huono") ;
SuperlPlace sup p = placeNP sup p ;
@@ -267,7 +267,7 @@ concrete WordsFin of Words = SentencesFin **
by = SyntaxFin.mkAdv (casePrep adessive) (mkNP n)
} ;
- mkSuperl : A -> Det = \a -> mkDet the_Art (mkOrd a) ;
+ mkSuperl : A -> Det = \a -> mkDet the_Quant (mkOrd a) ;
far_IAdv = E.IAdvAdv L.far_Adv ;
}