let A be non empty set ; :: thesis: for h, f being Element of Funcs A,COMPLEX
for a being Complex holds
( h = (ComplexFuncExtMult A) . [a,f] iff for x being Element of A holds h . x = a * (f . x) )
let h, f be Element of Funcs A,COMPLEX ; :: thesis: for a being Complex holds
( h = (ComplexFuncExtMult A) . [a,f] iff for x being Element of A holds h . x = a * (f . x) )
let a be Complex; :: thesis: ( h = (ComplexFuncExtMult A) . [a,f] iff for x being Element of A holds h . x = a * (f . x) )
thus ( h = (ComplexFuncExtMult A) . [a,f] implies for x being Element of A holds h . x = a * (f . x) ) by Def3; :: thesis: ( ( for x being Element of A holds h . x = a * (f . x) ) implies h = (ComplexFuncExtMult A) . [a,f] )

now

assume A1: for x being Element of A holds h . x = a * (f . x) ; :: thesis: h = (ComplexFuncExtMult A) . [a,f]
for x being Element of A holds h . x = ((ComplexFuncExtMult A) . [a,f]) . x

proof

let x be Element of A; :: thesis: h . x = ((ComplexFuncExtMult A) . [a,f]) . x
thus h . x = a * (f . x) by A1
.= ((ComplexFuncExtMult A) . [a,f]) . x by Def3 ; :: thesis: verum

end;

hence h = (ComplexFuncExtMult A) . [a,f] by FUNCT_2:113; :: thesis: verum

end;

hence ( ( for x being Element of A holds h . x = a * (f . x) ) implies h = (ComplexFuncExtMult A) . [a,f] ) ; :: thesis: verum