1,330
edits
(→LCF) |
(→LCF) |
||
Line 244: | Line 244: | ||
! read column labels and comment | ! read column labels and comment | ||
string='' | string='' | ||
DO i=1, | 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 |