added type signature for GF3

This commit is contained in:
Krasimir Angelov
2026-09-07 16:14:16 +02:00
parent 0a197ec126
commit dcc0f3f56c
+1 -1
View File
@@ -224,7 +224,7 @@ oper
num.s ! NumAdj ++ cn.s ! numform2nounnum num.n ++ prep_ta.enclitic ! agr ;
pastPartStr : VPSlash -> GenNum -> Str = \vp,gn ->
let agr = toAgr gn in
let agr : Agr = toAgr gn in
case exists Participle vp.v.pastPart of {
True => fromJust Participle vp.v.pastPart ! gn ++ vp.s2 ! agr ++ vp.c2.s ! Definite ;
False => (vp.v.s ! VPerf (toVAgr agr)).s1 ++ vp.s2 ! agr ++ vp.c2.s ! Definite