- Timestamp:
- 2018-05-11T12:53:25+02:00 (6 years ago)
- Location:
- branches/2017/dev_merge_2017/NEMOGCM/NEMO/OCE_SRC
- Files:
-
- 1 edited
- 1 moved
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_merge_2017/NEMOGCM/NEMO/OCE_SRC/step.F90
r9490 r9570 46 46 47 47 !!---------------------------------------------------------------------- 48 !! NEMO/O PA4.0 , NEMO Consortium (2017)48 !! NEMO/OCE 4.0 , NEMO Consortium (2017) 49 49 !! $Id$ 50 50 !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt) … … 63 63 !! 64 64 !! ** Purpose : - Time stepping of OPA (momentum and active tracer eqs.) 65 !! - Time stepping of ESIM(dynamic and thermodynamic eqs.)65 !! - Time stepping of SI3 (dynamic and thermodynamic eqs.) 66 66 !! - Time stepping of TRC (passive tracer eqs.) 67 67 !! … … 296 296 IF( Agrif_NbStepint() == 0 ) THEN ! AGRIF Update from zoom N to zoom 1 then to Parent 297 297 !!jc in fact update is useless at last time step, but do it for global diagnostics 298 #if defined key_ lim3299 CALL Agrif_Update_ lim3( kstp ) ! update sea-ice298 #if defined key_si3 299 CALL Agrif_Update_si3( kstp ) ! update sea-ice 300 300 #endif 301 301 CALL Agrif_Update_ssh() ! Update ssh
Note: See TracChangeset
for help on using the changeset viewer.