Fortran
Fortran
1. How to count lines by fortran
iline = 0
open
(10,"FileName")
do
read
(10, * ,iostat = io)
If
(io < 0)
exit
iline = iline + 1
end do
