Let x, alpha and beta be given.
Assume Ha Hb Hax Hbx.
Let gamma be given.
We will
prove gamma ∈ beta.
Apply Hax to the current goal.
Assume Hax1 Hax2.
Apply Hbx to the current goal.
Assume Hbx1 Hbx2.
We prove the intermediate claim Lc: ordinal gamma.
An exact proof term for the current goal is ordinal_Hered alpha Ha gamma Hc.
Apply exactly1of2_or (gamma ' ∈ x) (gamma ∈ x) (Hax2 gamma Hc) to the current goal.
We prove the intermediate
claim L1:
gamma ' ∈ beta ∪ {delta '|delta ∈ beta}.
An
exact proof term for the current goal is
Hbx1 (gamma ') H1.
We prove the intermediate
claim L2:
gamma ' ∈ beta ∨ gamma ' ∈ {delta '|delta ∈ beta}.
An
exact proof term for the current goal is
binunionE beta {delta '|delta ∈ beta} (gamma ') L1.
Apply L2 to the current goal.
An
exact proof term for the current goal is
tagged_ReplE beta gamma Hb Lc H2.
We prove the intermediate
claim L1:
gamma ∈ beta ∪ {delta '|delta ∈ beta}.
An exact proof term for the current goal is Hbx1 gamma H1.
We prove the intermediate
claim L2:
gamma ∈ beta ∨ gamma ∈ {delta '|delta ∈ beta}.
An
exact proof term for the current goal is
binunionE beta {delta '|delta ∈ beta} gamma L1.
Apply L2 to the current goal.
An exact proof term for the current goal is H2.
∎