Issue #135: fix the weasel program example

Author: thewizardplusplus

examples/weasel-program/Evolver.micro

@@ -45,7 +45,7 @@ fn Evolver(length generator strategy)
 	this;
 
 	#"get_fittest" fn(this)
-		reduce ."population"."population"this nil fn(best individual)
+		reduce nil ."population"."population"this fn(best individual)
 			let current_score
 				as(."get_score"."strategy"this):2 ."strategy"this individual
 			;

examples/weasel-program/FitnessStrategy.micro

@@ -13,7 +13,7 @@ fn FitnessStrategy(target)
 		;;
 
 		nb count a number of discrepancies
-		reduce diff 0 fn(number is_different)
+		reduce 0 diff fn(number is_different)
 			+ number is_different
 		;
 	;

examples/weasel-program/__main__.micro

@@ -31,7 +31,7 @@ as(."run"evolver):2 evolver fn(generation_number evolver)
 				;
 			;
 			let individual
-				reduce marked_genes "" fn(result marked_gene)
+				reduce "" marked_genes fn(result marked_gene)
 					+ result marked_gene
 				;
 			;