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

changed subroutine name from chem_non_transport_physics to chem_non_advective_processes

File:
1 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!------------------------------------------------------------------------------!
Note: See TracChangeset for help on using the changeset viewer.