[Haskell-cafe] I need help on AVL trees