Changeset 13216 for NEMO/trunk/src/SAS/nemogcm.F90
- Timestamp:
- 2020-07-02T11:25:49+02:00 (4 years ago)
- Location:
- NEMO/trunk
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk
- Property svn:externals
-
old new 2 2 ^/utils/build/makenemo@HEAD makenemo 3 3 ^/utils/build/mk@HEAD mk 4 ^/utils/tools @HEADtools5 ^/vendors/AGRIF/dev @HEADext/AGRIF4 ^/utils/tools/@HEAD tools 5 ^/vendors/AGRIF/dev_r12970_AGRIF_CMEMS ext/AGRIF 6 6 ^/vendors/FCM@HEAD ext/FCM 7 7 ^/vendors/IOIPSL@HEAD ext/IOIPSL
-
- Property svn:externals
-
NEMO/trunk/src/SAS/nemogcm.F90
r13011 r13216 91 91 #if defined key_agrif 92 92 Kbb_a = Nbb; Kmm_a = Nnn; Krhs_a = Nrhs ! agrif_oce module copies of time level indices 93 CALL Agrif_Declare_Var_dom ! AGRIF: set the meshes for DOM94 93 CALL Agrif_Declare_Var ! " " " " " DYN/TRA 95 94 # if defined key_top 96 95 CALL Agrif_Declare_Var_top ! " " " " " TOP 97 # endif98 # if defined key_si399 CALL Agrif_Declare_Var_ice ! " " " " " Sea ice100 96 # endif 101 97 #endif … … 345 341 ! Initialise time level indices 346 342 Nbb = 1; Nnn = 2; Naa = 3; Nrhs = Naa 343 #if defined key_agrif 344 Kbb_a = Nbb; Kmm_a = Nnn; Krhs_a = Nrhs ! agrif_oce module copies of time level indices 345 #endif 347 346 348 347 ! !-------------------------------! … … 358 357 CALL phy_cst ! Physical constants 359 358 CALL eos_init ! Equation of seawater 359 #if defined key_agrif 360 CALL Agrif_Declare_Var_ini ! " " " " " DOM 361 #endif 360 362 CALL dom_init( Nbb, Nnn, Naa, 'SAS') ! Domain 361 363 IF( sn_cfctl%l_prtctl ) &
Note: See TracChangeset
for help on using the changeset viewer.