This is a solution to the third problem in Round 1A of Google Code Jam 2013 written in Haskell. 
It works fine for the small input, and mostly works for the large input. See link for details.
https://code.google.com/codejam/contest/2418487/dashboard#s=p2

As I attempt to advance to further rounds of code jam, I may add more Haskell solutions later.