x = abs((population(mother,1) - population(father,1))/100

if population(mother,1) > population (father,1)
	if rand < x
		R = population(mother,2)
 	else
		if rand < 0.5
			R = population(father,2)
		else
			R = population(mother,2)
		end
	end
else
	if rand < x
		R = population(father,2)
 	else
		if rand < 0.5
			R = population(mother,2)
		else
			R = population(father,2)
		end
	end
end


if population(mother,1) > population (father,1)
	if rand < x
		R = population(mother,2)
 	else
		if rand < 0.5
			T = population(father,2)
		else
			T = population(mother,2)
		end
	end
else
	if rand < x
		R = population(father,2)
 	else
		if rand < 0.5
			T = population(mother,2)
		else
			T = population(father,2)
		end
	end
end

if population(mother,1) > population (father,1)
	if rand < x
		R = population(mother,2)
 	else
		if rand < 0.5
			W = population(father,2)
		else
			W = population(mother,2)
		end
	end
else
	if rand < x
		R = population(father,2)
 	else
		if rand < 0.5
			W = population(mother,2)
		else
			W = population(father,2)
		end
	end
end