Changeset 2335 for trunk/MESOSCALE/LMD_MM_MARS
- Timestamp:
- Jun 4, 2020, 10:23:38 AM (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/phys/module_lmd_driver.F
r1427 r2335 28 28 RTHBLTEN,RUBLTEN,RVBLTEN, & 29 29 num_3d_s,SCALAR, & 30 num_3d_m,MOIST,& 30 31 MARS_MODE, & 31 32 M_ALBEDO,M_TI,M_CO2ICE,M_EMISS, & … … 144 145 M_GW 145 146 ! 4D arrays 146 INTEGER, INTENT(IN ) :: num_3d_s 147 INTEGER, INTENT(IN ) :: num_3d_s,num_3d_m 147 148 REAL, DIMENSION( ims:ime, kms:kme, jms:jme, 1:num_3d_s ), INTENT(INOUT ) :: & 148 149 scalar 150 REAL, DIMENSION( ims:ime, kms:kme, jms:jme, 1:num_3d_m ), INTENT(INOUT ) :: & 151 moist 149 152 ! Logical 150 153 LOGICAL, INTENT(IN ) :: restart
Note: See TracChangeset
for help on using the changeset viewer.