From ee9416d5232c86c7fa084f1a384d7424ca2d8fee Mon Sep 17 00:00:00 2001 From: aarne Date: Mon, 3 Sep 2007 13:54:44 +0000 Subject: [PATCH] these,those in Constructors --- examples/tutorial/resource-foods/FoodsEng.gf | 8 ++++---- examples/tutorial/resource-foods/FoodsI.gf | 8 ++++---- 2 files changed, 8 insertions(+), 8 deletions(-) diff --git a/examples/tutorial/resource-foods/FoodsEng.gf b/examples/tutorial/resource-foods/FoodsEng.gf index 3756b8189..5f3a978c3 100644 --- a/examples/tutorial/resource-foods/FoodsEng.gf +++ b/examples/tutorial/resource-foods/FoodsEng.gf @@ -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") ; diff --git a/examples/tutorial/resource-foods/FoodsI.gf b/examples/tutorial/resource-foods/FoodsI.gf index da6cb9366..2ec35f5f9 100644 --- a/examples/tutorial/resource-foods/FoodsI.gf +++ b/examples/tutorial/resource-foods/FoodsI.gf @@ -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 ;