for (y = Bottom; y > 1; y--) {
  if ([1,y-1] == [1,y]) {
    [2,y-1] = [2,y-1] + "/" + [2,y];
    [2,y] = "";
  }
}