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