let int_interval_list ?(bump = 1) ~min ~max () =
    interval_list ~bump:((+) bump) ~min ~max ()