Let y be given.
We prove the intermediate
claim Hex:
∃x : set, (x,y) ∈ setprod Empty V.
An
exact proof term for the current goal is
(SepE2 Y (λy0 : set ⇒ ∃x : set, (x,y0) ∈ setprod Empty V) y Hy).
Apply Hex to the current goal.
Let x be given.
We prove the intermediate
claim HxEmpty:
((x,y) 0) ∈ Empty.
An
exact proof term for the current goal is
(ap0_Sigma Empty (λ_ : set ⇒ V) (x,y) Hxy).
We prove the intermediate
claim HxE:
x ∈ Empty.
rewrite the current goal using
(tuple_2_0_eq x y) (from right to left).
An exact proof term for the current goal is HxEmpty.
Apply FalseE to the current goal.
An
exact proof term for the current goal is
(EmptyE x HxE).