1,330
edits
(→LCF) |
(→LCF) |
||
Line 209: | Line 209: | ||
! LCF items | ! LCF items | ||
INTEGER(2) :: header(8) | INTEGER(2) :: header(8),ncol | ||
INTEGER(2), ALLOCATABLE :: refdat(:) | INTEGER(2), ALLOCATABLE :: refdat(:) | ||
REAL :: cell(6) | REAL :: cell(6) | ||
Line 215: | Line 215: | ||
! program variables | ! program variables | ||
INTEGER :: i | INTEGER :: i,offset | ||
CHARACTER :: string*120 | CHARACTER :: string*120 | ||