Changeset 12965 for NEMO/trunk/src/OCE/DOM

Timestamp:

2020-05-25T09:34:57+02:00 (4 years ago)

Author:

jchanut

Message:

Further nbondi/nbondj removal with AGRIF - results unchanged - forgotten in task #2199

File:

• NEMO/trunk/src/OCE/DOM/dommsk.F90 (modified) (1 diff)

NEMO/trunk/src/OCE/DOM/dommsk.F90

@@ -259 +259 @@
                ENDIF
             END DO
-#if defined key_agrif 
-            IF( .NOT. AGRIF_Root() ) THEN 
-               IF ((nbondi ==  1).OR.(nbondi == 2)) fmask(nlci-1 , :     ,jk) = 0.e0      ! east 
-               IF ((nbondi == -1).OR.(nbondi == 2)) fmask(1      , :     ,jk) = 0.e0      ! west 
-               IF ((nbondj ==  1).OR.(nbondj == 2)) fmask(:      ,nlcj-1 ,jk) = 0.e0      ! north 
-               IF ((nbondj == -1).OR.(nbondj == 2)) fmask(:      ,1      ,jk) = 0.e0      ! south 
-            ENDIF 
-#endif 
          END DO
          !