do i=1,ndim,1
do j=1,ndim,1
read(10,*) mat(i,j)
end do
end do
!改为
do i=1,ndim,1
read(10,*) mat(i,:)
end do
li913 发表于 2024-1-18 17:29
[mw_shl_code=fortran,true]do i=1,ndim,1
do j=1,ndim,1
read(10,*) mat(i,j)
fcode 发表于 2024-1-19 08:13
一般是文件路径问题,可以尝试在命令行中运行,可以看到错误提示。http://1shan.w.fcode.cn
...
欢迎光临 Fortran Coder (http://bbs.fcode.cn/) | Powered by Discuz! X3.2 |