Fortran Coder

标题: hello world mpi并行，线程数错误？ [打印本页]

作者: feishay 时间: 2016-6-29 09:32
标题: hello world mpi并行，线程数错误？
本帖最后由 feishay 于 2016-6-29 09:37 编辑

刚起步学习mpi并行，运行了hello world并行例子，我的电脑是4核的，运行结果又问题，请坛友们帮我看看，问题出在哪，谢谢啦！
1. 程序源代码如下：
program main
include 'mpif.h'
integer ierr, myid, numprocs
call MPI_INIT(ierr)
call MPI_COMM_RANK( MPI_COMM_WORLD, myid, ierr)
call MPI_COMM_SIZE( MPI_COMM_WORLD, numprocs, ierr)
print *, 'I am', myid, 'of', numprocs
call MPI_FINALIZE(ierr)
pause
end

2. 输出结果如下：

QQ截图20160629092834.jpg (12.15 KB, 下载次数: 186)

输出结果

作者: li913 时间: 2016-6-29 11:13
MPI 用于多节点并行，也就是多台机器并行。 OpenMP 才是单机多核并行。

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)