functor
  (I : sig type t val to_string : Int_conversions.Make.t -> string end) ->
  sig
    val to_string_hum : ?delimiter:char -> I.t -> string
    val sexp_of_t : I.t -> Sexplib.Sexp.t
  end