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

added VPS functions to Romance Extend modules

Browse Source
This commit is contained in:
Aarne Ranta
2024-07-26 16:47:43 +02:00
parent afe544bb29
commit 78fc625174
5 changed files with 107 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/french/ExtendFre.gf
View File

@@ -7,7 +7,7 @@ concrete ExtendFre of Extend =
GenRP,
ExistCN, ExistMassCN, ExistPluralCN, RNP, ReflRNP,
PassVPSlash, PassAgentVPSlash, PastPartAP, PastPartAgentAP, ApposNP, CompoundN,
BaseVPS, ConsVPS, PredVPS, MkVPS, ConjVPS
BaseVPS, ConsVPS, PredVPS, MkVPS, ConjVPS, RelVPS
] -- put the names of your own definitions here
with
(Grammar = GrammarFre) **
@@ -153,5 +153,11 @@ lin UseDAP = \dap ->
! DDir ! tm.t ! tm.a ! p.p ! m
} ;
ConjVPS = conjunctDistrTable3 Mood Agr Bool ;
RelVPS rp vpi = {
s = \\m, agr => rp.s ! False ! complAgr agr ! Nom ++ vpi
.s ! m ! (Ag rp.a.g rp.a.n P3) ! False ;
c = Nom
} ;
}