program makeblob
  implicit none

  open (unit=42, file='BLOB.INC', status='old', action='read')

  close (unit=42)

end program