Changeset 3930 for palm/trunk


Ignore:
Timestamp:
Apr 24, 2019 2:57:18 PM (6 years ago)
Author:
forkel
Message:

changed subroutine name from chem_non_transport_physics to chem_non_advective_processes

Location:
palm/trunk/SOURCE
Files:
2 edited

Legend:

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

    r3929 r3930  
    2727! -----------------
    2828! $Id$
     29! Changed chem_non_transport_physics to chem_non_advective_processes
     30!
     31!
     32! 3929 2019-04-24 12:52:08Z banzhafs
    2933! Correct/complete module_interface introduction for chemistry model
    3034! Add subroutine chem_exchange_horiz_bounds
     
    523527    END INTERFACE chem_actions
    524528
    525     INTERFACE chem_non_transport_physics
    526        MODULE PROCEDURE chem_non_transport_physics
    527        MODULE PROCEDURE chem_non_transport_physics_ij
    528     END INTERFACE chem_non_transport_physics
     529    INTERFACE chem_non_advective_processes
     530       MODULE PROCEDURE chem_non_advective_processes
     531       MODULE PROCEDURE chem_non_advective_processes_ij
     532    END INTERFACE chem_non_advective_processes
    529533   
    530534    INTERFACE chem_exchange_horiz_bounds
     
    631635         chem_actions, chem_prognostic_equations, chem_rrd_local,             &
    632636         chem_statistics, chem_swap_timelevel, chem_wrd_local, chem_depo,     &
    633          chem_non_transport_physics, chem_exchange_horiz_bounds
     637         chem_non_advective_processes, chem_exchange_horiz_bounds
    634638
    635639 CONTAINS
     
    24032407!> Call for all grid points
    24042408!------------------------------------------------------------------------------!
    2405     SUBROUTINE chem_non_transport_physics()
     2409    SUBROUTINE chem_non_advective_processes()
    24062410
    24072411
     
    24422446
    24432447
    2444     END SUBROUTINE chem_non_transport_physics
     2448    END SUBROUTINE chem_non_advective_processes
    24452449
    24462450
     
    24502454!> Call for grid points i,j
    24512455!------------------------------------------------------------------------------!
    2452  SUBROUTINE chem_non_transport_physics_ij( i, j )
     2456 SUBROUTINE chem_non_advective_processes_ij( i, j )
    24532457
    24542458
     
    24782482
    24792483
    2480  END SUBROUTINE chem_non_transport_physics_ij
     2484 END SUBROUTINE chem_non_advective_processes_ij
    24812485 
    24822486!------------------------------------------------------------------------------!
  • palm/trunk/SOURCE/module_interface.f90

    r3929 r3930  
    2020! Current revisions:
    2121! -----------------
     22! Changed chem_non_transport_physics to chem_non_advective_processes
    2223!
    2324!
     
    176177              chem_header,                                                     &
    177178              chem_actions,                                                    &
    178               chem_non_transport_physics,                                      &
     179              chem_non_advective_processes,                                    &
    179180              chem_prognostic_equations,                                       &
    180181              chem_swap_timelevel,                                             &
     
    959960
    960961    IF ( bulk_cloud_model    )  CALL bcm_non_transport_physics()
    961     IF ( air_chemistry       )  CALL chem_non_transport_physics()
     962    IF ( air_chemistry       )  CALL chem_non_advective_processes()
    962963
    963964
     
    977978
    978979
    979     IF ( air_chemistry       )  CALL chem_non_transport_physics( i, j )
     980    IF ( air_chemistry       )  CALL chem_non_advective_processes( i, j )
    980981    IF ( bulk_cloud_model    )  CALL bcm_non_transport_physics( i, j )
    981982
Note: See TracChangeset for help on using the changeset viewer.