Skip to content
Browse files

updating prisoner

  • Loading branch information...
1 parent 7a0b254 commit 38cfece2af57efdd38a0a3a1b38ad150075e77cb @psholtz committed May 7, 2012
Showing with 3 additions and 1 deletion.
  1. +3 −1 Projects-S2005/Project2/clojure/prisoner.clj
View
4 Projects-S2005/Project2/clojure/prisoner.clj
@@ -7,7 +7,9 @@
;; returns either a "c" for cooperate or a "d" for defect.
;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-(defn play-loop [strat0 strat1]
+(defn
+ ^{:doc "Model a game of roughly 100 plays between two strategies."}
+ play-loop [strat0 strat1]
(defn play-loop-iter [strat0 strat1 count history0 history1 limit]
(cond (= count limit) (print-out-results history0 history1 limit)
:else

0 comments on commit 38cfece

Please sign in to comment.
Something went wrong with that request. Please try again.