Opened 16 years ago
Last modified 16 years ago
#293 closed bug
Missing declaration in mod_fourdvar.F — at Initial Version
Reported by: | m.hadfield | Owned by: | arango |
---|---|---|---|
Priority: | major | Milestone: | Release ROMS/TOMS 3.2 |
Component: | Nonlinear | Version: | 3.2 |
Keywords: | Cc: |
Description
In ROMS/Modules/mod_fourdvar.F, subroutine initialize_fourdvar, the parameter IniVal is declared inside an #ifdef block (lines 503–505):
# ifdef OBSERVATIONS real(r8), parameter :: IniVal = 0.0_r8 # endif
but later (lines 758-774) it is used in code that is not conditional on OBSERVATIONS being defined.
PS: I found this while building the CHANNEL_NECK test case.
Note:
See TracTickets
for help on using tickets.