[Haskell-cafe] Tree Construction