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