Programa de controle de som em Haskell
