Changeset 926 for codes/icosagcm/trunk/src

Timestamp:

06/21/19 00:42:30 (5 years ago)

Author:

dubos

Message:

devel and trunk : let iim_glo=nbp+1 so that MOD(nbp,npslit_X)==0 implies equal-sized domains and good load balancing

File:

• codes/icosagcm/trunk/src/base/grid_param.f90 (modified) (2 diffs)

codes/icosagcm/trunk/src/base/grid_param.f90

@@ -14 +14 @@
     LOGICAL :: is_mpi_root
     CALL getin('nbp',iim_glo)
-    jjm_glo=iim_glo
     CALL getin('llm',llm)
     nqtot=1
@@ -23 +22 @@
        PRINT *, 'GETIN nqtot = ',nqtot
     END IF
+    iim_glo=iim_glo+1
+    jjm_glo=iim_glo
     
   END SUBROUTINE  init_grid_param