[Haskell-cafe] profiling uniplate