Functor Sosa.Make_split_function (.ml)

module Make_split_function: 
functor (S : T_LENGTH_SUB_AND_SEARCH) -> sig .. end

val split : S.t -> on:[< `Character of S.character | `String of S.t ] -> S.t list