Changeset 3746 for palm/trunk/SOURCE/parin.f90

Timestamp:

Feb 16, 2019 12:41:27 PM (5 years ago)

Author:

gronemeier

Message:

bugfix: do not overwrite name of statistic regions set by namelist

File:

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

palm/trunk/SOURCE/parin.f90

@@ -20 +20 @@
 ! Current revisions:
 ! -----------------
-! 
+! removed setting of parameter region
 ! 
 ! Former revisions:
@@ -526 +526 @@
 
     USE statistics,                                                            &
-        ONLY:  hom, hom_sum, pr_palm, region, statistic_regions
+        ONLY:  hom, hom_sum, pr_palm, statistic_regions
 
     USE turbulence_closure_mod,                                                &
@@ -1025 +1025 @@
           IF ( bc_ns == 'dirichlet/radiation' )  bc_ns_dirrad = .TRUE.
           IF ( bc_ns == 'radiation/dirichlet' )  bc_ns_raddir = .TRUE.
-
-!
-!--       Definition of names of areas used for computing statistics. They must
-!--       be defined at this place, because they are allowed to be redefined by
-!--       the user in user_parin.
-          region = 'total domain'
-
 !
 !--       Check in case of initial run, if the grid point numbers are well