my $Time = 0.40796013431713;
print $Time, sprintf("\n%1.20f", $Time);