GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-23 19:42:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

kein Deutsch and some other Phrasebook fixes

Browse Source
This commit is contained in:
aarne
2010-09-03 09:02:00 +00:00
parent 1527d470ec
commit 9fc58ce0e7
5 changed files with 23 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
examples/phrasebook/WordsFin.gf
View File

@@ -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)) ;