From 26fad2dfe283ffb8a2bf6f526900f90fbbfd30d8 Mon Sep 17 00:00:00 2001 From: "jordi.saludes" Date: Wed, 26 May 2010 15:58:12 +0000 Subject: Cleaning PhrasebookCat --- examples/phrasebook/SentencesCat.gf | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'examples/phrasebook/SentencesCat.gf') diff --git a/examples/phrasebook/SentencesCat.gf b/examples/phrasebook/SentencesCat.gf index 08860d21d..7f2d65a0a 100644 --- a/examples/phrasebook/SentencesCat.gf +++ b/examples/phrasebook/SentencesCat.gf @@ -47,7 +47,6 @@ oper False => placeNPAdj sup.ord kind } ; - -- "el mejor aeropuerto" placeNPDet : Ord -> CNPlace -> NPPlace = \ord,kind -> let name : NP = mkNP (mkDet the_Art ord) kind.name in { name = name ; @@ -55,7 +54,7 @@ oper to = SyntaxCat.mkAdv kind.to name ; }; - -- "el aeropuerto más grande" + placeNPAdj : Ord -> CNPlace -> NPPlace = \ord,kind -> let name : NP = mkNP the_Art (mkCN kind.name (mkAP ord)) in { name = name ; -- cgit v1.2.3