Apply PNoLt_E_ (SNoLev x ∩ SNoLev y) (λbeta ⇒ beta ∈ x) (λbeta ⇒ beta ∈ y) H1 to the current goal.
Let alpha be given.
Assume H3: alpha ∉ x.
Apply binintersectE (SNoLev x) (SNoLev y) alpha Ha to the current goal.
We prove the intermediate claim La: ordinal alpha.
An
exact proof term for the current goal is
ordinal_Hered (SNoLev x) LLx alpha Ha1.
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 will
prove ∃alpha, ordinal alpha ∧ SNo_ alpha 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.
We will
prove PNoEq_ alpha (λbeta ⇒ beta ∈ z) (λbeta ⇒ beta ∈ x).
We will
prove PNoEq_ alpha (λbeta ⇒ beta ∈ PSNo alpha (λbeta ⇒ beta ∈ x)) (λbeta ⇒ beta ∈ 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.
We will
prove PNoEq_ alpha (λbeta ⇒ beta ∈ x) (λbeta ⇒ beta ∈ 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.
We will
prove PNoLt (SNoLev x) (λbeta ⇒ beta ∈ x) (SNoLev z) (λbeta ⇒ beta ∈ z).
rewrite the current goal using L3 (from left to right).
We will
prove PNoLt (SNoLev x) (λbeta ⇒ beta ∈ x) alpha (λbeta ⇒ beta ∈ z).
Apply PNoLtI3 to the current goal.
An exact proof term for the current goal is Ha1.
We will
prove PNoEq_ alpha (λbeta ⇒ beta ∈ x) (λbeta ⇒ beta ∈ z).
Apply PNoEq_sym_ to the current goal.
An exact proof term for the current goal is L4.
We will prove alpha ∉ x.
An exact proof term for the current goal is H3.
We will
prove PNoLt (SNoLev z) (λbeta ⇒ beta ∈ z) (SNoLev y) (λbeta ⇒ beta ∈ y).
rewrite the current goal using L3 (from left to right).
We will
prove PNoLt alpha (λbeta ⇒ beta ∈ z) (SNoLev y) (λbeta ⇒ beta ∈ y).
Apply PNoLtI2 to the current goal.
An exact proof term for the current goal is Ha2.
We will
prove PNoEq_ alpha (λbeta ⇒ beta ∈ z) (λbeta ⇒ beta ∈ y).
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.