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.
