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~2~~CalledByGraph proc~indexed_sum_vec~2 indexed_sum_vec proc~calc_surface_spectral~2 calc_surface_spectral proc~calc_surface_spectral~2->proc~indexed_sum_vec~2

Contents