PDAFomi_localize_covar_noniso Subroutine

public subroutine PDAFomi_localize_covar_noniso(thisobs, dim, locweight, cradius, sradius, coords, HP, HPH)

Apply covariance localization

This routine applies a localization matrix B to the matrices HP and HPH^T of the localized EnKF. This variant is for non-iceotropic localization

Revision history: * 2020-03 - Lars Nerger - Initial code from restructuring observation routines * Later revisions - see repository log

Arguments

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(:,:)