Mercurial > cortex
comparison org/self_organizing_touch.clj @ 430:5205535237fb
fix skew in self-organizing-touch, work on thesis.
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Sat, 22 Mar 2014 16:10:34 -0400 |
parents | cc9957241076 |
children | f339e3d5cc8c |
comparison
equal
deleted
inserted
replaced
429:b5d0f0adf19f | 430:5205535237fb |
---|---|
60 (defn worm-segment-defaults [] | 60 (defn worm-segment-defaults [] |
61 (let [direct-control (worm-direct-control worm-muscle-labels 40)] | 61 (let [direct-control (worm-direct-control worm-muscle-labels 40)] |
62 (merge (worm-world-defaults) | 62 (merge (worm-world-defaults) |
63 {:worm-model single-worm-segment | 63 {:worm-model single-worm-segment |
64 :view single-worm-segment-view | 64 :view single-worm-segment-view |
65 :experience-watch nil | |
65 :motor-control | 66 :motor-control |
66 (motor-control-program | 67 (motor-control-program |
67 worm-single-segment-muscle-labels | 68 worm-single-segment-muscle-labels |
68 (touch-kinesthetics)) | 69 (touch-kinesthetics)) |
69 :end-frame 1200}))) | 70 :end-frame 1200}))) |