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;
reserve f for non constant standard special_circular_sequence;

theorem Th38:
  for i being Nat st 1 < i & i <= len f & f/.i = f/.1
  holds i = len f
proof
  let i be Nat such that
A1: 1 < i and
A2: i <= len f and
A3: f/.i = f/.1;
  assume i <> len f;
  then i < len f by A2,XXREAL_0:1;
  hence contradiction by A1,A3,Th36;
end;
