sig   module type Type = CaseMap.Type   module Make :     functor (Text : UnicodeString.Type->       sig         type text = Text.t         val lowercase : ?locale:string -> text -> text         val uppercase : ?locale:string -> text -> text         val titlecase : ?locale:string -> text -> text         val casefolding : text -> text         val compare_caseless : text -> text -> int       end end