【Fortran90】ファイルの行数をカウントするプログラム
datファイルやcsvファイルなどの行数をカウントするプログラムを作りたくて色々調べてみたのですが、なにやらGOTO文を使っているのが多かったので、IF文を使ったプログラムを書いてみました。
program filereading implicit none integer :: countnumber, inputstatus real(8) :: x, y open (10, file='hogehoge.dat') countnumber = 0! 0 clear.