summaryrefslogtreecommitdiff
path: root/examples/phrasebook/PhrasebookIta.gf
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2010-03-30 15:39:11 +0000
committeraarne <aarne@chalmers.se>2010-03-30 15:39:11 +0000
commitde909a4e44419562ca4ba071e15cf9b8e00288be (patch)
treefdae4da7fbce3edb0276a93219495c019fdaca08 /examples/phrasebook/PhrasebookIta.gf
parent4bae49c6341fc831f474f1fffc0f763892ef696d (diff)
disambiguation in Phrasebook grammars, PGF server, and the GUI
Diffstat (limited to 'examples/phrasebook/PhrasebookIta.gf')
-rw-r--r--examples/phrasebook/PhrasebookIta.gf15
1 files changed, 2 insertions, 13 deletions
diff --git a/examples/phrasebook/PhrasebookIta.gf b/examples/phrasebook/PhrasebookIta.gf
index 554b04ee8..d28531e90 100644
--- a/examples/phrasebook/PhrasebookIta.gf
+++ b/examples/phrasebook/PhrasebookIta.gf
@@ -9,19 +9,8 @@ concrete PhrasebookIta of Phrasebook =
ParadigmsIta,
Prelude in {
-lincat
- Gender = {s : Str ; g : R.Gender} ;
- Politeness = {s : Str ; p : R.Politeness} ;
-
lin
- PSentence s = mkText s | lin Text (mkUtt s) ; -- optional .
- PQuestion s = mkText s | lin Text (mkUtt s) ; -- optional ?
- PGreeting g = lin Text (ss (g.s ! R.Polite ! R.Male ! R.Male)) ;
----- PGreeting p s h g = mkPhrase (g.s ! p.p ! s.g ! h.g ++ p.s ++ s.s ++ h.s) ;
+ PGreeting p g = mkText (lin Text (ss (g.s ! p.p ! R.Male ! R.Male))) (lin Text (ss p.s)) ;
- Male = {s = [] ; g = R.Male} ;
- Female = {s = [] ; g = R.Female} ;
- Polite = {s = [] ; p = R.Polite} ;
- Familiar = {s = [] ; p = R.Familiar} ;
-
}
+