GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-05-27 17:08:54 -06:00
Code Issues Packages Projects Releases Wiki Activity

(Est) Add linref for VPS

Browse Source
This commit is contained in:
Inari Listenmaa
2022-06-03 15:26:05 +03:00
parent d48cf92359
commit 8a87dc210c
2 changed files with 4 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/estonian/ExtendEst.gf
View File

@@ -54,6 +54,9 @@ concrete ExtendEst of Extend =
VPI2 = X.VPI ** {c2 : Compl} ; VPI2 = X.VPI ** {c2 : Compl} ;
[VPI2] = X.ListVPI ** {c2 : Compl} ; [VPI2] = X.ListVPI ** {c2 : Compl} ;
linref
VPS = X.linVPS (agrP3 Sg) ;
lin lin
MkVPS = X.MkVPS ; MkVPS = X.MkVPS ;
BaseVPS = X.BaseVPS ; BaseVPS = X.BaseVPS ;

1
src/estonian/ExtraEst.gf
View File

@@ -46,6 +46,7 @@ concrete ExtraEst of ExtraEstAbs = CatEst **
infVPIF : NPForm -> Polarity -> Agr -> VP -> InfStem -> Str = \sc,pol,agr,vp,if -> infVPIF : NPForm -> Polarity -> Agr -> VP -> InfStem -> Str = \sc,pol,agr,vp,if ->
infVPAnt Simul sc pol agr vp {stem=if ; suf="a"} ; infVPAnt Simul sc pol agr vp {stem=if ; suf="a"} ;
linVPS : Agr -> {s : Agr => Str} -> Str = \agr,vps -> vps.s ! agr ;
lincat lincat
VPS = { VPS = {