scheme :: FRAENKEL:sch 19
FrEqua1{ F1() -> set , F2() -> set , F3( object , object ) -> object , F4() -> Element of F2(), P1[ object , object ], P2[ object , object ] } :
{ F3(s,t) where s is Element of F1(), t is Element of F2() : P2[s,t] } = { F3(s9,F4()) where s9 is Element of F1() : P1[s9,F4()] }
provided
A1: for s being Element of F1()
for t being Element of F2() holds
( P2[s,t] iff ( t = F4() & P1[s,t] ) )