DEFINITION pc3_head_1()
TYPE =
       c:C.u1:T.u2:T.(pc3 c u1 u2)k:K.t:T.(pc3 c (THead k u1 t) (THead k u2 t))
BODY =
Show proof