diff options
| author | ramona.enache <ramona.enache@chalmers.se> | 2010-04-26 09:32:05 +0000 |
|---|---|---|
| committer | ramona.enache <ramona.enache@chalmers.se> | 2010-04-26 09:32:05 +0000 |
| commit | 9c73777a4c31b5bb33007a98f6abf37aa62030c1 (patch) | |
| tree | 6020091193c8aa3eef2b9063f086550e18ab5a07 /examples/phrasebook/SentencesRon.gf | |
| parent | ca6075ab777d12929f6bdfb2ceded6665f339320 (diff) | |
FixedRon
Diffstat (limited to 'examples/phrasebook/SentencesRon.gf')
| -rw-r--r-- | examples/phrasebook/SentencesRon.gf | 31 |
1 files changed, 16 insertions, 15 deletions
diff --git a/examples/phrasebook/SentencesRon.gf b/examples/phrasebook/SentencesRon.gf index f7c404f60..94c94d9eb 100644 --- a/examples/phrasebook/SentencesRon.gf +++ b/examples/phrasebook/SentencesRon.gf @@ -1,26 +1,27 @@ concrete SentencesRon of Sentences = NumeralRon ** SentencesI - [ - IFemale, YouFamFemale, YouPolFemale, IMale, YouFamMale, YouPolMale - ] + IFemale, YouFamFemale, YouPolFemale, IMale, YouFamMale, YouPolMale, + ThePlace +] with (Syntax = SyntaxRon), (Symbolic = SymbolicRon), (Lexicon = LexiconRon) ** open SyntaxRon, ExtraRon in { - lin - IFemale = - {name = mkNP i8fem_Pron ; isPron = True ; poss = mkQuant i_Pron} ; - YouFamFemale = - {name = mkNP youSg8fem_Pron ; isPron = True ; poss = mkQuant youSg_Pron} ; - YouPolFemale = - {name = mkNP youPol8fem_Pron ; isPron = True ; poss = mkQuant youPol_Pron}; - IMale = - {name = mkNP i_Pron ; isPron = True ; poss = mkQuant i_Pron} ; - YouFamMale = - {name = mkNP youSg_Pron ; isPron = True ; poss = mkQuant youSg_Pron} ; - YouPolMale = - {name = mkNP youPol_Pron ; isPron = True ; poss = mkQuant youPol_Pron} ; + +lin + IFemale = {name = mkNP i8fem_Pron ; isPron = True ; poss = mkQuant i_Pron} ; + YouFamFemale = {name = mkNP youSg8fem_Pron ; isPron = True ; poss = mkQuant youSg_Pron} ; + YouPolFemale = {name = mkNP youPol8fem_Pron ; isPron = True ; poss = mkQuant youPol_Pron}; + IMale = {name = mkNP i_Pron ; isPron = True ; poss = mkQuant i_Pron} ; + YouFamMale = {name = mkNP youSg_Pron ; isPron = True ; poss = mkQuant youSg_Pron} ; + YouPolMale = {name = mkNP youPol_Pron ; isPron = True ; poss = mkQuant youPol_Pron} ; + ThePlace kind = let name : NP = mkNP the_Quant kind.name in { + name = name ; + at = if_then_else Adv kind.at.needIndef (mkAdv kind.at name) (mkAdv kind.at (mkNP kind.name)); + to = if_then_else Adv kind.at.needIndef (mkAdv kind.to name) (mkAdv kind.at (mkNP kind.name)) + } ; } |