diff options
| author | ramona.enache <ramona.enache@chalmers.se> | 2010-05-28 12:15:28 +0000 |
|---|---|---|
| committer | ramona.enache <ramona.enache@chalmers.se> | 2010-05-28 12:15:28 +0000 |
| commit | 8f9eb4f7f32560803d690be2b75e9dcc6cb08502 (patch) | |
| tree | 595441a5b991f7576d221025515b6b37469692e8 /examples/phrasebook/WordsGer.gf | |
| parent | 2d44390bbf681b060574bbcfd95811a4459935db (diff) | |
added inherent number to places, fixed places in French
Diffstat (limited to 'examples/phrasebook/WordsGer.gf')
| -rw-r--r-- | examples/phrasebook/WordsGer.gf | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/examples/phrasebook/WordsGer.gf b/examples/phrasebook/WordsGer.gf index ee71366ff..14d7d0780 100644 --- a/examples/phrasebook/WordsGer.gf +++ b/examples/phrasebook/WordsGer.gf @@ -234,10 +234,11 @@ CitRestaurant cit = mkCNPlace (mkCN cit (mkN "Restaurant" "Restaurants" neuter) habitual = ParadigmsGer.mkAdv (d + "s") ---- } ; - mkPlace : N -> Prep -> Prep -> {name : CN ; at : Prep ; to : Prep} = \p,at,to -> { + mkPlace : N -> Prep -> Prep -> {name : CN ; at : Prep ; to : Prep; isPl : Bool} = \p,at,to -> { name = mkCN p ; at = at ; - to = to + to = to ; + isPl = False } ; open_Adv = ParadigmsGer.mkAdv "geöffnet" ; ---- Adv to get right word order easily |
