Changeset 4048 for palm/trunk/SOURCE/sum_up_3d_data.f90

Timestamp:

Jun 21, 2019 9:00:21 PM (5 years ago)

Author:

knoop

Message:

Moved turbulence_closure_mod calls into module_interface

File:

• palm/trunk/SOURCE/sum_up_3d_data.f90 (modified) (4 diffs)

palm/trunk/SOURCE/sum_up_3d_data.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Moved tcm_3d_data_averaging to module_interface
+! 
+! 4039 2019-06-18 10:32:41Z suehring
 ! Modularize diagnostic output
 ! 
@@ -304 +307 @@
         ONLY:  ind_pav_green, ind_veg_wall, ind_wat_win,                       &
                surf_def_h, surf_lsm_h, surf_usm_h
-
-    USE turbulence_closure_mod,                                                &
-        ONLY:  tcm_3d_data_averaging
 
     USE urban_surface_mod,                                                     &
@@ -535 +535 @@
 
              CASE DEFAULT
-
-!
-!--             Allocating and initializing data arrays for turbulence closure module
-                CALL tcm_3d_data_averaging( 'allocate', trimvar )
 
 !
@@ -1191 +1187 @@
 
 !
-!--          Summing up data from turbulence closure module
-             CALL tcm_3d_data_averaging( 'sum', trimvar )
-
-!
 !--          Summing up data from all other modules
              CALL module_interface_3d_data_averaging( 'sum', trimvar )