We prove the intermediate
claim L1:
Y = (Y ∖ {z}) ∪ {z}.
Let w be given.
Apply xm (w ∈ {z}) to the current goal.
An exact proof term for the current goal is H3.
An exact proof term for the current goal is Hw.
An exact proof term for the current goal is H3.
Let w be given.
An
exact proof term for the current goal is
setminusE1 Y {z} w H3.
rewrite the current goal using
SingE z w H3 (from left to right).
An exact proof term for the current goal is H2.
rewrite the current goal using L1 (from left to right).
Apply IH to the current goal.
Let y be given.
Apply binunionE X {z} y (H1 y Hy1) to the current goal.
An exact proof term for the current goal is H3.
Apply Hy2 to the current goal.
An exact proof term for the current goal is H3.
Apply IH to the current goal.
Let y be given.
An exact proof term for the current goal is H3.
Apply H2 to the current goal.
rewrite the current goal using
SingE z y H3 (from right to left).
An exact proof term for the current goal is Hy.