Changeset 15530

Timestamp:

2021-11-23T16:09:32+01:00 (2 years ago)

Author:

clem

Message:

add comment to better understand

File:

• NEMO/trunk/src/ICE/iceistate.F90 (modified) (1 diff)

NEMO/trunk/src/ICE/iceistate.F90

@@ -437 +437 @@
          ! store the adjustment value in a global module variable to make it retrievable in nested domains
          IF( .NOT.Agrif_Root() ) THEN
-            IF  (.NOT.ln_init_chfrpar ) THEN
+            IF  (.NOT.ln_init_chfrpar ) THEN   ! child is not initialized from the parent
                zsshadj = Agrif_Parent(rsshadj)
-            ELSE
-               zsshadj = 0._wp
+            ELSE                               ! child is     initialized from the parent
+               zsshadj = 0._wp                 ! => 0 since ssh adjustement is already done
             ENDIF
          ELSE