sig
  type t = Uucp.uchar
  val min : Uucp.uchar
  val max : Uucp.uchar
  val is_uchar : int -> bool
  val succ : Uucp.uchar -> Uucp.uchar
  val pred : Uucp.uchar -> Uucp.uchar
  val of_int : int -> Uucp.uchar
  val unsafe_of_int : int -> Uucp.Uchar.t
  val to_int : Uucp.uchar -> int
  val equal : Uucp.uchar -> Uucp.uchar -> bool
  val compare : Uucp.uchar -> Uucp.uchar -> int
  val fold : ('-> Uucp.uchar -> 'a) -> '-> 'a
  val iter : (Uucp.uchar -> unit) -> unit
  val pp : Format.formatter -> Uucp.uchar -> unit
end