summaryrefslogtreecommitdiff
path: root/examples/phrasebook/SentencesI.gf
diff options
context:
space:
mode:
Diffstat (limited to 'examples/phrasebook/SentencesI.gf')
-rw-r--r--examples/phrasebook/SentencesI.gf7
1 files changed, 6 insertions, 1 deletions
diff --git a/examples/phrasebook/SentencesI.gf b/examples/phrasebook/SentencesI.gf
index 31e3a6885..0b26cff41 100644
--- a/examples/phrasebook/SentencesI.gf
+++ b/examples/phrasebook/SentencesI.gf
@@ -52,7 +52,8 @@ incomplete concrete SentencesI of Sentences = Numeral **
SPropNot = mkS negativePol ;
QProp p = mkQS (mkQCl p) ;
- WhereIs place = mkQS (mkQCl where_IAdv place.name) ;
+ WherePlace place = mkQS (mkQCl where_IAdv place.name) ;
+ WherePerson person = mkQS (mkQCl where_IAdv person.name) ;
PropAction a = a ;
@@ -100,6 +101,10 @@ incomplete concrete SentencesI of Sentences = Numeral **
---- NameString s = symb s ;
NameNN = symb "NN" ;
+ AHave p kind = mkCl p.name have_V2 (mkNP kind) ;
+ ACitizen p n = mkCl p.name n ;
+ ABePlace p place = mkCl p.name place.at ;
+
oper
mkPhrase : Utt -> Text = \u -> lin Text u ; -- no punctuation