an ascii gameoflife written in haskell