summaryrefslogtreecommitdiff
path: root/examples/phrasebook
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2010-05-28 09:08:35 +0000
committeraarne <aarne@chalmers.se>2010-05-28 09:08:35 +0000
commita0c82640e6b65424e3c5c55f87d8bc528f2704aa (patch)
tree7c4f80c5a76515dd1767ee2cdd1e9c4b311917d5 /examples/phrasebook
parentdc00e7ea3aa652cad4e3513ef6057a6d5e9a16ca (diff)
disambiguation of partitive mass terms in ENglish
Diffstat (limited to 'examples/phrasebook')
-rw-r--r--examples/phrasebook/DisambPhrasebookEng.gf4
1 files changed, 3 insertions, 1 deletions
diff --git a/examples/phrasebook/DisambPhrasebookEng.gf b/examples/phrasebook/DisambPhrasebookEng.gf
index e2c622e11..d2c468e8e 100644
--- a/examples/phrasebook/DisambPhrasebookEng.gf
+++ b/examples/phrasebook/DisambPhrasebookEng.gf
@@ -10,7 +10,7 @@ concrete DisambPhrasebookEng of Phrasebook = PhrasebookEng -
GSorry, GSorryPol,
GPleaseGive, GPleaseGivePol,
GNiceToMeetYou, -- GNiceToMeetYouPol,
- PYes, PYesToNo
+ PYes, PYesToNo, ObjMass
]
** open SyntaxEng, ParadigmsEng, Prelude in {
lin
@@ -36,6 +36,8 @@ lin
PYes = mkPhrase (lin Utt (ss "yes (answer to positive question)")) ;
PYesToNo = mkPhrase (lin Utt (ss "yes (answer to negative question)")) ;
+ ObjMass x = mkNP (mkNP x) (ParadigmsEng.mkAdv "(a portion of)") ;
+
oper
fam : Str -> SS = \s -> postfixSS "(familiar)" (ss s) ;
pol : Str -> SS = \s -> postfixSS "(polite)" (ss s) ;