Contents of file named dolist

* Contents of macro "dolist"
do hdr list stla stlo evla evlo evdp scale ;* Hdr fields to check
   if UNDEFINED EQ "&1,$hdr$&"             ;* Check if set
      message "$hdr$ not set in file header"
   endif
enddo