[cig-commits] [commit] master: Avoid output conversion crashes for very large files (d8d73f3)
cig_noreply at geodynamics.org
cig_noreply at geodynamics.org
Thu Sep 18 05:21:33 PDT 2014
Repository : https://github.com/geodynamics/axisem
On branch : master
Link : https://github.com/geodynamics/axisem/compare/b5d270c74aaab1fe654a391e1944febef04a66bc...bf3258866c83310e4c4b56c210dbe2ee78ad09a5
>---------------------------------------------------------------
commit d8d73f3cf4be400f1851257d1eb250d285c94665
Author: Simon Stähler <staehler at geophysik.uni-muenchen.de>
Date: Thu Sep 18 14:20:22 2014 +0200
Avoid output conversion crashes for very large files
- or very small ones (with unnaturally high transfer rates)
>---------------------------------------------------------------
d8d73f3cf4be400f1851257d1eb250d285c94665
SOLVER/UTILS/field_transform.F90 | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/SOLVER/UTILS/field_transform.F90 b/SOLVER/UTILS/field_transform.F90
index 56ebe99..8063e2d 100644
--- a/SOLVER/UTILS/field_transform.F90
+++ b/SOLVER/UTILS/field_transform.F90
@@ -727,7 +727,7 @@ program field_transformation
time_i = time_i + tack - tick
space_i = space_i + ngllread * nsnap * 4 / 1048576.
if (verbose) &
- print "('read ', F9.2, ' MB in ', F5.2, ' s => ', F6.2, 'MB/s' )", &
+ print "('read ', F12.2, ' MB in ', F7.2, ' s => ', F7.2, 'MB/s' )", &
real(ngllread) * nsnap * 4 / 1048576., tack-tick, &
real(ngllread) * nsnap * 4 / 1048576. / (tack-tick)
@@ -749,7 +749,7 @@ program field_transformation
time_o = time_o + tack - tick
space_o = space_o + ngllread * nsnap * 4 / 1048576.
if (verbose) &
- print "('wrote ', F9.2, ' MB in ', F4.1, ' s => ', F6.2, 'MB/s' )", &
+ print "('wrote ', F12.2, ' MB in ', F7.2, ' s => ', F7.2, 'MB/s' )", &
real(ngllread) * nsnap * 4 / 1048576., tack-tick, &
real(ngllread) * nsnap * 4 / 1048576. / (tack-tick)
More information about the CIG-COMMITS
mailing list