defpred S1[ set , set , set ] means $3 = F4($1,$2);
A2:
for x, y being set st x in F1() & y in F2() holds
ex z being set st
( z in F3() & S1[x,y,z] )
by A1;
thus
ex f being Function of [:F1(),F2():],F3() st
for x, y being set st x in F1() & y in F2() holds
S1[x,y,f . x,y]
from BINOP_1:sch 1(A2); verum