abaqus调用fortran子程序读取txt文件报错forrtl: severe (24)

风平老涡

在你原先的俩循环之间加一个close(11),

风平老涡

还有就是你的txt文件是否有20002个数据。

风平老涡

wzjdse 发表于 2020-8-19 19:42
我的txt就是10001行，两列，如下：
0.000000        19476.300000        
0.000100        19475.066748        

是否编一个小程序，只读这个txt文件

风平老涡

wzjdse 发表于 2020-8-19 19:42
我的txt就是10001行，两列，如下：
0.000000        19476.300000        
0.000100        19475.066748        

这个txt文件是由abaqus产生的吧，原先的format是什么？

风平老涡

用下面的程序读txt文件, 看看是否有错。

[Fortran] 纯文本查看 复制代码

program test
   implicit none
   integer, parameter :: rk=8
   integer :: i
   real(kind=rk) :: x(10001),y(10001)

   open(11, file="xtxt.txt")
   do i=1, 10001
       read(11,*) x(i), y(i)
       write(*,*) x(i), y(i)
   end do
end program test