for($j=$min_shift;$j<=$max_shift;$j=$j+$delta_shift) { my $mse = function($i, $j);#********************* $temp=$min_shift+$delta_shift; print "(j: $j, Max: $max_shift, Min: $min_shift,\n d: $delta_shift +: $temp"; if($mse < $memory[2]) { @memory = ($i, $j, $mse); #print "($memory[0],$memory[1])"; } if($temp==$min_shift){print" true)\n";} else{print" false)\n";} }