program read_from_disk
      read(16,*)n
      write(*,*)'The value is',n
      end