Changeset 1241 for trunk/NEMO/OPA_SRC/DOM/domain.F90

Timestamp:

2009-01-05T17:14:49+01:00 (15 years ago)

Author:

rblod

Message:

Fix a stupid bug for time splitting and ensure restartability for dynspg_ts in addition, see tickets #280 and #292

File:

• trunk/NEMO/OPA_SRC/DOM/domain.F90 (modified) (2 diffs)

trunk/NEMO/OPA_SRC/DOM/domain.F90

@@ -146 +146 @@
       NAMELIST/namdom/ ntopo , e3zps_min, e3zps_rat, nmsh   ,   &
          &             nacc  , atfp     , rdt      , rdtmin ,   &
-         &             rdtmax, rdth     , rdtbt    , nclosea
+         &             rdtmax, rdth     , nn_baro  , nclosea
       NAMELIST/namcla/ n_cla
       !!----------------------------------------------------------------------
@@ -248 +248 @@
          WRITE(numout,*) '           maximum time step on tracers   rdtmax    = ', rdtmax
          WRITE(numout,*) '           depth variation tracer step    rdth      = ', rdth
-         WRITE(numout,*) '           barotropic time step           rdtbt     = ', rdtbt
+         WRITE(numout,*) '           number of barotropic time step nn_baro   = ', nn_baro
       ENDIF