Fixed Haskell substring example

[cyborgsphinx]

Doing the drop after the take will result in unexpected strings in all cases except where drop 0 is called