On 24/08/12 18:24, nicolas.o...@gmail.com wrote:
(defn score-by-count ^long [b dir]
(let [ hm (into [] (core/gather-team b dir))
aw (into [] (core/gather-team b (unchecked-negate dir)))]
(unchecked-subtract (count hm)
(count aw
(defn counting-accumulator [a
> (defn score-by-count ^long [b dir]
> (let [ hm (into [] (core/gather-team b dir))
>aw (into [] (core/gather-team b (unchecked-negate dir)))]
> (unchecked-subtract (count hm)
> (count aw
>
(defn counting-accumulator [acc _]
(inc acc))
(defn score-by-count ^lo
On 24/08/12 16:41, nicolas.o...@gmail.com wrote:
(and creates vectors via (into [] (r/map )))
Depending of your method of scoring, you could try to do it just with a reducer.
(Without creating a vector with it).
but i am doing it with a reducer (the mapping) , however after that i
need
> (and creates vectors via (into [] (r/map )))
Depending of your method of scoring, you could try to do it just with a reducer.
(Without creating a vector with it).
If your code does not spend its time in GC (can be seen in the first
pane), CPU sampling might be a better place to look.
--
