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