reserve i,i1,i2,i9,i19,j,j1,j2,j9,j19,k,l,m,n for Nat;
reserve r,s,r9,s9 for Real;
reserve D for set,
  f for FinSequence of D,
  G for Matrix of D;
reserve G for Go-board,
  p for Point of TOP-REAL 2;
reserve T for non empty Subset of TOP-REAL 2;
reserve C for
  compact non vertical non horizontal non empty Subset of TOP-REAL 2;
reserve i, j, n for Nat;

theorem
  j <= len Gauge(C,n) implies cell(Gauge(C,n),0,j) misses C
proof
  set G = Gauge(C,n);
  assume
A1: j <= len G;
A2: len G = width G by Def1;
  assume cell(G,0,j) /\ C <> {};
  then consider p such that
A3: p in cell(G,0,j) /\ C by SUBSET_1:4;
A4: p in cell(G,0,j) by A3,XBOOLE_0:def 4;
A5: p in C by A3,XBOOLE_0:def 4;
  4 <= len G by Th10;
  then
A6: 1 <= len G by XXREAL_0:2;
  set W = W-bound C, S = S-bound C, E = E-bound C, N = N-bound C;
  set EW = (E-W)/(2|^n);
  [1,1] in Indices G by A2,A6,MATRIX_0:30;
  then G*(1,1) = |[W+EW*(1-2), S+((N-S)/(2|^n))*(1-2)]| by Def1;
  then
A7: G*(1,1)`1 = W+EW*(-1) by EUCLID:52;
A8: 2|^n > 0 by NEWTON:83;
  E > W by Th8;
  then E-W > 0 by XREAL_1:50;
  then EW > 0 by A8,XREAL_1:139;
  then EW*(-1) < 0 * (-1) by XREAL_1:69;
  then
A9: G*(1,1)`1 < W+0 by A7,XREAL_1:6;
A10: j = 0 or j >= 1+0 by NAT_1:9;
  per cases by A1,A10,XXREAL_0:1;
  suppose j = 0;
    then cell(G,0,j) = { |[r,s]| : r <= G*(1,1)`1 & s <= G*(1,1)`2 }
    by GOBRD11:24;
    then consider r,s such that
A11: p = |[r,s]| and
A12: r <= G*(1,1)`1 and s <= G*(1,1)`2 by A4;
    p`1 = r by A11,EUCLID:52;
    then W > p`1 by A9,A12,XXREAL_0:2;
    hence contradiction by A5,PSCOMP_1:24;
  end;
  suppose j = len G;
    then cell(G,0,j)={ |[r,s]| : r <= G*(1,1)`1 & G*(1,width G)`2 <= s }
    by A2,GOBRD11:25;
    then consider r,s such that
A13: p = |[r,s]| and
A14: r <= G*(1,1)`1 and G*(1,width G)`2 <= s by A4;
    p`1 = r by A13,EUCLID:52;
    then W > p`1 by A9,A14,XXREAL_0:2;
    hence contradiction by A5,PSCOMP_1:24;
  end;
  suppose 1 <= j & j < len G;
    then cell(G,0,j) = { |[r,s]| : r <= G*(1,1)`1 & G*(1,j)`2 <= s & s <=
    G*(1,j+1)`2 } by A2,GOBRD11:26;
    then consider r,s such that
A15: p = |[r,s]| and
A16: r <= G*(1,1)`1 and G*(1,j)`2 <= s
    and s <= G*(1,j+1)`2 by A4;
    p`1 = r by A15,EUCLID:52;
    then W > p`1 by A9,A16,XXREAL_0:2;
    hence contradiction by A5,PSCOMP_1:24;
  end;
end;
