Music generator written in Haskell