let X be non empty set ; :: thesis: for Y being ComplexNormSpace
for f, h being VECTOR of (C_VectorSpace_of_BoundedFunctions (X,Y))
for f9, h9 being bounded Function of X, the carrier of Y st f9 = f & h9 = h holds
for c being Complex holds
( h = c * f iff for x being Element of X holds h9 . x = c * (f9 . x) )
let Y be ComplexNormSpace; :: thesis: for f, h being VECTOR of (C_VectorSpace_of_BoundedFunctions (X,Y))
for f9, h9 being bounded Function of X, the carrier of Y st f9 = f & h9 = h holds
for c being Complex holds
( h = c * f iff for x being Element of X holds h9 . x = c * (f9 . x) )
let f, h be VECTOR of (C_VectorSpace_of_BoundedFunctions (X,Y)); :: thesis: for f9, h9 being bounded Function of X, the carrier of Y st f9 = f & h9 = h holds
for c being Complex holds
( h = c * f iff for x being Element of X holds h9 . x = c * (f9 . x) )
let f9, h9 be bounded Function of X, the carrier of Y; :: thesis: ( f9 = f & h9 = h implies for c being Complex holds
( h = c * f iff for x being Element of X holds h9 . x = c * (f9 . x) ) )
assume A1: ( f9 = f & h9 = h ) ; :: thesis: for c being Complex holds
( h = c * f iff for x being Element of X holds h9 . x = c * (f9 . x) )
let c be Complex; :: thesis: ( h = c * f iff for x being Element of X holds h9 . x = c * (f9 . x) )
A2: C_VectorSpace_of_BoundedFunctions (X,Y) is Subspace of ComplexVectSpace (X,Y) by Th7, CSSPACE:11;
then reconsider f1 = f, h1 = h as VECTOR of (ComplexVectSpace (X,Y)) by CLVECT_1:29;

A3: now :: thesis: ( h = c * f implies for x being Element of X holds h9 . x = c * (f9 . x) )

assume A4: h = c * f ; :: thesis: for x being Element of X holds h9 . x = c * (f9 . x)
let x be Element of X; :: thesis: h9 . x = c * (f9 . x)
h1 = c * f1 by A2, A4, CLVECT_1:33;
hence h9 . x = c * (f9 . x) by A1, CLOPBAN1:12; :: thesis: verum

end;

now :: thesis: ( ( for x being Element of X holds h9 . x = c * (f9 . x) ) implies h = c * f )

assume for x being Element of X holds h9 . x = c * (f9 . x) ; :: thesis: h = c * f
then h1 = c * f1 by A1, CLOPBAN1:12;
hence h = c * f by A2, CLVECT_1:33; :: thesis: verum

end;

hence ( h = c * f iff for x being Element of X holds h9 . x = c * (f9 . x) ) by A3; :: thesis: verum