[Haskell-cafe] Removing alternate items from a list