- Timestamp:
- 2011-07-13T15:31:05+02:00 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2011/UKMO_MERCATOR_obc_bdy_merge/NEMOGCM/NEMO/OPA_SRC/SBC/fldread.F90
r2797 r2800 134 134 !!--------------------------------------------------------------------- 135 135 ! Note that shifting time to be centrered in the middle of sbc time step impacts only nsec_* variables of the calendar 136 IF( present(timeshift) ) THEN 136 IF( present(jit) ) THEN 137 ! ignore kn_fsbc in this case 138 isecsbc = nsec_year + nsec1jan000 + jit*rdt/REAL(nn_baro,wp) 139 ELSE IF( present(timeshift) ) THEN 137 140 isecsbc = nsec_year + nsec1jan000 + NINT(0.5 * REAL(kn_fsbc - 1,wp) * rdttra(1)) + timeshift * rdttra(1) ! middle of sbc time step 138 141 ELSE
Note: See TracChangeset
for help on using the changeset viewer.