msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

ProDrop in PhrasebookPol

Browse Source
This commit is contained in:
aarne
2010-12-08 14:01:34 +00:00
parent 73a10e1a66
commit f6e088770f
1 changed files with 18 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
examples/phrasebook/SentencesPol.gf
View File

@@ -3,12 +3,14 @@ concrete SentencesPol of Sentences =
Day,PDay,OnDay,Language,PLanguage,Citizenship, Day,PDay,OnDay,Language,PLanguage,Citizenship,
PCitizenship,CitiNat,PropCit,ACitizen, PCitizenship,CitiNat,PropCit,ACitizen,
Nationality,Transport,PTransport,ByTransp, Nationality,Transport,PTransport,ByTransp,
IFemale,YouFamFemale,YouPolFemale,YouPolMale] IFemale,YouFamFemale,YouPolFemale,YouPolMale,
IMale, YouFamMale --- AR, for pro drop
]
with with
(Syntax = SyntaxPol), (Syntax = SyntaxPol),
(Symbolic = SymbolicPol), (Symbolic = SymbolicPol),
(Lexicon = LexiconPol) ** (Lexicon = LexiconPol) **
open (N = NounPol),(R = ResPol), (Pron = PronounMorphoPol), Prelude in { open (N = NounPol),(R = ResPol), (Pron = PronounMorphoPol), (E = ExtraPol), Prelude in {
flags flags
optimize =values ; coding =utf8 ; optimize =values ; coding =utf8 ;
@@ -33,8 +35,18 @@ concrete SentencesPol of Sentences =
R.MascPersSg=>n.citizenMSg; R.FemSg=>n.citizenF; _=>n.citizenMPl R.MascPersSg=>n.citizenMSg; R.FemSg=>n.citizenF; _=>n.citizenMPl
}; };
lock_Adv=<>}; lock_Adv=<>};
IFemale = mkPerson (Pron.pronJaFoo (R.PGen R.Fem));
YouFamFemale = mkPerson (Pron.pronTyFoo (R.PGen R.Fem)); --- AR 8/12/2010: using pro drop
YouPolFemale = mkPerson (Pron.pronPani); IMale = mkPerson (E.ProDrop Pron.pronJa);
YouPolMale = mkPerson (Pron.pronPan); IFemale = mkPerson (E.ProDrop (Pron.pronJaFoo (R.PGen R.Fem)));
YouFamMale = mkPerson (E.ProDrop (Pron.pronTy));
YouFamFemale = mkPerson (E.ProDrop (Pron.pronTyFoo (R.PGen R.Fem)));
YouPolFemale = mkPerson (E.ProDrop (Pron.pronPani));
YouPolMale = mkPerson (E.ProDrop (Pron.pronPan));
--- original
--- IFemale = mkPerson (Pron.pronJaFoo (R.PGen R.Fem));
--- YouFamFemale = mkPerson (Pron.pronTyFoo (R.PGen R.Fem));
--- YouPolFemale = mkPerson (Pron.pronPani);
--- YouPolMale = mkPerson (Pron.pronPan);
} }