Changeset 4590 for palm/trunk/SOURCE/read_restart_data_mod.f90

Timestamp:

Jul 6, 2020 2:34:59 PM (4 years ago)

Author:

suehring

Message:

Biomet: Enable restart via mpi-IO; Restart: Bugfix in allocation of hom and hom_sum in case of mpi-io restart when chemistry or salsa are employed

File:

• palm/trunk/SOURCE/read_restart_data_mod.f90 (modified) (2 diffs)

palm/trunk/SOURCE/read_restart_data_mod.f90

@@ -20 +20 @@
 ! Current revisions:
 ! -----------------
-! 
-! 
+!
+!
 ! Former revisions:
 ! -----------------
 ! $Id$
+! Bugfix in allocation of hom and hom_sum in case of mpi-io restart when
+! chemistry or salsa are employed
+! 
+! 4580 2020-06-29 07:54:21Z raasch
 ! data handling with MPI-IO for cyclic-fill added (so far only for global data)
 ! 
@@ -880 +884 @@
                      v_init(0:nz+1), pt_init(0:nz+1), q_init(0:nz+1),                              &
                      ref_state(0:nz+1), s_init(0:nz+1), sa_init(0:nz+1),                           &
-                     hom(0:nz+1,2,pr_palm+max_pr_user,0:statistic_regions),                        &
-                     hom_sum(0:nz+1,pr_palm+max_pr_user,0:statistic_regions) )
+                     hom(0:nz+1,2,pr_palm+max_pr_user+max_pr_cs+max_pr_salsa,0:statistic_regions), &
+                     hom_sum(0:nz+1,pr_palm+max_pr_user+max_pr_cs+max_pr_salsa,0:statistic_regions) )
        ENDIF