Data Section Descriptor

  ! Section -30 
  ! Data Section Descriptor.
  ! (Old OTF data format, kept for backward compatibility).
  integer mdescr
  parameter (mdescr=4)
  type descriptor
     sequence
     integer(kind=4) :: ndump   ! Number of records
     integer(kind=4) :: ldpar   ! Length of data header (longwords)
     integer(kind=4) :: ldatl   ! length of line data      (")
     integer(kind=4) :: ldump   ! length of record         (")
     integer(kind=4) :: rec     ! Current Record Number
  end type descriptor