Changeset 327 for trunk/LMDZ.MARS/libf
- Timestamp:
- Oct 25, 2011, 4:09:42 PM (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.MARS/libf/phymars/newcondens.F
r120 r327 103 103 REAL zt(ngridmx,nlayermx) 104 104 REAL zcpi 105 REAL ztcond (ngridmx,nlayermx )105 REAL ztcond (ngridmx,nlayermx+1) 106 106 REAL ztcondsol(ngridmx) 107 107 REAL zdiceco2(ngridmx) … … 278 278 ENDDO 279 279 ENDDO 280 281 ztcond(:,nlay+1)=ztcond(:,nlay) 280 282 281 283 c Condensation/sublimation in the atmosphere
Note: See TracChangeset
for help on using the changeset viewer.