let C1, C2, C3 be non empty set ; :: thesis: for f being RMembership_Func of C1,C2 holds f (#) (Zmf C2,C3) = Zmf C1,C3
let f be RMembership_Func of C1,C2; :: thesis: f (#) (Zmf C2,C3) = Zmf C1,C3
A1: ( dom (f (#) (Zmf C2,C3)) = [:C1,C3:] & dom (Zmf C1,C3) = [:C1,C3:] ) by FUNCT_2:def 1;
for c being Element of [:C1,C3:] st c in [:C1,C3:] holds
(f (#) (Zmf C2,C3)) . c = (Zmf C1,C3) . c

proof

let c be Element of [:C1,C3:]; :: thesis: ( c in [:C1,C3:] implies (f (#) (Zmf C2,C3)) . c = (Zmf C1,C3) . c )
consider x, z being set such that
A2: ( x in C1 & z in C3 & c = [x,z] ) by ZFMISC_1:def 2;
(f (#) (Zmf C2,C3)) . c = (f (#) (Zmf C2,C3)) . x,z by A2
.= sup (rng (min f,(Zmf C2,C3),x,z)) by A2, Def3
.= (Zmf C1,C3) . c by A2, Lm7 ;
hence ( c in [:C1,C3:] implies (f (#) (Zmf C2,C3)) . c = (Zmf C1,C3) . c ) ; :: thesis: verum

end;

hence f (#) (Zmf C2,C3) = Zmf C1,C3 by A1, PARTFUN1:34; :: thesis: verum