如何解决如何在Fortran中打开迭代并将其保存在新文件中?
如何为每个时间步打开一个新文件并保存该时间步的汇总?假设我拥有一维数组,并想将每个时间步的输出保存到带有该时间步标签的新文件中。文件范围可能多达几百个。
我正在尝试运行代码,但是它不起作用。不知道该怎么做?
program iteration
implicit none
real,dimension(1:3) :: summ
integer :: timestep,x
integer,parameter :: nstep = 2
do timestep = 1,nstep
open(unit=1,file='file.txt')
do x = 1,3 ! 1D
summ = x + 0
write (unit=1,fmt=100)summ
end do
write (unit=1,fmt=100)summ
close(1)
end do
100 format (' ',f7.3)
end program iteration
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。