diff options
Diffstat (limited to 'examples/phrasebook/WordsFre.gf')
| -rw-r--r-- | examples/phrasebook/WordsFre.gf | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/examples/phrasebook/WordsFre.gf b/examples/phrasebook/WordsFre.gf index f00c96840..faab0ee63 100644 --- a/examples/phrasebook/WordsFre.gf +++ b/examples/phrasebook/WordsFre.gf @@ -224,12 +224,12 @@ lin -- transports HowFar place = mkQS (mkQCl what_distance_IAdv place.name) ; - HowFarFrom place x = + HowFarFrom x y = mkQS (mkQCl (E.CompIQuant which_IQuant) - (mkNP (mkNP distance_NP (SyntaxFre.mkAdv from_Prep x.name)) place.to)) ; - HowFarFromBy place x t = + (mkNP (mkNP distance_NP (SyntaxFre.mkAdv from_Prep x.name)) y.to)) ; + HowFarFromBy x y t = mkQS (mkQCl (E.CompIQuant which_IQuant) - (mkNP (mkNP (mkNP distance_NP (SyntaxFre.mkAdv from_Prep x.name)) place.to) t)) ; + (mkNP (mkNP (mkNP distance_NP (SyntaxFre.mkAdv from_Prep x.name)) y.to) t)) ; HowFarBy place t = mkQS (mkQCl what_distance_IAdv (mkNP place.name t)) ; |