PDAFomi_init_dim_obs_l_iso Subroutine

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

Set dimension of local obs. vector and local obs. arrays

This routine sets the number of local observations for the current observation type for the local analysis domain with coordinates COORD_l and localization cut-off radius 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: * 2019-06 - 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