program prog
      write(6, *) 'now reading one line...'
      read *
      write(6, *) 'done'
      end