Changeset 83 for trunk/mars/libf/phymars/physiq.F
- Timestamp:
- Mar 1, 2011, 4:53:50 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/mars/libf/phymars/physiq.F
r82 r83 279 279 REAL ccn(ngridmx,nlayermx) ! Cloud condensation nuclei 280 280 ! (particules kg-1) 281 SAVE ccn !! in case iradia != 1 281 282 real rdust(ngridmx,nlayermx) ! dust geometric mean radius (m) 282 283 real qtot1,qtot2 ! total aerosol mass
Note: See TracChangeset
for help on using the changeset viewer.