Ignore:
Timestamp:
Apr 12, 2019 8:47:41 AM (2 years ago)
Author:
schwenkel
Message:

bugfix for chemistry_model_mod via introducing module_interface_exchange_horiz

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/prognostic_equations.f90

    r3885 r3887  
    2525! -----------------
    2626! $Id$
     27! Implicit Bugfix for chemistry model, loop for non_transport_physics over
     28! ghost points is avoided. Instead introducing module_interface_exchange_horiz.
     29!
     30! 3885 2019-04-11 11:29:34Z kanani
    2731! Changes related to global restructuring of location messages and introduction
    2832! of additional debug messages
     
    441445        ONLY:  module_interface_actions, &
    442446               module_interface_non_transport_physics, &
     447               module_interface_exchange_horiz, &
    443448               module_interface_prognostic_equations
    444449
     
    533538    !$OMP PARALLEL PRIVATE (i,j)
    534539    !$OMP DO
    535     DO  i = nxlg, nxrg
    536        DO  j = nysg, nyng
     540    DO  i = nxl, nxr
     541       DO  j = nys, nyn
    537542!
    538543!--       Calculate non transport physics for all other modules
     
    540545       ENDDO
    541546    ENDDO
     547!
     548!-- Module Inferface for exchange horiz after non_transport_physics but before
     549!-- advection. Therefore, non_transport_physics must not run for ghost points.
     550    CALL module_interface_exchange_horiz()
    542551    !$OMP END PARALLEL
    543552
     
    12101219!-- Calculate non transport physics for all other modules
    12111220    CALL module_interface_non_transport_physics
    1212 
     1221!
     1222!-- Module Inferface for exchange horiz after non_transport_physics but before
     1223!-- advection. Therefore, non_transport_physics must not run for ghost points.     
     1224    CALL module_interface_exchange_horiz()
     1225   
    12131226!
    12141227!-- u-velocity component
Note: See TracChangeset for help on using the changeset viewer.