[Haskell-cafe] Randomly balanced binary trees