defpred S1[ complex number , complex number , set ] means $3 = F1($1,$2);
A1:
for x, y being Element of COMPLEX ex z being Element of COMPLEX st S1[x,y,z]
consider f being Function of [:COMPLEX ,COMPLEX :],COMPLEX such that
W:
for x, y being Element of COMPLEX holds S1[x,y,f . x,y]
from BINOP_1:sch 3(A1);
take
f
; for x, y being complex number holds f . x,y = F1(x,y)
let x, y be complex number ; f . x,y = F1(x,y)
reconsider x = x, y = y as Element of COMPLEX by XCMPLX_0:def 2;
S1[x,y,f . x,y]
by W;
then
f . x,y = F1(x,y)
;
hence
f . x,y = F1(x,y)
; verum