ASR33IOL, F$R1

* O070-001-H001 (ASR33IOL) DRAWING NO. 41286032-001-01 PAGE 3

0101 * O$ALLC ASR LIST LINE COUNT/PAGE 0102 * O$ADLC ASR DEFAULT LINE COUNT/PAGE 0103 * O$ALLN ASR LIST LINE NUMBER 0104 * O$ADLN ASR DEFAULT LINE NUMBER 2 2 0105 * (THIS IS A DEFAULT MODULE) 0106 * 0107 * O$ALPN ASR LIST PAGE NUMBER 0108 * O$ADPN ASR DEFAULT PAGE NUMBER 2 2 0109 * (THIS IS A DEFAULT MODULE) 0110 * 0111 * O$AP ASR PRINT ROUTINE 10 8 0112 * 0113 * O$ALL ASR LIST LINE 24 20 0114 * 0115 * O$AC ASR OUTPUT CARRIAGE RETURN 6 6 0116 * 0117 * O$AF ASR OUTPUT LINE FEED 6 6 0118 * 0119 * I$AA ASR INPUT SOURCE RECORD 0120 * I$AAE ASR INPUT SOURCE RECORD 50 40 0121 * 0122 * O$AA ASR OUTPUT SOURCE RECORD 0123 * O$AAE ASR OUTPUT SOURCE RECORD 32 26 0124 * 0125 * O$AS ASR OUTPUT END OF TEXT 0126 * O$ASS ASR OUTPUT SOURCE END OF TEXT 0127 * O$ASE ASR OUTPUT SOURCE END OF TEXT 16 14 0128 * 0129 * I$AB ASR INPUT OBJECT LINK 14 12 0130 * 0131 * O$AB ASR OUTPUT OBJECT LINK 12 10 0132 * 0133 * O$ASO ASR OUTPUT OBJECT END OF TEXT 0134 * F$D1 FORTRAN WRITE FILE MARK ASR 14 12 0135 * 0136 * I$AO ASR INPUT OBJECT 102 66 0137 * 0138 * O$AO ASR OUTPUT OBJECT 36 30 0139 * 0140 * O$ALDR ASR PUNCH LEADER 16 14 0141 * 0142 * I$AINT ASR INITIALISE FOR INPUT 0143 * I$AK ASR INPUT CHARACTER 14 12 0144 * 0145 * I$AT ASR TIMING DELAY (ASR 33) 12 10 0146 * 0147 * O$AINT ASR INITIALISE FOR OUTPUT (ASR 33) 2 2 0148 * 0149 * O$AK ASR OUTPUT CHARACTER 10 8 0150 *