[Haskell-beginners] A simple function V2