indexed_sum_vec Subroutine

public subroutine indexed_sum_vec(source, ind, dest, ist, iend)

Arguments

Type IntentOptional Attributes Name
real(kind=jprb), intent(in) :: source(:,:)
integer, intent(in) :: ind(:)
real(kind=jprb), intent(out) :: dest(:,:)
integer, intent(in) :: ist
integer, intent(in) :: iend

Called by

proc~~indexed_sum_vec~~CalledByGraph proc~indexed_sum_vec indexed_sum_vec proc~calc_surface_spectral calc_surface_spectral proc~calc_surface_spectral->proc~indexed_sum_vec proc~calc_toa_spectral calc_toa_spectral proc~calc_toa_spectral->proc~indexed_sum_vec

Contents