24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 3161  |  回复: 3

shileijerry

至尊木虫 (知名作家)

[求助] Fortran MPI程序问题 已有2人参与

采用Microsoft Visual Studio Fortran编译MPI程序
程序如下:
   Fortran example  
   program hello
   include 'mpif.h'
   integer rank, size, ierror, tag, status(MPI_STATUS_SIZE)
   
   call MPI_INIT(ierror)
   call MPI_COMM_SIZE(MPI_COMM_WORLD, size, ierror)
   call MPI_COMM_RANK(MPI_COMM_WORLD, rank, ierror)
   print*, 'node', rank, ': Hello world'
   call MPI_FINALIZE(ierror)
   end

但编译出现如下问题:
Source1.f90(3): error #6591: An automatic object is invalid in a main program.   [STATUS]
error #6219: A specification expression object must be a dummy argument, a COMMON block object, or an object accessible through host or use association   [MPI_STATUS_SIZE]
compilation aborted for Source1.f90 (code 1)

谢谢
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

资料转自网络,仅限学习交流,请勿作他用,否则后果自负!
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

Yan_Jordan

木虫 (小有名气)

【答案】应助回帖


感谢参与,应助指数 +1
jjdg: 金币+1, 感谢参与 2017-04-14 23:02:57
楼主以前用C吧

Fortran和C有区别, 不是用 include 'mpif.h', 而是用use mpi

PS:有点小规范格式地方 integer ::
end program hello
规范一点比较好,也方便阅读
2楼2017-04-14 21:23:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wz_work

木虫 (小有名气)

【答案】应助回帖

对于FORTRAN77的代码,使用INCLUDE "mpif.h",对于Fortran90以后的使用 use mpi,此处报的错误是由于status未定义。
生命的长河是多么的迂回,希望又是多么的雄壮。
3楼2017-04-26 08:56:21
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wz_work

木虫 (小有名气)

引用回帖:
3楼: Originally posted by wz_work at 2017-04-26 08:56:21
对于FORTRAN77的代码,使用INCLUDE "mpif.h",对于Fortran90以后的使用 use mpi,此处报的错误是由于status未定义。

上边说的STATUS的错误应该不存在,抱歉。
生命的长河是多么的迂回,希望又是多么的雄壮。
4楼2017-04-26 09:00:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 shileijerry 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 085801 总分275 本科新能源 求调剂 +10 bradoner 2026-04-01 11/550 2026-04-01 22:57 by 来看流星雨10
[考研] 085600 一志愿9 总分351 求调剂学校 +7 czhcz 2026-03-31 9/450 2026-04-01 19:24 by 无际的草原
[考研] 08工科275求调剂,可跨考。 +5 AaAa7420 2026-03-31 5/250 2026-04-01 15:21 by 159357hjz
[考研] 291求调剂 +3 迷蒙木木 2026-04-01 4/200 2026-04-01 11:07 by 逆水乘风
[考研] 0710生物学求调剂! +6 叙述文 2026-03-31 6/300 2026-04-01 09:39 by JourneyLucky
[考研] 复试调剂 +7 双马尾痞老板2 2026-03-31 7/350 2026-03-31 19:49 by Dyhoer
[考研] 一志愿华东师范大学有机化学专业,初试351分,复试被刷求调剂! +9 真名有冰 2026-03-29 10/500 2026-03-31 18:01 by xhai2011
[考研] 求调剂 +9 akdhjs 2026-03-31 10/500 2026-03-31 17:14 by zhyzzh
[考研] 343求调剂 +8 爱羁绊 2026-03-28 8/400 2026-03-31 16:12 by 不吃魚的貓
[考研] 277跪求调剂 +8 1915668 2026-03-27 13/650 2026-03-31 14:58 by 王亮_大连医科大
[考研] 抱歉 +4 田洪有 2026-03-30 4/200 2026-03-30 21:26 by mumin1990
[考研] 一志愿南开大学0710生物学359求调剂 +5 兔兔兔111223314 2026-03-29 7/350 2026-03-30 18:29 by 兔兔兔111223314
[考研] 考研调剂 +5 Sanmu-124 2026-03-26 5/250 2026-03-30 13:36 by chemdavid
[考研] 327求调剂 +6 汲亦昊 2026-03-29 6/300 2026-03-29 13:40 by peike
[考研] 356求调剂 +4 gysy?s?a 2026-03-28 4/200 2026-03-29 10:32 by 唐沐儿
[考研] 279求调剂 +4 蝶舞轻绕 2026-03-29 4/200 2026-03-29 09:45 by laoshidan
[考研] 调剂考研 +3 王杰一 2026-03-29 3/150 2026-03-29 08:09 by fmesaito
[考研] 283求调剂 +3 A child 2026-03-28 3/150 2026-03-28 15:41 by ms629
[考研] 275求调剂 +10 jjjjjjjjjjl 2026-03-27 10/500 2026-03-27 23:47 by barnett0632
[考研] 085602化学工程求调剂。 +4 平乐乐乐 2026-03-26 4/200 2026-03-26 17:57 by fmesaito
信息提示
请填处理意见