GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-06-02 06:38:54 -06:00
Code Issues Packages Projects Releases Wiki Activity

working towards tram in 4 langs

Browse Source
This commit is contained in:
aarne
2006-01-20 23:03:50 +00:00
parent 6f89da4591
commit 29a4ef3172
25 changed files with 142 additions and 93 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
lib/resource-1.0/romance/SentenceRomance.gf
View File

@@ -5,18 +5,18 @@ incomplete concrete SentenceRomance of Sentence =
lin
PredVP np vp = mkClause (np.s ! Aton Nom) np.a vp ;
{-
PredSCVP sc vp = mkClause sc.s (agrP3 neutrum Sg) vp ;
-- PredSCVP sc vp = mkClause sc.s (agrP3 neutrum Sg) vp ;
ImpVP vp = {
s = \\pol,n =>
s = \\pol,aag =>
let
agr = {gn = gennum utrum n ; p = P2} ;
verb = vp.s ! VPImperat ;
agr = aag ** {p = P2} ;
verb = (vp.s ! VPImperat).fin ! agr
in
verb.fin ++ vp.a1 ! pol ++ verb.inf ++ vp.n2 ! agr ++ vp.a2 ++ vp.ext
verb ++ vp.comp ! agr ++ vp.ext --- neg,clit
} ;
{-
SlashV2 np v2 =
mkClause
(np.s ! nominative) np.a