Classic Tower of Hanoi in Haskell