Evol IPD: ModelSwarm (2)
[randomGenerator setStateFromSeed: randomSeed];
numPlayers = n0+n1+n2+n3;
popList = [List create: self];
newList = [List create: self];
for (pt = 0; pt < 4; pt++)
for (i = 0; i < num[pt]; i++) {
aPlayer = [Player createBegin: self];
[aPlayer setPlayerType: pt];
aPlayer = [aPlayer createEnd];
[popList addLast: aPlayer];