Changeset 4581 for palm/trunk/SOURCE/urban_surface_mod.f90

Timestamp:

Jun 29, 2020 8:49:58 AM (4 years ago)

Author:

suehring

Message:

mesoscale nesting: omit explicit pressure forcing via geostrophic wind components; chemistry: enable profile output of vertical fluxes; urban-surface: bugfix in initialization in case of cyclic_fill

File:

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

palm/trunk/SOURCE/urban_surface_mod.f90

@@ -27 +27 @@
 ! -----------------
 ! $Id$
+! Missing initialization in case of cyclic_fill runs
+! 
+! 4535 2020-05-15 12:07:23Z raasch
 ! bugfix for restart data format query
 ! 
@@ -4997 +5000 @@
 !
 !--  Initialization for restart runs
-     IF ( TRIM( initializing_actions ) /= 'read_restart_data'  .AND.                               &
-          TRIM( initializing_actions ) /= 'cyclic_fill' )  THEN
+     IF ( TRIM( initializing_actions ) /= 'read_restart_data' )  THEN
 
 !