Let alpha be given.
Let z be given.
We prove the intermediate
claim La1:
SNo alpha.
An
exact proof term for the current goal is
ordinal_SNo alpha Ha.
We prove the intermediate
claim La2:
SNoLev alpha = alpha.
Assume H1.
Apply H1 to the current goal.
An exact proof term for the current goal is H1.
Apply In_irref alpha to the current goal.
rewrite the current goal using La2 (from right to left) at position 1.
We will
prove SNoLev alpha ∈ alpha.
rewrite the current goal using H1 (from right to left) at position 1.
An exact proof term for the current goal is Hz2.
Apply SNoLtE alpha z La1 Hz H1 to the current goal.
Let w be given.
rewrite the current goal using La2 (from left to right).
Apply H7 to the current goal.
rewrite the current goal using La2 (from left to right).
rewrite the current goal using La2 (from left to right).
An exact proof term for the current goal is H4 H2.
∎