Apply Hsep to the current goal.
Let U be given.
Apply HexV to the current goal.
Let V be given.
Assume HUVsep.
We prove the intermediate
claim HUV12:
U ∈ Tx ∧ V ∈ Tx.
We prove the intermediate
claim HU:
U ∈ Tx.
An
exact proof term for the current goal is
(andEL (U ∈ Tx) (V ∈ Tx) HUV12).
We prove the intermediate
claim HV:
V ∈ Tx.
An
exact proof term for the current goal is
(andER (U ∈ Tx) (V ∈ Tx) HUV12).
We prove the intermediate
claim HUVdisj:
(U ∈ 𝒫 X ∧ V ∈ 𝒫 X) ∧ U ∩ V = Empty.
We prove the intermediate
claim HUVempty:
U ∩ V = Empty.
An
exact proof term for the current goal is
(andER (U ∈ 𝒫 X ∧ V ∈ 𝒫 X) (U ∩ V = Empty) HUVdisj).
We prove the intermediate
claim HU0:
U ≠ Empty.
We prove the intermediate
claim HV0:
V ≠ Empty.
We prove the intermediate
claim Hside:
A ⊆ U ∨ A ⊆ V.
Apply Hside to the current goal.
We prove the intermediate
claim HVneA:
V ∩ A ≠ Empty.
We prove the intermediate
claim HVAsubEmpty:
V ∩ A ⊆ Empty.
Let x be given.
We prove the intermediate
claim HxV:
x ∈ V.
An
exact proof term for the current goal is
(binintersectE1 V A x Hx).
We prove the intermediate
claim HxA:
x ∈ A.
An
exact proof term for the current goal is
(binintersectE2 V A x Hx).
We prove the intermediate
claim HxU:
x ∈ U.
An exact proof term for the current goal is (HAU x HxA).
We prove the intermediate
claim HxUV:
x ∈ U ∩ V.
An
exact proof term for the current goal is
(binintersectI U V x HxU HxV).
We prove the intermediate
claim HxE:
x ∈ Empty.
rewrite the current goal using HUVempty (from right to left).
An exact proof term for the current goal is HxUV.
An exact proof term for the current goal is HxE.
We prove the intermediate
claim HVAEq:
V ∩ A = Empty.
An
exact proof term for the current goal is
(Empty_Subq_eq (V ∩ A) HVAsubEmpty).
Apply HVneA to the current goal.
An exact proof term for the current goal is HVAEq.
We prove the intermediate
claim HUneA:
U ∩ A ≠ Empty.
We prove the intermediate
claim HUAsubEmpty:
U ∩ A ⊆ Empty.
Let x be given.
We prove the intermediate
claim HxU:
x ∈ U.
An
exact proof term for the current goal is
(binintersectE1 U A x Hx).
We prove the intermediate
claim HxA:
x ∈ A.
An
exact proof term for the current goal is
(binintersectE2 U A x Hx).
We prove the intermediate
claim HxV:
x ∈ V.
An exact proof term for the current goal is (HAV x HxA).
We prove the intermediate
claim HxUV:
x ∈ U ∩ V.
An
exact proof term for the current goal is
(binintersectI U V x HxU HxV).
We prove the intermediate
claim HxE:
x ∈ Empty.
rewrite the current goal using HUVempty (from right to left).
An exact proof term for the current goal is HxUV.
An exact proof term for the current goal is HxE.
We prove the intermediate
claim HUAEq:
U ∩ A = Empty.
An
exact proof term for the current goal is
(Empty_Subq_eq (U ∩ A) HUAsubEmpty).
Apply HUneA to the current goal.
An exact proof term for the current goal is HUAEq.
∎