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

ExistNPAdv in Fre and Ita

Browse Source
This commit is contained in:
aarneranta
2021-06-09 18:19:24 +02:00
parent 0ee2377c99
commit b6f37abe91
2 changed files with 12 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/italian/IdiomIta.gf
+8
View File
@@ -23,6 +23,14 @@ concrete IdiomIta of Idiom = CatIta **
(insertClit3 (elision "ci" "c'" "ci")
(insertComplement (\\_ => (np.s ! Nom).ton)
(predV copula))) ;
ExistNPAdv np adv =
let npa = complAgr np.a in
mkClause [] True False (agrP3 npa.g npa.n)
(insertAdv adv.s
(insertClit3 (elision "ci" "c'" "ci")
(insertComplement (\\_ => (np.s ! Nom).ton)
(predV copula)))) ;
ExistIP ip = {
s = \\t,a,p,_ =>