let S be non empty set ; for R being total Relation of S,S ex o being BinOp of (ModelSP S) st
for f, g being set st f in ModelSP S & g in ModelSP S holds
o . f,g = EUntill_0 f,g,R
let R be total Relation of S,S; ex o being BinOp of (ModelSP S) st
for f, g being set st f in ModelSP S & g in ModelSP S holds
o . f,g = EUntill_0 f,g,R
set M = ModelSP S;
deffunc H1( Element of ModelSP S, Element of ModelSP S) -> Element of ModelSP S = EUntill_0 $1,$2,R;
consider o being BinOp of (ModelSP S) such that
A1:
for f, g being Element of ModelSP S holds o . f,g = H1(f,g)
from BINOP_1:sch 4();
for f, g being set st f in ModelSP S & g in ModelSP S holds
o . f,g = EUntill_0 f,g,R
by A1;
hence
ex o being BinOp of (ModelSP S) st
for f, g being set st f in ModelSP S & g in ModelSP S holds
o . f,g = EUntill_0 f,g,R
; verum