sig
  type t
  val study : string -> StrExtras.FastSearch.t
  val index : StrExtras.FastSearch.t -> string -> int
  val index_from : StrExtras.FastSearch.t -> string -> int -> int
end