RT @importantshock: God, I love Haskell: replace one `map` with a `parMap rseq`, run with -N8, and get a 718% speedup.