GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-06-23 10:11:10 -06:00
Code Issues Packages Projects Releases Wiki Activity

added Extend.SubjunctRelCN

Browse Source
This commit is contained in:
Aarne Ranta
2024-07-30 08:44:01 +02:00
parent 78f333e79e
commit ba2e4a4964
3 changed files with 11 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
src/romance/ExtendRomanceFunctor.gf
View File

@@ -73,7 +73,12 @@ incomplete concrete ExtendRomanceFunctor of Extend =
.s ! m ! (Ag rp.a.g rp.a.n P3) ! False ;
c = Nom
} ;
SubjunctRelCN cn rs = let g = cn.g in {
s = \\n => cn.s ! n ++ rs.s ! Conjunct ! agrP3 g n ; --- mood
g = g
} ;
MkVPI vp = variants {} ; -- Temp -> Pol -> VP -> VPI ; -- to sleep / hasn't slept
ConjVPI = variants {} ; -- Conj -> [VPI] -> VPI ; -- has walked and won't sleep