DEFINITION ty3_correct()
TYPE =
       g:G.c:C.t1:T.t2:T.(ty3 g c t1 t2)(ex T λt:T.ty3 g c t2 t)
BODY =
Show proof