Select Code to Download

perl -e 'for (-2.0,-1.9,-1.5,-1.1,-1.0,-0.9,-0.5,-0.1,-0)
 {$v = $_ * 0; printf("%5s -> %2s,%24.16e\n",$_,$v,$v)}'

   -2 ->  0,  0.0000000000000000e+00
 -1.9 -> -0, -0.0000000000000000e+00
...
 -0.5 -> -0, -0.0000000000000000e+00
 -0.1 -> -0, -0.0000000000000000e+00
    0 ->  0,  0.0000000000000000e+00