Reflection files format: Difference between revisions

Line 244: Line 244:
! read column labels and comment
! read column labels and comment
string=''
string=''
DO i=1,22
DO i=1,(offset-124)/16
   READ(1)string(1+(i-1)*4:i*4),separator
   READ(1)string(1+(i-1)*4:i*4),separator
END DO
END DO
1,330

edits