我正在尝试将来自不同代码的结果使用到新代码中。我需要读取数字类型格式化的数据。我是Fortran编码的新手。输出提示"分段错误"。我不确定我的代码需要如何修改,或者我是否需要更改编译器中的某些设置。
program main
implicit none
double precision,dimension(101):: p,q
integer:: i,j
write(*,*) "Hello World!"
open(10,file='C:UsersACERDesktoptestresults_analytical.dat',status='old',action='read')
do i=1,101
write(10,1) p(i),q(i)
end do
1 format(1f14.10,1f14.10,1f14.10)
close(10)
do j=1,10
write(*,*) p(j),q(j)
end do
end program main
打开文件进行读取,但使用write
语句而不是read
语句读取数据。我不确定为什么它没有给你更好的错误消息。
我建议为您的编译器启用所有调试选项。我不确定它是如何在代码::块中完成的。