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