Solved 201, but it is slow, even with STUArrays.
Sped up 201.
Manhandled 201.hs into being pretty fast. Not my idea of beautiful code, but it's pretty zippy for Haskell.