anchor.diff:                          Vertex = #vertex{name=Name} <- Vertices]),
       ets:insert(Ets, {tpos, 0}),
       ets:insert(Ets, {fitness, 0}),
  -    new_block(Ets),
       Res = genetica_utils:repeatedly(?NOF_BLOCKS, fun () -> block_run(Ets) end),
   %    io:format("~p~n", [Res]),
       ets:delete(Ets),
  
positive.code:     ets:insert(Ets, lists:zip(lists:seq(1, ?TRACKER_SIZE),
                                [senses(At, Block) ||
                                    At <- lists:seq(P,P + ?TRACKER_SIZE - 1)])).
  
  %% Speed generated by a motor neuron
  speed(X) when 0.2 =< X, X < 0.5 -> 1;
  speed(X) when 0.5 =< X, X < 0.9 -> 2;
  speed(X) when 0.9 =< X, X < 0.95 -> 3;
  speed(X) when 0.95 =< X -> 4;
  speed(_) -> 0.
  
  actuate(Ets) ->
      [{c, _, #vstate{o = C}}] = ets:lookup(Ets, c),
  
negative.code:             gen_tcp:send(Sock, io_lib:fwrite("~w~n", [Floats])),
              ets:delete_all_objects(genetica_cognitive_ets),
              %% ^ hack, flip over to gen_server for next task.
              Refit = genetica_utils:pmap(fun refit/1, Pop),
              ets:insert(genetica_cognitive_ets, Refit),
              ok
      end.
  
  