                            nextCheckpointX nextCheckpointY
                            nextCheckpointDist nextCheckpointAngle
                            opponentX opponentY
-                           x y 
                            boost-used? game-loop-counter)))
         (println "")))

(def game-loop-counter (atom 0))

;;Compute BOOST, SHIELD or boost value between 0 and 100
(defn compute-action [next-checkpoint-x next-checkpoint-y next-checkpoint-distance next-checkpoint-angle opponent-x opponent-y x y boost-used? game-loop-counter]
      (cond 
       (and 
        (not @boost-used?) 
        (> @game-loop-counter max-loop-before-boost) 
        (< (Math/abs next-checkpoint-angle) 10) 
        (> next-checkpoint-distance 4000)) (do (reset! boost-used? true) "BOOST")
       ;(and (> @game-loop-counter max-loop-before-shield) (<= (distance x y opponent-x opponent-y) (+ (* 2 pod-radius) 50))) "SHIELD"    
       true (compute-thrust next-checkpoint-distance next-checkpoint-angle)))

(defn -main [& args]
      (while true

(ns Player
  (:gen-class))

(def checkpoint-core-size 100)

(defn inc-atom [curr-val] (inc curr-val))
(defn dec-atom [curr-val] (dec curr-val))
