Added some determiners to Constructors.

This commit is contained in:
bringert
2007-04-19 21:26:19 +00:00
parent a609e26185
commit afa4681458

View File

@@ -132,6 +132,12 @@ incomplete resource Constructors = open Grammar in {
mkDet : Pron -> Det -- my (house)
} ;
def_Det : Det ; -- the (man)
indef_Det : Det ; -- a (man)
mass_Det : Det ; -- (water)
-- More determiners are available in the Structural module
--2 Numerals - cardinal and ordinal
@@ -370,6 +376,12 @@ incomplete resource Constructors = open Grammar in {
= \p -> DetSg (SgQuant (PossPron p)) NoOrd
} ;
def_Det : Det = DetSg (SgQuant DefArt) NoOrd ; -- the (man)
indef_Det : Det = DetSg (SgQuant IndefArt) NoOrd ; -- a (man)
mass_Det : Det = DetSg MassDet NoOrd; -- (water)
mkNum = overload {
mkNum : Num -- [no num]
= NoNum ;