GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-22 17:42:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

mass terms and yes/si/doch in Phrasebook

Browse Source
This commit is contained in:
aarne
2010-05-25 11:30:09 +00:00
parent 31a93aa08b
commit f123e29a38
8 changed files with 71 additions and 45 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
examples/phrasebook/DisambPhrasebookEng.gf
View File

@@ -9,7 +9,8 @@ concrete DisambPhrasebookEng of Phrasebook = PhrasebookEng -
GExcuse, GExcusePol,
GSorry, GSorryPol,
GPleaseGive, GPleaseGivePol,
GNiceToMeetYou, GNiceToMeetYouPol
GNiceToMeetYou, -- GNiceToMeetYouPol,
PYes, PYesToNo
]
** open SyntaxEng, ParadigmsEng, Prelude in {
lin
@@ -30,7 +31,10 @@ lin
GPleaseGive = fam "please" ;
GPleaseGivePol = pol "please" ;
GNiceToMeetYou = fam "nice to meet you" ;
GNiceToMeetYouPol = pol "nice to meet you" ;
-- GNiceToMeetYouPol = pol "nice to meet you" ;
PYes = mkPhrase (lin Utt (ss "yes (answer to positive question)")) ;
PYesToNo = mkPhrase (lin Utt (ss "yes (answer to negative question)")) ;
oper
fam : Str -> SS = \s -> postfixSS "(familiar)" (ss s) ;