Changeset 5642 for branches/2014
- Timestamp:
- 2015-07-28T16:33:15+02:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2014/dev_r4765_CNRS_agrif/NEMOGCM/TOOLS/NESTING/src/agrif_partial_steps.f90
r5641 r5642 398 398 ELSE ; i = MINLOC( gdepw, mask = gdepw > rn_hmin, dim = 1 ) ! from a depth 399 399 ENDIF 400 zmin = gdepw(i+1) 400 401 ! 401 402 ! check that interpolated value stays at the same level
Note: See TracChangeset
for help on using the changeset viewer.