static Animation reproduceRasterBars(IBWIntegralImage ii) {
  var thinImage = scaledBWImageFromBWIntegralImage_withMeta(ii, 1, ii.getHeight());
  var streaks = streaksOfRepeatingElements(listFromFunction(thinImage.getHeight(), y -> thinImage.getByte(0, y)));
  print(+streaks);
  ret new Animation(ii.getWidth(), ii.getHeight()) {
    void paint {
      for (streak : streaks)
        fillRect(g, 0, streak.a.start, w, l(streak.a), grayToColor(streak.b));
    }
  };
}