Changeset 3274 for palm/trunk/SOURCE/lpm_advec.f90

Timestamp:

Sep 24, 2018 3:42:55 PM (6 years ago)

Author:

knoop

Message:

Modularization of all bulk cloud physics code components

File:

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

palm/trunk/SOURCE/lpm_advec.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Modularization of all bulk cloud physics code components
+! 
+! 3241 2018-09-12 15:02:00Z raasch
 ! unused variables removed
 ! 
@@ -173 +176 @@
         ONLY:  de_dx, de_dy, de_dz, diss, dzw, e, km, u, v, w, zu, zw
 
+    USE basic_constants_and_equations_mod,                                     &
+        ONLY:  g, kappa
+
     USE cpulog
 
@@ -179 +185 @@
     USE control_parameters,                                                    &
         ONLY:  cloud_droplets, constant_flux_layer, dt_3d, dt_3d_reached_l,    &
-               dz, g, kappa, topography, u_gtrans, v_gtrans
+               dz, topography, u_gtrans, v_gtrans
 
     USE grid_variables,                                                        &