#55 closed Bug (fixed)
allow good date when perfoming restarts
Reported by: | ctlod | Owned by: | nemo |
---|---|---|---|
Priority: | normal | Milestone: | |
Component: | OCE | Version: | v1 |
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)
Changeset | Author | Time | ChangeLog |
---|---|---|---|
804 | ctlod | 2008-01-31T10:44:45+01:00 | allow good date when perfoming restarts, see ticket:#55 |
Change History (7)
comment:1 Changed 16 years ago by ctlod
- Resolution set to fixed
- Status changed from new to closed
comment:2 Changed 8 years ago by nicolasmartin
- Keywords New Surface module added
comment:3 Changed 8 years ago by nicolasmartin
- Keywords new added; New removed
comment:4 Changed 8 years ago by nicolasmartin
- Keywords surface added; Surface removed
comment:5 Changed 8 years ago by nicolasmartin
- Milestone New Surface Module deleted
comment:6 Changed 8 years ago by nicolasmartin
- Keywords new surface added; NSM removed
comment:7 Changed 8 years ago by nicolasmartin
- Keywords new removed
Milestone New Surface Module deleted