DEFINITION arity_sred_pr3()
TYPE =
       c:C.t1:T.t2:T.(pr3 c t1 t2)g:G.a:A.(arity g c t1 a)(arity g c t2 a)
BODY =
Show proof