let X, Y be ComplexNormSpace; :: thesis: for f being Point of (C_NormSpace_of_BoundedLinearOperators X,Y) st f = 0. (C_NormSpace_of_BoundedLinearOperators X,Y) holds
0 = ||.f.||
let f be Point of (C_NormSpace_of_BoundedLinearOperators X,Y); :: thesis: ( f = 0. (C_NormSpace_of_BoundedLinearOperators X,Y) implies 0 = ||.f.|| )
assume A1: f = 0. (C_NormSpace_of_BoundedLinearOperators X,Y) ; :: thesis: 0 = ||.f.||
thus ||.f.|| = 0 :: thesis: verum

proof

set z = the carrier of X --> (0. Y);
reconsider z = the carrier of X --> (0. Y) as Function of the carrier of X,the carrier of Y ;
reconsider g = f as bounded LinearOperator of X,Y by Def8;
A2: z = g by A1, Th35;

A3: now

let r be Real; :: thesis: ( r in PreNorms g implies ( 0 <= r & r <= 0 ) )
assume A4: r in PreNorms g ; :: thesis: ( 0 <= r & r <= 0 )
consider t being VECTOR of X such that
A5: ( r = ||.(g . t).|| & ||.t.|| <= 1 ) by A4;
||.(g . t).|| = ||.(0. Y).|| by A2, FUNCOP_1:13
.= 0 by CLVECT_1:def 11 ;
hence ( 0 <= r & r <= 0 ) by A5; :: thesis: verum

end;

A6: ( not PreNorms g is empty & PreNorms g is bounded_above ) by Th30;
consider r0 being set such that
A7: r0 in PreNorms g by XBOOLE_0:def 1;
reconsider r0 = r0 as Real by A7;
A8: ( 0 <= r0 & r0 <= 0 ) by A3, A7;
( ( for s being real number st s in PreNorms g holds
s <= 0 ) implies sup (PreNorms g) <= 0 ) by SEQ_4:62;
then sup (PreNorms g) = 0 by A3, A6, A7, A8, SEQ_4:def 4;
then (BoundedLinearOperatorsNorm X,Y) . f = 0 by Th34;
hence ||.f.|| = 0 by CLVECT_1:def 10; :: thesis: verum

end;