Opened 6 years ago
Closed 6 years ago
#846 closed bug (Fixed)
IMPORTANT: Corrected ad_step3d_t.F, tl_step3d_t.F, and rp_step3d_t.F
| Reported by: | arango | Owned by: | |
|---|---|---|---|
| Priority: | major | Milestone: | Release ROMS/TOMS 3.9 |
| Component: | Adjoint | Version: | 3.9 |
| Keywords: | Cc: |
Description
The logical switch Lmpdata is located in the wrong place in ad_step3d_t.F, tl_step3d_t.F, and rp_step3d_t.F:
!
!-----------------------------------------------------------------------
! Time-step horizontal advection term.
!-----------------------------------------------------------------------
!
Lmpdata=ANY(tl_Hadvection(:,ng)%MPDATA).and. &
& ANY(tl_Vadvection(:,ng)%MPDATA)
It needs to be located outside of the AD_SUPPORTED, TL_SUPPORTED, and RP_SUPPORTED directives, repectively.
Many thanks to Julia Levin for bringing this to my attention.
Note:
See TracTickets
for help on using tickets.
