Opened 13 years ago

Closed 12 years ago

Last modified 4 years ago

#55 closed Bug (fixed)

allow good date when perfoming restarts

Reported by: ctlod Owned by: nemo
Priority: normal Milestone:
Component: OCE Version: release-1
Severity: Keywords: surface
Cc:

Description

The following lines must be added in daymod.F90 to have good date at initialization call daymod(-1) :

IF( ln_rstart ) THEN

rsec_year = REAL( nday_year ) * rday - rdttra(1) ! 00h 1st day of the current year
rsec_month = REAL( nday ) * rday - rdttra(1) ! 00h 1st day of the current month
rsec_day = REAL( nday ) * rday - rdttra(1) ! 00h of the current day

ELSE

rsec_year = REAL( nday_year - 1 ) * rday - rdttra(1) ! 00h 1st day of the current year
rsec_month = REAL( nday - 1 ) * rday - rdttra(1) ! 00h 1st day of the current month
rsec_day = - rdttra(1) ! 00h of the current day

ENDIF

Commit History (1)

ChangesetAuthorTimeChangeLog
804ctlod2008-01-31T10:44:45+01:00

allow good date when perfoming restarts, see ticket:#55

Change History (7)

comment:1 Changed 12 years ago by ctlod

  • Resolution set to fixed
  • Status changed from new to closed

comment:2 Changed 4 years ago by nicolasmartin

  • Keywords New Surface module added

comment:3 Changed 4 years ago by nicolasmartin

  • Keywords new added; New removed

comment:4 Changed 4 years ago by nicolasmartin

  • Keywords surface added; Surface removed

comment:5 Changed 4 years ago by nicolasmartin

  • Milestone New Surface Module deleted

Milestone New Surface Module deleted

comment:6 Changed 4 years ago by nicolasmartin

  • Keywords new surface added; NSM removed

comment:7 Changed 4 years ago by nicolasmartin

  • Keywords new removed
Note: See TracTickets for help on using tickets.