.TITLE GETSQ/PUTSQ ; ; THIS FILE REMOVES THE NEED FOR BOTH THE SEQUENTIAL FILE CODE ; AND THE RANDOM ACCESS CODE FOR FORTRAN I/O AS DOCUMENTED IN ; THE FORTRAN-IV USER'S GUIDE. ; GETSQ:: JMP .GET PUTSQ:: JMP .PUT .END