summaryrefslogtreecommitdiff
path: root/examples/phrasebook/SentencesI.gf
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2010-03-21 03:37:02 +0000
committeraarne <aarne@chalmers.se>2010-03-21 03:37:02 +0000
commit68840a3d6a745b0c98ee63e070afce22e10c3ba4 (patch)
treeb63b632fb53b328701a947ac164ff0c65983a0e8 /examples/phrasebook/SentencesI.gf
parent5584415807061e801c124bdbaa37350c3b418a25 (diff)
Diff interface for Phrasebook
Diffstat (limited to 'examples/phrasebook/SentencesI.gf')
-rw-r--r--examples/phrasebook/SentencesI.gf8
1 files changed, 6 insertions, 2 deletions
diff --git a/examples/phrasebook/SentencesI.gf b/examples/phrasebook/SentencesI.gf
index b917d70c9..73c0c9e97 100644
--- a/examples/phrasebook/SentencesI.gf
+++ b/examples/phrasebook/SentencesI.gf
@@ -1,5 +1,8 @@
incomplete concrete SentencesI of Sentences = Numeral **
- open Syntax in {
+ open
+ DiffPhrasebook,
+ Syntax
+ in {
lincat
Sentence = Utt ;
Item = NP ;
@@ -10,7 +13,8 @@ incomplete concrete SentencesI of Sentences = Numeral **
Is item quality = mkUtt (mkCl item quality) ;
IsNot item quality = mkUtt (mkS negativePol (mkCl item quality)) ;
WhetherIs item quality = mkUtt (mkQCl (mkCl item quality)) ;
- IWant obj = mkUtt (mkCl (mkNP i_Pron) want_VV (mkVP have_V2 obj)) ;
+ IWant obj = mkUtt (mkCl (mkNP i_Pron) want_V2 obj) ;
+ ILike item = mkUtt (mkCl (mkNP i_Pron) like_V2 item) ;
DoYouHave kind =
mkUtt (mkQCl (mkCl (mkNP youPol_Pron) have_V2 (mkNP kind))) ;
ObjItem i = i ;