Let X, B and b be given.
Assume HB: basis_on X B.
Assume Hb: b B.
We will prove b X.
We prove the intermediate claim H1: (B 𝒫 X (∀xX, ∃b0B, x b0)) (∀b1B, ∀b2B, ∀x : set, x b1x b2∃b3B, x b3 b3 b1 b2).
An exact proof term for the current goal is HB.
We prove the intermediate claim H2: B 𝒫 X (∀xX, ∃b0B, x b0).
An exact proof term for the current goal is (andEL (B 𝒫 X (∀xX, ∃b0B, x b0)) (∀b1B, ∀b2B, ∀x : set, x b1x b2∃b3B, x b3 b3 b1 b2) H1).
We prove the intermediate claim HBPower: B 𝒫 X.
An exact proof term for the current goal is (andEL (B 𝒫 X) (∀xX, ∃b0B, x b0) H2).
We prove the intermediate claim HbPower: b 𝒫 X.
An exact proof term for the current goal is (HBPower b Hb).
An exact proof term for the current goal is (PowerE X b HbPower).