sum_reduce_real_3array Subroutine

private subroutine sum_reduce_real_3array(a, dest)

Arguments

Type IntentOptional Attributes Name
real, intent(inout), dimension(:, :, :) :: a
integer, intent(in) :: dest