Let x0 of type ι be given.
Let x1 of type ι be given.
Apply SNo_max_ordinal with
add_SNo x0 x1 leaving 2 subgoals.
The subproof is completed by applying L4.
Let x2 of type ι be given.
Apply SNoS_E2 with
SNoLev (add_SNo x0 x1),
x2,
SNoLt x2 (add_SNo x0 x1) leaving 3 subgoals.
The subproof is completed by applying L5.
The subproof is completed by applying H6.
Apply SNoLt_trichotomy_or with
x2,
add_SNo x0 x1,
SNoLt x2 (add_SNo x0 x1) leaving 4 subgoals.
The subproof is completed by applying H9.
The subproof is completed by applying L4.
Apply H11 with
SNoLt x2 (add_SNo x0 x1) leaving 2 subgoals.
The subproof is completed by applying H12.
Apply FalseE with
SNoLt x2 (add_SNo x0 x1).
Apply In_irref with
SNoLev x2.
Apply H12 with
λ x3 x4 . SNoLev x2 ∈ SNoLev x4.
The subproof is completed by applying H7.
Apply FalseE with
SNoLt x2 (add_SNo x0 x1).
Apply add_SNo_ordinal_SNoCutP with
x0,
x1,
False leaving 3 subgoals.
The subproof is completed by applying H0.
The subproof is completed by applying H1.
Apply H12 with
(∀ x3 . x3 ∈ binunion {add_SNo x4 x1|x4 ∈ SNoS_ x0} (prim5 (SNoS_ x1) (add_SNo x0)) ⟶ ∀ x4 . x4 ∈ 0 ⟶ SNoLt x3 x4) ⟶ False.
Assume H14:
∀ x3 . x3 ∈ 0 ⟶ SNo x3.
Apply SNoCutP_SNoCut with
binunion {add_SNo x3 x1|x3 ∈ SNoS_ x0} {add_SNo x0 x3|x3 ∈ SNoS_ x1},
0,
False leaving 2 subgoals.
Apply add_SNo_ordinal_SNoCutP with
x0,
x1 leaving 2 subgoals.
The subproof is completed by applying H0.
The subproof is completed by applying H1.