Changeset 4731 for palm/trunk/SOURCE/prognostic_equations.f90

Timestamp:

Oct 7, 2020 1:25:11 PM (4 years ago)

Author:

schwenkel

Message:

Move exchange_horiz from time_integration to modules

File:

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

palm/trunk/SOURCE/prognostic_equations.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Move exchange_horiz from time_integration to modules
+!
+! 4717 2020-09-30 22:27:40Z pavelkrc
 ! Fixes and optimizations of OpenMP parallelization, formatting of OpenMP
 ! directives (J. Resler)
@@ -411 +414 @@
 !-- Module Inferface for exchange horiz after non_advective_processes but before advection.
 !-- Therefore, non_advective_processes must not run for ghost points.
-    CALL module_interface_exchange_horiz()
+    CALL module_interface_exchange_horiz( 'before_prognostic_equation' )
 !
 !-- Loop over all prognostic equations
@@ -917 +920 @@
 !-- Module Inferface for exchange horiz after non_advective_processes but before advection.
 !-- Therefore, non_advective_processes must not run for ghost points.
-    CALL module_interface_exchange_horiz()
+    CALL module_interface_exchange_horiz( 'before_prognostic_equation' )
 !
 !-- u-velocity component