[Haskell-beginners] set multiplication