[Haskell-cafe] list comprehansion performance has hug different