DEFINITION pc3_pr3_t()
TYPE =
∀c:C.∀t1:T.∀t0:T.(pr3 c t1 t0)→∀t2:T.(pr3 c t2 t0)→(pc3 c t1 t2)
BODY =
assume c: C
assume t1: T
assume t0: T
suppose H: pr3 c t1 t0
assume t2: T
suppose H0: pr3 c t2 t0
by (ex_intro2 . . . . H H0)
we proved ex2 T λt:T.pr3 c t1 t λt:T.pr3 c t2 t
that is equivalent to pc3 c t1 t2
we proved ∀c:C.∀t1:T.∀t0:T.(pr3 c t1 t0)→∀t2:T.(pr3 c t2 t0)→(pc3 c t1 t2)