An implementation of the boyer moore substring search algorithm in haskell