diff options
| author | aarne <aarne@chalmers.se> | 2010-05-27 20:44:39 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2010-05-27 20:44:39 +0000 |
| commit | d156c5bccf33b3d143134520ee614b58d20565b3 (patch) | |
| tree | f941f30889d56781d28920d0a70710e327255c60 /examples/phrasebook/WordsNor.gf | |
| parent | 857c9e83a05339118014b738025547c8d1cfadf5 (diff) | |
adjustments in Phrasebook
Diffstat (limited to 'examples/phrasebook/WordsNor.gf')
| -rw-r--r-- | examples/phrasebook/WordsNor.gf | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/examples/phrasebook/WordsNor.gf b/examples/phrasebook/WordsNor.gf index 20b074ed9..2504602e4 100644 --- a/examples/phrasebook/WordsNor.gf +++ b/examples/phrasebook/WordsNor.gf @@ -213,11 +213,11 @@ concrete WordsNor of Words = SentencesNor ** HowFar place = mkQS (mkQCl far_IAdv (mkCl (mkVP place.to))) ; - HowFarFrom place x = - mkQS (mkQCl far_IAdv (mkCl (mkVP (mkVP place.to) + HowFarFrom x y = + mkQS (mkQCl far_IAdv (mkCl (mkVP (mkVP y.to) (SyntaxNor.mkAdv from_Prep x.name)))) ; - HowFarFromBy place x t = - mkQS (mkQCl far_IAdv (mkCl (mkVP (mkVP (mkVP place.to) + HowFarFromBy x y t = + mkQS (mkQCl far_IAdv (mkCl (mkVP (mkVP (mkVP y.to) (SyntaxNor.mkAdv from_Prep x.name)) t))) ; HowFarBy place t = mkQS (mkQCl far_IAdv (mkCl (mkVP (mkVP place.to) t))) ; |