Selection Sort in Haskell