新手写openmp程序,结果不能运行,求教高手指点

博主在Visual Studio 2013中使用Intel Fortran 2013尝试编写OpenMP并行程序,该程序旨在求解大型稠密系数矩阵。在调试时虽然没有警告,但在读取数据时遇到运行错误。博主采用了无带回的高斯消去法,并在代码中展示了矩阵读取、并行计算及结果输出的过程,但遇到了程序断点问题,希望得到高手的指导。
摘要由CSDN通过智能技术生成

我用visual studio2013 +intel fortran2013来编写openmp的程序,

调试结果为哦错误,0警告,但是就是运行出错,说是遇到程序断点,错误出现在刚刚读入数据的地方

研究了很久都没结果,求路过的大神指点一二,拜谢!!!


程序如下(求解系数矩阵):

c************************************************************
c    求解大型稠密系数矩阵
c    应用于有限元刚度系数矩阵求解问题
c    采用openmp+fortran进行编译
c    采用无带回的高斯消去法
c************************************************************
      
      program coefficientmatrix
      use omp_lib
      implicit none
      integer,parameter::row=3
      integer,parameter::col=3
      integer my_id,i,j,k,nth,chunk
      real*8 buffer
      real*8 A(row,col),x(row),y(row)     
      
      chunk=1
      
c     读入矩阵A和向量y
      open(unit=1,file='A_data.txt')
      do i=1,row
          do

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值