C PAT21.FOR C NAB/SLA/1736 23-AUG-79/ C RT-11 SOFTWARE DISPATCH AUGUST 1979 C FORTRAN IV/RT-11 V2.1 SEQ 23 M C COMPILER C DIRECT ACCESS READ -- PATCH 21. BYTE A(3) READ (I'A(J))K END