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)}'