Changeset 15055 for NEMO/trunk/src/OCE/SBC/sbcrnf.F90

Timestamp:

2021-06-25T00:36:40+02:00 (3 years ago)

Author:

clem

Message:

nn_hls=2: make sure ww is defined on the halos since it is used in several places. So we need to ensure that hdiv is also defined on the halos

File:

• NEMO/trunk/src/OCE/SBC/sbcrnf.F90 (modified) (1 diff)

NEMO/trunk/src/OCE/SBC/sbcrnf.F90

@@ -211 +211 @@
       IF( ln_rnf_depth .OR. ln_rnf_depth_ini ) THEN      !==   runoff distributed over several levels   ==!
          IF( ln_linssh ) THEN    !* constant volume case : just apply the runoff input flow
-            DO_2D_OVR( nn_hls-1, nn_hls, nn_hls-1, nn_hls )
+            DO_2D_OVR( nn_hls, nn_hls, nn_hls, nn_hls )
                DO jk = 1, nk_rnf(ji,jj)
                   phdivn(ji,jj,jk) = phdivn(ji,jj,jk) - ( rnf(ji,jj) + rnf_b(ji,jj) ) * zfact * r1_rho0 / h_rnf(ji,jj)