MPI_TAG_UB для openmpi / 2.1.1 - PullRequest
       63

MPI_TAG_UB для openmpi / 2.1.1

0 голосов
/ 29 августа 2018

Я пытаюсь получить параметр MPI_TAG_UB для openmpi (я использую версию 2.1.1). Я знаю, что мне нужно использовать подпрограмму MPI_COMM_GET_ATTR, но я понятия не имею, как это сделать, я никогда не использовал Fortran в своей жизни. По этой ссылке Я попробовал это:

LOGICAL FLAG

INTEGER IERR

INTEGER (KIND=MPI_ADDRESS_KIND) VALUE

! Upon successful return, VALUE == 7 (sign extended)

CALL MPI_COMM_GET_ATTR(MPI_COMM_WORLD, KEYVAL, VALUE, FLAG, IERR)

Я положил это в файл test.f90, затем сделал

gfortran test.f90 -o test.out

но я получил это сообщение об ошибке:

Ошибка: параметр 'mpi_address_kind' в (1) не был объявлен или является переменной, которая не сводится к постоянному выражению Ошибка: неожиданный конец файла в 'test.f90'

Так что в принципе я понятия не имею, что я делаю. Кто-нибудь когда-нибудь получал значение MPI_TAG_UB для реализации MPI?

Спасибо!

...