Changeset 5863 for branches/2015/dev_r5836_NOC3_vvl_by_default/NEMOGCM/NEMO/OPA_SRC/DOM/domain.F90

Timestamp:

2015-11-05T16:18:17+01:00 (8 years ago)

Author:

gm

Message:

#1613: vvl by default: non-vvl OK thanks to error correction in mask in domain.F90

File:

• branches/2015/dev_r5836_NOC3_vvl_by_default/NEMOGCM/NEMO/OPA_SRC/DOM/domain.F90 (modified) (1 diff)

branches/2015/dev_r5836_NOC3_vvl_by_default/NEMOGCM/NEMO/OPA_SRC/DOM/domain.F90

@@ -93 +93 @@
       !
       ht_0(:,:) = e3t_0(:,:,1) * tmask(:,:,1)   ! Reference ocean thickness
-      hu_0(:,:) = e3u_0(:,:,1) * tmask(:,:,1)
+      hu_0(:,:) = e3u_0(:,:,1) * umask(:,:,1)
       hv_0(:,:) = e3v_0(:,:,1) * vmask(:,:,1)
       DO jk = 2, jpk