1
0
forked from GitHub/gf-core

adjustments in Phrasebook

This commit is contained in:
aarne
2010-05-27 20:44:39 +00:00
parent 857c9e83a0
commit d156c5bccf
4 changed files with 24 additions and 19 deletions

View File

@@ -191,11 +191,11 @@ concrete WordsSwe of Words = SentencesSwe **
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)
(SyntaxSwe.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)
(SyntaxSwe.mkAdv from_Prep x.name)) t))) ;
HowFarBy place t =
mkQS (mkQCl far_IAdv (mkCl (mkVP (mkVP place.to) t))) ;