99 probs in Haskell