Función de las torres de Hanoi en Haskell