Exclude observations for too high innovation
The routine is called during the analysis step of a global filter. It checks the size of the innovation and sets the observation error to a high value if the squared innovation exceeds a limit relative to the observation error variance.
Revision history: * 2024-02 - Lars Nerger - Initial code * Later revisions - see repository log
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(obs_f), | intent(inout) | :: | thisobs | |||
| real, | intent(in) | :: | inno_f(:) | |||
| real, | intent(in) | :: | obs_f_all(:) | |||
| integer, | intent(in) | :: | obsid | |||
| integer, | intent(inout) | :: | cnt_all |