let gb_cell (x,y) =
  (x / gr_unit, y / gr_unit)