Let alpha be given.
We prove the intermediate
claim La:
ordinal alpha.
Set z to be the term
PSNo alpha (λbeta ⇒ beta ∈ x).
We prove the intermediate
claim L1:
SNo_ alpha z.
An exact proof term for the current goal is La.
We prove the intermediate
claim L2:
SNo z.
We use alpha to witness the existential quantifier.
Apply andI to the current goal.
An exact proof term for the current goal is La.
An exact proof term for the current goal is L1.
We prove the intermediate
claim L3:
SNoLev z = alpha.
An
exact proof term for the current goal is
SNoLev_uniq z (SNoLev z) alpha Hz1 La Hz2 L1.
We prove the intermediate
claim L4:
SNoEq_ alpha z x.
An exact proof term for the current goal is La.
We prove the intermediate
claim L5:
SNoEq_ alpha z y.
Apply SNoEq_tra_ alpha z x y L4 to the current goal.
We will
prove SNoEq_ alpha x y.
An exact proof term for the current goal is H2.
Apply Hp1 z L2 to the current goal.
rewrite the current goal using L3 (from left to right).
An exact proof term for the current goal is Ha.
rewrite the current goal using L3 (from left to right).
An exact proof term for the current goal is L4.
rewrite the current goal using L3 (from left to right).
An exact proof term for the current goal is L5.
rewrite the current goal using L3 (from left to right).
An exact proof term for the current goal is Ha1.
An exact proof term for the current goal is L4.
An exact proof term for the current goal is H3.
rewrite the current goal using L3 (from left to right).
An exact proof term for the current goal is Ha2.
An exact proof term for the current goal is L5.
An exact proof term for the current goal is H4.
rewrite the current goal using L3 (from left to right).
An exact proof term for the current goal is H3.
rewrite the current goal using L3 (from left to right).
An exact proof term for the current goal is H4.