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/WordsFre.gf
View File

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