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); :: thesis: verum