these,those in Constructors

This commit is contained in:
aarne
2007-09-03 13:54:44 +00:00
parent 8118cc46ed
commit ee9416d523
2 changed files with 8 additions and 8 deletions

View File

@@ -8,10 +8,10 @@ concrete FoodsEng of Foods = open SyntaxEng,ParadigmsEng in {
Quality = AP ;
lin
Is item quality = mkUtt (mkCl item quality) ;
This kind = mkNP (mkDet this_Quant) kind ;
That kind = mkNP (mkDet that_Quant) kind ;
These kind = mkNP (mkDet (mkQuantPl this_Quant)) kind ;
Those kind = mkNP (mkDet (mkQuantPl that_Quant)) kind ;
This kind = mkNP this_QuantSg kind ;
That kind = mkNP that_QuantSg kind ;
These kind = mkNP these_QuantPl kind ;
Those kind = mkNP those_QuantPl kind ;
QKind quality kind = mkCN quality kind ;
Wine = mkCN (mkN "wine") ;
Pizza = mkCN (mkN "pizza") ;

View File

@@ -8,10 +8,10 @@ incomplete concrete FoodsI of Foods = open Syntax, LexFoods in {
Quality = AP ;
lin
Is item quality = mkUtt (mkCl item quality) ;
This kind = mkNP (mkDet this_Quant) kind ;
That kind = mkNP (mkDet that_Quant) kind ;
These kind = mkNP (mkDet (mkQuantPl this_Quant)) kind ;
Those kind = mkNP (mkDet (mkQuantPl that_Quant)) kind ;
This kind = mkNP this_QuantSg kind ;
That kind = mkNP that_QuantSg kind ;
These kind = mkNP these_QuantPl kind ;
Those kind = mkNP those_QuantPl kind ;
QKind quality kind = mkCN quality kind ;
Very quality = mkAP very_AdA quality ;