(* Copyright (C) 2007 Mauricio Fernandez <mfp@acm.org> http//eigenclass.org
 * See README.txt and LICENSE for the redistribution and modification terms *)

type t

val make : string -> t
val find : t -> string -> int -> int
val find_end : t -> string -> int -> int