[cig-commits] [commit] master: Minimum chunk size should be 1 (677c6c2)

[cig_noreply at geodynamics.org]

Repository : https://github.com/geodynamics/axisem

On branch  : master
Link       : https://github.com/geodynamics/axisem/compare/acff10db961d9a690b85df98c912fda944684087...0f3b7cc7a5efa0f8807307928c2104477c694dda

>---------------------------------------------------------------

commit 677c6c22e57982c3ec7882f67b4af41ae88d55bb
Author: Simon Stähler <staehler at geophysik.uni-muenchen.de>
Date:   Thu Jan 8 12:40:22 2015 +0100

    Minimum chunk size should be 1
    
     - Lead to an error for very large runs with very high number of strain dumps


>---------------------------------------------------------------

677c6c22e57982c3ec7882f67b4af41ae88d55bb
 SOLVER/UTILS/field_transform.F90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/SOLVER/UTILS/field_transform.F90 b/SOLVER/UTILS/field_transform.F90
index 51f94c8..a322c30 100644
--- a/SOLVER/UTILS/field_transform.F90
+++ b/SOLVER/UTILS/field_transform.F90
@@ -249,7 +249,7 @@ program field_transformation
 
     print *, 'Defined snapshots dimension'
 
-    chunk_gll = disk_block_size / nsnap 
+    chunk_gll = max(disk_block_size / nsnap, 1)
     print *, 'Chunksize: [', chunk_gll, ',', nsnap, ']'
 
     ! create variables