Opened 12 years ago
Last modified 12 years ago
#601 closed bug
Corrected bug in obs_sen_is4dvar.h — at Initial Version
Reported by: | arango | Owned by: | arango |
---|---|---|---|
Priority: | major | Milestone: | Adjoint Based Algorithms |
Component: | Adjoint | Version: | 3.7 |
Keywords: | Cc: |
Description
Several indices were not initialized in obs_sen_is4dvar.h when activating IS4DVAR_SENSITIVITY. We need to add:
DO ng=1,Ngrids #if defined ADJUST_BOUNDARY || defined ADJUST_STFLUX || \ defined ADJUST_WSTRESS Lfinp(ng)=1 ! forcing index for input Lfout(ng)=1 ! forcing index for output history files #endif #ifdef ADJUST_BOUNDARY Lbinp(ng)=1 ! boundary index for input Lbout(ng)=1 ! boundary index for output history files #endif ... END DO
Many thanks to Andy Moore and the 4D-Var training class for bringing this to my attention.
Note:
See TracTickets
for help on using tickets.