PDAFomi_omit_by_inno Subroutine

public subroutine PDAFomi_omit_by_inno(thisobs, inno_f, obs_f_all, obsid, cnt_all)

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

Arguments

Type IntentOptional 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