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