thus for c being Element of COMPLEX holds multcomplex . (1,c) = c :: according to BINOP_1:def 7,BINOP_1:def 16 :: thesis: 1 is_a_right_unity_wrt multcomplex

proof

let c be Element of COMPLEX ; :: thesis: multcomplex . (1,c) = c
thus multcomplex . (1,c) = 1 * c by Def5
.= c ; :: thesis: verum

end;

let c be Element of COMPLEX ; :: according to BINOP_1:def 17 :: thesis: multcomplex . (c,1) = c
thus multcomplex . (c,1) = c * 1 by Def5
.= c ; :: thesis: verum