Apply covariance localization
This routine applies a localization matrix B to the matrices HP and HPH^T of the localized EnKF.
Revision history: * 2020-03 - Lars Nerger - Initial code from restructuring observation routines * Later revisions - see repository log
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(obs_f), | intent(in) | :: | thisobs | |||
integer, | intent(in) | :: | dim | |||
integer, | intent(in) | :: | locweight | |||
real, | intent(in) | :: | cradius | |||
real, | intent(in) | :: | sradius | |||
real, | intent(in) | :: | coords(:,:) | |||
real, | intent(inout) | :: | HP(:,:) | |||
real, | intent(inout) | :: | HPH(:,:) |