Changeset 4340 for palm/trunk/SOURCE/modules.f90

Timestamp:

Dec 16, 2019 8:17:03 AM (4 years ago)

Author:

Giersch

Message:

Topography closed channel flow with symmetric boundaries implemented, ID tag in radiation module corrected

File:

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

palm/trunk/SOURCE/modules.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Flag for topography closed channel flow with symmetric boundaries introduced
+! 
+! 4331 2019-12-10 18:25:02Z suehring
 ! - do_output_at_2m, pt_2m_av
 ! 
@@ -621 +624 @@
     INTEGER(iwp) ::  runnr = 0                         !< number of run in job chain
     INTEGER(iwp) ::  subdomain_size                    !< number of grid points in (3d) subdomain including ghost points
+    INTEGER(iwp) ::  symmetry_flag = 0                 !< flag for sterring the symmetric behavior of the bottom and top boundary
     INTEGER(iwp) ::  terminate_coupled = 0             !< switch for steering termination in case of coupled runs
     INTEGER(iwp) ::  terminate_coupled_remote = 0      !< switch for steering termination in case of coupled runs (condition of the remote model)