let x, y be Element of F1(); :: according to ABSRED_0:def 26 :: thesis: ( x <=*=> y implies x >><< y )
assume x <=*=> y ; :: thesis: x >><< y
then A3: F2(x) = F2(y) by A2;
take z = F2(x); :: according to ABSRED_0:def 21 :: thesis: ( x =*=> z & z <=*= y )
thus ( x =*=> z & z <=*= y ) by A3, A1; :: thesis: verum