IMPORTANT: Corrected couple of bugs
- mod_ncparam.F: Added missing END SELECT to the metadata for the adjoint sensitivity of inert tracers. Many thanks to Brian Powell for bringing this issue to my attention.
- main2d.F: Moved the updating of time index iic(ng) to be bottom of the time stepping:
!
!-----------------------------------------------------------------------
! Advance time index and time clock.
!-----------------------------------------------------------------------
!
DO ig=1,GridsInLayer(nl)
ng=GridNumber(ig,nl)
iic(ng)=iic(ng)+1
time(ng)=time(ng)+dt(ng)
step_counter(ng)=step_counter(ng)-1
CALL time_string (time(ng), time_code(ng))
END DO
END DO STEP_LOOP
I corrected this bug some time ago in my research code, but I forgot to fix the distributed code. Anyway, many thanks to Bradley Reed for reporting this issue.
Change History
(2)
Resolution: |
→ Fixed
|
Status: |
new → closed
|
The change to mod_ncparam.F was done incorrectly. Many thanks to Brian Powell for bringing this to my attention.