Fixed MassNP for Cat

This commit is contained in:
jordi.saludes
2009-09-05 16:07:56 +00:00
parent 8b67bc92dd
commit 2bb60dcb39

View File

@@ -1,2 +1,13 @@
concrete NounCat of Noun = CatCat ** NounRomance with
(ResRomance = ResCat) ;
concrete NounCat of Noun = CatCat ** NounRomance - [MassNP] with
(ResRomance = ResCat) ** {
lin
MassNP cn = let
g = cn.g ;
n = Sg ;
in heavyNP {
s = \\_ => cn.s ! n ;
a = agrP3 g n;
hasClit = False
} ;
};