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