[Haskell-beginners] Picking a random element from a Map