DEFINITION pc3_pr3_r()
TYPE =
       c:C.t1:T.t2:T.(pr3 c t1 t2)(pc3 c t1 t2)
BODY =
Show proof