evosynth 0.1.0

data/test/coverage.rb

@@ -0,0 +1,43 @@
+#	Copyright (c) 2009, 2010 Yves Adler <yves.adler@googlemail.com>
+#
+#	Permission is hereby granted, free of charge, to any person
+#	obtaining a copy of this software and associated documentation
+#	files (the "Software"), to deal in the Software without
+#	restriction, including without limitation the rights to use,
+#	copy, modify, merge, publish, distribute, sublicense, and/or sell
+#	copies of the Software, and to permit persons to whom the
+#	Software is furnished to do so, subject to the following
+#	conditions:
+#
+#	The above copyright notice and this permission notice shall be
+#	included in all copies or substantial portions of the Software.
+#
+#	THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+#	EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
+#	OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+#	NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
+#	HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+#	WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+#	FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+#	OTHER DEALINGS IN THE SOFTWARE.
+
+
+def add_path_to_load_path(path)
+	filename = File.dirname(__FILE__)
+	pathname = File.expand_path(File.join(filename, path))
+	$LOAD_PATH.unshift(pathname) unless $LOAD_PATH.include?(pathname)
+
+end
+
+add_path_to_load_path('../lib')
+add_path_to_load_path('.')
+
+
+require 'ts_adjustments'
+require 'ts_core'
+require 'ts_global_recombinations'
+require 'ts_mutations'
+require 'ts_mutations'
+require 'ts_recombinations'
+require 'ts_selections'
+require 'ts_util'

data/test/decoder/tc_binary_to_real.rb

@@ -0,0 +1,52 @@
+#	Copyright (c) 2009, 2010 Yves Adler <yves.adler@googlemail.com>
+#
+#	Permission is hereby granted, free of charge, to any person
+#	obtaining a copy of this software and associated documentation
+#	files (the "Software"), to deal in the Software without
+#	restriction, including without limitation the rights to use,
+#	copy, modify, merge, publish, distribute, sublicense, and/or sell
+#	copies of the Software, and to permit persons to whom the
+#	Software is furnished to do so, subject to the following
+#	conditions:
+#
+#	The above copyright notice and this permission notice shall be
+#	included in all copies or substantial portions of the Software.
+#
+#	THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+#	EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
+#	OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+#	NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
+#	HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+#	WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+#	FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+#	OTHER DEALINGS IN THE SOFTWARE.
+
+
+require 'shoulda'
+
+require 'evosynth'
+
+
+class BinaryToRealTest < Test::Unit::TestCase
+
+	should "decode [0,0,0,0,0] to lower bound" do
+		binary = [0,0,0,0,0]
+		assert_equal -5, EvoSynth::Decoder.binary_to_real(binary, -5.0, 5.0)
+	end
+
+	should "decode [1,1,1,1,1] to upper bound" do
+		binary = [1,1,1,1,1]
+		assert_equal 5, EvoSynth::Decoder.binary_to_real(binary, -5, 5)
+	end
+
+	should "decode [true,false,false,false,false] to lower bound" do
+		binary = [false,false,false,false,false]
+		assert_equal -5, EvoSynth::Decoder.binary_to_real(binary, -5.0, 5.0)
+	end
+
+	should "decode [true,true,true,true,true] to upper bound" do
+		binary = [true,true,true,true,true]
+		assert_equal 5, EvoSynth::Decoder.binary_to_real(binary, -5, 5)
+	end
+
+end

data/test/decoder/tc_gray.rb

@@ -0,0 +1,107 @@
+#	Copyright (c) 2009, 2010 Yves Adler <yves.adler@googlemail.com>
+#
+#	Permission is hereby granted, free of charge, to any person
+#	obtaining a copy of this software and associated documentation
+#	files (the "Software"), to deal in the Software without
+#	restriction, including without limitation the rights to use,
+#	copy, modify, merge, publish, distribute, sublicense, and/or sell
+#	copies of the Software, and to permit persons to whom the
+#	Software is furnished to do so, subject to the following
+#	conditions:
+#
+#	The above copyright notice and this permission notice shall be
+#	included in all copies or substantial portions of the Software.
+#
+#	THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+#	EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
+#	OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+#	NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
+#	HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+#	WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+#	FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+#	OTHER DEALINGS IN THE SOFTWARE.
+
+
+require 'shoulda'
+
+require 'evosynth'
+
+
+class GrayDecoderTest < Test::Unit::TestCase
+
+	should "decode gray to standard binary (on 1,0)" do
+		assert_equal [0,0,0,0], EvoSynth::Decoder.gray_to_binary([0,0,0,0])
+		assert_equal [0,0,0,1], EvoSynth::Decoder.gray_to_binary([0,0,0,1])
+		assert_equal [0,0,1,0], EvoSynth::Decoder.gray_to_binary([0,0,1,1])
+		assert_equal [0,0,1,1], EvoSynth::Decoder.gray_to_binary([0,0,1,0])
+		assert_equal [0,1,0,0], EvoSynth::Decoder.gray_to_binary([0,1,1,0])
+		assert_equal [0,1,0,1], EvoSynth::Decoder.gray_to_binary([0,1,1,1])
+		assert_equal [0,1,1,0], EvoSynth::Decoder.gray_to_binary([0,1,0,1])
+		assert_equal [0,1,1,1], EvoSynth::Decoder.gray_to_binary([0,1,0,0])
+		assert_equal [1,0,0,0], EvoSynth::Decoder.gray_to_binary([1,1,0,0])
+		assert_equal [1,0,0,1], EvoSynth::Decoder.gray_to_binary([1,1,0,1])
+		assert_equal [1,0,1,0], EvoSynth::Decoder.gray_to_binary([1,1,1,1])
+		assert_equal [1,0,1,1], EvoSynth::Decoder.gray_to_binary([1,1,1,0])
+		assert_equal [1,1,0,0], EvoSynth::Decoder.gray_to_binary([1,0,1,0])
+		assert_equal [1,1,0,1], EvoSynth::Decoder.gray_to_binary([1,0,1,1])
+		assert_equal [1,1,1,0], EvoSynth::Decoder.gray_to_binary([1,0,0,1])
+		assert_equal [1,1,1,1], EvoSynth::Decoder.gray_to_binary([1,0,0,0])
+	end
+
+	should "decode standard binary to gray (on 1,0)" do
+		assert_equal [0,0,0,0], EvoSynth::Decoder.binary_to_gray([0,0,0,0])
+		assert_equal [0,0,0,1], EvoSynth::Decoder.binary_to_gray([0,0,0,1])
+		assert_equal [0,0,1,1], EvoSynth::Decoder.binary_to_gray([0,0,1,0])
+		assert_equal [0,0,1,0], EvoSynth::Decoder.binary_to_gray([0,0,1,1])
+		assert_equal [0,1,1,0], EvoSynth::Decoder.binary_to_gray([0,1,0,0])
+		assert_equal [0,1,1,1], EvoSynth::Decoder.binary_to_gray([0,1,0,1])
+		assert_equal [0,1,0,1], EvoSynth::Decoder.binary_to_gray([0,1,1,0])
+		assert_equal [0,1,0,0], EvoSynth::Decoder.binary_to_gray([0,1,1,1])
+		assert_equal [1,1,0,0], EvoSynth::Decoder.binary_to_gray([1,0,0,0])
+		assert_equal [1,1,0,1], EvoSynth::Decoder.binary_to_gray([1,0,0,1])
+		assert_equal [1,1,1,1], EvoSynth::Decoder.binary_to_gray([1,0,1,0])
+		assert_equal [1,1,1,0], EvoSynth::Decoder.binary_to_gray([1,0,1,1])
+		assert_equal [1,0,1,0], EvoSynth::Decoder.binary_to_gray([1,1,0,0])
+		assert_equal [1,0,1,1], EvoSynth::Decoder.binary_to_gray([1,1,0,1])
+		assert_equal [1,0,0,1], EvoSynth::Decoder.binary_to_gray([1,1,1,0])
+		assert_equal [1,0,0,0], EvoSynth::Decoder.binary_to_gray([1,1,1,1])
+	end
+
+	should "decode gray to standard binary (on true,false)" do
+		assert_equal [false,false,false,false], EvoSynth::Decoder.gray_to_binary([false,false,false,false])
+		assert_equal [false,false,false,true], EvoSynth::Decoder.gray_to_binary([false,false,false,true])
+		assert_equal [false,false,true,false], EvoSynth::Decoder.gray_to_binary([false,false,true,true])
+		assert_equal [false,false,true,true], EvoSynth::Decoder.gray_to_binary([false,false,true,false])
+		assert_equal [false,true,false,false], EvoSynth::Decoder.gray_to_binary([false,true,true,false])
+		assert_equal [false,true,false,true], EvoSynth::Decoder.gray_to_binary([false,true,true,true])
+		assert_equal [false,true,true,false], EvoSynth::Decoder.gray_to_binary([false,true,false,true])
+		assert_equal [false,true,true,true], EvoSynth::Decoder.gray_to_binary([false,true,false,false])
+		assert_equal [true,false,false,false], EvoSynth::Decoder.gray_to_binary([true,true,false,false])
+		assert_equal [true,false,false,true], EvoSynth::Decoder.gray_to_binary([true,true,false,true])
+		assert_equal [true,false,true,false], EvoSynth::Decoder.gray_to_binary([true,true,true,true])
+		assert_equal [true,false,true,true], EvoSynth::Decoder.gray_to_binary([true,true,true,false])
+		assert_equal [true,true,false,false], EvoSynth::Decoder.gray_to_binary([true,false,true,false])
+		assert_equal [true,true,false,true], EvoSynth::Decoder.gray_to_binary([true,false,true,true])
+		assert_equal [true,true,true,false], EvoSynth::Decoder.gray_to_binary([true,false,false,true])
+		assert_equal [true,true,true,true], EvoSynth::Decoder.gray_to_binary([true,false,false,false])
+	end
+
+	should "decode standard binary to gray (on true,false)" do
+		assert_equal [false,false,false,false], EvoSynth::Decoder.binary_to_gray([false,false,false,false])
+		assert_equal [false,false,false,true], EvoSynth::Decoder.binary_to_gray([false,false,false,true])
+		assert_equal [false,false,true,true], EvoSynth::Decoder.binary_to_gray([false,false,true,false])
+		assert_equal [false,false,true,false], EvoSynth::Decoder.binary_to_gray([false,false,true,true])
+		assert_equal [false,true,true,false], EvoSynth::Decoder.binary_to_gray([false,true,false,false])
+		assert_equal [false,true,true,true], EvoSynth::Decoder.binary_to_gray([false,true,false,true])
+		assert_equal [false,true,false,true], EvoSynth::Decoder.binary_to_gray([false,true,true,false])
+		assert_equal [false,true,false,false], EvoSynth::Decoder.binary_to_gray([false,true,true,true])
+		assert_equal [true,true,false,false], EvoSynth::Decoder.binary_to_gray([true,false,false,false])
+		assert_equal [true,true,false,true], EvoSynth::Decoder.binary_to_gray([true,false,false,true])
+		assert_equal [true,true,true,true], EvoSynth::Decoder.binary_to_gray([true,false,true,false])
+		assert_equal [true,true,true,false], EvoSynth::Decoder.binary_to_gray([true,false,true,true])
+		assert_equal [true,false,true,false], EvoSynth::Decoder.binary_to_gray([true,true,false,false])
+		assert_equal [true,false,true,true], EvoSynth::Decoder.binary_to_gray([true,true,false,true])
+		assert_equal [true,false,false,true], EvoSynth::Decoder.binary_to_gray([true,true,true,false])
+		assert_equal [true,false,false,false], EvoSynth::Decoder.binary_to_gray([true,true,true,true])
+	end
+end

data/test/operators/adjustments/tc_adaptive_adjustment.rb

@@ -0,0 +1,63 @@
+#	Copyright (c) 2009, 2010 Yves Adler <yves.adler@googlemail.com>
+#
+#	Permission is hereby granted, free of charge, to any person
+#	obtaining a copy of this software and associated documentation
+#	files (the "Software"), to deal in the Software without
+#	restriction, including without limitation the rights to use,
+#	copy, modify, merge, publish, distribute, sublicense, and/or sell
+#	copies of the Software, and to permit persons to whom the
+#	Software is furnished to do so, subject to the following
+#	conditions:
+#
+#	The above copyright notice and this permission notice shall be
+#	included in all copies or substantial portions of the Software.
+#
+#	THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+#	EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
+#	OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+#	NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
+#	HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+#	WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+#	FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+#	OTHER DEALINGS IN THE SOFTWARE.
+
+
+require 'shoulda'
+
+require 'evosynth'
+require 'test/test_util/test_helper'
+
+
+class AdaptiveAjustmentTest < Test::Unit::TestCase
+
+	ALPHA = 0.9
+	THETA = 0.2
+
+	context "a adaptive adjustment with alpha = #{ALPHA}, theta = #{THETA}" do
+		setup do
+			@adjustment = EvoSynth::Adjustments::AdaptiveAdjustment.new(ALPHA, THETA)
+		end
+
+		should "divide a value with #{ALPHA} when adjust is called without success_rate" do
+			sigma = 1
+			assert_equal sigma / ALPHA,  @adjustment.adjust(sigma)
+			sigma = 3
+			assert_equal sigma / ALPHA,  @adjustment.adjust(sigma)
+		end
+
+		should "divide a value with #{ALPHA} when adjust is called with a success_rate > #{THETA}" do
+			sigma = 1
+			assert_equal sigma * ALPHA,  @adjustment.adjust(sigma, THETA*2)
+			sigma = 3
+			assert_equal sigma * ALPHA,  @adjustment.adjust(sigma, THETA*2)
+		end
+
+		should "return the given value when success_rate == #{THETA}" do
+			sigma = 1
+			assert_equal sigma,  @adjustment.adjust(sigma, THETA)
+			sigma = 3
+			assert_equal sigma,  @adjustment.adjust(sigma, THETA)
+		end
+	end
+
+end

data/test/operators/adjustments/tc_predefined_adjustment.rb

@@ -0,0 +1,49 @@
+#	Copyright (c) 2009, 2010 Yves Adler <yves.adler@googlemail.com>
+#
+#	Permission is hereby granted, free of charge, to any person
+#	obtaining a copy of this software and associated documentation
+#	files (the "Software"), to deal in the Software without
+#	restriction, including without limitation the rights to use,
+#	copy, modify, merge, publish, distribute, sublicense, and/or sell
+#	copies of the Software, and to permit persons to whom the
+#	Software is furnished to do so, subject to the following
+#	conditions:
+#
+#	The above copyright notice and this permission notice shall be
+#	included in all copies or substantial portions of the Software.
+#
+#	THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+#	EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
+#	OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+#	NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
+#	HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+#	WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+#	FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+#	OTHER DEALINGS IN THE SOFTWARE.
+
+
+require 'shoulda'
+
+require 'evosynth'
+require 'test/test_util/test_helper'
+
+
+class PredefinedAjustmentTest < Test::Unit::TestCase
+
+	ALPHA = 0.9
+
+	context "a predefined adjustment with alpha = #{ALPHA}" do
+		setup do
+			@adjustment = EvoSynth::Adjustments::PredifinedAdjustment.new(ALPHA)
+		end
+
+		should "multiply a value with #{ALPHA} when adjust is called" do
+			sigma = 1
+			assert_equal sigma * ALPHA,  @adjustment.adjust(sigma)
+			sigma = 3
+			assert_equal sigma * ALPHA,  @adjustment.adjust(sigma)
+		end
+
+	end
+
+end

data/test/operators/global_recombinations/tc_global_arithmetic_crossover.rb

@@ -0,0 +1,78 @@
+#	Copyright (c) 2009, 2010 Yves Adler <yves.adler@googlemail.com>
+#
+#	Permission is hereby granted, free of charge, to any person
+#	obtaining a copy of this software and associated documentation
+#	files (the "Software"), to deal in the Software without
+#	restriction, including without limitation the rights to use,
+#	copy, modify, merge, publish, distribute, sublicense, and/or sell
+#	copies of the Software, and to permit persons to whom the
+#	Software is furnished to do so, subject to the following
+#	conditions:
+#
+#	The above copyright notice and this permission notice shall be
+#	included in all copies or substantial portions of the Software.
+#
+#	THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+#	EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
+#	OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+#	NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
+#	HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+#	WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+#	FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+#	OTHER DEALINGS IN THE SOFTWARE.
+
+
+require 'shoulda'
+
+require 'evosynth'
+require 'test/test_util/test_helper'
+
+
+class GlobalArithmeticCrossoverTest < Test::Unit::TestCase
+
+	GENOME_SIZE = 100
+	TIMES = 1000
+	DELTA = 0.01
+
+	context "when run on binary genome (size=#{GENOME_SIZE})" do
+		setup do
+			@population = EvoSynth::Population.new
+			individual_one = TestArrayGenomeIndividual.new([1.0]*GENOME_SIZE)
+			individual_two = TestArrayGenomeIndividual.new([2.0]*GENOME_SIZE)
+
+			@population << individual_one << individual_two
+		end
+
+		context "before recombination is executed" do
+			should "all genes of individual one should be 1.0" do
+				@population[0].genome.each { |gene| assert_equal 1.0, gene }
+			end
+
+			should "all genes of individual two should be 2.0" do
+				@population[1].genome.each { |gene| assert_equal 2.0, gene }
+			end
+		end
+
+		context "after recombination is executed #{TIMES} times" do
+			setup do
+				recombination = EvoSynth::GlobalRecombinations::GlobalArithmeticCrossover.new
+				@child = recombination.recombine(@population)
+			end
+
+			should "all genes of the parent one should (still) be 1.0" do
+				@population[0].genome.each { |gene| assert_equal 1.0, gene }
+			end
+
+			should "all genes of the parent two should (still) be 2.0" do
+				@population[1].genome.each { |gene| assert_equal 2.0, gene }
+			end
+
+			should "all genes of the child should equal 0.5" do
+				@child.genome.each { |gene| assert_equal 1.5, gene }
+			end
+
+		end
+
+	end
+
+end

data/test/operators/global_recombinations/tc_global_uniform_crossover.rb

@@ -0,0 +1,90 @@
+#	Copyright (c) 2009, 2010 Yves Adler <yves.adler@googlemail.com>
+#
+#	Permission is hereby granted, free of charge, to any person
+#	obtaining a copy of this software and associated documentation
+#	files (the "Software"), to deal in the Software without
+#	restriction, including without limitation the rights to use,
+#	copy, modify, merge, publish, distribute, sublicense, and/or sell
+#	copies of the Software, and to permit persons to whom the
+#	Software is furnished to do so, subject to the following
+#	conditions:
+#
+#	The above copyright notice and this permission notice shall be
+#	included in all copies or substantial portions of the Software.
+#
+#	THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+#	EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
+#	OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+#	NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
+#	HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+#	WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+#	FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+#	OTHER DEALINGS IN THE SOFTWARE.
+
+
+require 'shoulda'
+
+require 'evosynth'
+require 'test/test_util/test_helper'
+
+
+class GlobalUniformCrossoverTest < Test::Unit::TestCase
+
+	GENOME_SIZE = 100
+	TIMES = 1000
+	DELTA = 0.01
+
+	context "when run on binary genome (size=#{GENOME_SIZE})" do
+		setup do
+			@population = EvoSynth::Population.new
+			individual_one = TestArrayBinaryIndividual.new(GENOME_SIZE)
+			individual_one.genome.map! { |gene| true }
+			individual_two = TestArrayBinaryIndividual.new(GENOME_SIZE)
+			individual_two.genome.map! { |gene| false }
+
+			@population << individual_one << individual_two
+		end
+
+		context "before recombination is executed" do
+			should "all genes of individual one should be true" do
+				@population[0].genome.each { |gene| assert gene }
+			end
+
+			should "all genes of individual two should be false" do
+				@population[1].genome.each { |gene| assert !gene }
+			end
+		end
+
+		context "after recombination is executed #{TIMES} times" do
+			setup do
+				recombination = EvoSynth::GlobalRecombinations::GlobalUniformCrossover.new
+				@count_false, @count_true = 0, 0
+				TIMES.times do
+					child = recombination.recombine(@population)
+					child.genome.each do |gene|
+						if gene == true
+							@count_true += 1
+						elsif gene == false
+							@count_false += 1
+						end
+					end
+				end
+			end
+
+			should "all genes of the parent one should (still) be true" do
+				@population[0].genome.each { |gene| assert gene }
+			end
+
+			should "all genes of the parent two should (still) be false" do
+				@population[1].genome.each { |gene| assert !gene }
+			end
+
+			should "around 50% of the genes should have mutated to false" do
+				assert_in_delta((GENOME_SIZE/2)*TIMES, @count_true, DELTA * (GENOME_SIZE/2) * TIMES)
+				assert_in_delta((GENOME_SIZE/2)*TIMES, @count_false, DELTA * (GENOME_SIZE/2) * TIMES)
+			end
+		end
+
+	end
+
+end