########################################
########################################
# change number of individuals
#
########################################
set save_cwd = `execute("oppwf")`  # note where we were
opcf /obj  # move into "object" directory
for i = $pop_size to `$pop_size+$change-1`
  opcp prototype geno$i     # make copy of original prototype object
  opset -d on geno$i   # turn blue display flag on
  oplocate -d -x 1 -y 0 geno$i  # position tile
end  # for i loop

setenv pop_size = $new_size
varchange  # tell everything to update
opcf $save_cwd  # back to where we were before we got here

########################################
########################################