Changeset 14448 for NEMO/branches/2021/dev_r14383_PISCES_NEWDEV_PISCO/tests/OVERFLOW/MY_SRC/usrdef_zgr.F90

Timestamp:

2021-02-12T09:57:09+01:00 (3 years ago)

Author:

cetlod

Message:

NEWDEV_PISCO : merge with the trunk at revision r14447

File:

• NEMO/branches/2021/dev_r14383_PISCES_NEWDEV_PISCO/tests/OVERFLOW/MY_SRC/usrdef_zgr.F90 (modified) (1 diff)

NEMO/branches/2021/dev_r14383_PISCES_NEWDEV_PISCO/tests/OVERFLOW/MY_SRC/usrdef_zgr.F90

@@ -110 +110 @@
       !
       ! no ocean cavities : top ocean level is ONE, except over land
-      ! the ocean basin surrounded by land (1 grid-point) set through lbc_lnk call as jperio=0 
+      ! the ocean basin surrounded by land (1+nn_hls grid-points) set through lbc_lnk call
       z2d(:,:) = 1._wp                    ! surface ocean is the 1st level
-      CALL lbc_lnk( 'usrdef_zgr', z2d, 'T', 1. )        ! closed basin since jperio = 0 (see userdef_nam.F90)
+      CALL lbc_lnk( 'usrdef_zgr', z2d, 'T', 1. )        ! closed basin, see userdef_nam.F90
       k_top(:,:) = NINT( z2d(:,:) )
       !