Select Code to Download

@result=grid(2,-2,2,-2,4,1e-15,1000);
print"\n*@result*";
...
{
    return ($_[0]-50.02)**2+2;
}

for($j=$min_shift;$j<=$max_shift;$j=$j+$delta_shift)
            {
...
if($temp==$min_shift){print" true)\n";}
else{print" false)\n";}
            }