[Haskell-beginners] constant set