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