let int32_interval_list ?(bump = Int32.one) ~min ~max () =
    interval_list ~bump:(Int32.add bump) ~min ~max ()