indexed_sum Subroutine

publicpure subroutine indexed_sum(source, ind, dest)

Arguments

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

Called by

proc~~indexed_sum~2~~CalledByGraph proc~indexed_sum~2 indexed_sum proc~calc_surface_spectral~2 calc_surface_spectral proc~calc_surface_spectral~2->proc~indexed_sum~2

Contents