diff options
| author | jordi.saludes <jordi.saludes@upc.edu> | 2010-05-26 15:58:12 +0000 |
|---|---|---|
| committer | jordi.saludes <jordi.saludes@upc.edu> | 2010-05-26 15:58:12 +0000 |
| commit | 26fad2dfe283ffb8a2bf6f526900f90fbbfd30d8 (patch) | |
| tree | 81b635c776d1fede36ebc141030f90b5c96079c5 /examples/phrasebook/SentencesCat.gf | |
| parent | d1f0b24145e9d278c6d2f905e10df88f18629954 (diff) | |
Cleaning PhrasebookCat
Diffstat (limited to 'examples/phrasebook/SentencesCat.gf')
| -rw-r--r-- | examples/phrasebook/SentencesCat.gf | 3 |
1 files changed, 1 insertions, 2 deletions
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 ; |