Главная /
Параллельное программирование с использованием технологии MPI /
В вызове какой процедуры функция smod5 объявляется в качестве глобальной процедуры op MPI_OP_FREE. program example15 include 'mpif.h' integer ierr, rank, i, n parameter (n = 1 000) integer a(n), b(n) integer op external smod5 call MPI_INIT(ierr) call MPI_
В вызове какой процедуры функция smod5
объявляется в качестве глобальной процедуры op
MPI_OP_FREE.
program example15
include 'mpif.h'
integer ierr, rank, i, n
parameter (n = 1 000)
integer a(n), b(n)
integer op
external smod5
call MPI_INIT(ierr)
call MPI_COMM_RANK(MPI_COMM_WORLD, rank, ierr)
do i = 1, n
a(i) = i + rank end do
print *, 'process ', rank, ' a(1) =', a(1)
call MPI_OP_CREATE(smod5, .TRUE., op, ierr)
call MPI_REDUCE(a, b, n, MPI_INTEGER, op, 0,
& MPI_COMM_WORLD, ierr)
call MPI_OP_FREE(op, ierr) if(rank .eq. 0) print *, ' b(1) =', b(1) call MPI_FINALIZE(ierr) end
integer function smod5(in, inout, l, type)
integer l, type
integer in(l), inout(l), i
do i = 1, l
inout(i) = mod(in(i)+inout(i), 5) end do return end
вопрос
Правильный ответ:
MPI_OP_CREATE
MPI_REDUCE
MPI_OP_FREE
Сложность вопроса
44
Сложность курса: Параллельное программирование с использованием технологии MPI
93
Оценить вопрос
Комментарии:
Аноним
Я помощник профессора! Прямо сейчас удалите ответы интуит. Это невозможно
10 сен 2020
Аноним
Я завалил зачёт, почему я не углядел этот великолепный сайт с всеми ответами интуит до сессии
24 авг 2016
Другие ответы на вопросы из темы суперкомпьютерные технологии интуит.
- # В каком файле собираются все описания интерфейса MPI?
- # Любой процесс может производить операции...
- # При помощи какого вызова можно получить группу, соответствующую коммуникатору MPI_COMM_WORLD
- # С помощью данной процедуры возможно... MPI_GROUP_EXCL(GROUP, N, RANKS, NEWGROUP, IERR) INTEGER GROUP, N, RANKS(*), NEWGROUP, IERR
- # Какой тип данных newtype задается в данном примере do i = 1, n blocklens (i) = n-i + 1 displs(i) = n*(i-1)+i-1 end do call MPI_TYPE_INDEXED(n, blocklens, displs, MPI_DOUBLE_PRECISION, newtype, ierr)