PDAFomi_init_dim_obs_l_noniso Subroutine

public subroutine PDAFomi_init_dim_obs_l_noniso(thisobs_l, thisobs, coords_l, locweight, cradius, sradius, cnt_obs_l)

Set dimension of local obs. vector and local obs. arrays (non-isotropic)

This routine sets the number of local observations for the current observation type for the local analysis domain with coordinates COORD_l and a vector of localization cut-off radii CRADIUS. Further the routine initializes arrays for the index of a local observation in the full observation vector and its corresponding distance. The operation are performed by calling the routines cnt_dim_obs_l and init_obsarrays_l.

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

Arguments

Type IntentOptional Attributes Name
type(obs_l), intent(inout), TARGET :: thisobs_l
type(obs_f), intent(inout) :: thisobs
real, intent(in) :: coords_l(:)
integer, intent(in) :: locweight
real, intent(in) :: cradius(:)
real, intent(in) :: sradius(:)
integer, intent(inout) :: cnt_obs_l