deffunc H1() -> Consistent Subset of (CQC-WFF Al) = PHI;
deffunc H2( Nat, set ) -> set = $2 \/ (Example_Formulae_of ($1 -th_FCEx Al));
ex f being Function st
( dom f = NAT & f . 0 = H1() & ( for n being Nat holds f . (n + 1) = H2(n,f . n) ) ) from NAT_1:sch 11();
hence ex b1 being Function st
( dom b1 = NAT & b1 . 0 = PHI & ( for n being Nat holds b1 . (n + 1) = (b1 . n) \/ (Example_Formulae_of (n -th_FCEx Al)) ) ) ; :: thesis: verum