Changeset 404
- Timestamp:
- Oct 15, 2002, 4:34:45 PM (22 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ.3.3/branches/rel-LF/libf/dyn3d/grid_noro.F
r370 r404 315 315 CALL MVA9(zytzy,iim+1,jjm+1) 316 316 C$$$ Masque prenant en compte maximum de terre 317 C$$$ On seuil a 10% de terre de terre car en dessous les parametres de surface n'on 318 C$$$ pas de sens (PB) 317 319 mask_tmp= 0.0 318 WHERE(mask .GE. epsfra) mask_tmp = 1.320 WHERE(mask .GE. 0.1) mask_tmp = 1. 319 321 320 322 DO ii = 1, imar
Note: See TracChangeset
for help on using the changeset viewer.