Let X be given.
We prove the intermediate claim HT3: T3.
An exact proof term for the current goal is Hwo.
We prove the intermediate claim HT2: T2.
An
exact proof term for the current goal is
(andEL T2 (X ≠ setprod R R) HT3).
We prove the intermediate claim HT1: T1.
An
exact proof term for the current goal is
(andEL T1 (X ≠ setprod 2 ω) HT2).
We prove the intermediate claim HT0: T0.
An
exact proof term for the current goal is
(andEL (ordinal X) (X ≠ R) HT0).
∎