sig
  type t
  val of_int_exn : int -> Intable.S.t
  val to_int_exn : Intable.S.t -> int
end