Changeset 9570 for branches/2017/dev_merge_2017/NEMOGCM/NEMO/NST_SRC/agrif_si3_update.F90

Timestamp:

2018-05-11T12:53:25+02:00 (6 years ago)

Author:

nicolasmartin

Message:

Global renaming for core routines (./NEMO)

• Folders
  • LIM_SRC_3 -> ICE_SRC
  • OPA_SRC -> OCE_SRC
• CPP key: key_lim3 -> key_si3
• Modules, (sub)routines and variables names
  • MPI: mpi_comm_opa -> mpi_comm_oce, MPI_COMM_OPA -> MPI_COMM_OCE, mpi_init_opa -> mpi_init_oce
  • AGRIF: agrif_opa_* -> agrif_oce_*, agrif_lim3_* -> agrif_si3_* and few more
  • TOP-PISCES: p.zlim -> p.zice, namp.zlim -> namp.zice
• Comments
  • NEMO/OPA -> NEMO/OCE
  • ESIM|LIM3 -> SI3

File:

• branches/2017/dev_merge_2017/NEMOGCM/NEMO/NST_SRC/agrif_si3_update.F90 (moved) (moved from branches/2017/dev_merge_2017/NEMOGCM/NEMO/NST_SRC/agrif_lim3_update.F90) (5 diffs)

branches/2017/dev_merge_2017/NEMOGCM/NEMO/NST_SRC/agrif_si3_update.F90

@@ -2 +2 @@
 !!#undef TWO_WAY
 
-MODULE agrif_lim3_update
+MODULE agrif_si3_update
    !!=====================================================================================
-   !!                       ***  MODULE agrif_lim3_update ***
+   !!                       ***  MODULE agrif_si3_update ***
    !! Nesting module :  update surface ocean boundary condition over ice from a child grid
    !! Sea-Ice model  :  LIM 3.6 Sea ice model time-stepping
@@ -12 +12 @@
    !!            3.6   !  05-2016  (C. Rousset)  Add LIM3 compatibility
    !!----------------------------------------------------------------------
-#if defined key_agrif && defined key_lim3
-   !!----------------------------------------------------------------------
-   !!   'key_lim3'  :                                 LIM 3.6 sea-ice model
+#if defined key_agrif && defined key_si3
+   !!----------------------------------------------------------------------
+   !!   'key_si3'  :                                 LIM 3.6 sea-ice model
    !!   'key_agrif' :                                 AGRIF library 
    !!----------------------------------------------------------------------
-   !!   agrif_update_lim3  : update sea-ice on boundaries or total
+   !!   agrif_update_si3  : update sea-ice on boundaries or total
    !!                        child domain for velocities and ice properties
    !!   update_tra_ice     : sea-ice properties
@@ -33 +33 @@
    PRIVATE
 
-   PUBLIC   agrif_update_lim3   ! called by agrif_user.F90 and icestp.F90
+   PUBLIC   agrif_update_si3   ! called by agrif_user.F90 and icestp.F90
 
    !!----------------------------------------------------------------------
    !! NEMO/NST 4.0 , LOCEAN-IPSL (2017)
-   !! $Id: agrif_lim3_update.F90 6204 2016-01-04 13:47:06Z cetlod $
+   !! $Id: agrif_si3_update.F90 6204 2016-01-04 13:47:06Z cetlod $
    !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt)
    !!----------------------------------------------------------------------
 CONTAINS
 
-   SUBROUTINE agrif_update_lim3( kt )
+   SUBROUTINE agrif_update_si3( kt )
       !!----------------------------------------------------------------------
-      !!                     *** ROUTINE agrif_update_lim3 ***
+      !!                     *** ROUTINE agrif_update_si3 ***
       !! ** Method  :   Call the hydrostaticupdate pressure at the boundary or the entire domain 
       !!
@@ -70 +70 @@
       Agrif_UseSpecialValueInUpdate = .FALSE.
       !
-   END SUBROUTINE agrif_update_lim3
+   END SUBROUTINE agrif_update_si3
 
 
@@ -210 +210 @@
    !!----------------------------------------------------------------------
 CONTAINS
-   SUBROUTINE agrif_lim3_update_empty
-      WRITE(*,*)  'agrif_lim3_update : You should not have seen this print! error?'
-   END SUBROUTINE agrif_lim3_update_empty
+   SUBROUTINE agrif_si3_update_empty
+      WRITE(*,*)  'agrif_si3_update : You should not have seen this print! error?'
+   END SUBROUTINE agrif_si3_update_empty
 #endif
 
    !!======================================================================
-END MODULE agrif_lim3_update
+END MODULE agrif_si3_update