Changeset 259 for trunk/LMDZ.MARS/libf
- Timestamp:
- Aug 4, 2011, 10:22:01 AM (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.MARS/libf/phymars/vdifc.F
r256 r259 234 234 CALL vdif_cd(ngrid,nlay,pz0,g,pzlay,pu,pv,ptsrf,ph 235 235 & ,zcdv_true,zcdh_true) 236 237 #ifdef MESOSCALE 238 IF (flag_LES) THEN 239 wmax(:)=0. 240 ENDIF 241 #endif 236 242 237 243 DO ig=1,ngrid
Note: See TracChangeset
for help on using the changeset viewer.