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

(Eng) uncontracted form for standalone VPS

Browse Source
This commit is contained in:
Inari Listenmaa committed 2023-02-08 11:32:47 +08:00
1 parent a6faaeb351
commit c6f6a749b5
1 file changed
+1 -1
Download Patch File Download Diff File Expand all files Collapse all files
src/english/ExtendEng.gf
+1 -1
View File
@@ -191,7 +191,7 @@ concrete ExtendEng of Extend =
inf = verb.adv ++ vp.ad ! a ++ verb.fin ++ verb.inf ++ vp.p ++ compl} ;
} ;
linVPS : Agr -> {s : Order => Agr => {fin,inf : Str}} -> Str = \agr,vps -> let vpss = vps.s ! ODir True ! agr in vpss.fin ++ vpss.inf ;
linVPS : Agr -> {s : Order => Agr => {fin,inf : Str}} -> Str = \agr,vps -> let vpss = vps.s ! ODir False ! agr in vpss.fin ++ vpss.inf ;
mkVPI : VP -> VPI = \vp -> lin VPI {
s = table {