sig
  val is_lower : Uucp.uchar -> bool
  val is_upper : Uucp.uchar -> bool
  val is_cased : Uucp.uchar -> bool
  val is_case_ignorable : Uucp.uchar -> bool
  module Map :
    sig
      val to_lower : Uucp.uchar -> [ `Self | `Uchars of Uucp.uchar list ]
      val to_upper : Uucp.uchar -> [ `Self | `Uchars of Uucp.uchar list ]
      val to_title : Uucp.uchar -> [ `Self | `Uchars of Uucp.uchar list ]
    end
  module Fold :
    sig val fold : Uucp.uchar -> [ `Self | `Uchars of Uucp.uchar list ] end
  module Nfkc_fold :
    sig val fold : Uucp.uchar -> [ `Self | `Uchars of Uucp.uchar list ] end
end