assume
F5() <> F6()
; :: thesis: contradiction
then consider a being set such that
A9:
( a in F1() & F5() . a <> F6() . a )
by A1, A5, FUNCT_1:9;
defpred S1[ set ] means F5() . $1 <> F6() . $1;
consider X being set such that
A10:
for Y being set holds
( Y in X iff ( Y in F1() & S1[Y] ) )
from XBOOLE_0:sch 1();
A11:
X <> {}
by A9, A10;
for b being set st b in X holds
b in F1()
by A10;
then
X c= F1()
by TARSKI:def 3;
then consider B being Ordinal such that
A12:
( B in X & ( for C being Ordinal st C in X holds
B c= C ) )
by A11, ORDINAL1:32;
A13:
( B in F1() & F5() . B <> F6() . B )
by A10, A12;
then A14:
B c= F1()
by ORDINAL1:def 2;
A17:
( dom (F5() | B) = B & dom (F6() | B) = B )
by A1, A5, A14, RELAT_1:91;
hence
contradiction
by A2, A6, A10, A12, A21; :: thesis: verum