如何在fortran中跳过数据行 [英] How to skip a data line in fortran
本文介绍了如何在fortran中跳过数据行的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
我有这个数据文件
,并且想读取此数据,而不用行1,2,3,4,5
and want to read this data without line 1,2,3,4,5
program example
real data(15,9)
OPEN ( unit=10, file='filename' )
do i = 1, 15
READ (10, *) (data(i,j), j=1,10)
enddo
print *, data(4,1), data(4,2), data(4,3)
stop
end
这是我的fortran代码.
this is my fortran code.
我该如何更改此代码
推荐答案
正在寻找类似的东西?
输入文件:数据
line1
line2
line3
line4
line5
line6
line7
line8
line9
line10
fortran代码:
implicit none
integer:: lskip,lread
character(len=20)::line
open(20, file = "data")
!skip first 5 line
do lskip = 1,5
read(20,*)
End do
! First 5 lines skiped
! Now read actual lines
do lread = 1,5
read(20,*)LINE
write(*,*)line
End do
close(20)
end
结果
$gfortran so.f90
$./a.out
line6
line7
line8
line9
line10
注意::这是一个最小的示例,仅用于显示跳过.您将更改内部读取lread
循环以根据您的数据格式实际读取文件
NB: This is a minimal example, just for showing the skipping. You will change the read inside lread
loop to actually read your file according to your data format
这篇关于如何在fortran中跳过数据行的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文