let j, n be Nat; :: thesis: for T being non empty Subset of (TOP-REAL 2) st 1 <= j & j <= len (Gauge (T,n)) holds
((Gauge (T,n)) * (2,j)) `1 = W-bound T
let T be non empty Subset of (TOP-REAL 2); :: thesis: ( 1 <= j & j <= len (Gauge (T,n)) implies ((Gauge (T,n)) * (2,j)) `1 = W-bound T )
set G = Gauge (T,n);
set W = W-bound T;
set S = S-bound T;
set E = E-bound T;
set N = N-bound T;
assume that
A1: 1 <= j and
A2: j <= len (Gauge (T,n)) ; :: thesis: ((Gauge (T,n)) * (2,j)) `1 = W-bound T
A3: len (Gauge (T,n)) = width (Gauge (T,n)) by Def1;
len (Gauge (T,n)) >= 4 by Th10;
then 2 <= len (Gauge (T,n)) by XXREAL_0:2;
then [2,j] in Indices (Gauge (T,n)) by A1, A2, A3, MATRIX_0:30;
then (Gauge (T,n)) * (2,j) = |[((W-bound T) + ((((E-bound T) - (W-bound T)) / (2 |^ n)) * (2 - 2))),((S-bound T) + ((((N-bound T) - (S-bound T)) / (2 |^ n)) * (j - 2)))]| by Def1;
hence ((Gauge (T,n)) * (2,j)) `1 = W-bound T by EUCLID:52; :: thesis: verum