msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

(Pes) Change word order for defective VVs.

Browse Source 
NB. This might be overfitting just for a particular sentence. Ideally 
check with a Persian speaker.
This commit is contained in:
Inari Listenmaa
2019-03-22 09:45:52 +01:00
parent 70b8d2e5e3
commit f17d1f3e48
1 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/persian/ResPes.gf
View File

@@ -237,8 +237,12 @@ oper
vp = \\ta,p,ord => vp = \\ta,p,ord =>
let vps = clTable vp ! np.a ! ta ! p ; let vps = clTable vp ! np.a ! ta ! p ;
vvt = ta2vvt ta ; vvt = ta2vvt ta ;
in vp.ad ++ vp.comp ! np.a ++ vp.obj ++ vps in case vp.vvtype of {
++ vp.vComp ! np.a ! vvt ++ vp.embComp DefVV
=> vps ++ vp.ad ++ vp.comp ! np.a ++ vp.obj
++ vp.vComp ! np.a ! vvt ++ vp.embComp ;
_ => vp.ad ++ vp.comp ! np.a ++ vp.obj ++ vps
++ vp.vComp ! np.a ! vvt ++ vp.embComp }
}; };
--Clause : Type = {s : TAnt => Polarity => Order => Str} ; --Clause : Type = {s : TAnt => Polarity => Order => Str} ;