comp-chem/NWChem
1
0
Fork 0
mirror of https://github.com/nwchemgit/nwchem.git synced 2026-07-28 22:25:48 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

fix

Browse source
This commit is contained in:
Edoardo Apra 2017-09-13 21:22:27 +00:00
parent a85bdb1ad5
commit e7f6fc9b82
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
QA/nwparse.pl
View file

@ -285,9 +285,9 @@ foreach $filename (@FILES_TO_PARSE) {
}
# *** Assumes $itok was incremented above
if (! $quiet) {
printf "%.4f\n", set_to_digits(@line_tokens[$itok],3);
printf "%.3f\n", set_to_digits(@line_tokens[$itok],3);
}
printf FILE_OUTPUT "%.4f\n", set_to_digits(@line_tokens[$itok],3);
printf FILE_OUTPUT "%.3f\n", set_to_digits(@line_tokens[$itok],3);
}
if (! $sgroup) {
if (/Total/ && /energy/) {