Simple blocks clone in Haskell. Basics working but still stuff to do.