(Cat) Update A,A2 to not have Degree

This commit is contained in:
Inari Listenmaa
2021-09-14 17:35:55 +08:00
parent e421518a36
commit 9620c738c5
4 changed files with 34 additions and 31 deletions
+3 -3
View File
@@ -64,7 +64,7 @@ oper
}
} ;
piuComp = "més" ;
possCase = \_,_,c -> prepCase c ;
@@ -112,7 +112,7 @@ oper
\\pol,g,n => case pol of {
RPos => neg.p1 ++ imper ++ bindIf refl.isRefl ++ refl.pron
++ bindIf hasClit ++ clit ++ compl ;
RNeg _ => neg.p1 ++ refl.pron ++ clit ++ compl ++ subj
RNeg _ => neg.p1 ++ refl.pron ++ clit ++ compl ++ subj
} where {
pe = case isPol of {True => P3 ; _ => p} ;
refl = case vp.s.vtyp of {
@@ -127,7 +127,7 @@ oper
agr = {g = g ; n = n ; p = pe} ;
compl = neg.p2 ++ vp.comp ! agr ++ vp.ext ! pol
} ;
CopulaType = Bool ;
selectCopula = \isEstar -> case isEstar of {True => estar_V ; False => copula} ;
serCopula = False ;