 (ns tic-tac-toe.core
   (:gen-class))
 
-(defn -main
-  "I don't do a whole lot ... yet."
-  [& args]
-  (println "Hello, World!"))
 
 (def blank-board
   [\- \- \-

  (doseq [row (partition 3 board)]
    (println (apply str row))))

(defn possible-moves [board player]
  (doseq [pos (available-squares board)]
    (println)
    (print-board (place-piece board player pos))))

   \- \o \-
   \- \- \-])

(def board-x-wins
  [\x \- \o
   \- \x \o
   \- \- \x])

(def board-o-wins
  [\x \- \o
   \- \x \o
   \- \- \o])

(def board-draw
  [\x \o \o
   \o \x \x
   \x \o \o])

(def poses (range 9))

