integer*8 function fdds_lseek8(bin, tag, offset, whence)
"tag" is a field tag which specifies a type of object
offset refers to. E.g. DDS_REAL should be used if
offset is measured in REAL words.
When tag = 0,
the nominal DDS target type (which is a trace) is used.
"offset" is a position measured relative to the whence origin. The offset should be an integer number of tag types.
whence seek origin
SEEK_SET beginning of the file
SEEK_CUR current file position
SEEK_END end of the file
integer bin
integer*8 offset
...
c skip next 10000000 traces
offset = 10000000
j = fdds_lseek8(bin, 0, offset, SEEK_CUR)