CORR

* SUBR CORRELATION REV H-10 PAGE 4

0151 00222 140040 CRA 0152 00223 0 04 00442 STA TOT 0153 00224 -0 02 00357 LDA* TOP 0154 00225 -0 05 00360 ERA* BOT 0155 00226 0 04 00372 STA TEMP 0156 00227 0 12 00357 IRS TOP 0157 00230 0 12 00360 IRS BOT 0158 00231 0 10 00206 JST ADBT 0159 00232 0 02 00442 LDA TOT 0160 00233 0 06 00441 ADD TOTT 0161 00234 0 04 00441 STA TOTT 0162 00235 0 12 00371 IRS REPT 0163 00236 0 01 00222 JMP ERA+2 0164 00237 0 02 00441 LDA TOTT 0165 00240 -0 04 00363 STA* TOT1 0166 00241 140040 CRA 0167 00242 0 04 00441 STA TOTT 0168 00243 0 12 00363 IRS TOT1 0169 00244 0 10 00246 JST RSET 0170 00245 -0 01 00220 JMP* ERA 0171 00246 0 000000 RSET DAC ** 0172 00247 0 02 00356 LDA TOP! 0173 00250 0 04 00357 STA TOP 0174 00251 0 02 00361 LDA BOT! 0175 00252 0 04 00360 STA BOT 0176 00253 0 02 00354 LDA REP! 0177 00254 0 04 00371 STA REPT 0178 00255 -0 01 00246 JMP* RSET 0179 00256 140040 GR3 CRA 0180 00257 0 04 00437 STA ONE 0181 00260 0 02 00362 LDA TOT! ** GUESS - MISSING LINE ** 0182 00261 0 04 00363 STA TOT1 0183 00262 0 02 00505 LDA =-17 0184 00263 0 04 00370 STA TIME FIND LOWEST VALUE 0185 00264 0 02 00504 LDA =-9 0186 00265 0 04 00371 STA REPT 0187 00266 0 02 00503 ST2 LDA ='1000 0188 00267 0 04 00372 STA TEMP 0189 00270 0 12 00437 IRS ONE 0190 00271 -0 02 00363 LDA* TOT1 0191 00272 0 07 00372 SUB TEMP 0192 00273 101400 SMI 0193 00274 0 01 00302 JMP *+6 0194 00275 -0 02 00363 LDA* TOT1 0195 00276 0 04 00372 STA TEMP 0196 00277 0 04 00445 STA VAL2 HOLDS LOWEST VALUE FOR LEFT 0197 00300 0 02 00437 LDA ONE 0198 00301 0 04 00443 STA PAS2 NO.OF PASS 0199 00302 0 12 00363 IRS TOT1 0200 00303 0 12 00370 IRS TIME