Select Code to Download

     my $x = $final_data{$key};
     printf "x = %.20f  high= %.20f\n", $x, $high;

x = 0.98999999999999999000  high= 0.99000000000000010000
x = 0.97999999999999998000  high= 0.98000000000000009000
...
x = 0.92000000000000004000  high= 0.93000000000000005000
x = 0.91000000000000003000  high= 0.92000000000000004000
x = 0.90000000000000002000  high= 0.91000000000000003000