【发布时间】:2018-12-04 00:24:35
【问题描述】:
我在 Open-MPI 和 Java 中有一个发送/接收实现。目标是将 Fortran 字符集发送到 Java。当 Java 接收到这个字符串时,它会打印以下结果。 Result send/receive
我的 Fortran 代码是:
program simple4
implicit none
include 'mpif.h'
integer ierr,my_rank,size
integer src, dest, tag, position, charSize
integer status(MPI_STATUS_SIZE)
CHARACTER*80 TEXT
call mpi_init(ierr)
call mpi_comm_rank(MPI_COMM_WORLD,my_rank,ierr)
call mpi_comm_size(MPI_COMM_WORLD,size,ierr)
src = 0
dest = 1
tag = 999
if(my_rank.eq.0) then
position = 0
TEXT = "PRO"
call MPI_SEND(TEXT, 3, MPI_CHARACTER, dest, tag, MPI_COMM_WORLD, ierr)
else
print *, "Fortran process ", my_rank
end if
call mpi_finalize(ierr)
end
我的 Java 代码是:
....
char[] textChar = new char[3];
MPI.COMM_WORLD.recv(textChar, 3, MPI.CHAR, sourceRank, messageTag);
String text = String.copyValueOf(textChar);
System.out.println("Java - Text receive: " + text);
我的代码会出现什么问题? Fortran和Java这样就不能通信了?另一种解决方案是什么?
【问题讨论】: