- Timestamp:
- 2016-09-27T11:36:26+02:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2016/dev_r6409_SIMPLIF_2_usrdef/NEMOGCM/CONFIG/LOCK_EXCHANGE/MY_SRC/usrdef_hgr.F90
r6923 r6960 97 97 ! ! NO reduction of grid size in some straits 98 98 ke1e2u_v = 0 ! ==>> u_ & v_surfaces will be computed in dom_ghr routine 99 pe1e2u(:,:) = 0._wp ! CAUTION: set to zero to avoid error with some compilers that 100 pe1e2v(:,:) = 0._wp ! require an initialization of INTENT(out) arguments 99 101 ! 100 102 !
Note: See TracChangeset
for help on using the changeset viewer.