Paul Hsieh hashing snippet
Trying to learn Haskell with Project Euler