type block = {first : int;last : int;
}type t = | Every| Blocks of block list
include Ppx_compare_lib.Comparable.S with type t := t
val compare : t Base__Ppx_compare_lib.compareinclude Ppx_compare_lib.Equal.S with type t := t
val equal : t Base__Ppx_compare_lib.equal