我能够编译，这是文件夹psndrv1.f中的一个示例。ARPACK/PARPACK/EXAMPLE/MPI但是，当我使用命令运行程序时mpirun -np 4 a.out，出现以下错误。
[.th:9951] *** An error occurred in MPI_Allreduce
[.th:9951] *** on communicator MPI_COMM_WORLD
[.th:9951] *** MPI_ERR_OP: invalid reduce operation
[.th:9951] *** MPI_ERRORS_ARE_FATAL: your MPI job will now abort
--------------------------------------------------------------------------
mpirun has exited due to process rank 0 with PID 9951 on
node superinfra.ku.ac.th exiting improperly. There are two reasons this could oc
cur:
1. this process did not call "init" before exiting, but others in
the job did. This can cause a job to hang indefinitely while it waits
for all processes to call "init". By rule, if one process calls "init",
then ALL processes must call "init" prior to termination.
2. this process called "init", but exited without calling "finalize".
By rule, all processes that call "init" MUST call "finalize" prior to
exiting or it will be considered an "abnormal termination"
This may have caused other processes in the application to be
terminated by signals sent by mpirun (as reported here).
--------------------------------------------------------------------------
[.th:09950] 3 more processes have sent help message help-mpi-err
ors.txt / mpi_errors_are_fatal
[.th:09950] Set MCA parameter "orte_base_help_aggregate" to 0 to
see all help / error messages
我正在使用岩石簇。请帮忙。