Ignore:
Timestamp:
2020-07-02T12:40:30+02:00 (3 months ago)
Author:
smasson
Message:

better e3: update with trunk@13218 see #2385

Location:
NEMO/branches/2020/dev_r12377_KERNEL-06_techene_e3
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2020/dev_r12377_KERNEL-06_techene_e3

    • Property svn:externals
      •  

        old new  
        22^/utils/build/makenemo@HEAD   makenemo 
        33^/utils/build/mk@HEAD         mk 
        4 ^/utils/tools@HEAD            tools 
        5 ^/vendors/AGRIF/dev@HEAD      ext/AGRIF 
         4^/utils/tools/@HEAD           tools 
         5^/vendors/AGRIF/dev_r12970_AGRIF_CMEMS      ext/AGRIF 
        66^/vendors/FCM@HEAD            ext/FCM 
        77^/vendors/IOIPSL@HEAD         ext/IOIPSL 
  • NEMO/branches/2020/dev_r12377_KERNEL-06_techene_e3/src/OCE/nemogcm.F90

    r13193 r13219  
    147147#if defined key_agrif 
    148148      Kbb_a = Nbb; Kmm_a = Nnn; Krhs_a = Nrhs   ! agrif_oce module copies of time level indices 
    149       CALL Agrif_Declare_Var_dom   ! AGRIF: set the meshes for DOM 
    150149      CALL Agrif_Declare_Var       !  "      "   "   "      "  DYN/TRA 
    151150# if defined key_top 
    152151      CALL Agrif_Declare_Var_top   !  "      "   "   "      "  TOP 
    153 # endif 
    154 # if defined key_si3 
    155       CALL Agrif_Declare_Var_ice   !  "      "   "   "      "  Sea ice 
    156152# endif 
    157153#endif 
     
    412408      ! Initialise time level indices 
    413409      Nbb = 1; Nnn = 2; Naa = 3; Nrhs = Naa 
    414  
     410#if defined key_agrif 
     411      Kbb_a = Nbb; Kmm_a = Nnn; Krhs_a = Nrhs   ! agrif_oce module copies of time level indices 
     412#endif  
    415413      !                             !-------------------------------! 
    416414      !                             !  NEMO general initialization  ! 
     
    427425      IF( lk_c1d       )   CALL     c1d_init        ! 1D column configuration 
    428426                           CALL     wad_init        ! Wetting and drying options 
     427 
     428#if defined key_agrif 
     429     CALL Agrif_Declare_Var_ini   !  "      "   "   "      "  DOM 
     430#endif 
    429431                           CALL     dom_init( Nbb, Nnn, Naa, "OPA") ! Domain 
    430432      IF( ln_crs       )   CALL     crs_init(      Nnn )       ! coarsened grid: domain initialization 
Note: See TracChangeset for help on using the changeset viewer.