Opened 7 years ago

Closed 7 years ago

#721 closed bug (Fixed)

Bug in uv_rotate.F when not ASSUMED_SHAPE — at Version 1

Reported by: kate Owned by: arango
Priority: major Milestone: Release ROMS/TOMS 3.7
Component: Nonlinear Version: 3.7
Keywords: Cc:

Description (last modified by arango)

There is a bug in uv_rotate.F when ASSUMED_SHAPE is activated. We need to have:

      real(r8), intent(inout) :: Uout(LBi:UBi,LBj:UBj,LBk:UBk)
      real(r8), intent(inout) :: Vout(LBi:UBi,LBj:UBj,LBk:UBk)

instead of

      real(r8), intent(inout) :: Uout(LBi:UBi,LBj:UBj,LBk:UBk)
      real(r8), intent(inout) :: Vout(LBi:UBi,LBj:UBj,LBk,UBk)

Change History (1)

comment:1 by arango, 7 years ago

Description: modified (diff)
Resolution: Fixed
Status: newclosed

Yes, thank you. Good catch.

Note: See TracTickets for help on using tickets.