integral programming in fortran

[sadeghiut]

hi guys
i want to write a fixed fortran program that give a txt file from user and calculate Exponential Integral base on data file. also the number of line is unknown and the program must determined.
can you help me with that.
for example the txt file like below:
25 36
14 56
17 98
14 24
...
...

 

[xwb]

Use end=label in your read statement

    ! open the file ihandle is the file descriptor
    ....
    do
        read(ihandle,*, end=999) n1, n2
        ! do something with n1 and n2
        ...
    end do
999 continue

 

[sadeghiut]

thanks alot