[Haskell-beginners] Diamantina - Lista aprovados