| 查看: 3938 | 回复: 3 | ||
[求助]
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 |
回复此楼» 猜你喜欢
关于要不要三战
已经有4人回复
-
DMF怎么除水
已经有13人回复
-
24-25申博
已经有7人回复
-
酰胺合成
已经有6人回复
-
投稿某一SCI期刊，论文被拒绝，是否可以再次投稿到这个期刊？
已经有8人回复
-
七级岗，到手不到8000，带本科论文12教学分/生，额定教学分280
已经有28人回复
-
找工作千万不能来差学校
已经有13人回复
-
双非本科，学生又懒又笨。双一流本科好一些？入职门槛和考核要求比双非本科高多少？
已经有3人回复
-
想请问下IEEE Trans最后一轮，你们等了多久？
已经有8人回复
-
长烷基链氰基水解成羧酸 求助
已经有9人回复
sspa9999
至尊木虫 (著名写手)
- 应助: 14 (小学生)
- 金币: 16412.6
- 红花: 23
- 帖子: 1860
- 在线: 477.2小时
- 虫号: 3292914
- 注册: 2014-06-26
- 专业: 半导体电子器件
2楼2019-08-16 06:00:10
3楼2019-08-16 13:48:28
sspa9999
至尊木虫 (著名写手)
- 应助: 14 (小学生)
- 金币: 16412.6
- 红花: 23
- 帖子: 1860
- 在线: 477.2小时
- 虫号: 3292914
- 注册: 2014-06-26
- 专业: 半导体电子器件
4楼2019-08-16 22:09:28
4