1
0
forked from GitHub/gf-rgl

(Som) Fix word order+add negative form for rel.cls

This commit is contained in:
Inari Listenmaa
2019-08-28 14:16:48 +02:00
parent a80ec22a1c
commit 0847e5f2fa
6 changed files with 54 additions and 20 deletions
+2 -1
View File
@@ -18,7 +18,8 @@ lin
rclSubord = mergeRCl (cls.s ! True) ;
rclStatement = mergeRCl (cls.s ! False) ;
in rp.s ++ case <gn,c,t,a,p> of {
<g,Abs,Pres,Simul,Pos> => linVP (VRel g) vp ; -- reduced present only in absolutive
<g,Abs,Pres,Simul,Pos> => linVP (VRel g) Subord vp ; -- reduced present only in absolutive
<_,Abs,Pres,Simul,Neg> => linVP VRelNeg Subord vp ; -- special form for have and be
<_,Nom,Pres,Simul,Pos> => rclStatement.s ! t ! a ! p ; -- the usual forms, not subordinate
_ => rclSubord.s ! t ! a ! p } -- the rest is Subord because of negation.
} ;