scheme :: GRZLOG_1:sch 3
BinOpCongr{ F1() -> non empty set , F2( Element of F1(), Element of F1()) -> Element of F1(), F3() -> Equivalence_Relation of F1() } :
ex f being BinOp of (Class F3()) st
for x, y being Element of F1() holds f . ((Class (F3(),x)),(Class (F3(),y))) = Class (F3(),F2(x,y))
provided
A1: for x1, x2, y1, y2 being Element of F1() st [x1,x2] in F3() & [y1,y2] in F3() holds
[F2(x1,y1),F2(x2,y2)] in F3()