24小时热门版块排行榜     石溪大学接受考研调剂申请>

【调剂】北京石油化工学院2024年16个专业接受调剂
查看: 3931  |  回复: 3

lu589

铁虫 (正式写手)

[求助] Program received signal SIGSEGV: Segmentation fault - invalid memory reference已有1人参与

fortran程序错误,编译过程没提示错误,执行a.out时错误信息如下:

Program received signal SIGSEGV: Segmentation fault - invalid memory reference.

Backtrace for this error:
#0  0x2B037CE82697
#1  0x2B037CE82CDE
#2  0x2B037D91527F
#3  0x2B037DA34CF4
#4  0x2B037CF51424
#5  0x2B037CF4FBD3
#6  0x400A8A in MAIN__ at massjd.f:?
Segmentation fault (core dumped)

刚接触fortran语言,不太明白是什么问题,请各位大神帮忙看下

程序如下:
      program mass
c
      implicit none
      include '../aek.h'
c
      integer*4  i,j,k
      real*8  xc,zc,phi(nx,ny,nz),sumphi,sumx,sumz
c
c...open input and output file
      open (unit=11,file='mass.txt',form='formatted',status='new')
       open (unit=2,file='../movfields/0100.dat',
     >      form='unformatted',status='old')
c...initialize
      sumx=0d0
      sumz=0d0
      sumphi=0d0
      do i=1,nx
        do k=1,nz
c...location of (x,z) = (1d0*i-0.5d0,1d0*k-0.5d0)
          read(2) phi(i,j,k)
          if (phi(i,j,k) .gt. 0d0) then
            sumphi=sumphi+phi(i,j,k)
            sumx=sumx+phi(i,j,k)*(1d0*i-0.5d0)
            sumz=sumz+phi(i,j,k)*(1d0*k-0.5d0)
          endif
        enddo
      enddo
      xc=sumx/sumphi
      zc=sumz/sumphi
      write(11,*) xc,zc
      close (unit=2)
      close (unit=11)
      end
回复此楼

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

sspa9999

至尊木虫 (著名写手)

这种错误通常是访问了不该访问的地址。phi的下标j在哪里定义了?你的循环只有i和k

发自小木虫Android客户端
2楼2019-08-16 06:00:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lu589

铁虫 (正式写手)

引用回帖:
2楼: Originally posted by sspa9999 at 2019-08-16 06:00:10
这种错误通常是访问了不该访问的地址。phi的下标j在哪里定义了?你的循环只有i和k

我后面在其他服务器上试了一下,可以运行,是不是我的服务器哪里需要设置下呢?
3楼2019-08-16 13:48:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

sspa9999

至尊木虫 (著名写手)

【答案】应助回帖

★ ★ ★ ★ ★
感谢参与,应助指数 +1
lu589: 金币+5, ★★★很有帮助 2019-08-22 16:52:57
compile the code with "-g" and run it with "gdb" if you're using GNU Fortran.
If not, compile your code with appropriate debug flag and launch it with debugger.  You should be able to see why it crashed.
4楼2019-08-16 22:09:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 lu589 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 没学上 +5 季向阳 2024-04-26 10/500 2024-04-26 19:12 by 季向阳
[有机交流] 如何分离原料与产品 5+4 qwerasdf587 2024-04-24 12/600 2024-04-26 17:58 by 小肉干
[基金申请] 基金开始函评了吗? +15 wych1103 2024-04-25 15/750 2024-04-26 17:10 by xuechenli
[考研] 学硕专硕 +5 小蜗牛* 2024-04-26 5/250 2024-04-26 16:43 by 鱼翔浅底1
[论文投稿] with editor 两个月了,什么原因? +7 yiersan9 2024-04-24 15/750 2024-04-26 16:13 by jonewore
[硕博家园] 博士白读了 +44 Da_Meng_Zi 2024-04-21 48/2400 2024-04-26 15:59 by s150535912
[考博] 25年博士申请 +6 Changzixuan 2024-04-25 11/550 2024-04-26 13:48 by 我属驴核动力驴
[考研] 381求调剂 +4 小刺猬987654321 2024-04-25 6/300 2024-04-26 10:57 by czl12138
[基金申请] "颜宁:基础研究应顶天立地"能做到基础研究同时顶天立地的才是牛人 +5 zju2000 2024-04-24 5/250 2024-04-26 09:36 by LittleBush
[教师之家] 刚博士毕业,入职普通一本高校 +19 保持肌肤 2024-04-20 20/1000 2024-04-26 09:16 by zhaojp918
[找工作] 普通院校药学硕士,做合成的,感觉找不到工作 +9 pom戴墨镜 2024-04-24 16/800 2024-04-26 08:37 by lfq_198989
[教师之家] 期末给学生划重点都是什么话术啊 +16 luokereng 2024-04-20 18/900 2024-04-25 15:46 by BusyGer
[论文投稿] 一直找不到审稿人 +5 lizhengke06 2024-04-21 6/300 2024-04-25 14:01 by chongdong
[博后之家] 南京大学-广州大学联合招聘博士后 欢迎广大优秀人才!!! +4 黑魔变身啾 2024-04-20 12/600 2024-04-25 11:18 by dodonaomi
[访问学者] CSC的访问学者申请,没有个评审意见,也不知道怎么改,还有必要申请吗 +4 flyingship 2024-04-20 4/200 2024-04-24 21:09 by 59038mute
[考博] 24年 申博 化学/材料 一作6篇sci +9 wangyp123 2024-04-23 11/550 2024-04-24 19:01 by bangbangbiu
[考博] 博士招生 +4 zx179 2024-04-24 7/350 2024-04-24 15:01 by H考研成功
[教师之家] 大家访学都是怎么找的啊? +3 luokereng 2024-04-22 3/150 2024-04-24 11:40 by xuechenli
[高分子] 请问UV灯是365nm的,那么选光引发剂的波长选多少的?要完全一致吗? +4 engledd2004 2024-04-21 4/200 2024-04-22 16:08 by wangcz23
[论文投稿] 编辑是选国外的好还是国内的好。 +8 lizhengke06 2024-04-20 8/400 2024-04-22 08:58 by cuiyunjian
信息提示
请填处理意见