summaryrefslogtreecommitdiff
path: root/next-lib/src/api/Constructors.gf
diff options
context:
space:
mode:
authoraarne <aarne@cs.chalmers.se>2008-11-15 11:19:10 +0000
committeraarne <aarne@cs.chalmers.se>2008-11-15 11:19:10 +0000
commit3ff57f6184963acde7f3cc2dcf0638c0e819929a (patch)
treee5c975ae99dd3e45f9a4e700658b39d9bf90e68f /next-lib/src/api/Constructors.gf
parent6b4f9715e6acb87e05b8229bafd1f41d906e6409 (diff)
comparative adverbs generalized to cover more of Attempto
Diffstat (limited to 'next-lib/src/api/Constructors.gf')
-rw-r--r--next-lib/src/api/Constructors.gf11
1 files changed, 8 insertions, 3 deletions
diff --git a/next-lib/src/api/Constructors.gf b/next-lib/src/api/Constructors.gf
index 4c3e91c38..305c30c6d 100644
--- a/next-lib/src/api/Constructors.gf
+++ b/next-lib/src/api/Constructors.gf
@@ -389,12 +389,13 @@ incomplete resource Constructors = open Grammar in {
mkNP : Predet -> NP -> NP ; -- 21. only John
mkNP : NP -> V2 -> NP ; -- 22. John killed
mkNP : NP -> Adv -> NP ; -- 23. John in Paris
+ mkNP : NP -> RS -> NP ; -- 24. John, who lives in Paris
-- A conjunction can be formed both from two noun phrases and a longer
-- list of them.
- mkNP : Conj -> NP -> NP -> NP ; -- 22. John and I
- mkNP : Conj -> ListNP -> NP ; -- 23. John, I, and that
+ mkNP : Conj -> NP -> NP -> NP ; -- 25. John and I
+ mkNP : Conj -> ListNP -> NP ; -- 26. John, I, and that
} ;
@@ -614,6 +615,7 @@ incomplete resource Constructors = open Grammar in {
mkAP : Conj -> ListAP -> AP ; -- 11. old, big, and warm
mkAP : Ord -> AP ; -- 12. oldest
+ mkAP : CAdv -> AP -> NP -> AP ; -- 13. as old as John
} ;
reflAP : A2 -> AP ; -- married to himself
@@ -894,7 +896,8 @@ incomplete resource Constructors = open Grammar in {
= \c,xy -> ConjAP c xy ;
mkAP : Ord -> AP
= AdjOrd ;
-
+ mkAP : CAdv -> AP -> NP -> AP
+ = CAdvAP ;
} ;
reflAP = ReflA2 ;
@@ -1055,6 +1058,8 @@ incomplete resource Constructors = open Grammar in {
= PPartNP ;
mkNP : NP -> Adv -> NP -- Paris at midnight
= AdvNP ;
+ mkNP : NP -> RS -> NP
+ = RelNP ;
mkNP : Conj -> NP -> NP -> NP
= \c,x,y -> ConjNP c (BaseNP x y) ;
mkNP : Conj -> ListNP -> NP