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
Type | Intent | Optional | 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 |