Changeset 2335 for trunk/MESOSCALE


Ignore:
Timestamp:
Jun 4, 2020, 10:23:38 AM (4 years ago)
Author:
aslmd
Message:

MESOSCALE: forgot to make changes in r2211 also in old module_lmd_driver

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/phys/module_lmd_driver.F

    r1427 r2335  
    2828        RTHBLTEN,RUBLTEN,RVBLTEN, &
    2929        num_3d_s,SCALAR, &
     30        num_3d_m,MOIST,&
    3031        MARS_MODE, &
    3132        M_ALBEDO,M_TI,M_CO2ICE,M_EMISS, &
    … …  
    144145     M_GW
    145146! 4D arrays
    146 INTEGER, INTENT(IN ) :: num_3d_s
     147INTEGER, INTENT(IN ) :: num_3d_s,num_3d_m
    147148REAL, DIMENSION( ims:ime, kms:kme, jms:jme, 1:num_3d_s ), INTENT(INOUT ) :: &
    148149     scalar
     150REAL, DIMENSION( ims:ime, kms:kme, jms:jme, 1:num_3d_m ), INTENT(INOUT ) :: &
     151     moist
    149152! Logical
    150153LOGICAL, INTENT(IN ) :: restart
Note: See TracChangeset for help on using the changeset viewer.