A5: for A being Ordinal
for x being set holds
( x = F3(A) iff ex L being T-Sequence st
( x = last L & dom L = succ A & L . {} = F4() & ( for C being Ordinal st succ C in succ A holds
L . (succ C) = F5(C,(L . C)) ) & ( for C being Ordinal st C in succ A & C <> {} & C is limit_ordinal holds
L . C = F6(C,(L | C)) ) ) ) by A1;
consider L being T-Sequence such that
A6: dom L = succ F2() and
A7: ( {} in succ F2() implies L . {} = F4() ) and
A8: for C being Ordinal st succ C in succ F2() holds
L . (succ C) = F5(C,(L . C)) and
A9: for C being Ordinal st C in succ F2() & C <> {} & C is limit_ordinal holds
L . C = F6(C,(L | C)) from ORDINAL2:sch 5();
A10: for B being Ordinal st B in dom L holds
L . B = F3(B) from ORDINAL2:sch 6(A5, A6, A7, A8, A9);
set L1 = L | F2();
A11: F2() in succ F2() by ORDINAL1:10;
then F2() c= dom L by A6, ORDINAL1:def 2;
then A12: dom (L | F2()) = F2() by RELAT_1:91;
now
let x be set ; :: thesis: ( x in F2() implies (L | F2()) . x = F1() . x )
assume A13: x in F2() ; :: thesis: (L | F2()) . x = F1() . x
then reconsider x' = x as Ordinal ;
thus (L | F2()) . x = L . x' by A13, FUNCT_1:72
.= F3(x') by A6, A10, A11, A13, ORDINAL1:19
.= F1() . x by A4, A13 ; :: thesis: verum
end;
then L | F2() = F1() by A3, A12, FUNCT_1:9;
then L . F2() = F6(F2(),F1()) by A2, A9, ORDINAL1:10;
hence F3(F2()) = F6(F2(),F1()) by A6, A10, ORDINAL1:10; :: thesis: verum