Search for blocks/addresses/...

Proofgold Proof

pf
Let x0 of type ι be given.
Assume H0: SNo x0.
Assume H1: ∀ x1 . x1SNoS_ (SNoLev x0)SNoLt x1 x0.
Claim L2: ordinal (SNoLev x0)
Apply SNoLev_ordinal with x0.
The subproof is completed by applying H0.
Claim L3: SNo (SNoLev x0)
Apply ordinal_SNo with SNoLev x0.
The subproof is completed by applying L2.
Claim L4: SNoLe x0 (SNoLev x0)
Apply ordinal_SNoLev_max_2 with SNoLev x0, x0 leaving 3 subgoals.
The subproof is completed by applying L2.
The subproof is completed by applying H0.
The subproof is completed by applying ordsuccI2 with SNoLev x0.
Apply SNoLeE with x0, SNoLev x0, SNoLev x0 = x0 leaving 5 subgoals.
The subproof is completed by applying H0.
The subproof is completed by applying L3.
The subproof is completed by applying L4.
Assume H5: SNoLt x0 (SNoLev x0).
Apply FalseE with SNoLev x0 = x0.
Apply SNoLtE with x0, SNoLev x0, False leaving 6 subgoals.
The subproof is completed by applying H0.
The subproof is completed by applying L3.
The subproof is completed by applying H5.
Let x1 of type ι be given.
Assume H6: SNo x1.
Assume H7: SNoLev x1binintersect (SNoLev x0) (SNoLev (SNoLev x0)).
Assume H8: SNoEq_ (SNoLev x1) x1 x0.
Assume H9: SNoEq_ (SNoLev x1) x1 (SNoLev x0).
Assume H10: SNoLt x0 x1.
Assume H11: SNoLt x1 (SNoLev x0).
Assume H12: nIn (SNoLev x1) x0.
Assume H13: SNoLev x1SNoLev x0.
Apply SNoLt_irref with x1.
Apply SNoLt_tra with x1, x0, x1 leaving 5 subgoals.
The subproof is completed by applying H6.
The subproof is completed by applying H0.
The subproof is completed by applying H6.
Apply H1 with x1.
Apply SNoS_I with SNoLev x0, x1, SNoLev x1 leaving 3 subgoals.
The subproof is completed by applying L2.
The subproof is completed by applying H13.
Apply SNoLev_ with x1.
The subproof is completed by applying H6.
The subproof is completed by applying H10.
Assume H6: SNoLev x0SNoLev (SNoLev x0).
Apply FalseE with SNoEq_ (SNoLev x0) x0 (SNoLev x0)SNoLev x0SNoLev x0False.
Apply In_irref with SNoLev x0.
Apply ordinal_SNoLev with SNoLev x0, λ x1 x2 . SNoLev x0x1 leaving 2 subgoals.
The subproof is completed by applying L2.
The subproof is completed by applying H6.
Assume H6: SNoLev (SNoLev x0)SNoLev x0.
Apply FalseE with SNoEq_ (SNoLev (SNoLev x0)) x0 (SNoLev x0)nIn (SNoLev (SNoLev x0)) x0False.
Apply In_irref with SNoLev x0.
Apply ordinal_SNoLev with SNoLev x0, λ x1 x2 . x1SNoLev x0 leaving 2 subgoals.
The subproof is completed by applying L2.
The subproof is completed by applying H6.
Assume H5: x0 = SNoLev x0.
Let x1 of type ιιο be given.
The subproof is completed by applying H5 with λ x2 x3 . x1 x3 x2.