Opened 6 years ago

Closed 6 years ago

#1414 closed Bug (fixed)

small error in format in daymod.F90

Reported by: clevy Owned by: nemo
Priority: low Milestone:
Component: OCE Version: trunk
Severity: Keywords:
Cc: Branch review:
MP ready?: Task progress:

Description

In OPA_SRC/DOM/daymod.F90, in routine day_init at line 125, the format towrite in ocean.ouput misses 1 element. For now it is:

IF(lwp) WRITE(numout,'(a,i6,a,i2,a,i2,a,i6)')' ==============>> 1/2 time step before the start of the run DATE Y/M/D = ',   &

  &                   nyear, '/', nmonth, '/', nday, '  nsec_[day:', nsec_day, ' day:', nsec_day, ']  nsec_week:', nsec_week

and it should be

IF(lwp) WRITE(numout,'(a,i6,a,i2,a,i2,a,i8,a,i8)')' ==============>> 1/2 time step before the start of the run DATE Y/M/D = ',   &

  &                   nyear, '/', nmonth, '/', nday, '  nsec_[day:', nsec_day, ' day:', nsec_day, ']  nsec_week:', nsec_week

Commit History (0)

(No commits)

Change History (3)

comment:1 Changed 6 years ago by clevy

I've made the fix. This avoids a crash when adding debug compiler options on uninitialised variables.
Now that nsec_week is printed, it appears to be negative during first time steps, at least when starting at nn_it000=0 and no restart

comment:2 Changed 6 years ago by clevy

  • Type changed from Defect to Bug

comment:3 Changed 6 years ago by clevy

  • Resolution set to fixed
  • Status changed from new to closed
Note: See TracTickets for help on using tickets.