[Haskell-beginners] How to move nodes in Data.Tree.Zipper