anchor.diff:                           [{Home, A} || A <- NewAgents]
                    end },
   
  -    Shuffle = {seq, fun(Agents) ->
  -                            seed_random_once_per_process(),
  -                            mas_misc_util:shuffle(lists:flatten(Agents))
  -                    end},
  -
       Map = case Cf#config.skel_pull of
                 enable ->
                     {map, [Work], Workers, pull};
  
positive.code:             end,
  
      TMGLS = fun (Agents) ->
                      Tagged = lists:map(TagFun,
                                         Agents),
                      Migrated = lists:map(MigrateFun,
                                           Tagged),
                      Grouped = GroupFun(Migrated),
                      LogFun(Grouped),
                      Split(Grouped)
              end,
  
  
      Work = {seq, fun({{Home, Behaviour}, Agents}) ->
                           seed_random_once_per_process(),
  
negative.code:                   {map, [Work], Workers}
            end,
  
      Workflow = {pipe, [{seq, TMGLS}, Map]},
  
      FinalIslands = skel:do([{feedback,
                                 [Workflow],
                                 _While = fun(_Agents) ->
                                                  os:timestamp() < EndTime
                                          end}],
                               [Population]),
      _FinalAgents =
          [Agent || {_Island, Agent} <- lists:flatten(FinalIslands)].
  
  
  %% ====================================================================
  