Opened 7 years ago
Last modified 7 years ago
#721 closed bug
Bug in uv_rotate.F when not ASSUMED_SHAPE — at Initial Version
| Reported by: | kate | Owned by: | arango |
|---|---|---|---|
| Priority: | major | Milestone: | Release ROMS/TOMS 3.7 |
| Component: | Nonlinear | Version: | 3.7 |
| Keywords: | Cc: |
Description
diff --git a/ROMS/Utility/uv_rotate.F b/ROMS/Utility/uv_rotate.F index 168405c..86011c1 100644 --- a/ROMS/Utility/uv_rotate.F +++ b/ROMS/Utility/uv_rotate.F @@ -190,7 +190,7 @@
- real(r8), intent(in)
- Vinp(LBi:UBi,LBj:UBj,LBk:UBk)
- real(r8), intent(inout)
- Uout(LBi:UBi,LBj:UBj,LBk:UBk)
+ real(r8), intent(inout) :: Vout(LBi:UBi,LBj:UBj,LBk:UBk)
# endif ! ! Local variable declarations.
Note:
See TracTickets
for help on using tickets.
