Search for blocks/addresses/...

Proofgold Proof

pf
Let x0 of type ι be given.
Let x1 of type ιο be given.
Assume H0: ∀ x2 . x1 x2∀ x3 . x3x2nIn x0 x3.
Let x2 of type ι be given.
Let x3 of type ι be given.
Assume H1: x1 x2.
Let x4 of type ι be given.
Assume H2: x4x2.
Let x5 of type ι be given.
Assume H3: (λ x6 . SetAdjoin x6 x0) x4 = (λ x6 . SetAdjoin x6 x0) x5.
Let x6 of type ι be given.
Assume H4: x6x4.
Claim L5: x6(λ x7 . SetAdjoin x7 x0) x5
Apply H3 with λ x7 x8 . x6x7.
Apply binunionI1 with x4, Sing x0, x6.
The subproof is completed by applying H4.
Apply binunionE with x5, Sing x0, x6, x6x5 leaving 3 subgoals.
The subproof is completed by applying L5.
Assume H6: x6x5.
The subproof is completed by applying H6.
Assume H6: x6Sing x0.
Apply FalseE with x6x5.
Claim L7: x6 = x0
Apply SingE with x0, x6.
The subproof is completed by applying H6.
Apply H0 with x2, x4 leaving 3 subgoals.
The subproof is completed by applying H1.
The subproof is completed by applying H2.
Apply L7 with λ x7 x8 . x7x4.
The subproof is completed by applying H4.