Hi xwb and IRstuff
So far I open the external file, count the amount of lines in the file and store the first two rows in an Array:
CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
OPEN(unit=19,file=filez, status='old', action='read')
DO
READ(19,*,END=10)...