Changeset 4457 for palm/trunk/SOURCE/bulk_cloud_model_mod.f90

Timestamp:

Mar 11, 2020 2:20:43 PM (5 years ago)

Author:

raasch

Message:

ghost point exchange modularized, bugfix for wrong 2d-exchange

File:

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

palm/trunk/SOURCE/bulk_cloud_model_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! use statement for exchange horiz added
+! 
+! 4418 2020-02-21 09:41:13Z raasch
 ! bugfix for raindrop number adjustment
 ! 
@@ -1311 +1314 @@
     SUBROUTINE bcm_exchange_horiz
 
+       USE exchange_horiz_mod,                                                  &
+           ONLY:  exchange_horiz
+
 
        IF ( .NOT. microphysics_sat_adjust  .AND.                                &