reserve f for non empty FinSequence of TOP-REAL 2,
  i,j,k,k1,k2,n,i1,i2,j1,j2 for Nat,
  r,s,r1,r2 for Real,
  p,q,p1,q1 for Point of TOP-REAL 2,
  G for Go-board;

theorem Th1:
  |.r1-r2.| > s implies r1+s < r2 or r2+s < r1
proof
  assume
A1: |.r1-r2.| > s;
  now
    per cases;
    case
      r1 < r2;
      then r1 - r2 < 0 by XREAL_1:49;
      then |.r1-r2.| = -(r1-r2) by ABSVALUE:def 1
        .= r2 - r1;
      hence r1+s < r2 by A1,XREAL_1:20;
    end;
    case
      r2 <= r1;
      then r1 - r2 >= 0 by XREAL_1:48;
      then |.r1-r2.| = r1 - r2 by ABSVALUE:def 1;
      hence r2+s < r1 by A1,XREAL_1:20;
    end;
  end;
  hence thesis;
end;
