Four in a Row in Haskell!! See http://hackage.haskell.org/package/hfiar