Changeset 15273 for branches/UKMO/dev_r5518_obs_oper_strthr/NEMOGCM
- Timestamp:
- 2021-09-20T14:08:08+02:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_obs_oper_strthr/NEMOGCM/NEMO/OPA_SRC/DOM/daymod.F90
r15272 r15273 357 357 ihour = INT(ksecs/3600) 358 358 iminute = ksecs/60-ihour*60 359 360 359 ! Add to nn_time0 361 360 nhour = nn_time0 / 100 362 361 nminute = ( nn_time0 - nhour * 100 ) 363 362 nminute=nminute+iminute 364 365 363 IF( nminute >= 60 ) THEN 366 364 nminute=nminute-60 … … 375 373 adatrj = INT(adatrj) ! adatrj set to integer as nn_time0 updated 376 374 ELSE 377 ! parameters corresponding to nit000 - 1 (as we start the step loop with a call to day) 375 ! Conflict 1,JRJ. parameters corresponding to nit000 - 1 (as we start the step loop with a call to day) 376 ! Why won't this work 378 377 ndastp = ndate0 ! ndate0 read in the namelist in dom_nam 379 378 nhour = nn_time0 / 100 … … 384 383 ENDIF 385 384 ELSE 386 ! parameters corresponding to nit000 - 1 (as we start the step loop with a call to day) 385 ! Conflict 2, JRJ. parameters corresponding to nit000 - 1 (as we start the step loop with a call to day) 386 ! This code needs to exist 387 387 ndastp = ndate0 ! ndate0 read in the namelist in dom_nam 388 388 nhour = nn_time0 / 100
Note: See TracChangeset
for help on using the changeset viewer.