Fixes typo in Haskell sort