应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » Fortran » 以下这段代码出现了问题，自己百思不得其解
51/1返回列表
查看: 845  |  回复: 5
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

abcd702848

金虫 (正式写手)

[求助] 以下这段代码出现了问题，自己百思不得其解

这段代码是自己采用mpich2结合IVF所编译的程序
    program main
      implicit none
      include 'mpif.h'
      real a,b
      integer rc,ierr
      integer n, myid, numprocs
      integer status(MPI_STATUS_SIZE)
      call MPI_INIT( ierr )
      call MPI_COMM_RANK( MPI_COMM_WORLD, myid, ierr )
      call MPI_COMM_SIZE( MPI_COMM_WORLD, numprocs, ierr )  
           a=10.0
           b=5.0
      if(myid.eq.0)then
          write(*,*)a,myid
          call mpi_send(a,1,mpi_real,1,2,MPI_COMM_WORLD,ierr)
          write(*,*)a
          open(unit=10,file="cch.txt"

      elseif(myid.eq.1)then
          write(*,*)b,myid
          call mpi_recv(b,1,mpi_real,0,2,MPI_COMM_WORLD,status,ierr)
          write(*,*)b
      endif
      call MPI_Finalize( ierr )
      end
但是结果是Fatal error in MPI_Send: Other MPI error, error stack:自己猜测是不是send出了问题，但是想不通到底是哪里的问题。
回复此楼

» 猜你喜欢
我想要的，我一定争取；我想要的，但是不符合客观实际的，我会看着
1楼 2013-06-24 09:22:36
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

abcd702848

金虫 (正式写手)
引用回帖:
5楼: Originally posted by pippi6 at 2013-06-24 10:13:16
sorry， 我没有装 mpich2，而且我的是CVF6.6，所以做不了这个。我猜mpif.h是mpich2带的。也许应该检查相应的IMSL MPI lib连接。

实在抱歉，帮不了你太多。

没事，能够回帖，已经很高兴了，就当是交流吧
赞一下 回复此楼
我想要的，我一定争取；我想要的，但是不符合客观实际的，我会看着
6楼2013-06-24 10:16:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答

pippi6

铁杆木虫 (著名写手)

工程和科学数值计算咨询

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与，应助指数 +1
abcd702848: 金币+10, ★★★很有帮助 2013-06-24 09:46:13
abcd702848: 金币+10, ★★★很有帮助 2013-08-03 09:03:13
文件 ‘mpif.h’ 呢？ 是你自己的header 还是fortran compiler的？
赞一下 回复此楼
2楼2013-06-24 09:35:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

abcd702848

金虫 (正式写手)
引用回帖:
2楼: Originally posted by pippi6 at 2013-06-24 09:35:27
文件 ‘mpif.h’ 呢？ 是你自己的header 还是fortran compiler的？

自己不太懂你说的意思，mpif.h这行字，自己是直接照抄一个例子的，很多例子上都有这句话，自己并没有在IVF中的head files中添加什么东西
赞一下 回复此楼
我想要的，我一定争取；我想要的，但是不符合客观实际的，我会看着
3楼2013-06-24 09:45:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

abcd702848

金虫 (正式写手)
引用回帖:
2楼: Originally posted by pippi6 at 2013-06-24 09:35:27
文件 ‘mpif.h’ 呢？ 是你自己的header 还是fortran compiler的？

不过，自己在project中的property中已经设置了C:\Program Files\MPICH2\lib和C:\Program Files\MPICH2\include和fmpich2.lib了，所以，固定式fortran采用include “'mpif.h'”应该没有什么问题了吧
赞一下 回复此楼
我想要的，我一定争取；我想要的，但是不符合客观实际的，我会看着
4楼2013-06-24 09:50:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急 +3 E4V9bALS54sj 2026-09-19 3/150 2026-09-20 01:39 by 9i7PCSZyMzot
[论文投稿] 售SCI文章，我:8O5.5.1.O.54,科目齐全,可+急 +3 E4V9bALS54sj 2026-09-19 3/150 2026-09-20 01:27 by 9i7PCSZyMzot
[硕博家园] 售SCI文章，我:8O.5.5.1O.54,科目全,可十急 +3 E4V9bALS54sj 2026-09-19 3/150 2026-09-20 01:27 by 9i7PCSZyMzot
[公派出国] 售SCI一区T0P文章，我:8O.55.1.O.5.4,科目齐全,可+急 +3 E4V9bALS54sj 2026-09-19 3/150 2026-09-20 01:15 by 9i7PCSZyMzot
[博后之家] 售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急 +3 E4V9bALS54sj 2026-09-19 3/150 2026-09-20 01:15 by 9i7PCSZyMzot
[考博] 售SCI文章，我:8O.5.5.1O.54,科目全,可十急 +3 E4V9bALS54sj 2026-09-19 3/150 2026-09-20 01:03 by 9i7PCSZyMzot
[论文投稿] 售SCI文章，我:8O5.5.1.O.54,科目齐全,可+急 +3 E4V9bALS54sj 2026-09-19 3/150 2026-09-20 00:51 by 9i7PCSZyMzot
[考研] 售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急 +3 4pRyVGCVerAA 2026-09-19 3/150 2026-09-20 00:15 by 9i7PCSZyMzot
[硕博家园] 售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急 +3 4pRyVGCVerAA 2026-09-19 3/150 2026-09-20 00:03 by 9i7PCSZyMzot
[找工作] 售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急 +4 4pRyVGCVerAA 2026-09-19 4/200 2026-09-20 00:03 by 9i7PCSZyMzot
[基金申请] 售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急 +3 4pRyVGCVerAA 2026-09-19 4/200 2026-09-19 23:39 by 9i7PCSZyMzot
[考研] 售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急 +3 4pRyVGCVerAA 2026-09-19 4/200 2026-09-19 23:27 by 9i7PCSZyMzot
[考博] 售SCI一区T0P文章，我:8.O.55.1.O.54,科目齐全,可+急 +3 4pRyVGCVerAA 2026-09-19 4/200 2026-09-19 23:03 by 9i7PCSZyMzot
[公派出国] 售SCI文章，我:8O5.5.1.O.54,科目齐全,可+急 +3 4pRyVGCVerAA 2026-09-18 7/350 2026-09-19 21:03 by 9i7PCSZyMzot
[教师之家] 现代”学阀”该如何界定 +3 iaeyuan 2026-09-19 3/150 2026-09-19 20:52 by 没昵称呀
[基金申请] 国社科系统bug了，是不是要放榜了？ +7 kynobel 2026-09-16 9/450 2026-09-19 14:52 by 接好运婷
[考博] 申博发邮件 +8 Lmengk 2026-09-15 9/450 2026-09-19 09:27 by 中间体超市
[有机交流] 各位大神，目前国内有哪些比较好用的逆合成软件？ 20+3 zapen 2026-09-15 9/450 2026-09-18 18:17 by zapen
[考博] 上海工程技术大学激光智能制造课题组｜2027级博士研究生招生公告 +7 水士口 2026-09-16 8/400 2026-09-16 13:47 by kkklens
[考博] 上海工程技术大学激光智能制造课题组招收博士研究生 +8 两三岁ss 2026-09-14 8/400 2026-09-16 09:46 by 水士口
信息提示
关闭
请填处理意见
关闭