[Haskell-beginners] sorting almost sorted list