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

(Hun) Add negation in verbs + change some parameter names

Browse Source
This commit is contained in:
Inari Listenmaa
2020-04-21 10:44:32 +02:00
parent 53bc773db6
commit 1dcb4720d1
3 changed files with 24 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
src/hungarian/VerbHun.gf
View File

@@ -109,8 +109,8 @@ lin
-- : AP -> Comp ;
CompAP ap = UseCopula ** {
s = \\vf => case vf of {
VFin P3 n => ap.s ! n ;
VFin _ n => ap.s ! n ++ copula.s ! vf ;
VPres P3 n => ap.s ! n ;
VPres _ n => ap.s ! n ++ copula.s ! vf ;
_ => ap.s ! Sg ++ copula.s ! vf}
++ ap.compar ;
} ;
@@ -118,15 +118,15 @@ lin
-- : CN -> Comp ;
CompCN cn = UseCopula ** {
s = \\vf => case vf of {
VFin P3 n => cn.s ! n ! Nom ;
VFin _ n => cn.s ! n ! Nom ++ copula.s ! vf ;
VPres P3 n => cn.s ! n ! Nom ;
VPres _ n => cn.s ! n ! Nom ++ copula.s ! vf ;
_ => cn.s ! Sg ! Nom ++ copula.s ! vf} ;
} ;
-- : NP -> Comp ;
CompNP np = UseCopula ** {
s = \\vf => case vf of {
VFin P3 _ => np.s ! Nom ;
VPres P3 _ => np.s ! Nom ;
_ => np.s ! Nom ++ copula.s ! vf } ;
} ;