Changeset 2304

Timestamp:

Jul 4, 2017 2:35:55 PM (7 years ago)

Author:

suehring

Message:

Bugfix, enable restarts for child domain

File:

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

palm/trunk/SOURCE/parin.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Bugfix, enable restarts for child domain.
+! 
+! 2298 2017-06-29 09:28:18Z raasch
 ! -return_addres, return_username in ENVPAR, -cross_ts_uymax, cross_ts_uymin in
 ! d3par
@@ -549 +552 @@
 !--       by pmci_child_initialize and pmci_parent_initialize. This is, 
 !--       however, important e.g. to make sure that diagnostic variables 
-!--       are set properly.
-          IF ( nest_domain )  THEN
+!--       are set properly. An exception is made in case of restart runs.
+!--       MS: is this really necessary?
+          IF ( nest_domain  .AND.                                              &
+               TRIM( initializing_actions ) /= 'read_restart_data' )  THEN
              initializing_actions = 'set_constant_profiles'
           ENDIF