let X be finite-dimensional RealLinearSpace; for b being OrdBasis of RLSp2RVSp X
for x being Element of X st dim X <> 0 holds
( (sum_norm (X,b)) . x <= (dim X) * ((max_norm (X,b)) . x) & (max_norm (X,b)) . x <= (euclid_norm (X,b)) . x & (euclid_norm (X,b)) . x <= (sum_norm (X,b)) . x )
let b be OrdBasis of RLSp2RVSp X; for x being Element of X st dim X <> 0 holds
( (sum_norm (X,b)) . x <= (dim X) * ((max_norm (X,b)) . x) & (max_norm (X,b)) . x <= (euclid_norm (X,b)) . x & (euclid_norm (X,b)) . x <= (sum_norm (X,b)) . x )
let x be Element of X; ( dim X <> 0 implies ( (sum_norm (X,b)) . x <= (dim X) * ((max_norm (X,b)) . x) & (max_norm (X,b)) . x <= (euclid_norm (X,b)) . x & (euclid_norm (X,b)) . x <= (sum_norm (X,b)) . x ) )
assume A1:
dim X <> 0
; ( (sum_norm (X,b)) . x <= (dim X) * ((max_norm (X,b)) . x) & (max_norm (X,b)) . x <= (euclid_norm (X,b)) . x & (euclid_norm (X,b)) . x <= (sum_norm (X,b)) . x )
consider x1 being Element of (RLSp2RVSp X), z1 being Element of REAL (dim X) such that
A2:
( x = x1 & z1 = x1 |-- b & (max_norm (X,b)) . x = (max_norm (dim X)) . z1 )
by Def3;
consider x2 being Element of (RLSp2RVSp X), z2 being Element of REAL (dim X) such that
A3:
( x = x2 & z2 = x2 |-- b & (sum_norm (X,b)) . x = (sum_norm (dim X)) . z2 )
by Def4;
consider x3 being Element of (RLSp2RVSp X), z3 being Element of REAL (dim X) such that
A4:
( x = x3 & z3 = x3 |-- b & (euclid_norm (X,b)) . x = |.z3.| )
by Def5;
thus
( (sum_norm (X,b)) . x <= (dim X) * ((max_norm (X,b)) . x) & (max_norm (X,b)) . x <= (euclid_norm (X,b)) . x & (euclid_norm (X,b)) . x <= (sum_norm (X,b)) . x )
by A1, A2, A3, A4, Th14; verum