Mercurial > cortex
comparison org/movement.org @ 460:763d13f77e03
merge in laptop changes.
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Thu, 27 Mar 2014 17:57:01 -0400 |
parents | 5205535237fb |
children |
comparison
equal
deleted
inserted
replaced
459:a86555b02916 | 460:763d13f77e03 |
---|---|
281 (defn combine-images [] | 281 (defn combine-images [] |
282 (let [main-view (pics "main-view") | 282 (let [main-view (pics "main-view") |
283 muscles (pics "muscles/0") | 283 muscles (pics "muscles/0") |
284 targets (map | 284 targets (map |
285 #(File. (str base "out/" (format "%07d.png" %))) | 285 #(File. (str base "out/" (format "%07d.png" %))) |
286 (range 0 (count main-view)))] | 286 (range (count main-view)))] |
287 (dorun | 287 (dorun |
288 (pmap | 288 (pmap |
289 (comp | 289 (comp |
290 (fn [[ main-view muscles target]] | 290 (fn [[ main-view muscles target]] |
291 (println target) | 291 (println target) |