sub get_nonrandom_chromosome {

        ### get_population_fitness_score()            ###
        ### calculates the score for every chromosome ###

	my $population_fitness_score = get_population_fitness_score();
	my $rulet_position           = rand($population_fitness_score);
	my $temp_score               = 0;
	my $nonrandom_chromosome;
	foreach my $chromosome (@population) {

                 ### you then REcalculate them individually here ###

		$temp_score += get_fitness_score($chromosome);
		if ( $temp_score > $rulet_position ) {
			$nonrandom_chromosome = $chromosome;
			last;
		}
	}
	return ($nonrandom_chromosome);
}