[Haskell-beginners] hanoi 4 problem