diff options
Diffstat (limited to 'examples/phrasebook/WordsFin.gf')
| -rw-r--r-- | examples/phrasebook/WordsFin.gf | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/examples/phrasebook/WordsFin.gf b/examples/phrasebook/WordsFin.gf index 0e4e7d14c..59cce8600 100644 --- a/examples/phrasebook/WordsFin.gf +++ b/examples/phrasebook/WordsFin.gf @@ -195,10 +195,10 @@ concrete WordsFin of Words = SentencesFin ** -- transports HowFar place = mkQS (mkQCl far_IAdv place.name) ; - HowFarFrom place x = - mkQS (mkQCl far_IAdv (mkCl place.name (SyntaxFin.mkAdv from_Prep x.name))) ; - HowFarFromBy place x t = - mkQS (mkQCl far_IAdv (mkCl place.name + HowFarFrom x y = + mkQS (mkQCl far_IAdv (mkCl y.name (SyntaxFin.mkAdv from_Prep x.name))) ; + HowFarFromBy x y t = + mkQS (mkQCl far_IAdv (mkCl y.name (mkVP (mkVP (SyntaxFin.mkAdv from_Prep x.name)) t))) ; HowFarBy place t = mkQS (mkQCl far_IAdv (mkCl place.name t)) ; |