theorem
  1 <= i & i+1 <= len G implies LSeg(p,1/2*(G*(i,width G)+G*(i+1,width G
  ))+|[0,1]|) meets Int cell(G,i,width G)
proof
  assume
A1: 1 <= i & i+1 <= len G;
  now
    take a = 1/2*(G*(i,width G)+G*(i+1,width G))+|[0,1]|;
    thus a in LSeg(p,1/2*(G*(i,width G)+G*(i+1,width G))+|[0,1]|) by
RLTOPSP1:68;
    thus a in Int cell(G,i,width G) by A1,Th32;
  end;
  hence thesis by XBOOLE_0:3;
end;
