let y, z be object ; :: according to RELAT_1:def 2 :: thesis: ( [y,z] in F1() iff [y,z] in F2() )
thus ( [y,z] in F1() implies [y,z] in F2() ) by A1, A2; :: thesis: ( [y,z] in F2() implies [y,z] in F1() )
assume [y,z] in F2() ; :: thesis: [y,z] in F1()
hence [y,z] in F1() by A1, A2; :: thesis: verum