     ))
 
 (defn optmize-ai-scores-ai
+  "Create an AI strategy to optmize the AI scores: good cheat when the player wins"
   []
   (reify minimax/AIStrategy
     (eval-turn [this turn] (eval-next-score-of this turn [:red :green]))

    ))

(defn optimize-own-choices-ai
  [player]
  (reify minimax/AIStrategy
    (eval-turn [_ turn]

      )))

(defn optimize-own-score-ai
  "Create an AI strategy to optmize its own score: good late game play"
  [player]
  (reify minimax/AIStrategy
    (eval-turn [this turn] (eval-next-score-of this turn [player]))
