PDAFomi_weights_l_sgnl Subroutine

public subroutine PDAFomi_weights_l_sgnl(verbose, nobs_l, ncols, locweight, cradius, sradius, matA, ivar_obs_l, dist_l, weight_l)

Compute weight vector for localization

The routine computes a weight vector according to the distances of observations from the local analysis domain.

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

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: verbose
integer, intent(in) :: nobs_l
integer, intent(in) :: ncols
integer, intent(in) :: locweight
real, intent(in) :: cradius
real, intent(in) :: sradius
real, intent(in) :: matA(:,:)
real, intent(in) :: ivar_obs_l(:)
real, intent(in) :: dist_l(:)
real, intent(out) :: weight_l(:)