End-of-File Read from the Terminal

Under VS FORTRAN an EOF (end of file) is read from the terminal via a null entry (i.e., press the return key) and if successive reads from the terminal are attempted they will fail unless unit 5 is rewound. Under UNIX FORTRAN, the EOF is read from the terminal via a ctrl-d and no rewinds are necessary.


  ******************************************************************
  *                                                                *
  *                Correspondence to VS FORTRAN                    *
  *                                                                *
  ****************************************************************** 
  *                                                                *
  *        VS FORTRAN                           UNIX               *
  *        ==========                           ====               *
  *                                                                *
  *       read(5,*,end=99)x                read(5,*,end=99)x       *
  *              .                                .                *
  *              .                                .                *
  *  99   rewind 5                                .                *
  *       read(5,*,end=98)y         99     read(5,*,end=98)y       *
  *              .                                .                *
  *              .                                .                *
  *  98   stop                      98     stop                    *
  *       end                              end                     *
  *                                                                *
  *                                                                *
  *                                                                *
  ******************************************************************
University of Delaware
June 19, 1994