From 8f9eb4f7f32560803d690be2b75e9dcc6cb08502 Mon Sep 17 00:00:00 2001 From: "ramona.enache" Date: Fri, 28 May 2010 12:15:28 +0000 Subject: added inherent number to places, fixed places in French --- examples/phrasebook/WordsFre.gf | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'examples/phrasebook/WordsFre.gf') diff --git a/examples/phrasebook/WordsFre.gf b/examples/phrasebook/WordsFre.gf index 88d9b7e30..0cfc06753 100644 --- a/examples/phrasebook/WordsFre.gf +++ b/examples/phrasebook/WordsFre.gf @@ -68,7 +68,7 @@ lin Station = mkPlace (mkN "gare") dative ; Supermarket = mkPlace (mkN "supermarché" masculine) dative ; Theatre = mkPlace (mkN "théâtre" masculine) dative ; - Toilet = mkPlace (mkN "toilette") dative ; + Toilet = mkCNPlacePl (mkCN (mkN "toilette")) dative dative; University = mkPlace (mkN "université" feminine) dative ; Zoo = mkPlace (mkN "zoo" masculine) dative ; @@ -248,7 +248,7 @@ lin let day = mkNP (mkPN d) in mkNPDay day (P.mkAdv d) (P.mkAdv ("le" ++ d)) ; - mkPlace : N -> Prep -> {name : CN ; at : Prep ; to : Prep} = \p,i -> + mkPlace : N -> Prep -> {name : CN ; at : Prep ; to : Prep; isPl : Bool} = \p,i -> mkCNPlace (mkCN p) i dative ; open_A = P.mkA "ouvert" ; -- cgit v1.2.3