A5: F2() in succ F2() by ORDINAL1:6;
consider fi being Ordinal-Sequence such that
A6: dom fi = succ F2() and
A7: ( 0 in succ F2() implies fi . 0 = F4() ) and
A8: for C being Ordinal st succ C in succ F2() holds
fi . (succ C) = F5(C,(fi . C)) and
A9: for C being Ordinal st C in succ F2() & C <> 0 & C is limit_ordinal holds
fi . C = F6(C,(fi | C)) from ORDINAL2:sch 11();
set psi = fi | F2();
A10: for A, B being Ordinal holds
( B = F3(A) iff ex fi being Ordinal-Sequence st
( B = last fi & dom fi = succ A & fi . 0 = F4() & ( for C being Ordinal st succ C in succ A holds
fi . (succ C) = F5(C,(fi . C)) ) & ( for C being Ordinal st C in succ A & C <> 0 & C is limit_ordinal holds
fi . C = F6(C,(fi | C)) ) ) ) by A1;
A11: for B being Ordinal st B in dom fi holds
fi . B = F3(B) from ORDINAL2:sch 12(A10, A6, A7, A8, A9);
A12: now :: thesis: for x being object st x in F2() holds
(fi | F2()) . x = F1() . x
let x be object ; :: thesis: ( x in F2() implies (fi | F2()) . x = F1() . x )
assume A13: x in F2() ; :: thesis: (fi | F2()) . x = F1() . x
then reconsider x9 = x as Ordinal ;
thus (fi | F2()) . x = fi . x9 by A13, FUNCT_1:49
.= F3(x9) by A6, A11, A5, A13, ORDINAL1:10
.= F1() . x by A4, A13 ; :: thesis: verum
end;
F2() c= dom fi by A6, A5, ORDINAL1:def 2;
then dom (fi | F2()) = F2() by RELAT_1:62;
then fi | F2() = F1() by A3, A12, FUNCT_1:2;
then fi . F2() = F6(F2(),F1()) by A2, A9, ORDINAL1:6;
hence F3(F2()) = F6(F2(),F1()) by A6, A11, ORDINAL1:6; :: thesis: verum