- Timestamp:
- 2016-05-26T10:59:48+02:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2016/dev_r6409_SIMPLIF_2_usrdef/NEMOGCM/NEMO/OPA_SRC/DOM/domvvl.F90
r6351 r6624 896 896 tilde_e3t_b(:,:,:) = 0.0_wp 897 897 tilde_e3t_n(:,:,:) = 0.0_wp 898 IF( ln_vvl_ztilde ) hdiv_lf(:,:,:) = 0. 0_wp898 IF( ln_vvl_ztilde ) hdiv_lf(:,:,:) = 0._wp 899 899 END IF 900 900 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.