Reflection files format: Difference between revisions

m
Line 231: Line 231:
ALLOCATE(refdat(ncol))
ALLOCATE(refdat(ncol))


CALL GET_COMMAND_ARGUMENT(3,string)  ! expects NCOL
CALL GET_COMMAND_ARGUMENT(3,string)  ! expects OFFSET
READ(string,*) offset
READ(string,*) offset
WRITE(*,*) 'ncol, offset:',ncol,offset
WRITE(*,*) 'ncol, offset:',ncol,offset
1,330

edits