Tetris, in clojure