hanoi_moves.hs