Fortran Coder

查看: 1911|回复: 0
打印 上一主题 下一主题

[通用算法] 并行出错

[复制链接]

68

帖子

25

主题

0

精华

专家

F 币
321 元
贡献
197 点
跳转到指定楼层
楼主
发表于 2021-12-25 04:52:57 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
大家好,

我编写了一个FORTRAN代码,里面用了MPI并行。编译可以正常通过。我把我的FORTRAN程序上传到附件里了。

但当我提交并运行程序时,却出现错误。好像与MPI的数据广播有关,但我没发现哪里不对。我报错文件粘贴在下面了。
Loading mkl-2021.3.0 version modulefiles
Loading compilers-2021.3.0 version modulefiles
Loading tbb-2021.3.0 version modulefiles
Loading tbb-2021.3.0 version modulefiles
Loading mpi-2021.3.0 version modulefiles
Abort(67706625) on node 1 (rank 1 in comm 0): Fatal error in PMPI_Bcast: Invalid buffer pointer, error stack:
PMPI_Bcast(451): MPI_Bcast(buf=(nil), count=12, MPI_DOUBLE, root=0, comm=MPI_COMM_WORLD) failed
PMPI_Bcast(428): Null buffer pointer


另外,我也把地交任务的脚本文件放在下面了。
#!/bin/bash
#SBATCH --partition=bansil
#SBATCH --job-name=code
#SBATCH --time=00:30:00
#SBATCH --err=std.err
#SBATCH --output=std.out
#SBATCH --nodes=2
#SBATCH --ntasks=2
#SBATCH --constraint=zen2
module load intel/mkl-2021.3.0
module load intel/mpi-2021.3.0
export OMP_NUM_THREADS=1
#----------------------------------------------------------#
echo "The job "${SLURM_JOB_ID}" is running on "${SLURM_JOB_NODELIST}
#----------------------------------------------------------#
mpirun ./BERRYCURVATURE


能麻烦大家帮我查看下,我的程序中哪里出了问题吗?又要如何修改呢?

谢谢大家。

Kieran

BERRYCURVATURE.f90

17.18 KB, 下载次数: 3

我的FORTRAN程序

分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-12-25 17:13

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表