anchor.diff:                                                  os:timestamp() < EndTime
                                           end}],
                                [Islands]),
  -%%     io_util:printSeq(FinalIslands),
  +    %%     io_util:printSeq(FinalIslands),
       misc_util:result(lists:flatten(FinalIslands)).
   
   %% sk_sendToWork({death, _}) ->
  
positive.code:                        Log,
                         Filter,
                         Work,
                         Shuffle]}],
          %% TODO dopisac migracje przy uzyciu funkcji z sequential
  %%               fun(Datachunk) ->
  %%                       {_NrOfEmigrants, IslandsMigrated} = evolution:doMigrate(Datachunk),
  %%                       IslandsMigrated
  %%               end,
                fun identity/1,
                fun identity/1},
  
      [FinalIslands] = skel:do([{feedback,
                                 [OneRun],
                                 _While = fun(List) ->
                                                  Fitness = lists:max([misc_util:result(Island) || Island <- List]),
                                                  Population = lists:sum([length(Island) || Island <- List]),
  
negative.code:                                         Island)
                     end},
  
      Work = {map,
              [{seq,fun emas:meeting_function/1}], %% TODO substitute emas with agent_env!!!
              4},
  
      Shuffle = {seq, fun(Island) ->
                              misc_util:shuffle(lists:flatten(Island))
  