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

Timestamp:

2008-06-24T17:00:56+02:00 (16 years ago)

Author:

smasson

Message:

daymod bugfix and enhancement, see ticket #216

File:

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

trunk/NEMO/OPA_SRC/DOM/domain.F90

@@ -16 +16 @@
    USE sbc_oce         ! surface boundary condition: ocean
    USE phycst          ! physical constants
-   USE daymod          ! calendar
    USE in_out_manager  ! I/O manager
    USE lib_mpp         ! distributed memory computing library
@@ -176 +175 @@
          WRITE(numout,*) '           multi file dimgout           ln_dimgnnn   = ', ln_dimgnnn
       ENDIF
-
-      ndastp = ndate0                ! Assign initial date to current date
 
       ! ... Control of output frequency