a command line dice roller in Haskell