PROGM 090 1 0 MASTER ROUTINE ENTRY 551 1 CHAPS 2 100 536 INDEX 3 1 2 10000 PROCR 100 100 FIXED ENTRY POINTS TO MASTER 10001 NOTES RADIX B 10002 124 536 2 1 0 0 536 160(IPS INITIAL ENTRY) 10003 124 264 12 1 0 0 264 161 gI/P O/P CONTROL 10004 100 559 2 0 1 0 559 162(IPS:ASL'S) 10005 124 205 2 1 0 0 205 163 gOPTIONS 10006 100 233 2 0 0 0 233 164 (IPS: APT) 10007 124 204 6 1 0 0 204 165 gPROGRAMME UNLOAD 10008 100 0 0 0 0 166 10009 124 244 2 1 0 0 244 167 gOVERLAY 10010 100 0 0 0 0 168 10011 124 207 2 1 0 0 207 169 gTYPE 10012 124 263 18 1 0 0 263 *££0*££3*13e*60e 10013 124 208 19 1 0 0 208 171g 10014 100 0 0 0 0 172 10015 124 243 68 1 0 0 243 *60e 10016 124 264 2 1 0 0 264 gTEST ROUTE 10017 100 0 0 0 0 175 5-FIGURE DATE 10018 100 0 0 0 0 176 10019 124 450 2 1 0 0 450 *13e RELEASE ROUTE 10020 115 537 2 0 1 0 537 178 ON LINE STORE DUMP 10021 100 2 0 0 0 179 ABDON/UNLOAD INDICATOR 10022 100 3 0 0 0 180 MACHINE NO 10023 100 0 0 0 0 181 SERIAL NUMBER 10024 100 0 0 0 0 182 MOD NUMBER 10025 124 182 2 1 0 0 182 *££0*££2*293 10026 124 103 17 1 0 0 103 *2£e 10027 124 182 2 1 0 0 182 *293 10028 124 127 31 1 0 0 127 *31e 10029 124 104 9 0 1 0 104 *££2*263 10030 124 268 9 1 0 0 268 183gPRIORITYQUEUE 10031 100 0 0 0 0 184 USED IN TYPE PQ 10032 100 0 0 0 0 185 LAST COMMAND 10033 100 0 0 0 0 186 CD: MIN RT 10034 100 0 0 0 0 187 CD: MAX RT 10035 100 0 0 0 0 188 CD: 8*CH 10036 100 0 0 0 0 189 CD: (8*CH)+4 10037 100 0 0 0 0 190 TW: RT NO 10038 100 2 0 0 0 191 TW: RT TYPE 10100 CONST 101 101 1 FAST CHANNEL ASLS 10102 (D)££££0££££; *3:t4£t CHANNEL 16 10104 ££££0££££; 10106 ££££0££££; 10108 ££££0££££; 10110 ££££0££££; CHANNEL 17 10112 ££££0££££; 10114 ££££0££££; 10116 ££££0££££; 10118 ££££0££££; CHANNEL 18 10120 ££££0££££; 10122 ££££0££££; 10124 ££££0££££; 10126 ££££0££££; CHANNEL 19 10128 ££££0££££; 10130 ££££0££££; 10132 ££££0££££; 10134 ££££0££££; CHANNEL 20 10136 ££££0££££; 10138 ££££0££££; 10140 ££££0££££; 10142 ££££0££££; CHANNEL 21 10144 ££££0££££; 10146 ££££0££££; 10148 ££££0££££; 10200 CONST 102 102 1 TYPEWRITER ANNEXE 10202 (D)7:(A)LDB(D)5.; TAB,L,D,B,L/E 10204 (D)0; 10206 0; 10208 0; 10210 0; 10212 0; 10214 0; 10216 0; 10218 0; 10220 0; 10222 0; 10224 0; 10226 0; 10228 0; 10230 0; 10232 0; 10234 0; 10236 0; 10238 0; 10240 0; 10242 0; 10244 0; 10246 0; 10248 0; 10250 0; 10252 0; 10254 0; 10256 0; 10258 0; 10260 0; 10262 0; 10264 0; 10266 0; 10268 0; 10270 0; 10272 0; 10274 0; 10276 0; 10278 0; 10280 0; 10282 5.5.; SP,SP,SP,L/E,L/E 10284 5.5.5.5.5.; L/E. L/E, L/E, L/E, L/E 10300 PROCR 103 103 LOG ROUTINE SWITCH 10301 NOTES RADIX B 10302 100 0 0 0 0 INDICATOR L1 OPTIONS OFFERED 10303 100 0 0 0 0 INDICATOR L2 COMMAND IGNORED 20917>10304 106 8 0 0 0 *59t STORE LINK AFTER 10305 124 2 0 3 0 *59t INTERRUPTION 10306 102 44 0 0 0 11106> 11108> 11306> 11308> 11506> 11508> 11706> 11708> 11906> 11908> 12106> 12108> 12306> 12308> 12506> 12508> 12728> 17710> 19921> 19972> 20919> 24415> 24623> 54229>10307 100 212 2 0 3 0 212 *31e SET BINARY HEAD OF QUEUE 12734>10308 124 212 2 1 1 0 212 SET MOD GROUP 0 18141> 18408> 18411> 18612> 18616>10309 124 103 25 1 0 0 103 (INTLY SL=4) SWITCH SL 10310 124 186 2 1 0 0 186 gROUTE CLOSED SWITCH L1 10311 124 106 14 1 0 0 106 gROUTE ENGAGED 10312 124 108 2 1 0 0 108 gDOUBTFUL BLOCK 10313 124 103 14 1 0 0 103 gWARNING OF END 10806> 10313>10314 124 182 24 1 0 0 182 *293 gAVAILABLE SWITCH SLAS 10315 126 273 2 0 0 0 273 (A),(B),(C), SET (C 10316 106 103 18 0 0 0 103 DECIMAL L SET RETUR 10026>10317 102 103 14 0 0 0 103 PROG LINK 10318 124 182 24 1 0 0 182 *293 SLAS=1 10319 100 0 0 0 0 SETTING OF L5 10320 106 198 10 1 0 0 198 *263 L5=1 10321 124 185 2 1 0 0 185 L5=2 10322 124 186 17 1 0 0 186 L5=3 18503>10323 106 104 10 0 0 0 104 SET SL=4 10324 102 103 9 0 0 0 103 10410> 10309>10325 125 1919 1 2 0 INTERROGATE I1-7,I9-11 TEST INDS STACKED 10326 127 199 2 0 1 0 199 gYES: OP INT 19903>10327 124 106 14 1 0 0 106 (INTLY L6=2) SWITCH L6 10331>10328 106 175 2 0 3 0 175 TEST REQUEST SET 10329 127 178 2 0 1 0 178 gYES 10330 125 2 0 3 0 10331 124 103 28 1 0 0 103 10400 PROCR 104 104 LOG ROUTINE SWITCH CONT 10401 NOTES RADIX B 10402 106 104 4 0 0 0 104 SET L6=2 10403 102 103 27 0 0 0 103 10404 124 106 14 1 0 0 106 gSM L6=2 10405 126 109 12 1 3 0 109 SET (MR3) FOR REQUESL8=1 10406 100 0 0 0 0 P 10407 100 0 0 0 0 Q 10408 100 0 0 0 0 (64+R)FIXED(T/W) 10409 100 0 0 0 0 (64+R)VARIABLE(T/W) 10410 124 103 25 1 0 0 103 SL=4 10411 100 0 0 0 0 SPARE 10412 100 0 0 0 0 1=256 MICROSECS INEFFECTIVE 10413 100 0 0 0 0 1=APP 1SEC TIME CNTR 10500 CONST 105 105 1 ANNEXES FOR FIXED COMMENT 10502 (D)7:(A)LDB(D)5.; TAB,L,D,B,L/E 10504 (D)6£7:(A)C I; R/S,TAB,C,SP,I 10506 (A)GN (D)5.5.; G,N,SP,L/E,L/E 10600 PROCR 106 106 MASTER ROUTINE SWITCH 10601 NOTES RADIX 10602 100 0 0 0 0 INDICATOR FOR 'ABDON' AND 'END' 10603 100 4 0 0 0 *££0*££2*1.3 10604 100 6 0 0 0 *1:3 10605 100 12 0 0 0 *393 10606 100 14 0 0 0 *4.3 10607 100 16 0 0 0 *££2*5t3 10608 100 0 0 0 0 SPARE 10609 100 0 0 0 0 MR3 SETTING FOR REQUEST T/W 10610 100 18 0 0 0 *1.3*1:3*1£4*384*393*5t3*4.3 8 1 10611 124 3 0 1 0 OPTION 8 10612 126 158 0 1 0 g 10616> 10628>10613 124 108 11 1 0 0 108 g 10404> 10327> 10311>10614 124 106 16 1 0 0 106 SWITCH SM 10615 124 106 25 1 0 0 106 gCLOSED(S=3) S=1 TEST ROUTE 10614>10616 124 106 13 1 0 0 106 gENGAGED(S=2) 10617 126 271 2 0 0 0 271 gD/B TEST ROUTE 10618 126 300 2 0 0 0 300 gW/E 10619 106 107 7 0 0 0 107 10620 102 106 14 0 0 0 106 S=4 10621 106 107 8 1 0 0 107 10622 102 2 1 0 0 SET UP MR1 10623 106 107 2 1 0 0 107 ROUTE NO. & TYPE 10624 124 265 3 1 0 0 265 gI/P O/P CONTROL 10615>10625 106 156 0 0 0 CURRENT TIME S=3 TEMP, CLOSED 10626 106 107 17 0 0 0 107 *££0*££1*46e 10627 105 107 17 0 0 0 107 *46e 10628 127 106 13 0 3 0 106 gNO ACTION IS REQUIRED 10629 126 107 8 1 1 0 107 SET UP MR1 10630 126 107 14 0 1 0 107 g 10707>10631 124 106 37 1 1 0 106 S=4 NORMAL 10632 106 107 8 1 0 0 107 RESET MOD. GROUP 10633 102 2 1 0 0 SET UP MR1 10634 100 107 2 1 1 0 107 RESTORE (A)(B)(C) 10635 126 107 16 0 1 0 107 g 10636 126 107 16 0 1 0 107 g 10637 100 0 0 0 0 MOD.GROUP 10700 PROCR 107 107 MASTER ROUTINE SWITCH CONT 10701 NOTES RADIX B 10702 100 0 0 0 0 (A) 10703 100 0 0 0 0 10704 100 0 0 0 0 (B) 10705 100 0 0 0 0 10706 100 0 0 0 0 (C) 10707 124 106 31 1 0 0 106 S=4 10708 100 106 2 0 0 0 106 PROG LINK 10709 100 0 0 0 0 START OF SPECIAL CHAPTER 10710 100 0 0 0 0 ALARM NO FOR D/D 10711 100 4097 1 0 0 PROG ID NO 10712 100 0 0 0 0 RUN & RERUN NO 10713 100 0 0 0 0 BIT PATTERN FOR OPTIONS 10714 100 270 2 0 0 0 270 *464 00004 10715 100 0 0 0 0 LOCN BEFORE 1ST OPTION 10716 100 0 0 0 0 LINK FOR I/P O/P, LINK FOR SI=4 10717 100 0 0 0 0 ASSOC TIME/ORIGINAL SWITCH SETTING 10718 100 0 0 0 0 W/L'S 10719 100 0 0 0 0 10800 PROCR 108 108 PSEUDO-SWITCH 10801 NOTES RADIX B 10312>10802 100 210 10 0 2 0 210 SET (MR3)=8*CH DOUBTFUL BLOCK 10803 125 0 1 2 0 ON LOG ASSEMBLER 10804 115 100 37 0 0 0 100 10805 126 272 2 0 0 0 272 gSET D/B INDICATOR 10806 124 103 14 1 0 0 103 gSLAS 10807 100 0 0 3 0 06000 10808 100 0 0 0 0 5/0 10809 100 5 0 0 0 10810 100 0 0 0 0 STORE DUMP:WL FOR(71) 10613>10811 124 127 11 1 0 0 127 10812 124 127 11 1 0 0 127 SETTING FOR M/R SWITCH NON-INT 10813 126 24 0 1 0 OVERFLOW 10814 100 62 0 0 0 STORE DUMP=TAM 10815 102 52 0 0 0 STORE DUMP:CLEAR TA 10816 100 0 0 0 0 20/0, MR CONST FOR TYPE 10817 100 20 0 0 0 10818 100 0 0 0 0 MR CONST FOR M/T ALTERNATE ROUTES 10819 100 160 0 0 0 *011*244*234*224 00000001200008000040 10820 100 192 0 0 0 *019*244*234*224 00000001440009600048 10821 100 271 2 0 0 0 271 W/L 10822 100 120 0 0 0 10823 127 127 11 0 3 0 127 10824 118 6 0 3 0 SAS=1 10825 106 100 37 0 0 0 100 SLAS=2 10826 124 186 2 1 0 0 186 L1=1 10827 100 0 0 0 0 10828 100 0 0 0 0 10829 104 1028 1 1 0 *££0*££3*353 10830 107 6000 0 3 0 STORE DUMP='XX' 10831 102 0 0 0 0 *:SP:2:SP:SP 10832 105 5124 1 1 0 *353 10900 PROCR 109 109 PSEUDO-SWITCH CONT 10901 NOTES RADIX B 10902 100 0 0 0 0 D/B W/L 10903 100 64 0 0 0 64/0 FOR D/B 10904 103 0 0 0 0 *:SP:3:SP:SP 10905 105 5124 1 1 0 *353 10906 107 0 0 0 0 EDG 10907 105 5445 0 2 0 10908 107 65 0 0 0 I/P:1 10909 105 5910 1 0 0 10910 107 65 0 0 0 O/P:1 10911 106 1814 0 3 0 10912 100 0 0 0 0 MR3 SETTING FOR T/W 10913 100 14 0 0 0 *££0*££2*393 10914 100 6 0 0 0 *1.3 10915 100 8 0 0 0 *1:3 10916 100 16 0 0 0 *4.3 10917 100 18 0 0 0 *££2*5t3 10918 100 20 0 0 0 *1.3*1:3*1£4*384*393*5t3*4.3 10 12 10919 100 0 0 0 0 SDB SETTING 10920 100 7999 0 1 0 COLLATION CONSTANT 10921 100 0 0 0 0 STORE DUMP=MR 10922 100 0 0 0 0 STORE DUMP=MR 10923 100 0 0 0 0 STORE DUMP=COUNTER 10924 100 0 0 0 0 STORE DUMP=STORE SIZE 11000 PROCR 110 110 INITIAL PROGRAMME SWITCH 11002 124 265 2 1 0 0 265 *££0*££2*062063 gI/P O/P CONTROL 11003 106 157 0 0 0 *063 11004 119 56 0 1 0 *063063 11005 106 112 17 0 0 0 112 *46e 11006 106 114 17 0 0 0 114 *46e46e 11007 106 116 17 0 0 0 116 *46e*46e*46e 11008 106 118 17 0 0 0 118 *46e*46e*46e*46e 11100 PROCR 111 111 1ST COMMERCIAL PROGRAMME SWITCH 11101 NOTES RADIX B 11102 100 112 2 1 0 0 112 INTERRUPTION,STORE 11103 100 210 3 0 3 0 210 6'S (A),(B),(C).SET(C) 11104 106 8 0 0 0 DECIMAL SET RETURN 11105 102 112 16 0 0 0 112 PROG. LINK 11106 124 103 7 1 0 0 103 *063 (6/0/0/0/157) 11107 107 112 18 1 0 0 112 11108 124 103 7 1 0 0 103 gHEAD OF QUEUE 11109 124 127 11 1 0 0 127 OR'26/1/0 R' SWITCH SP1 11110 124 111 20 1 0 0 111 gCLOSED(S=2) 11111 124 127 11 1 0 0 127 gENGAGED (S=3) TEST ROUTE 11112 126 271 2 0 0 0 271 gD/B 11113 126 300 2 0 0 0 300 gW/E 11114 106 112 7 0 0 0 112 SET S=4 11115 102 111 9 0 0 0 111 11116 106 112 8 1 0 0 112 SET UP MR1 11117 102 2 1 0 0 11118 106 112 2 1 0 0 112 11119 124 265 3 1 0 0 265 *062063 gI/P O/P CONTROL 11110>11120 106 156 0 0 0 S=3 TEMP CLOSED 11121 105 112 17 0 0 0 112 *46e 11122 127 127 11 0 3 0 127 gNO ACTION IS REQUIRED 11123 126 112 8 1 1 0 112 ACTION IS REQUIRED 11124 126 112 14 0 1 0 112 gMASTER ROUTINE 11207>11125 124 111 31 1 1 0 111 11126 106 112 8 1 0 0 112 RESET MOD.GROUP 11127 102 2 1 0 0 SET UP MR1 11128 100 112 2 1 1 0 112 RESTORE (A) (B) (C) 11129 126 112 16 0 3 0 112 *063063 (19/0/1/0/56) 11130 126 112 16 0 3 0 112 gPROGRAMME 11131 100 0 0 3 0 MOD GROUP 11200 PROCR 112 112 1ST COMML SWITCH CONT 11201 NOTES RADIX B 11202 100 0 0 0 0 (A) 11203 100 0 0 0 0 11204 100 0 0 0 0 (B) 11205 100 0 0 0 0 11206 100 0 0 0 0 (C) 11207 124 111 25 1 0 0 111 S=4 11208 100 111 2 0 0 0 111 PROGRAMME LINK 11209 100 0 0 0 0 START OF LAST CHAPTER 11210 100 0 0 0 0 ALARM NO FOR D/D 11211 100 0 0 0 0 PROGM ID NO 10827 11212 100 0 0 0 0 RUN & RERUN NO 11213 100 0 0 0 0 BIT PATTERN FOR OPTIONS 11214 100 270 2 0 0 0 270 *464 00004 11215 100 0 0 0 0 ADDRESS BEFORE FIRST OPTION 11216 100 0 0 0 0 I/P O/P CONTROL LINKLINK FOR SI=4 11217 100 0 0 0 0 ASSOC.TIME/ORIG.SW.SETTING 11218 100 0 0 0 0 TIME SPENT IN 11219 100 0 0 0 0 PROGRAMME 11300 PROCR 113 113 2ND COMMERCIAL PROGRAMME SWITCH 11301 NOTES RADIX B 11302 100 114 2 1 0 0 114 *1.2 INTERRUPTION,STORE 11303 100 210 3 0 3 0 210 (A),(B),(C) SET(C) 11304 106 8 0 0 0 DECIMAL SET RETURN 11305 102 114 16 0 0 0 114 PROG LINK 11306 124 103 7 1 0 0 103 *063 (6/0/0/0/157) 11307 107 114 18 1 0 0 114 11308 124 103 7 1 0 0 103 gHEAD OF QUEUE 11309 124 127 11 1 0 0 127 OR'26/1/0 R' SWITCH SP2 11310 124 113 20 1 0 0 113 gCLOSED (S=3) TEST ROUTE 11311 124 127 11 1 0 0 127 gENGAGED (S=2) 11312 126 271 2 0 0 0 271 gD/B 11313 126 300 2 0 0 0 300 gW/E 11314 106 114 7 0 0 0 114 SET S=4 11315 102 113 9 0 0 0 113 11316 106 114 8 1 0 0 114 SET UP MR1 11317 102 2 1 0 0 11318 106 114 2 1 0 0 114 11319 124 265 3 1 0 0 265 *062063 gI/P O/P CONTROL 11310>11320 106 156 0 0 0 S=3.TEMP.CLOSED 11321 105 114 17 0 0 0 114 *46e46e 11322 127 127 11 0 3 0 127 gNO ACTION IS REQUIRED 11323 126 114 8 1 1 0 114 11324 126 114 14 0 1 0 114 gM.R. SET UP MR1 11407>11325 124 113 31 1 1 0 113 11326 106 114 8 1 0 0 114 RESET MOD.GROUP 11327 102 2 1 0 0 SET UP MR1 11328 100 114 2 1 1 0 114 RESTORE (A) (B) (C) 11329 126 114 16 0 3 0 114 *063063 (19/0/1/0/56) 11330 126 114 16 0 3 0 114 gPROGRAMME 11331 100 0 0 0 0 MOD.GROUP 11400 PROCR 114 114 2ND COMML SWITCH CONT 11401 NOTES RADIX B 11402 100 0 0 0 0 *1.2 (A) 11403 100 0 0 0 0 11404 100 0 0 0 0 (B) 11405 100 0 0 0 0 11406 100 0 0 0 0 (C) 11407 124 113 25 1 0 0 113 S=4 11408 100 113 2 0 0 0 113 PROGRAMME LINK 11409 100 0 0 0 0 START OF LAST CHAPTER 11410 100 0 0 0 0 ALARM NO.FOR D/D 11411 100 0 0 0 0 PROG.ID.NO. 11412 100 0 0 0 0 RUN & RERUN NO 11413 100 0 0 0 0 BIT PATTERN FOR OPTIONS 11414 100 270 2 0 0 0 270 *464 00004 11415 100 0 0 0 0 ADDRESS BEFORE FIRST OPTION 11416 100 0 0 0 0 I/P O/P CONTROL LINKLINK FOR SI=4 11417 100 0 0 0 0 ASSOC. TIME/ORIG.SWITCH.SETTING 11418 100 0 0 0 0 TIME SPENT IN PROG 11419 100 0 0 0 0 11500 PROCR 115 115 3RD COMMERCIAL PROGRAMME SWITCH 11501 NOTES RADIX B 11502 100 116 2 1 0 0 116 *1.2*1:2 INTERRUPTION, STORE 11503 100 210 3 0 3 0 210 6'S (A),(B),(C), SET (C) 11504 106 8 0 0 0 DECIMAL. SET RETURN 11505 102 116 16 0 0 0 116 PROG. LINK 11506 124 103 7 1 0 0 103 *063 (6/0/0/0/157) 11507 107 116 18 1 0 0 116 11508 124 103 7 1 0 0 103 gHEAD OF QUEUE 11509 124 127 11 1 0 0 127 OR'26/1/0 R' SWITCH SP3 11510 124 115 20 1 0 0 115 gCLOSED(S=3) 11511 124 127 11 1 0 0 127 gENGAGED(S=2) TEST ROUTE 11512 126 271 2 0 0 0 271 gD/B 11513 126 300 2 0 0 0 300 gW/E 11514 106 116 7 0 0 0 116 SET S=4 11515 102 115 9 0 0 0 115 11516 106 116 8 1 0 0 116 SET UP MR1 11517 102 2 1 0 0 11518 106 116 2 1 0 0 116 11519 124 265 3 1 0 0 265 *062063 gI/P O/P CONTROL 11510>11520 106 0 156 0 0 0 S=3, TEMP, CLOSED 11521 105 116 17 0 0 0 116 *46e46e46e 11522 127 127 11 0 3 0 127 gNO IS REQUIRED 11523 126 116 8 1 1 0 116 S=5 11524 126 116 14 0 1 0 116 gM.R. 11607>11525 124 115 31 1 1 0 115 NORMAL 11526 106 116 8 1 0 0 116 RESET MOD.GROUP 11527 102 2 1 0 0 SET UP MR1 11528 100 116 2 1 1 0 116 RE&STORE (A)(B)(C) 11529 126 116 16 0 3 0 116 *063063 (19/0/1/0/56) 11530 126 116 16 0 3 0 116 gPROGRAMME 11531 100 0 0 0 0 MOD.GROUP 11600 PROCR 116 116 3RD COMML SWITCH CONT 11601 NOTES RADIX B 11602 100 0 0 0 0 *1.2*1:2 A 11603 100 0 0 0 0 11604 100 0 0 0 0 (B) 11605 100 0 0 0 0 11606 100 0 0 0 0 (C) 11607 124 115 25 1 0 0 115 S=4 11608 100 115 2 0 0 0 115 PROGRAMME LINK 11609 100 0 0 0 0 START OF LAST CHAPTER 11610 100 0 0 0 0 ALARM NO. FOR D/D 11611 100 0 0 0 0 PROG.ID.NO 11612 100 0 0 0 0 RUN & RERUN NO 11613 100 0 0 0 0 BIT PATTERN FOR OPTIONS 11614 100 270 2 0 0 0 270 *464 00004 11615 100 0 0 0 0 ADDRESS BEFORE FIRST OPTION 11616 100 0 0 0 0 I/P O/P CONTROL LINK,LINK FOR SI=4 11617 100 0 0 0 0 ASSOC. TIME/ORIG.SWITCH.SETTING 11618 100 0 0 0 0 TIME SPENT IN PROG 11619 100 0 0 0 0 11700 PROCR 117 117 4TH COMMERCIAL PROGRAMME SWITCH 11701 NOTES RADIX B 11702 100 118 2 1 0 0 118 *1.2*1:2*1£2 INTERRUPTION.STORE 11703 100 210 3 0 3 0 210 6'S (A),(B),(C) SET (C) 11704 106 8 0 0 0 DECIMAL SET RETURN 11705 102 118 16 0 0 0 118 PROG LINK 11706 124 103 7 1 0 0 103 *063 (6/0/0/0/157) 11707 107 118 18 1 0 0 118 11708 124 103 7 1 0 0 103 gHEAD OF QUEUE 11709 124 127 11 1 0 0 127 OR'26/1/0 R' SWITCH SP4 11710 124 117 20 1 0 0 117 gCLOSED (S=3) TEST ROUTE 11711 124 127 11 1 0 0 127 gENGAGED (S=2) 11712 126 271 2 0 0 0 271 gD/B 11713 126 300 2 0 0 0 300 gW/E 11714 106 118 7 0 0 0 118 SET (S=4) 11715 102 117 9 0 0 0 117 11716 106 118 8 1 0 0 118 SET UP MR 1 11717 102 2 1 0 0 11718 106 118 2 1 0 0 118 11719 124 265 3 1 0 0 265 *062063 gI/P O/P CONTROL 11710>11720 106 156 0 0 0 S=3.TEMP.CLOSED 11721 105 118 17 0 0 0 118 *46e46e46e46e 11722 127 127 11 0 3 0 127 gNO IS REQUIRED 11723 126 118 8 1 1 0 118 S=5 11724 126 118 14 0 1 0 118 gMR 11807>11725 124 117 31 1 1 0 117 NORMAL 11726 106 118 8 1 0 0 118 RESET MOD GROUP 11727 102 2 1 0 0 SET UP MR 1 11728 100 118 2 1 1 0 118 RESTORE (A),(B),(C) 11729 126 118 16 0 3 0 118 *063063 (19/0/1/0/56) 11730 126 118 16 0 3 0 118 gPROGRAMME 11731 100 0 0 0 0 MOD GROUP 11800 PROCR 118 118 4TH COMML SWITCH CONT 11801 NOTES RADIX B 11802 100 0 0 0 0 *1.2*1:2*1£2 (A) 11803 100 0 0 0 0 11804 100 0 0 0 0 (B) 11805 100 0 0 0 0 11806 100 0 0 0 0 (C) 11807 124 117 25 1 0 0 117 S=4 11808 100 117 2 0 0 0 117 PROGRAMME LINK 11809 100 0 0 0 0 START OF LAST CHAPTER 11810 100 0 0 0 0 ALARM NO FOR D/D 11811 100 0 0 0 0 PROG 1D NO 11812 100 0 0 0 0 RUN & RERUN 11813 100 0 0 0 0 BIT PATTERN FOR OPTIONS 11814 100 270 2 0 0 0 270 *464 00004 11815 100 0 0 0 0 ADDRESS BEFORE FIRST OPTION 11816 100 0 0 0 0 I/P O/P CONTROL LINK. LINK FOR SI=4 11817 100 0 0 0 0 ASSOC TIME/ORIG SWITCH SETTING 11818 100 0 0 0 0 TIME SPENT IN PROG 11819 100 0 0 0 0 11820 106 157 0 0 0 *££0*££2*063 11821 119 56 0 1 0 *063063 11822 106 120 17 0 0 0 120 *46e 11823 106 122 17 0 0 0 122 *46e46e 11824 106 124 17 0 0 0 124 *46e46e46e 11825 106 126 17 0 0 0 126 *46e46e46e46e 11826 124 265 2 1 0 0 265 *062063 gI/P O/P CONTROL 11900 PROCR 119 119 5TH COMMERCIAL PROGRAMME SWITCH 11902 100 120 2 1 0 0 120 *1.2*1:2*1£2*382 INTERRUPTION STORE 11903 100 210 3 0 3 0 210 (A),(B),(C)SET(C) 11904 106 8 0 0 0 DECIMAL SET RETURN 11905 102 120 16 0 0 0 120 PROG LINK 11906 124 103 7 1 0 0 103 *063 (6/0/0/0/157) 11907 107 120 18 1 0 0 120 11908 124 103 7 1 0 0 103 gHEAD OF QUEUE 11909 124 127 11 1 0 0 127 OR'26/1/0 R' SWITCH SP5 11910 124 119 20 1 0 0 119 gCLOSED(S=3) TEST ROUTE 11911 124 127 11 1 0 0 127 gENGAGED(S=2) 11912 126 271 2 0 0 0 271 gD/B 11913 126 300 2 0 0 0 300 gW/E 11914 106 120 7 0 0 0 120 SET(S=4) 11915 102 119 9 0 0 0 119 11916 106 120 8 1 0 0 120 SET UP MR1 11917 102 2 1 0 0 11918 106 120 2 1 0 0 120 11919 124 265 3 1 0 0 265 *062063 gI/P O/P CONTROL 11910>11920 106 156 0 0 0 S=3,TEMP,CLOSED 11921 105 120 17 0 0 0 120 *46e 11922 127 127 11 0 3 0 127 gNO IS REQUIRED 11923 126 120 8 1 1 0 120 S=5 11924 126 120 14 0 1 0 120 gM.R. 12007>11925 124 119 31 1 1 0 119 NORMAL 11926 106 120 8 1 0 0 120 RESET MOD GROUP 11927 102 2 1 0 0 SET UP MR1 11928 100 120 2 1 1 0 120 RESTORE (A),(B),(C) 11929 126 120 16 0 3 0 120 *063063 (19/0/1/0/56) 11930 126 120 16 0 3 0 120 gPROGRAMME 11931 100 0 0 0 0 MOD.GROUP 12000 PROCR 120 120 5TH COMML SWITCH CONT 12002 100 0 0 0 0 *1.2*1:2*1£2*382 (A) 12003 100 0 0 0 0 12004 100 0 0 0 0 (B) 12005 100 0 0 0 0 12006 100 0 0 0 0 (C) 12007 124 119 25 1 0 0 119 S=4 12008 100 119 2 0 0 0 119 PROGRAMME LINK 12009 100 0 0 0 0 START OF LAST CHAPTER 12010 100 0 0 0 0 ALARM NO FOR D/D 12011 100 0 0 0 0 PROG ID NO 12012 100 0 0 0 0 RUN & RERUN NO 12013 100 0 0 0 0 BIT PATTERN FOR OPTIONS 12014 100 270 2 0 0 0 270 *464 00004 12015 100 0 0 0 0 ADDRESS BEFORE FIRST OPTION 12016 100 0 0 0 0 I/P O/P CONTROL LINK,LINK FOR SI=4 12017 100 0 0 0 0 ASSOC TIME/ORIG.SW.SETTING 12018 100 0 0 0 0 TIME SPENT IN PROG 12019 100 0 0 0 0 12100 PROCR 121 121 6TH COMMERCIAL PROGRAMME SWITCH 12102 100 122 2 1 0 0 122 *1.2*1:2*1£2*382*392 INTERRUPTION STORE 12103 100 210 3 0 3 0 210 6'6 (A),(B),(C) SET(C) 12104 106 8 0 0 0 DECIMAL SET RETURN 12105 102 122 16 0 0 0 122 PROG LINK 12106 124 103 7 1 0 0 103 *063 (6/0/0/0/157) 12107 107 122 18 1 0 0 122 12108 124 103 7 1 0 0 103 gHEAD OF QUEUE 12109 124 127 11 1 0 0 127 OR'26/1/0 R' SWITCH SP6 12110 124 121 20 1 0 0 121 gCLOSED(S=3) TEST ROUTE 12111 124 127 11 1 0 0 127 gENGAGED(S=2) 12112 126 271 2 0 0 0 271 gD/B 12113 126 300 2 0 0 0 300 gW/E 12114 106 122 7 0 0 0 122 SET S=4 12115 102 121 9 0 0 0 121 12116 106 122 8 1 0 0 122 SET UP MR1 12117 102 2 1 0 0 12118 106 122 2 1 0 0 122 12119 124 265 3 1 0 0 265 *062063 gI/P O/P CONTROL 12110>12120 106 156 0 0 0 S=3,TEMP,CLOSED 12121 105 122 17 0 0 0 122 *46e46e 12122 127 127 11 0 3 0 127 gNO IS REQUIRED 12123 126 122 8 1 1 0 122 S=5 12124 126 122 14 0 1 0 122 gM.R. 12207>12125 124 121 31 1 1 0 121 NORMAL 12126 106 122 8 1 0 0 122 RESET MOD GROUP 12127 102 2 1 0 0 SET UP MR1 12128 100 122 2 1 1 0 122 RESTORE (A),(B),(C) 12129 126 122 16 0 3 0 122 *063063 (19/0/1/0/56) 12130 126 122 16 0 3 0 122 gPROGRAMME 12131 100 0 0 0 0 MOD GROUP 12200 PROCR 122 122 6TH COMML SWITCH CONT 12202 100 0 0 0 0 *1.2*1:2*1£2*382*392 (A) 12203 100 0 0 0 0 12204 100 0 0 0 0 (B) 12205 100 0 0 0 0 12206 100 0 0 0 0 (C) 12207 124 121 25 1 0 0 121 S=4 12208 100 121 2 0 0 0 121 PROGRAMME LINK 12209 100 0 0 0 0 START OF LAST CHAPTER 12210 100 0 0 0 0 ALARM NO FOR D/D 12211 100 0 0 0 0 PROG ID NO 12212 100 0 0 0 0 RUN & RERUN NO 12213 100 0 0 0 0 BIT PATTERN FOR OPTIONS 12214 100 270 2 0 0 0 270 *464 00004 12215 100 0 0 0 0 ADDRESS BEFORE FIRST OPTION 12216 100 0 0 0 0 I/P O/P CONTROL LINK,LINK FOR SI=4 12217 100 0 0 0 0 ASSOC TIME/ORIG SWITCH SETTING 12218 100 0 0 0 0 TIME SPENT IN PROG 12219 100 0 0 0 0 12300 PROCR 123 123 7TH COMMERCIAL PROGRAMME SWITCH 12302 100 124 2 1 0 0 124 *1.2*1:2*1£2*382*392*4.2 INTERRUPTION ST 12303 100 210 3 0 3 0 210 6'5 (A),(B),(C)SET(C) 12304 106 8 0 0 0 DECIMAL SET RETURN 12305 102 124 16 0 0 0 124 PROG LINK 12306 124 103 7 1 0 0 103 *063 (6/0/0/0/157) 12307 107 124 18 1 0 0 124 12308 124 103 7 1 0 0 103 gHEAD OF QUEUE 12309 124 127 11 1 0 0 127 OR'26/1/OR' SWITCH SP5 12310 124 123 20 1 0 0 123 gCLOSED(S=3) TEST ROUTE 12311 124 127 11 1 0 0 127 gENGAGED(S=2) 12312 126 271 2 0 0 0 271 gD/B 12313 126 300 2 0 0 0 300 gW/E 12314 106 124 7 0 0 0 124 SET(S=4) 12315 102 123 9 0 0 0 123 12316 106 124 8 1 0 0 124 SET UP MR1 12317 102 2 1 0 0 12318 106 124 2 1 0 0 124 12319 124 265 3 1 0 0 265 *062063 gI/P O/P CONTROL 12310>12320 106 156 0 0 0 S=3,TEMP,CLOSED 12321 105 124 17 0 0 0 124 *46e46e46e 12322 127 127 11 0 3 0 127 gNO IS REQUIRED 12323 126 124 8 1 1 0 124 S=5 12324 126 124 14 0 1 0 124 gM.R. 12407>12325 124 123 31 1 1 0 123 NORMAL 12326 106 124 8 1 0 0 124 RESET MOD GROUP 12327 102 2 1 0 0 SET UP MR1 12328 100 124 2 1 1 0 124 RESTORE(A),(B),(C) 12329 126 124 16 0 3 0 124 *063063 (19/0/1/0/56) 12330 126 124 16 0 3 0 124 gPROGRAM 12331 100 0 0 0 0 MOD GROUP 12400 PROCR 124 124 7TH COMML SWITCH CONT 12402 100 0 0 0 0 *1.2*1:2*1£2*382*392*4.2 A 12403 100 0 0 0 0 12404 100 0 0 0 0 (B) 12405 100 0 0 0 0 12406 100 0 0 0 0 (C) 12407 124 123 25 1 0 0 123 S=4 12408 100 123 2 0 0 0 123 PROGRAMME LINK 12409 100 0 0 0 0 START OF LAST CHAPTER 12410 100 0 0 0 0 ALARM NO FOR D/D 12411 100 0 0 0 0 PROG ID NO 12412 100 0 0 0 0 RUN&RERUN NO 12413 100 0 0 0 0 BIT PATTERN FOR OPTIONS 12414 100 270 2 0 0 0 270 *464 00004 12415 100 0 0 0 0 ADDRESS BEFORE FIRST OPTION 12416 100 0 0 0 0 I/P O/P CONTROL LINK,LINK FOR SI=4 12417 100 0 0 0 0 ASSOC TIME/ORIG OWITSETTING 12418 100 0 0 0 0 TIME SPENT IN PROG 12419 100 0 0 0 0 12500 PROCR 125 125 8TH COMMERCIAL PROGRAMME SWITCH 12502 100 126 2 1 0 0 126 *1.2*1:2*1£2*382*392*4.2*5t2 INTERRUPTIO 12503 100 210 3 0 3 0 210 6'5 (A),(B),(C)SET(C) 12504 106 8 0 0 0 DECIMAL SET RETURN 12505 102 126 16 0 0 0 126 PROGRAM LINK 12506 124 103 7 1 0 0 103 *063 (6/0/0/0/157) 12507 107 126 18 1 0 0 126 12508 124 103 7 1 0 0 103 gHEAD OF QUEUE 12509 124 127 11 1 0 0 127 OR'26/1/OR' SWITCH SP5 12510 124 125 20 1 0 0 125 gCLOSED(S=3) TEST ROUTE 12511 124 127 11 1 0 0 127 gENGAGED(S=2) 12512 126 271 2 0 0 0 271 gD/B 12513 126 300 2 0 0 0 300 gW/E 12514 106 126 7 0 0 0 126 SET(S=4) 12515 102 125 9 0 0 0 125 12516 106 126 8 1 0 0 126 SET UP MR1 12517 102 2 1 0 0 12518 106 126 2 1 0 0 126 12519 124 265 3 1 0 0 265 *062063 gI/P O/P CONTROL 12510>12520 106 156 0 0 0 S=3,TEMP CLOSED 12521 105 126 17 0 0 0 126 *46e46e46e46e 12522 127 127 11 0 3 0 127 gNO IS REQUIRED 12523 126 126 8 1 1 0 126 S=5 12524 126 126 14 0 1 0 126 gM.R. 12607>12525 124 125 31 1 1 0 125 NORMAL 12526 106 126 8 1 0 0 126 RESET MOD GROUP 12527 102 2 1 0 0 SET UP MR1 12528 100 126 2 1 1 0 126 RESTORE(A),(B),(C) 12529 126 126 16 0 3 0 126 *063063 (19/0/1/0/157) 12530 126 126 16 0 3 0 126 gPROGRAM 12531 100 0 0 0 0 MOD GROUP 12600 PROCR 126 126 8TH COMML SWITCH CONT 12602 100 0 0 0 0 *1.2*1:2*1£2*382*392*4.2*5t2 (A) 12603 100 0 0 0 0 12604 100 0 0 0 0 (B) 12605 100 0 0 0 0 12606 100 0 0 0 0 (C) 12607 124 125 25 1 0 0 125 S=4 12608 100 125 2 0 0 0 125 PROGRAMME LINK 12609 100 0 0 0 0 START OF LAST CHAPTER 12610 100 0 0 0 0 ALARM NO FOR D/D 12611 100 0 0 0 0 PROG ID NO 12612 100 0 0 0 0 RUN&RERUN NO 12613 100 0 0 0 0 BIT PATTERN FOR OPTIONS 12614 100 270 2 0 0 0 270 *464 00004 12615 100 0 0 0 0 ADDRESS BEFORE FIRST OPTION 12616 100 0 0 0 0 I/P,O/P CONTROL LINK,LINK FOR SI=4 12617 100 0 0 0 0 ASSOC TIME/ORIG SWITCH SETTING 12618 100 0 0 0 0 TIME SPENT IN PROG 12619 100 0 0 0 0 12700 PROCR 127 127 COUNT INEFFECTIVE TIME 12701 NOTES RADIX B 12702 100 0 0 0 0 *2£t 12703 100 0 0 0 0 12704 100 0 0 0 0 12705 100 1 0 0 0 *2£t 12706 127 127 20 0 3 0 127 *££0*££2*3t32+3*3t32:3 12707 127 127 21 0 3 0 127 *4e3 12708 102 182 2 0 0 0 182 *293 12709 124 166 2 0 2 0 166 *293743 12710 127 127 22 0 3 0 127 *££2*4+3 34718> 38020> 38026> 38122> 12522> 12511> 12509> 12322> 12311> 12309> 12122> 12111> 12109> 11922> 11911> 11909> 11722> 11711> 11709> 11522> 11511> 11509> 11322> 11311> 11309> 11122> 11111> 11109> 10823> 10812> 10811>12711 101 103 7 1 3 0 103 12712 102 2 0 0 0 SET UP MR1 12713 105 221 43 0 0 0 221 *16t TEST DELAY IN PROGRESS 12714 127 379 58 0 3 0 379 *16t gYES 12715 125 0 4096 1 0 0 *2£t SET I13 12716 106 104 12 1 0 0 104 HAVE I BEEN 12717 104 127 4 1 0 0 127 HERE LONG ENOUGH? 12718 102 127 2 1 0 0 127 12726>12719 101 178 1 3 0 *3t9*2+1*2:1 12706>12720 101 218 1 3 0 *3t9*2e1*2t1 12707>12721 101 24 1 3 0 *4e9 12710>12722 101 60 1 3 0 *4+9 12723 107 104 12 1 0 0 104 12724 106 104 12 1 0 0 104 12725 105 127 2 1 0 0 127 12726 127 127 19 0 3 0 127 *2£t*4e3*4+3*3t32:3*3t32+3 12727 125 4096 1 1 0 12728 124 103 7 1 0 0 103 *319 12729 106 127 35 0 0 0 127 *312*31t2£t 12730 124 127 33 1 0 0 127 *31t2£t 10028>12731 100 212 2 0 3 0 212 SET BINARY 12732 101 1 1 3 0 AUGMENT COUNTER 12730>12733 107 156 0 0 0 12734 124 103 8 1 0 0 103 *312 12735 100 102 0 0 0 *311 12800 CONST 128 128 0 DUMMY 12900 PROCR 129 129 MOD GROUP BLISTERS+W/LS. 12902 128 26 1 1 0 *59t RESTORE 12903 100 112 2 1 1 0 112 MOD GROUP 3 12904 126 112 16 0 3 0 112 gPROGRAM 12905 128 129 8 1 1 0 129 LOC 3 OF SWITCH 12906 100 129 8 0 0 0 129 TABLE ENTRY 12907 100 6 0 0 0 12908 100 0 0 0 0 MR 1 12909 100 0 0 0 0 12910 100 0 0 0 0 MR 2 12911 100 0 0 0 0 12912 100 0 0 0 0 MR 3 12913 100 0 0 0 0 12914 128 26 1 1 0 *1.2 RESTORE 12915 100 114 2 1 1 0 114 MOD GROUP 3 12916 126 114 16 0 3 0 114 gPROGRAM 12917 128 129 20 1 1 0 129 LOC 3 OF SWITCH 12918 100 129 20 0 0 0 129 TABLE ENTRY 12919 100 6 0 0 0 12920 100 0 0 0 0 MR1 12921 100 0 0 0 0 12922 100 0 0 0 0 MR2 12923 100 0 0 0 0 12924 100 0 0 0 0 MR3 12925 100 0 0 0 0 12926 128 26 1 1 0 *1:2 RESTORE 12927 100 116 2 1 1 0 116 MOD GROUP 3 12928 126 116 16 0 3 0 116 gPROGRAM 12929 128 129 32 1 1 0 129 LOC 3 OF SWITCH 12930 100 129 32 0 0 0 129 TABLE ENTRY 12931 100 6 0 0 0 12932 100 0 0 0 0 MR 1 12933 100 0 0 0 0 12934 100 0 0 0 0 MR 2 12935 100 0 0 0 0 12936 100 0 0 0 0 MR 3 12937 100 0 0 0 0 12938 128 26 1 1 0 *1£2 RESTORE 12939 100 118 2 1 1 0 118 MOD GROUP 3 12940 126 118 16 0 3 0 118 gPROGRAM 12941 128 129 44 1 1 0 129 LOC 3 OF SWITCH 12942 100 129 44 0 0 0 129 TABLE ENTRY 12943 100 6 0 0 0 12944 100 0 0 0 0 MR1 12945 100 0 0 0 0 12946 100 0 0 0 0 MR2 12947 100 0 0 0 0 12948 100 0 0 0 0 MR3 12949 100 0 0 0 0 12950 128 26 1 1 0 *382 RESTORE 12951 100 120 2 1 1 0 120 MOD GROUP 3 12952 126 120 16 0 3 0 120 gPROGRAM 12953 128 129 56 1 1 0 129 LOC 3 OF SWITCH 12954 100 129 56 0 0 0 129 TABLE ENTRY 12955 100 6 0 0 0 12956 100 0 0 0 0 MR1 12957 100 0 0 0 0 12958 100 0 0 0 0 MR2 12959 100 0 0 0 0 12960 100 0 0 0 0 MR3 12961 100 0 0 0 0 12962 128 26 1 1 0 *392 RESTORE 12963 100 122 2 1 1 0 122 MOD GROUP 3 12964 126 122 16 0 3 0 122 gPROGRAM 12965 128 129 68 1 1 0 129 LOC 3 OF SWITCH 12966 100 129 68 0 0 0 129 TABLE ENTRY 12967 100 6 0 0 0 12968 100 0 0 0 0 MR1 12969 100 0 0 0 0 12970 100 0 0 0 0 MR2 12971 100 0 0 0 0 12972 100 0 0 0 0 MR3 12973 100 0 0 0 0 12974 128 26 1 1 0 *4.2 RESTORE 12975 100 124 2 1 1 0 124 MOD GROUP 3 12976 126 124 16 0 3 0 124 gPROGRAM 12977 128 129 80 1 1 0 129 LOC 3 OF SWITCH 12978 100 129 80 0 0 0 129 TABLE ENTRY 12979 100 6 0 0 0 12980 100 0 0 0 0 MR 1 12981 100 0 0 0 0 12982 100 0 0 0 0 MR 2 12983 100 0 0 0 0 12984 100 0 0 0 0 MR 3 12985 100 0 0 0 0 12986 128 26 1 1 0 *5t2 RESTORE 12987 100 126 2 1 1 0 126 MOD GROUP 3 12988 126 126 16 0 3 0 126 gPROGRAM 12989 128 129 92 1 1 0 129 LOC 3 OF SWITCH 12990 100 129 92 0 0 0 129 TABLE ENTRY 12991 100 6 0 0 0 12992 100 0 0 0 0 MR 1 12993 100 0 0 0 0 12994 100 0 0 0 0 MR 2 12995 100 0 0 0 0 12996 100 0 0 0 0 MR 3 12997 100 0 0 0 0 13000 CONST 130 130 1 MASTER ROUTINE SPECIAL CHAPTER 13002 (D)0; W/L'S FOR OPEN 13004 0; OUTPUT FILE 13006 0; 13008 0; 13010 0; 13012 0; 13014 0; 13016 0; 13018 0; 13020 0; 13022 0; 13024 (D)0; W/L'S FOR COMMENT 13026 0; 13028 0; 13030 0; 13032 0; 13034 0; 13036 0; 13038 0; 13040 0; 13042 0; 13044 0; 13046 0; 13048 0; 13050 0; 13100 PROCR 131 131 DUMMY HEADINGS FOR DESCRIPTION OF USES OF WL'S IN SPECIAL CHAPS 13101 NOTES ALSO IS THE REMAINDER OF THE MASTER'S SPECIAL CHAP 13200 PROCR 132 132 (1)IND MT O/P D/B (2)IND PRINTER W/E 13201 NOTES 156 156 (3)S/R LINK PT O/P BLOCK S/R (4)IND OPEN M/T I/P REEL 13202 100 0 0 0 0 13300 PROCR 133 133 (1)W/E IND PT O/P (2)RTE TYPE DURING PRINTER W/E 13301 NOTES 157 157 (3)RTE TYPE DURING SNT COMMENT 13302 100 0 0 0 0 13400 PROCR 134 134 (1)SR LINK DEALING WITH OPT 8-PT/CARD INPUT=RETURN ADDRESS 13401 NOTES 158 IND IN OPEN MT I/P REEL 13402 100 0 0 0 0 13500 PROCR 135 135 CH CH RT FOR MULTI-CHANNEL LOADING 13501 NOTES 159 13502 100 0 0 0 0 13600 PROCR 136 136 MAIN'DB HAS OCCURRED'IND-SET JUST BEFORE THE DB IS TO BE DEALT WI 13601 NOTES 160 EXTRACTED FROM LIST OF DB BY CHANNEL/ROUTE 13602 100 0 0 0 0 13700 PROCR 137 137 COPY OF SR LINK'STEP BACK(A)BLOCKS,FWD 1 BLOCK' 13701 NOTES 161 13702 100 0 0 0 0 13800 PROCR 138 138 RETURN LINK SET UP BEFORE ENTERING MISALIGNMENT FAILURE S/R 13801 NOTES 162 162 13802 100 0 0 0 0 13900 PROCR 139 139 COPY OF ASL DURING OPEN MT OUTPUT REEL 13901 NOTES 163 163 13902 100 0 0 0 0 14000 PROCR 140 140 IND THAT'CHANGE DECK'IN PROGRESS 14001 NOTES 164 USED ONLY DURING REOPENING MT FILE 14002 100 0 0 0 0 14100 PROCR 141 141 COPY OF SR LINK'RUN FWD,STEP FWD.READ'SR 14101 NOTES 165 RE-OPENING MT FILE 14102 100 0 0 0 0 14200 PROCR 142 142 COPY OF LINK INK IN'READ AND TEST BLOCK'SR 14201 NOTES 166 14202 100 0 0 0 0 14300 PROCR 143 143 CTR FOR'NUMBER OF ATTEMPTS'WHEN RE-READING/WRITING MT DB 14301 NOTES 167 14302 100 0 0 0 0 14400 PROCR 144 144 COPY OF SR LINKS IN'OPEN MT IN','OPEN MT OUT' 14401 NOTES 168 AND'READ,TEST SENTINEL'FOR PT/CARD INPUT 14402 100 0 0 0 0 14500 PROCR 145 145 (1)S/R LINK REQUEST T/W FOR OPTIONS AND REQUEST MR FOR OVERLAY OR 14501 NOTES 169 169 (2)START OF COMMENT(3)BLOCK CTR FOR CHANGE REEL IN STEP 14502 100 0 0 0 0 14600 PROCR 146 146 OPTION 13-'CHANGE MT DECK':BLOCK SERIAL TO BE ALIGNED ON AFTERWAR 14601 NOTES 170 14602 100 0 0 0 0 14700 PROCR 147 147 COPY OF 162 SET UP BEFORE*2 14701 NOTES 171 14702 100 0 0 0 0 14800 PROCR 148 148 COPY OF 183 DURING OPTION 13 14801 NOTES 172 14802 100 0 0 0 0 14900 PROCR 149 149 S/R LINK FOR ALIGNMENT FAILURE-BLOCK 6 TEST 14901 NOTES 173 173 ALIGNMENT FAILURE-REREAD AND SER COMMENT 14902 100 0 0 0 0 15000 PROCR 150 150 INTERCODE ROUTE TYPE WHEN DEALING WITH DB ON MT 15001 NOTES 174 WHEN TYPE IN SWITCH IS ALTERED TO BECOME SR LINK 15002 100 0 0 0 0 15100 PROCR 151 151 IND WITHIN'MT ALIGNMENT FAILURE'GIVING USE OF ROUTE 15101 NOTES 175 0=INPUT,2=OUTPUT AT PRESENT MOMENT 15102 100 0 0 0 0 15200 PROCR 152 152 WL FOR'SWITCH 101'ORDERS IN TYPING COMMENTS 15201 NOTES 176 26/0/0 ORDERS OR'CLEAR A'ORDER 15202 100 0 0 0 0 15300 PROCR 153 153 COUNTER N USED IN VARIOUS STEP BACK 15301 NOTES 177 177 AND STEP FORWARD ROUTINES 15302 100 0 0 0 0 15400 PROCR 154 154 178,179=FIRST WORD OF MT BLOCK FOR REWRITING 15401 NOTES 178 IN DB ON MT OUTPUT 15402 100 0 0 0 0 15500 PROCR 155 155 SEE 178 15501 NOTES 179 15502 100 0 0 0 0 15600 PROCR 156 156 (1)IND PP DURING RUN FORWARD AND BACK 0=FORWARD 15=BACKWARDS 15601 NOTES 180 180 (2) CTR M=NO BLOCKS TO BE STEPPED BACK IN STEP BACK ROUT 15602 100 0 0 0 0 15700 PROCR 157 157 (1)CTR QQ=NO TIMES DIRECTION CHANGED DURING RUN FORWARD AND BACK 15701 NOTES 181 181 (2) IND N FOR STEP FORWARD OR BACK ZERO=O/P NON ZERO=1/P 15702 100 0 0 0 0 15800 PROCR 158 158 WORD 6 OF MT BLOCK IN OPEN FILE=PRESUMED SPOOL NUMBER 15801 NOTES 182 FROM BLOCK AFTER'RUN FWD+STEP FWD+READ' 15802 100 0 0 0 0 15900 PROCR 159 159 COPY OF LINK IN'ALIGNMENT FAILURE'SR-MT 15901 NOTES 183 COPY OF LINK IN P/T O/P SR 15902 100 0 0 0 0 16000 PROCR 160 160 DEC MT BLOCK NO FOUND,FOR'SER'COMMENT IN MT ALIGNMENT FAILURE 16001 NOTES 184 16002 100 0 0 0 0 16100 PROCR 161 161 BINARY CTR OF ATTEMPTS AT REREADING 16101 NOTES 185 BECAUSE OF MT SERIAL FAILURE 16102 100 0 0 0 0 16200 PROCR 162 162 NUMBER OF BLOCKS STEPPED BACK IN AN ATTEMPT TO REALIGN 16201 NOTES 186 186 DURING ALIGNMENT FAILURE S/R 16202 100 0 0 0 0 16300 PROCR 163 163 INDICATOR SET BEFORE*2 16301 NOTES 187 187 USED IN OPTION 13 16302 100 0 0 0 0 16400 PROCR 164 164 NON-ZERO IF PT O/P IS IN NON-STD MODE 16401 NOTES 188 ONLY 1 SUCH FILE PERMITTED PER PROGRAM 16402 100 0 0 0 0 16500 PROCR 165 165 OPEN FILE INDICATOR IN OPTION 13 16501 NOTES 189 189 16502 100 0 0 0 0 16600 PROCR 166 166 190,191,ANNEX FOR P/T O/P(P/T O/P ASSEMBLER) 16601 NOTES 190 USED IN INTERRUPTIBLE COUNT 500 MS 16602 100 0 0 0 0 16700 PROCR 167 167 SEE 190 16701 NOTES 191 191 16702 100 0 0 0 0 16800 PROCR 168 168 P/T O/P W/L WORD MODIFIER 16801 NOTES 192 192 16802 100 0 0 0 0 16900 PROCR 169 169 P/T O/P W/L CHARACTER MODIFIER(GP ASSEMBLER) 16901 NOTES 193 193 16902 100 0 0 0 0 17000 PROCR 170 170 P/T O/P W/L CONTENTS OF 64+R 17001 NOTES 194 194 17002 100 0 0 0 0 17100 PROCR 171 171 P/T O/P W/L FILE IDENTITY 17101 NOTES 195 195 17102 100 0 0 0 0 17200 PROCR 172 172 P/T O/P W/L REEL COUNTER 17201 NOTES 196 196 17202 100 0 0 0 0 17300 PROCR 173 173 S/R LINK WRITE FINIS BLOCK,WRITE END OF TAPE INFORMATION 17301 NOTES 197 17302 100 0 0 0 0 17400 CONST 174 174 0 WORKING LOCATIONS-OMIT SPACES 17402 (B)0; *5:t OUT MODIFIER 17403 4128; OUT MODIFIER 17404 0; SPARE 17405 8; PACK IN MODIFIER 17406 4118; INDICATOR SPACES 17407 0; INDICATOR L/E'S 17500 PROCR 175 175 LOG REQUEST QUEUE 17502 100 0 0 0 0 OPTION REQ 17503 100 0 0 0 0 OPTION OUTSTANDING INDICATOR 17504 100 0 0 0 0 MASTER REQ 17505 100 106 2 0 0 0 106 17506 100 0 0 0 0 PROG 1 REQ 17507 100 111 2 0 0 0 111 17508 100 0 0 0 0 *1.2 PROG 2 REQ 17509 100 113 2 0 0 0 113 17510 100 0 0 0 0 *1:2 PROG 3 REQ 17511 100 115 2 0 0 0 115 17512 100 0 0 0 0 *1£2 PROG 4 REQ 17513 100 117 2 0 0 0 117 17514 100 0 0 0 0 *382 PROG 5 REQ 17515 100 119 2 0 0 0 119 17516 100 0 0 0 0 *392 PROG 6 REQ 17517 100 121 2 0 0 0 121 17518 100 0 0 0 0 *4.2 PROG 7 REQ 17519 100 123 2 0 0 0 123 17520 100 0 0 0 0 *5t2 PROG 8 REQ 17521 100 125 2 0 0 0 125 17600 PROCR 176 176 REQUEST TYPEWRITER FOR OPTIONS 17601 NOTES RADIX B 17602 100 0 0 0 0 LINK 17603 106 176 2 0 0 0 176 STORE LINK 17604 124 3 0 1 0 17605 102 169 0 0 0 17606 106 175 3 0 0 0 175 TEST OPTION 17607 127 176 19 0 1 0 176 gYES OUTSTANDING 17608 126 359 2 0 0 0 359 gRESTORE SI=3 17609 106 210 3 0 0 0 210 17610 102 175 3 0 0 0 175 SET OPTION OUTSTANDING INDICATOR 17611 126 177 2 0 0 0 177 gREQUEST T/W 17612 124 104 6 1 3 0 104 SET UP (P) 17613 125 8191 1 1 0 CLEAR I1-I13 17614 125 128 1 0 0 SET I8 17615 106 210 3 0 0 0 210 17616 102 103 2 0 0 0 103 SET LL1 17617 124 3 0 1 0 17618 126 169 0 1 0 gLEAVE S/R 17607>17619 124 176 6 0 2 0 176 17620 102 42 0 1 0 17621 126 360 2 0 0 0 360 gSET SI=5 39210>17622 124 2 0 1 0 17623 124 9 1 0 0 gSI+9 17700 PROCR 177 177 REQUEST TYPEWRITER 17701 NOTES RADIX B 17702 100 0 0 0 0 LINK 17703 126 179 2 0 0 0 179 gSEARCH LOG QUEUE S/R 17704 106 177 2 0 0 0 177 SET REQUEST WITH LINK 17705 102 175 4 0 3 0 175 17706 106 9 0 1 0 SET SPI=2 17707 102 7 0 1 0 20115>17708 106 104 5 0 0 0 104 SET L6=1 17709 102 103 27 0 0 0 103 17710 124 103 7 1 0 0 103 gHEAD OF QUEUE 17800 PROCR 178 178 RESET REQUEST 10329>17802 106 175 2 0 3 0 175 STORE RETURN LINK 17803 102 103 19 0 0 0 103 17804 102 175 2 0 3 0 175 RESET REQUEST 17805 106 6 0 0 0 TEST ANSWER 17806 127 180 2 0 0 0 180 gYES TO OPTION 17807 125 0 1 2 0 17808 124 6 0 1 0 17809 124 175 3 0 1 0 175 17810 126 36 1 1 0 SET UP MR1 17811 126 103 19 0 1 0 103 gRETURN 17900 PROCR 179 179 SEARCH LOG REQUEST QUEUE 17902 100 0 0 0 0 LINK 17903 101 0 1 3 0 CLEAR MODIFIER 17904 102 106 9 0 0 0 106 17905 126 106 9 1 3 0 106 MR3 START/END LOG QUEUE 17910>17906 106 2 0 0 0 TEST NEXT ENTRY IN 17907 105 175 5 0 3 0 175 LOG QUEUE FOR THIS PROGRAM 17908 127 179 12 0 0 0 179 gYES 17909 125 2 0 3 0 TEST END OF QUEUE 17910 124 179 6 1 0 0 179 gNO NEXT ENTRY 17911 124 208 19 1 0 0 208 17908>17912 126 179 2 0 1 0 179 gLEAVE S/R 18000 PROCR 180 180 TYPEWRITER ANSWER TO OPTIONS 18001 NOTES RADIX B PREPARE TO OUTPUT 17806>18002 126 234 2 0 0 0 234 gS/R H 18003 101 197 2 1 3 0 197 SELECT TABLE-START LOCN. 18004 128 102 6 1 2 0 102 SET UP COMMENT IN T/W ANNEXE 18100 PROCR 181 181 TYPEWRITER PREPARE TO OUTPUT 18101 NOTES RADIX B 20308> 20609> 20729> 20818> 24019> 33514> 33612> 45221> 45515> 45835> 47808> 53503>18102 106 108 26 0 0 0 108 SET L1=1 18103 102 103 10 0 0 0 103 18104 106 103 20 0 0 0 103 SET L5=1 18105 102 182 24 0 0 0 182 *293 18106 101 102 4 1 3 0 102 18107 103 104 8 0 0 0 104 SET UP '(64+R)' 18108 102 104 9 0 0 0 104 18109 101 4118 1 3 0 *5:t*292 SET UP 18110 103 174 2 0 0 0 174 MODIFIERS FOR PICK UP 18111 102 174 6 1 0 0 174 INDICATOR 18112 101 8 1 3 0 18113 102 174 5 0 0 0 174 MODIFIER FOR PACK IN 18114 101 3 1 3 0 TEST OMIT CATEGORY SET 18115 126 332 2 0 0 0 332 18116 127 181 19 0 0 0 181 gDON'T OMIT 18117 106 182 63 0 0 0 182 SET UP SWITCH 18118 124 181 20 1 0 0 181 18116>18119 106 182 62 0 0 0 182 18118>18120 102 182 26 0 0 0 182 18121 102 154 1 0 0 *5:t*292 18122 106 212 14 1 0 0 212 *262 SET IND MOD REG 10/0 18123 102 198 8 1 0 0 198 18124 101 3 1 3 0 *5:t OMIT CATEGORY 18125 126 332 2 0 0 0 332 TEST SET 18126 127 181 29 0 0 0 181 gDON'T OMIT 18127 106 182 14 0 0 0 182 SET UP SWITCH 18128 124 181 30 1 0 0 181 18126>18129 106 181 42 0 0 0 181 18128>18130 102 182 5 0 0 0 182 *5:t 18131 100 198 2 1 2 0 198 BITS 1-6 IN EACH OCTET 18132 124 104 9 0 1 0 104 COLLATE WORD TO BE OUTPUT 18133 115 0 1 0 0 18134 102 198 10 1 0 0 198 *262 STORE 18135 124 154 0 2 0 *293743 SET UP ASL 18136 124 100 37 0 1 0 100 18137 102 64 0 0 0 18138 106 209 4 0 0 0 209 18139 105 100 37 0 0 0 100 SET SL=1 18140 102 103 9 0 0 0 103 18141 124 103 9 1 0 0 103 gTEST ROUTE 18142 124 182 14 1 0 0 182 *262*5:9 18143 124 182 78 1 0 0 182 *££0*££2*293 18144 102 182 2 0 0 0 182 *293293 18145 124 182 2 1 0 0 182 *292293 18146 106 182 2 0 0 0 182 *291293 18147 103 166 2 1 0 0 166 *743 18148 106 166 2 1 0 0 166 *743743 18149 102 166 2 1 0 0 166 *743743743*293743 18200 PROCR 182 182 TYPEWRITER MAIN OUTPUT LOOP 18201 NOTES RADIX B 18145> 10027> 10025>18202 106 198 10 1 0 0 198 *262 SELECT COLLATED WORD SWITCH L5 18203 124 198 8 0 1 0 198 18204 118 4120 0 0 0 CHARACTER TO BE OUTPUT IN 18205 118 8 0 0 0 *5:t ***** ALIGN TO Q1 18206 118 4120 0 0 0 ALIGN TO Q1 18207 103 154 1 0 0 *743 STORE WORD 18208 127 182 88 0 0 0 182 gSPACE 18209 101 61 1 2 0 IS A N/E 18210 127 182 88 0 0 0 182 gYES 18211 101 1 1 3 0 18212 102 182 87 0 0 0 182 SET INDICATOR 18213 106 154 1 0 0 *5:t*743743 18292> 18142>18214 118 8 0 0 0 833-38 18215 102 154 1 0 0 *743743743 18216 124 100 37 0 1 0 100 OUTPUT 18217 119 0 0 0 0 18294>18218 102 182 95 0 0 0 182 *5:9 18219 123 2 0 0 0 STEP AND TEST INDIRECT MOD REGISTER 18220 100 198 8 0 0 0 198 18221 124 184 4 1 0 0 184 gUPDATE ASSEMBLER TABLE 18222 101 15 0 1 0 TEST END OF BLOCK 18223 115 198 10 1 0 0 198 *262 COLLATE WORD JUST OUTPUT 18254> 18624> 10318> 10314>18224 124 104 9 0 1 0 104 *292 18225 106 0 1 0 0 TO BE OUTPUT 18226 124 174 2 0 1 0 174 *5:t ***** 18227 118 0 1 0 0 ALIGN CHARACACTER 18228 118 2 1 3 0 TO BITS 1-6 OF 18229 101 0 1 3 0 REGISTER A 18230 118 6 1 3 0 18231 127 183 2 0 0 0 183 gZERO 18232 101 30 1 2 0 18233 127 183 9 0 0 0 183 gL/E 18234 101 31 1 2 0 18235 127 183 2 0 0 0 183 gN/E 18236 101 1 1 2 0 18237 127 183 7 0 0 0 183 gB/E 18238 101 62 1 1 0 18308>18239 103 174 6 1 0 0 174 SET INDICATOR 18306> 18314> 18323>18240 101 3 0 1 0 SET B 18241 124 174 5 0 1 0 174 ALIGN CHARACTER 18242 118 0 1 0 0 18243 114 154 1 0 0 PACK IN CHARACTER 18244 106 182 64 0 0 0 182 STEP PACK IN 18245 107 174 5 0 0 0 174 MODIFIER 18303>18246 123 2 0 0 0 STEP PICK UP 18247 100 174 2 0 0 0 174 MODIFIER 18248 124 182 53 1 0 0 182 gNEXT CHARACTER 18249 101 2 1 3 0 18250 107 104 9 0 0 0 104 WORD MODIFIER 18251 101 4118 1 3 0 RESET PICK UP 18252 102 174 2 0 0 0 174 MODIFIER 18248>18253 106 174 5 0 0 0 174 TEST END OF O/P WORD 18254 127 182 24 0 2 0 182 gNO 18255 124 100 37 0 1 0 100 OUTPUT WORD 18256 119 0 0 0 0 18257 101 8 1 3 0 RESET MODIFIER 18258 102 174 5 0 0 0 174 18259 106 174 7 0 0 0 174 TEST SECOND L/E 18260 127 184 2 0 3 0 184 gYES 18261 124 184 4 1 0 0 184 UPDATE ASSEMBLER TABLE 18262 124 182 65 1 0 0 182 18263 124 174 2 0 1 0 174 18264 116 2 0 0 0 *5:t 18262>18265 102 154 1 0 0 18266 126 402 2 0 0 0 402 gTEST FOR B/E 18267 124 182 84 1 0 0 182 gB/E FOUND 18268 124 100 37 0 1 0 100 OUTPUT 18269 119 0 0 0 0 18270 125 0 1 2 0 DRAIN 18271 100 109 20 0 2 0 109 18272 115 154 1 0 0 *292 18273 101 7710 1 2 0 TEST FOR 2 L/E'S IN LAST WORD 18274 127 184 2 0 0 0 184 gYES 18275 106 212 6 0 0 0 212 STEP INDIRECT MOD TOO/P NEXT WORD 18276 107 104 9 0 0 0 104 18277 125 0 1 2 0 18143>18278 102 198 8 0 0 0 198 *262 18279 100 198 2 1 2 0 198 BITS 1-6 IN EACH OCTET 18280 124 104 9 0 1 0 104 COLLATE WORD TO BE OUTPUT 18281 115 0 1 0 0 18282 102 198 10 1 0 0 198 *262 STORE 18283 124 184 4 1 0 0 184 gUPDATE ASSEMBLER TABLE 18267>18284 115 198 6 1 0 0 198 *292 COLLATE OUT? 18285 114 154 1 0 0 18286 124 402 11 1 0 0 402 *292 18287 100 0 0 0 0 *262*5:t 18210> 18208>18288 106 182 87 0 0 0 182 TEST INDICATOR SET 18289 127 182 93 0 0 0 182 NO 18290 101 0 1 3 0 SET INDICATOR 18291 102 182 87 0 0 0 182 ZERO 18292 124 182 14 1 0 0 182 OUTPUT CHARACTER 18289>18293 101 1 1 3 0 INDICATOR FOR 18294 124 182 18 1 0 0 182 18295 100 0 0 0 0 *262*5:t 18300 PROCR 183 183 CONT 18235> 18231>18302 106 174 6 0 0 0 174 *5:t*292 TEST FIRST SPACE OR N/E 18303 127 182 46 0 0 0 182 gNO 18319>18304 101 0 1 3 0 SET INDICATOR 18305 102 174 6 0 0 0 174 18306 124 182 40 1 0 0 182 gOUTPUT SPACE 18237>18307 101 29 1 3 0 SELECT? 18308 124 182 39 1 0 0 182 gOUTPUT? 18233>18309 106 174 7 0 0 0 174 TEST FIRST L/E 18310 127 183 15 0 1 0 183 gNO 18311 101 1 1 3 0 SET L/E INDICATOR 18312 102 174 7 0 0 0 174 18313 101 30 1 3 0 L/E 18314 124 182 40 1 0 0 182 g 18310>18315 106 174 5 0 0 0 174 18316 127 183 20 0 0 0 183 18317 106 182 64 0 0 0 182 18318 107 174 2 0 0 0 174 18319 124 183 4 1 0 0 183 gOUTPUT SPACE 18316>18320 101 1 1 2 0 18321 103 174 7 0 0 0 174 gOUTPUT L/E 18322 101 30 1 3 0 18323 124 182 40 1 0 0 182 gOUTPUT L/E 18400 PROCR 184 184 TYPEWRITER PROCEDURE AT END OF WORD 18401 NOTES RADIX B 18274> 18260>18402 106 103 21 0 0 0 103 SET L5=2 18403 102 182 24 0 0 0 182 *293293 18512> 18283> 18261> 18221>18404 100 210 10 0 2 0 210 SET(MR3)=8*CH NO 18405 115 100 37 0 0 0 100 18406 102 6 1 0 0 18407 106 182 95 0 0 0 182 *262*5:t TEST O/P THIS TIME 18408 127 103 9 0 1 0 103 *262*5:t gTEST ROUTE 18409 106 100 37 1 0 0 100 UPDATE ASSEMBLER TABLE 18410 102 252 2 1 3 0 252 18411 124 103 9 1 0 0 103 gTEST ROUTE 18500 PROCR 185 185 TYPEWRITER END OF BLOCK ROUTINE 18501 NOTES RADIX B 10321>18502 106 103 3 0 0 0 103 SELECT LL2 TEST COMMAND HAS 18503 127 103 23 0 0 0 103 gNO BEEN IGNORED 18504 125 0 1 2 0 SET LL2=0 18505 102 103 3 0 0 0 103 18506 101 105 4 1 3 0 105 SELECT START LOCN OF COMMENT 18507 103 104 8 0 0 0 104 SET UP (64+R) 18508 102 104 9 0 0 0 104 18718>18509 106 103 20 0 0 0 103 SET L5=1 18510 102 182 24 0 0 0 182 *293293 18511 102 182 95 0 0 0 182 *5:9*262 CLEAR CHARACTER O/P INDICATOR 18512 124 184 4 1 0 0 184 *293 gUPDATE ASSEMBLER TABLE 18600 PROCR 186 186 TYPEWRITER ROUTE CLOSED ROUTINE 18601 NOTES RADIX B 10826> 10310>18602 124 104 7 1 3 0 104 SET UP (Q) 18603 106 182 24 0 0 0 182 *291293 18604 102 103 19 0 0 0 103 18605 105 212 5 0 0 0 212 SET L1=2 18606 107 103 10 0 0 0 103 18607 106 103 22 0 0 0 103 SET L5=3 18608 102 182 24 0 0 0 182 *293293 18609 124 186 14 1 0 0 186 g 18610 125 4095 1 2 0 I1-I12 TEST IF OP HAS 18611 101 3840 1 2 0 B9-B12 STACKED INDS 18612 127 103 9 0 0 0 103 gNO, TEST ROUTE 18613 102 103 3 0 0 0 103 SET LL2 18609>18614 125 8191 1 1 0 I1-I13 18615 125 3840 1 0 0 I9-I12 18616 124 103 9 1 0 0 103 gTEST ROUTE 10322>18617 106 108 26 0 0 0 108 SET L1=1 18618 102 103 10 0 0 0 103 18619 106 103 19 0 0 0 103 RESET L5 AT PREVIOUS SETTING 18620 102 182 24 0 0 0 182 *293293 18621 125 8191 1 1 0 I1-I13 18622 124 104 7 0 1 0 104 RESET (I)=(Q) 18623 125 0 1 0 0 18624 124 182 24 1 0 0 182 *292293 18700 PROCR 187 187 TYPEWRITER DOUBTFUL BLOCK ROUTINE 18701 NOTES RADIX B 27504>18702 125 2048 1 2 0 TEST I12 SET 18703 127 187 7 0 0 0 187 gNO 18704 125 8191 1 1 0 CLEAR I1-I13 18705 124 104 7 0 1 0 104 RESET (I)=(Q) 18706 125 0 1 0 0 18703>18707 106 103 18 0 0 0 103 SET SLAS=1 18708 102 103 14 0 0 0 103 18709 106 198 4 1 0 0 198 L/E FOR O/P 18710 102 154 1 0 0 *293743 18711 124 100 37 0 1 0 100 18712 119 0 0 0 0 18713 106 104 8 0 0 0 104 SET UP(64+R) 18714 105 212 6 0 0 0 212 18715 102 104 9 0 0 0 104 18716 106 108 26 0 0 0 108 SET L1=1 18717 102 103 10 0 0 0 103 18718 124 185 9 1 0 0 185 g 18719 100 477 8 0 0 0 477 *££0*££2*41e 18720 100 477 8 0 0 0 477 *09e08e07e5:e69e68e67e66e6te86e86e 18721 127 199 19 0 1 0 199 *163 gNO 18722 124 477 8 1 0 0 477 *14e 18723 126 385 2 0 0 0 385 *163163 18724 127 202 2 0 0 0 202 *463163 gYES 18725 105 221 38 0 0 0 221 *85e 18800 CONST 188 188 1 ROUTE NUMBER AND TYPE 18802 (D)0; 18900 PROCR 189 189 MAGNETIC FILE DETAILS 19000 CONST 190 190 1 MAGNETIC TAPE FILE DETAILS 19002 (D)0; BLOCK COUNTER 19004 0; 19006 0; 19008 0; 19010 0; *222 19012 0; 19014 0; 19016 0; 19018 0; *232 19020 0; 19022 0; 19024 0; 19026 0; *242 19028 0; 19030 0; 19032 0; *222*232*242 19034 0; REEL COUNTER 19036 0; 19038 0; 19040 0; 19042 0; *222 19044 0; 19046 0; 19048 0; 19050 0; *232 19052 0; 19054 0; 19056 0; 19058 0; *242 19060 0; 19062 0; 19064 0; *222*232*242 19066 0; PROGRAMME NUMBER 19068 0; 19070 0; 19072 0; 19074 0; *222 19076 0; 19078 0; 19080 0; 19082 0; *232 19084 0; 19086 0; 19088 0; 19090 0; *242 19092 0; 19094 0; 19096 0; *222*232*242 19098 0; FILE IDENTITY 19100 CONST 191 191 1 MAG TAPE FILE DETAILS CONTD 19102 (D)0; 19104 0; 19106 0; 19108 0; *222 19110 0; 19112 0; 19114 0; 19116 0; *232 19118 0; 19120 0; 19122 0; 19124 0; *242 19126 0; 19128 0; 19130 0; *222*232*242 19132 0; RUN+RERUN NUMBER 19134 0; 19136 0; 19138 0; 19140 0; *222 19142 0; 19144 0; 19146 0; 19148 0; *232 19150 0; 19152 0; 19154 0; 19156 0; *242 19158 0; 19160 0; 19162 0; *222*232*242 19164 0; *01t HIGH DENSITY INDICATORS 19166 0; 19168 0; 19170 0; 19172 0; *222 19174 0; 19176 0; 19178 0; 19180 0; *232 19182 0; 19184 0; 19186 0; 19188 0; *242 19190 0; 19192 0; 19194 0; 19200 CONST 192 192 1 MAG TAPE FILE DETAILS CONT 19202 (D)0; *51t 19204 0; 19206 0; 19208 0; 19210 0; *222 19212 0; 19214 0; 19216 0; 19218 0; *232 19220 0; 19222 0; 19224 0; 19226 0; *242 19228 0; 19230 0; 19232 0; 19300 CONST 193 193 1 DB COUNTS 19302 (D)0; *8£t DB'S 19304 0; 19306 0; 19308 0; 19310 0; *222 19312 0; 19314 0; 19316 0; 19318 0; *232 19320 0; 19322 0; 19324 0; *222*232 19326 0; O/P BLOCK COUNTS 19328 0; 19330 0; 19332 0; 19334 0; *222 19336 0; 19338 0; 19340 0; 19342 0; *232 19344 0; 19346 0; 19348 0; *222*232 19350 0; SPOOL NOS 19352 0; 19354 0; 19356 0; 19358 0; *222 19360 0; 19362 0; 19364 0; 19366 0; *232 19368 0; 19370 0; 19372 0; *222*232 19400 CONST 194 194 1 MAG TAPE DETAILS 19402 (D)0; *3:t 19404 0; 19406 0; 19408 0; 19410 0; 19412 0; 19414 0; 19416 0; 19418 0; 19420 0; 19422 0; 19424 0; 19426 0; 19428 0; 19430 0; 19432 0; 19434 0; 19436 0; 19438 0; 19440 0; 19442 0; 19444 0; 19446 0; 19448 0; 19450 0; 19452 0; 19454 0; 19456 0; 19458 0; 19460 0; 19462 0; 19464 0; 19500 CONST 195 195 1 MAG TAPE DETAILS 19502 (D)0; *3:t 19504 0; 19506 0; 19508 0; 19510 0; 19512 0; 19514 0; 19516 0; 19518 0; 19520 0; 19522 0; 19524 0; 19526 0; 19528 0; 19530 0; 19532 0; 19534 0; 19536 0; 19538 0; 19540 0; 19542 0; 19544 0; 19546 0; 19548 0; 19550 0; 19552 0; 19554 0; 19556 0; 19558 0; 19560 0; 19562 0; 19564 0; 19600 CONST 196 196 1 RELEASED TAPES LIST 19602 (D)0; 19604 0; 19606 0; 19608 0; 19610 0; 19612 0; 19614 0; 19616 0; 19618 0; 19620 0; 19622 0; 19624 0; 19626 0; 19628 0; *4:24tt 19630 0; 19632 0; 19634 0; 19636 0; 19638 0; 19640 0; 19642 0; 19644 0; 19646 0; 19648 0; 19700 TABLE 197 197 1 19701 NOTES 19702 214 8 0 0 2 0 5 0 0 0 0 0 0 O,P,T,SP,SP 19704 211 22 0 0 2 0 2 0 3 0 0 0 1 3 SP,L/E,L/E 19800 CONST 198 198 1 LONG CONSTANTS FOR TYPEWRITER 19802 (D)3£3£3£3£3£; 19804 1.; L/E 19806 5:5:5:5:5:; *291 QUERIES 19808 0; *262 IND MOD REG 19810 0; COLLATED WORD 19900 PROCR 199 199 OPERATOR INTERVENTION 19901 NOTES RADIX B DETERMINE GROUP 10326>19902 101 0 127 1 2 0 TEST I1gI7 SET 19903 127 103 27 0 0 0 103 gYES 19904 101 127 1 1 0 19905 102 222 2 0 0 0 222 STORE INDICATOR SETTING 19906 124 185 1 3 0 STORE(I) 19907 126 107 8 1 1 0 107 SET (MR1) FOR M/R SWITCH 19908 106 103 2 0 0 0 103 TEST OPTION 19909 127 199 14 0 1 0 199 gYES OUTSTANDING 19910 106 175 2 1 0 0 175 TEST OPTION IN PROGRESS 19911 127 199 22 0 0 0 199 gNO 19912 125 6143 1 1 0 CLEAR I1-I11 I13 19913 124 199 20 1 0 0 199 19909>19914 125 1792 1 2 0 TEST OPTION 48323>19915 125 6143 1 1 0 CLEAR I1-I11 I13 19916 127 200 2 0 0 0 200 *163 gYES 19917 105 221 43 0 0 0 221 *16t OPTIONS NOT ACCEPTED 19918 127 200 2 0 2 0 200 *16t DURING UPTIME DELAY 18721>19919 125 128 1 0 0 SET I8 19940> 19990> 19913>19920 102 103 3 0 0 0 103 SET C ION INDICATOR 19921 124 103 7 1 0 0 103 gHEAD OF QUEUE 19911>19922 106 487 2 0 0 0 487 TEST IF ALLOCATION 19923 127 199 41 0 0 0 199 gNO IS BEING PERFORMED 19924 106 222 2 0 0 0 222 19925 101 1281 1 2 0 TEST GP 5 FN 1 19926 127 199 38 0 1 0 199 gNO 19927 106 108 12 0 0 0 108 *14t 19928 102 106 13 0 0 0 106 *14t 19929 125 6143 1 1 0 CLEAR I1-I11,I13 19930 125 127 1 0 0 SET I1-I7 19931 106 460 51 0 0 0 460 *142 TEST READING C/D 19932 127 199 37 0 0 0 199 gNO 19933 106 222 18 0 0 0 222 YES RESTORE ASL 19934 124 222 20 0 1 0 222 19935 102 64 0 0 0 19936 102 460 51 0 0 0 460 *142 19932>19937 124 295 2 1 0 0 295 *14e g 19926>19938 125 6143 1 1 0 CLEAR INDICATORS 19939 125 127 1 0 0 SET I1gI7 19940 124 199 20 1 0 0 199 g 19923>19941 125 1792 1 2 0 TEST GROUP 0 19942 127 199 49 0 0 0 199 gYES 19943 106 108 12 0 0 0 108 SET M/R SWITCH 19944 102 106 13 0 0 0 106 NON-INT 19945 125 1792 1 2 0 GROUP NO. 19946 118 4126 0 0 0 19947 103 199 78 0 0 0 199 19948 101 8 1 2 0 *5£+*12+ 0000500005 19942>19949 125 6143 1 1 0 CLEAR I1-I11,I13 19950 125 127 1 0 0 SET I1-I7 19951 127 477 8 0 2 0 477 gREJECT 19952 106 222 2 0 0 0 222 STORE COMMAND 19953 103 233 7 0 0 0 233 19954 102 487 2 0 0 0 487 SET ALLOCATOR LINK 19955 101 5 0 1 0 *16t 19956 115 222 2 0 0 0 222 19957 101 514 1 2 0 19958 127 199 67 0 0 0 199 19959 101 2 1 2 0 19960 127 199 67 0 0 0 199 g2/0/4 19961 101 512 1 2 0 19962 127 199 67 0 0 0 199 g4/0/4 19963 101 2 1 1 0 19964 127 199 67 0 0 0 199 g4/0/2 19965 125 0 1 2 0 19966 124 199 76 1 0 0 199 19964> 19962> 19960> 19958>19967 106 221 34 0 0 0 221 19968 127 199 76 0 0 0 199 gUPTIME NOT IN 19969 106 108 11 0 0 0 108 SET M/R SWITCH 19970 102 106 13 0 0 0 106 INT 19971 126 379 2 0 0 0 379 gCLOSE RT 19972 127 103 7 0 3 0 103 gPRIORITY QUEUE DELAY 19973 126 380 2 0 0 0 380 gSET EVERYTHING BACK 19974 106 108 12 0 0 0 108 19975 102 106 13 0 0 0 106 *16t 19968> 19966>19976 124 199 78 0 1 0 199 19977 126 199 78 0 1 0 199 19978 100 0 0 0 0 19979 100 503 2 0 0 0 503 *09e08e07e5:e69e68e67e66e6te86e86e 19980 100 516 2 0 0 0 516 gGROUP2 19981 100 523 2 0 0 0 523 *41e gGROUP 3 19982 100 524 2 0 0 0 524 gGROUP 4 19983 100 477 8 0 0 0 477 *5£t*12t gGROUP 5 REJECT 19984 100 532 2 0 0 0 532 gGROUP 6 SET ROUTE AVAILABLE 19985 100 532 2 0 0 0 532 *5£t*12t gGROUP 7 WITHDRAW ROUTE 48935>19986 125 3855 1 2 0 *40t*41t 19987 101 769 1 2 0 TEST STORE DUMP 19988 127 463 2 0 0 0 463 gYES 19989 125 6143 1 1 0 CLEAR I1-I11,I13 19990 124 199 20 1 0 0 199 gSET C IGN INDICATOR 20000 PROCR 200 200 GROUP D (1) 20001 NOTES RADIX B TEST SELECTED OPTIONS 19918> 19916>20002 106 222 4 0 0 0 222 SET(MR1)FOR LAST 20003 102 2 1 0 0 PROG.TO OFFER OPTIONS 20004 101 213 12 1 3 0 213 20005 112 222 2 0 0 0 222 CONVERT OPT NO TO BINARY 20006 103 222 3 0 0 0 222 TESTIF OPTION CHOICE 20007 101 16 1 2 0 IS OUT OF RANGE 20008 127 203 2 0 2 0 203 gREJECT 20009 101 15 1 1 0 20010 102 222 6 0 0 0 222 20011 106 210 8 0 0 0 210 FORM BIT 20012 124 222 6 0 1 0 222 CORRESPONDING TO 20013 118 0 0 3 0 CHOSEN OPTION 20014 118 4118 1 0 0 20015 115 41 0 1 0 TEST CHOSEN OPTION 20016 127 203 2 0 0 0 203 gREJECT ALLOWED 20017 124 104 6 0 0 0 104 SET INDICATORS WITH (P) 20018 125 0 1 0 0 20019 101 512 1 2 0 *46t TEST'DEFER OPTION' 20020 127 202 7 0 0 0 202 *46t*463163 gYES 20021 106 222 3 0 0 0 222 20022 104 43 0 1 0 FORM & STORE LOCN. CONTAINING S/C 20023 102 222 3 0 0 0 222 ADDRESS CORRESPONDING TO CHOSEN OPTION 20024 101 16 0 1 0 20025 115 38 0 1 0 TEST IF SWITCH TO BE 20026 127 201 2 0 0 0 201 gYES SET AT 4 20027 124 222 3 0 1 0 222 SET LINK FOR SI=1 20028 106 0 0 0 0 20029 101 267 2 1 2 0 267 20030 104 209 12 0 0 0 209 20031 102 31 0 1 0 20032 102 45 0 1 0 CLEAR ASSOCIATED TIME 20033 106 209 4 0 0 0 209 SET SI=1 20034 105 30 0 1 0 20035 124 201 7 1 0 0 201 g 20100 PROCR 201 201 GROUP O(2) 20101 NOTES RADIX B OUTPUT COMMENT ETC. 20026>20102 124 222 3 0 1 0 222 SET LINK FOR SI=4 20103 106 0 0 0 0 20104 115 43 0 1 0 20105 102 44 0 1 0 20106 106 35 0 1 0 SET SI=4 20035>20107 102 7 0 1 0 *163163 CONVERT OPT NO TO 20108 106 222 2 0 0 0 222 ALPHA 20109 103 222 3 1 0 0 222 20110 106 222 2 1 0 0 222 20213>20111 101 15 0 1 0 FILL Q1-4 20112 114 214 8 1 0 0 214 PACK CHOSEN OPTION (ALPHA)g 20113 102 175 2 1 0 0 175 SET REQ & CLEAR OPT OUTSTANDING IND 20114 102 103 2 0 0 0 103 CLEAR LL1 20115 124 177 8 1 0 0 177 gSET L6=1 20200 PROCR 202 202 GROUP O (3) 20201 NOTES RADIX B DEFER OPTIONS 18724>20202 106 221 43 0 0 0 221 *16t TEST UPTIME STOPPED 20203 127 202 7 0 2 0 202 gNO 20204 106 2 0 0 0 TEST OPT FOR 20205 126 386 2 0 0 0 386 *85e 20206 127 203 2 0 0 0 203 *16t gYES REJECT 20203> 20020>20207 106 8 0 1 0 *46t SET S=3 20208 102 7 0 1 0 20209 126 347 2 0 0 0 347 gASSOC. TIME S/R 20210 101 202 14 1 3 0 202 20211 102 42 0 1 0 20212 101 84 1 3 0 'D' 20213 124 201 11 1 0 0 201 20214 124 270 2 0 2 0 270 *464 00004 20215 102 42 0 1 0 RESET LINK FOR SI=3 20216 102 45 0 1 0 CLEAR ASSOC. TIME 20217 101 16 0 1 0 Q5B TEST M/R OPTION 20218 115 38 0 1 0 20219 127 205 21 0 0 0 205 gNO 20220 124 2 0 1 0 SET(MR1)FOR 20221 126 36 1 1 0 COMMERCIAL PROG. 20222 124 290 2 1 0 0 290 gI/P O/P CONTROL 20300 PROCR 203 203 OPERATOR INTERVENTION REJECTION 20301 NOTES RADIX B 29585> 20206> 20016> 20008>20302 125 128 1 0 0 SET I8,REJECT 20303 126 177 2 0 0 0 177 g REQUEST T/W 20304 101 4 1 3 0 OPTIONS 20305 126 234 2 0 0 0 234 gS/R H 20306 124 216 20 0 2 0 216 EDIT COMMENT 20307 128 102 6 1 2 0 102 20308 124 181 2 1 0 0 181 gLOG ROUTINE 20400 PROCR 204 204 ENTRY FOR PROGRAMME UNLOAD 20401 NOTES RADIX B 20402 124 212 2 1 1 0 212 *££0*££2*49e 20403 100 212 2 0 3 0 212 *09e06e SET BINARY 20404 126 385 2 0 0 0 385 *163 20405 101 1 1 2 0 *££2*46e 10007>20406 106 209 6 0 0 0 209 *49e 26/0/1 2 RESTORE(9) 20407 102 9 0 0 0 *49t 20408 124 212 2 1 1 0 212 *49t SET MOD GP 0 20409 126 250 2 0 0 0 250 *599 gSTORE MG3 S/R 20410 126 238 2 0 0 0 238 *09e06e gAUGMENT TIME SPENT 20411 124 3 0 1 0 *60t TEST TRIAL 20412 106 11 0 0 0 20413 124 233 45 0 1 0 233 20414 127 0 0 1 0 *60t gYES 20415 126 462 2 0 0 0 462 gREQUEST M/R 20416 106 179 0 0 0 UNLOAD/ABDON INDICATOR 20417 124 295 17 1 0 0 295 gUNLOAD 20500 PROCR 205 205 PROGRAMMED OFFER OF OPTIONS 20501 NOTES RADIX B 10005>20502 124 212 2 1 1 0 212 SET MOD. GP. 0 20503 102 38 0 1 0 STORE ALARM NO 20504 118 10 1 0 0 20505 102 41 0 1 0 STORE NO OF OPTIONS 20506 124 2 0 1 0 STORE RETURN VALUES 20507 100 30 1 0 0 OF (A)(B) & (C)IN SI 20508 100 212 2 0 3 0 212 0 SET(C)BINARY 20509 126 250 2 0 0 0 250 *599 gSTORE MG3 S/R 20510 106 209 6 0 0 0 209 *49t 26/0/1 2 RESTORE (9) 20511 102 9 0 0 0 *49t 20512 106 210 8 0 0 0 210 20513 124 2 0 1 0 20514 124 41 0 1 0 20515 118 0 0 3 0 20516 101 511 1 1 0 *46e 20517 102 41 0 1 0 OF ALLOWABLE OPTIONS 20518 106 100 4 0 0 0 100 20519 102 43 0 1 0 1ST OPTION 20520 126 238 2 0 0 0 238 *099 gAUGMENT TIME SPENT 20219>20521 126 176 2 0 0 0 176 gREQUEST D/D IN PROG 20600 PROCR 206 206 PROGRAMMED OFFER OF OPTIONS (2) 20601 NOTES RADIX B 20602 106 2 0 0 0 START OF SWITCH STORE START OF SW 20603 102 222 4 0 0 0 222 W/L OF LAST PROGRAMME TO 20604 106 38 1 1 0 OFFER OPTIONS 20605 102 222 8 1 0 0 222 ALARM NO/PROG IDENT.NO 20606 126 234 2 0 0 0 234 gS/R H 20607 124 216 28 0 2 0 216 FORM COMMENT 20608 128 102 6 1 2 0 102 20609 124 181 2 1 0 0 181 gOUTPUT COMMENT 20700 PROCR 207 207 TYPE 20701 NOTES RADIX B 10011>20702 124 212 2 1 1 0 212 SET MOD. GROUP 0 20703 124 3 0 1 0 STORE ANNEXE START IN SP. CHAPTER 20704 102 169 0 0 0 20705 126 250 2 0 0 0 250 *599 SET MOD GP 3 20706 106 100 10 0 0 0 100 STORE LINK 20707 102 44 0 1 0 20708 106 209 6 0 0 0 209 *49t 26/0/1 2 RESTORE (9) 20709 102 9 0 0 0 *49t 20710 126 238 2 0 0 0 238 *099 gAUGMENT TIME SPENT 20711 126 177 2 0 0 0 177 gREQUEST T/W 20712 126 234 2 0 0 0 234 gEDIT TIME 20713 126 212 2 1 3 0 212 SET MRR3 =24/0 20714 100 198 2 1 2 0 198 BITS 1-6 IN EACH QUARTET 20715 118 4122 1 0 0 20724>20716 124 3 0 1 0 COPY COMMENT TO ANNEXE 20717 124 169 0 1 0 20718 106 0 1 3 0 20719 102 102 6 1 3 0 102 20720 115 102 6 1 3 0 102 TEST END OF COMMENT 20721 101 7710 1 2 0 20722 127 207 27 0 0 0 207 gYES 20723 125 2 0 3 0 20724 124 207 16 1 0 0 207 g 20725 106 211 22 1 0 0 211 SET L/E'S IN LAST WORD 20726 102 102 28 1 0 0 102 20722>20727 106 35 0 1 0 SET SI=4 20728 102 7 0 1 0 *163 20729 124 181 2 1 0 0 181 gOUTPUT COMMENT 20800 PROCR 208 208 MASTER ROUTINE 20801 NOTES RADIX B INTERNAL IMPOSSIBILITY 29580> 29613>20802 101 121 1 3 0 CODE LETTER Z 29643> 32711> 32823> 45233> 45517> 45720> 45837> 47622>20803 102 221 4 0 0 0 221 20804 126 107 8 1 1 0 107 SET(MR1)FOR M/R SWITCH 20805 100 212 2 0 3 0 212 SET BINARY 20806 126 177 2 0 0 0 177 gREQUEST T/W 20807 106 177 3 0 0 0 177 20808 102 103 23 0 0 0 103 AMEND END OF LOG ROUTINE 20809 101 4 1 3 0 20810 126 234 2 0 0 0 234 gS/R H 20811 106 214 30 1 0 0 214 X,X,X,N/E,N/E 20812 102 102 6 1 0 0 102 20813 106 221 4 0 0 0 221 20814 118 8 0 0 0 SET UP COMMENT 20815 101 15 0 1 0 FILL Q1g48 20816 115 211 22 1 0 0 211 20817 102 102 8 1 0 0 102 20818 124 181 2 1 0 0 181 gLOG ROUTINE 17911> 10013>20819 100 4095 0 0 0 HALT £ £ £ 20820 124 141 1 0 0 gINDEPENDENT STORE PRINT 20821 100 226 0 0 0 0 226 *££0*££2*106 20822 124 452 2 1 0 0 452 *££2*343 (25)IN 150,OVERFLOW 20900 PROCR 209 209 INSTRUCTION CONSTANTS 20901 NOTES RADIX B 20902 106 157 0 0 0 *09t*3+t START TIMINGS 20903 124 265 2 1 0 0 265 *09t*3+t 20904 126 0 1 0 0 LOG, I/P O/P, REPORT S/R 20905 126 8 0 3 0 SET TAG 15 S/R 20906 126 2 0 1 0 SET TAG 15 S/R 20907 124 456 2 1 0 0 456 *343 (25)IN 150,OVERFLOW 20908 124 240 20 1 0 0 240 REPORT S/R 20909 124 265 3 1 0 0 265 REPORT S/R,STOP TIMINGS 20910 113 227 2 0 0 0 227 *106 USED IN ISU ALLOCATOR & S/R G 20911 113 226 2 0 0 0 226 (124) IN ISU, ALLOCAS/RG 20912 101 0 0 0 0 OP INT, P/T O/P 20913 126 8 0 1 0 *499 MICR 20914 106 8 0 0 0 *59t RETURN FROM PL5MOD GROUP BLISTERS 20915 106 212 20 1 0 0 212 /ABANDON PROGRAMME 20916 104 6 0 1 0 DO 20917 124 103 4 1 0 0 103 DO 20918 102 44 0 0 0 ABANDON PROGRAMME 20919 124 103 7 1 0 0 103 DO DO 20920 126 44 0 3 0 20921 106 129 6 1 0 0 129 *59t 21000 CONST 210 210 0 SHORT CONSTANTS 21002 (D)01£££; UNLOAD STORAGE 21003 66666; DECIMAL RADIX 21004 08000; *££0*££1*3:e4£e ALT RTE INDIC 21005 04000; *3:e4£e ALT RTE INDIC 21006 £0000; LOADER 21007 .1000; 158 IN Q5)-(15 IN Q4) 21008 00001; 1 21009 66t66; CLOCK RADIX 21010 000£8; COLLATE CH.NO 21011 65536; CONVERSION TABLE CONSTANT 21012 66668; RADIX FOR ROUTES 21013 50000; CONST FOR XERONIC SKIP WORD AND FOR PTS 21014 .0080; A.S.L. FOR PRINTER W/E 21015 (D)0; *66t 21016 0; 21017 07008; 21100 CONST 211 211 1 LONG CONSTANTS 21102 (D)££££££££££; 21104 1000000000; STACK MINUS ZERO 21106 4£4£4£4£41; SENTINELTYPE 1 21108 6£6£6£6£6£; R/M'S 21110 6e6e6e6e6e; %%%%% 21112 7171717171; ///// 21114 1212121212; BBBBB 21116 5£5£5£5£5£; FAULTY BLOCK MARKER 21118 1£1£1£1£1£; FAULTY BLOCK MARKER 21120 1.00000000; L/E IN TOP SEXTET FOR OPEN FILE 21122 5.5.5.5.5.; L/E'S 21124 0009000000; *££0*££2*1£3 21126 0006000000; *1:3 21128 0003000000; *1.3 21130 000+000000; *383 21132 0012000000; *4.3 21134 0015000000; *5t3 21136 000£000000; *££2*393 21200 CONST 212 212 1 MOD REGISTER CONSTANTS 21202 (D)0001800000; 24:0 LOG ROUTINE LOAD S/R 21204 0000800000; 8:0 STORE DUMP 21206 0001400002; 20:2 2 USED VARIOUS PLACES 21208 0018000000; *1.3*1:3*1£3*383*393*4.3*5t3 21210 0003000000; 48:0 RTI PTS ASSOCIATED TIME 21212 + ; 12=0T/W&P/T I/P 21214 t ; 10=0 T/W&P/T O/P 21216 000e000080; *3:9 21218 0000000000; *109 S.A.W W/L 21220 000060001t; *599 MOD GROUP TABLE ENTRY 21300 CONST 213 213 1 CONVERSION TABLES 21302 (D)0000000001; BINARYgDECIMAL 21304 0000000016; 21306 0000000256; 21308 0000004096; 21310 0000065536; 21312 0000000001; DECIMALgBINARY 21314 000000000t; 21316 0000000064; 21318 000000 3.8; 21320 0000000001; SECONDSgMINUTES 21322 0000000016; 21324 0000000416; 21326 0000006816; 21328 0000000001; BINARYgOCTARY 21330 0000000020; 21332 0000000320; 21400 CONST 214 214 1 ALPHA CONSTANTS 21402 (A) t; *££0*££1*353 21404 (A) *; *353 21406 (A)INEFF; *2£9 21408 OPT ; 21410 (D)7.(A) (D)7.; B/E,SP,SP,SP,B/E 21412 (A)P Q(D)7:7:; P,SP,Q,N/E,N/E 21414 (D)0514808000; A8/08000 21416 (A)C REJ; 21418 O REJ; 21420 GP FN; 21422 (D)5.7:7:5.7:; L/E,N/E,N/E,L/E,N/E. 21424 5.7:7:6£; L/E N/E N/E R/S 21426 (A)LOST ; 21428 RC ; 21430 (A)XXX (D)7:; X,X,X,SP,N/E 21432 (A)NO CD; 21434 OFLOW; 21436 L%OUT; *££0*££1*353 21438 L'OUT; *353 21440 RTI ; 21442 DB ; 21444 WE ; 21446 CHECK; *2.9669 21448 ZZZ ; 21450 LOP ; 21452 LIP ; 21454 ABDON; 21456 END; 21458 R T I; 21460 DUMP ; *41t 21462 (A)END(D)5.5.; *41t 21464 (A)HIGH; *011 21466 (A)INDEX; 21468 CHAPT; 21470 O%LAY; *££0*££1*353 21472 O'LAY; *353 21474 DUMP ; *41t*14t 21476 ABAND; 21478 ONED ; *41t*14t 21480 (D)5.5.; 21482 (A)SER ; *509 21484 (A)U A ; *3t1 21486 (A)LET ; *139 21488 (A)REJEC; 21490 CHD ; *5+9 21492 (A)* 4 ; *779 21500 CONST 215 215 1 MORE ALPHA CONSTANTS 21502 (A)PAUSE; *0:9 21504 (A)PR CH; *0e9 21506 (A)WDRAW; *129 21508 AVAIL; *129 21510 (A)REOPE; *0:9 21512 (A)RUNCH; *0+9 21514 (A)ROUCH; *119 21516 (A)NEW ; 21518 DOUBT; 21520 (A)CARD ; *669 21522 STORE; *679 21524 (A)CH (D)007:; *68t 21526 (D)6940674000; *68t 21528 (A)TAPE ; *69t 21530 UNLOA; 21532 (A)DED(D)5.5.; 21534 (A)REWOU; 21536 (A)ND (D)5.5.; *69t 21538 (A)PREFE; *86t 21540 R GP ; 21542 R SP ; *86t 21544 (A)SHORT; *4tt 21546 (A)LONG; *4tt 21548 (A)TMS ; *8£9 21600 TABLE 216 216 1 OFLOW, OREJ, ENTER, END, PROG ALARM EDIT TABLES 21601 NOTES 21602 214 34 0 0 2 0 5 0 0 0 0 0 0 *342 O,F,L,O,W 21604 214 22 0 0 2 0 1 1 0 0 0 0 0 N/E 21606 221 2 0 0 0 0 5 0 0 0 0 0 0 PROG NO 21608 214 22 0 0 2 0 1 1 0 0 0 0 0 N/E 21610 222 12 0 0 1 0 t 0 0 0 2 0 0 (A) 21612 222 14 0 0 1 0 t 0 2 0 2 0 0 (B) 21614 221 3 0 0 0 0 1 0 2 0 0 0 0 DIVISION NO OF LINK 21616 221 3 0 0 0 0 4 1 1 3 0 0 0 LOCATION WITHIN DIV 21618 211 22 0 0 2 0 2 0 4 0 0 0 1 *342 L/E'S 21620 214 18 0 0 2 0 5 0 0 0 0 0 0 O.SP.R.E.J 21622 214 12 0 0 2 0 2 3 0 0 0 0 0 N/E, N/E 21624 222 2 0 0 0 0 2 3 0 1 0 0 0 OPT NO 21626 211 22 0 0 2 0 2 0 4 0 0 0 1 4 SP,L/E,L/E 21628 214 4 0 0 2 0 1 4 0 0 0 0 0 ASTERISK 21630 222 8 0 0 0 0 3 2 1 1 0 0 0 ALARM NO 21632 214 12 0 0 2 0 1 4 0 0 0 0 0 N/E 21634 222 9 0 0 0 0 5 0 0 0 0 0 0 PROG NO 21636 211 22 0 0 2 0 2 0 2 0 0 0 1 2 SP,L/E,L/E 21700 TABLE 217 217 1 L'OUT 21701 NOTES 21702 0 0 0 0 2 0 0 0 2 0 0 0 0 *££0*££2*31e T 1 21704 0 180 0 0 2 0 2 3 0 0 0 0 0 *££2*583 T 1 21706 214 38 0 0 2 0 5 0 0 0 0 0 0 *342 L',O.U,T 21708 214 22 0 0 2 0 1 1 0 0 0 0 0 N/E 21710 221 2 0 0 0 0 5 0 0 0 0 0 0 PROG NO 21712 214 22 0 0 2 0 1 1 0 0 0 0 0 N/E 21714 222 12 0 0 0 0 1 0 2 0 0 0 0 DIVISION NO(COMPT 16) 21716 222 12 0 0 0 0 4 1 1 3 0 0 0 LOCATION WITHIN DIV 21718 222 13 0 0 0 0 1 0 2 0 0 0 0 DIV NO OF LEP 21720 222 13 0 0 0 0 4 1 1 3 0 0 0 LOCATION WITHIN DIV 21722 222 14 0 0 0 0 1 0 2 0 0 0 0 DIV NO(COMPT 1) 21724 222 14 0 0 0 0 4 1 1 3 0 0 0 LOCATION WITHIN DIV 21726 211 22 0 0 2 0 2 0 2 0 0 0 1 *342 L/E'S 21728 214 26 0 0 2 0 5 0 0 0 0 0 0 L,O,S,T, SP (OR O'LAY) 21730 214 22 0 0 2 0 1 1 0 0 0 0 0 N/E 21732 221 8 0 0 0 0 5 0 0 0 0 0 0 PROG NO 21734 211 22 0 0 2 0 2 0 2 0 0 0 1 2 SP,L/E,L/E 21736 0 156 0 0 0 0 2 2 0 0 0 0 0 *31e234 T 1 21738 214 12 0 0 2 0 1 4 2 0 0 0 1 ///// SP,SP N/E 21740 105 4 0 0 2 0 1 0 0 0 0 0 0 R/S 21742 0 156 0 0 0 0 2 2 0 0 0 0 0 *31e*583 2 DIGS T 1 21744 214 12 0 0 2 0 1 4 1 0 0 0 1 ///// SP N/E 21746 0 156 0 0 0 0 4 0 0 0 0 0 0 *31e*6e9 T 1 21748 214 12 0 0 2 0 1 4 0 0 0 0 1 *6e9 N/E SUM 21800 TABLE 218 218 1 DATA HANDLING TABLES 21801 NOTES 21802 0 26 0 0 0 0 6 0 0 0 0 0 0 ///// STORE GP 3 REG 21804 211 5 0 0 0 0 2 0 0 0 0 0 0 STACK MINUS ZERO 21806 222 12 0 0 0 0 6 0 0 0 0 0 0 ///// RESTORE GP 3 REG 21808 211 22 0 0 2 0 2 0 1 0 0 0 1 /////SP,L/E,L/E 21810 226 2 0 0 0 0 0 0 1 0 0 0 0 *019 T 7 21900 TABLE 219 219 4 21902 225 6 0 0 2 1 0 0 0 0 0 0 1 CONTROL DATA 22000 CONST 220 220 1 INPUT/OUTPUT CONSTANTS 22002 (D)0000700000; (A) 22004 000000003+; (B)READ CD 22006 666t600000; MINS & SECS RADIX,(C) 22008 0002600000; (A) 22010 00004£££££; (B),RUN ON M/T 22012 0080000000; BIT 12,(C) 22100 CONST 221 221 1 GENERAL W/L'S 22102 (D)0; TO BE USED ONLY NON-INTERRUPTIBLY 22104 0; (ALLOC LINK SET) C REJ. XXX, O'LAY, ETC. 22106 0; PROG SWITCH DURING OVERLAY 22108 0; (ALLOC LINK SET) PROG ID IN ALLOC&OLAY 22110 0; ROUCH 22112 0; O'LAY: ITEM 13 USED BY INTERX PRIORITIES 22114 0; USED IN ALIGNMENT FAILURE 22116 0; IND MOD REG FOR LOAD S/R 22118 0; IND MOD REG FOR LOAD S/R 22120 (D)7654321; *££0*££2*5t3 22122 (D)654321; *4.3 22124 (D)54321; *393 22126 (D)4321; *383 22128 (D)321; *1£3 22130 (D)21; *1:3 22132 (D)1; *££2*063*1.3 22134 ; *16t 22136 ; 2.3 22138 ; 1ST PROGM 22140 ; *859 22142 ; 22144 ; 1ST/2ND 22146 ; 3RD/4TH 22148 ; 5TH/6TH 22150 ; 7TH/8TH 22200 CONST 222 222 1 W/L'S FOR OP INT 22202 (D)0; IND SETTING/BIN OPT NO 22204 0; W/L/USED IN CHD 22206 0; W/L/TRIALS IND IN ALLOC 22208 0; W/L 22210 0; PROG NO/PROG SL NO AFTER C.D. GP2 22212 0; STORAGE GP3 REGISTERS 22214 0; (A) (B) (C) IN O'FLOW 22216 0; W/L'S IN L''OUT 22218 0; ORIG 64+R DURING C.D. / W/L 22220 0; (A) FOR C.D. 22222 0; (B) FOR C.D. 22224 0; (C) FOR C.D./ S/R G 22300 CONST 223 223 0 COUNTERS & INDICATORS 22302 (D)00000; *063 TIMING IND 22303 00000; ALLOC & O'LAY 22400 CONST 224 224 0 MULTI-CHANNEL LOADING LIST 22402 (D)0; CH/RT 22403 ; RT TYPE 22404 ; PROGM 22405 ; SERIAL 22406 ; LT.CHAPT 22407 ; IDENTIFIER 22408 ; *57t 22409 ; 22410 ; 22411 ; 22412 ; 22413 ; 22414 ; 22415 ; 22416 ; 22417 ; 22418 ; 22419 ; 22420 ; 22421 ; 22422 ; 22423 ; 22424 ; 22425 ; 22426 ; 22427 ; 22428 ; 22429 ; 22430 ; 22431 ; 22432 ; 22433 ; 22434 ; 22435 ; 22436 ; 22437 ; *57t 22500 CONST 225 225 1 MULTI-CHANNEL WL'S 22502 (D)0; NORMAL ALLOC CH/RT 22504 ; 22506 ; TRIAL 22508 ; (A) 22510 ; (B) 22512 ; CH CH RT 22514 ; RT TYPE IN ASL 22516 ; MOD REG 22600 TABLE 226 226 1 22601 NOTES 22602 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22604 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22606 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22608 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22610 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22612 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22614 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22616 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22618 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22620 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22622 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22624 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22626 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22628 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22630 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22632 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22634 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22636 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22638 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22640 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22642 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22644 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22646 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22648 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22650 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22652 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22654 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22656 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22658 226 7 0 0 0 0 0 0 3 0 0 0 0 ///// 22700 TABLE 227 227 1 22701 NOTES 22702 0 0 0 0 0 0 0 0 0 0 0 0 0 *102 T 1 22704 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22706 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22708 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22710 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22712 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22714 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22716 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22718 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22720 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22722 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22724 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22726 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22728 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22730 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22732 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22734 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22736 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22738 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22740 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22742 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22744 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22746 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22748 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22750 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22752 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22754 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22756 0 0 0 0 0 0 0 0 0 0 0 0 0 ///// 22758 227 7 0 0 0 0 0 0 3 0 0 0 0 ///// 22800 CONST 228 228 1 UNPACKED INPUT 22802 (D)0; 22804 0; 22806 0; 22808 0; 22810 0; 22812 0; 22814 0; 22816 0; 22818 0; 22820 0; 22822 0; 22824 0; 22900 CONST 229 229 1 M/R TABLES TAG,MOD GP AND FP 22902 (D)87654321; *1.3*1:3*1£3*383*393*4.3*5t3 22904 0; *3t1*3e9 23000 PROCR 230 230 M/R STORE TABLE 23002 100 4097 1 0 0 23003 101 108 2 0 0 0 108 23004 115 8191 1 3 0 23005 115 8191 1 3 0 23006 115 8191 1 3 0 *1.2 23007 115 8191 1 3 0 23008 115 8191 1 3 0 *1:2 23009 115 8191 1 3 0 23010 115 8191 1 3 0 *1£2 23011 115 8191 1 3 0 23012 115 8191 1 3 0 *382 23013 115 8191 1 3 0 23014 115 8191 1 3 0 *392 23015 115 8191 1 3 0 23016 115 8191 1 3 0 *4.2 23017 115 8191 1 3 0 23018 115 8191 1 3 0 *5t2 23019 115 8191 1 3 0 *1.2*1:2*1£2*382*392*4.2*5t2 23020 115 8191 1 3 0 23021 115 8191 1 3 0 23022 100 0 0 0 0 *££0*££2*3ee*01e*3.3*04e*14e*42e*46e*31e 23023 100 0 0 0 0 *41e*3t3*14e*3:e*60e 23024 100 217 28 0 0 0 217 *343 OFLOW EDIT TABLE 23025 100 455 14 0 0 0 455 *34e RETURN ADD FOR TROFL 23026 100 1 0 0 0 *443 23027 100 9 0 0 0 *62e 23028 100 4 0 0 0 *2.+62e 23100 CONST 231 231 1 M/R STORE TABLE 23102 (D)0; SET UP BY I.S.U. 23104 0200002000; 23106 0200004000; 23108 0200006000; 23110 0200008000; 23112 020000t000; 23114 020000+000; 23116 020000.000; 23118 0000010000; 23120 ££££££££££; 23200 CONST 232 232 1 M/R 2ND STORE TABLE 23202 (D)0200008000; *3t2*3et 23204 020000t000; 23206 020000+000; 23208 020000.000; 23210 0000010000; 23212 ££££££££££; 23214 ££££££££££; 23216 ££££££££££; 23218 ££££££££££; 23220 ££££££££££; *3t2*3et 23222 (D)0000000000; (A)ON ENTRY TO PROG 23224 0000000000; (B)ON ENTRY TO PROG 23300 PROCR 233 233 ALLOCATOR PARAMETER TABLE 23301 NOTES RADIX 23302 100 0 0 0 0 ZERO 23303 100 0 0 0 0 13-BIT START OF LOADING SYSTEM 23304 100 0 0 0 0 15-BIT START OF LOADING SYSTEM 23305 100 233 2 0 0 0 233 START OF THIS LIST 23306 100 229 2 0 0 0 229 START OF M/R TABLES 23307 100 0 0 0 0 ALLOCATE COMMAND/ZERO 23308 100 247 2 0 0 0 247 LOAD NEXT CHAPTER S/R 23309 100 236 2 0 0 0 236 READ NEXT BLOCK S/R 23310 100 235 2 0 0 0 235 UPDATE SWITCH S/R 23311 100 243 2 0 0 0 243 RETURN ADDRESS AFTER LOADING 23312 100 222 12 0 0 0 222 LOCATION WHERE (MOD GP 3) IS STORED 23313 100 60 0 0 0 PSEUDOROUTE FOR ROUTE 0 23314 100 252 2 0 0 0 252 START OF USE OF ASSEMBER TABLE 23315 100 208 3 0 0 0 208 XXX COMMENT 23316 100 484 3 0 0 0 484 REJECT ALLOCATION COMMENT 23317 100 270 2 0 0 0 270 *464 R/C LINK 00004 23318 100 190 34 0 0 0 190 START OF REEL COUNTERS 23319 100 177 2 0 0 0 177 REQUEST T/W S/R 23320 100 102 6 0 0 0 102 START OF T/W ANNEXE 23321 100 234 2 0 0 0 234 EDIT TIME S/R 23322 100 181 2 0 0 0 181 ENTRY TO LOG ROUTINE 23323 100 499 2 0 0 0 499 *01e NOT HIGH DENSITY IF ZERO 23324 100 191 64 0 0 0 191 *01e 45/90K INDICATORS 23325 117 496 66 0 0 0 496 64-(CONTROL DATA LIST START)FOR 45K 23326 100 0 0 0 0 PROG TAPE ROUTE 23327 100 1 0 0 0 *31e CLOCK=1,ZERO=NO CLOCK 23328 100 0 0 0 0 *544*443 DUMPS PRINT 2 23329 108 9 0 0 0 *2.+62e*2.+*62e 0000000004 23330 100 1 0 0 0 0=ISSUE 4 MASTER,1=ISSUE 6 OR LATER 23331 100 230 2 0 0 0 230 START OF PRIORITY TABLE 23332 100 231 2 0 0 0 231 START OF STORE TABLE 23333 100 232 2 0 0 0 232 *3t3*3ee START OF SECOND STORE TABLE 23334 116 64 0 0 0 *3:e MORE THAN 8 CHANNELS 23335 100 1 0 0 0 *3.3*04e CARDS OR P/T INDICATOR 23336 100 295 17 0 0 0 295 RETURN ADDRESS FOR PTS ABDON/END 23337 100 190 2 0 0 0 190 PTS=PROG CHANNEL BLOCK CTRS 23338 100 190 98 0 0 0 190 PTS=FILE IDENTITIES+REWIND INDS 23339 100 464 20 0 0 0 464 *41e RETURN ADD FROM START OF STORE DUMP 23340 100 246 16 0 0 0 246 RETURN TO RELEASE MR SWITCH 23341 100 216 2 0 0 0 216 *343 OFLOW EDIT TABLE 23342 100 246 10 0 0 0 246 RETURN ADD FOR O'LAY (END) 23343 100 452 20 0 0 0 452 *34e RETURN ADD FOR TROFL 23344 100 474 2 0 0 0 474 'SET TAG 15' SUBROUTINE 23345 100 0 0 0 0 Q1-4=ABS PTS START,Q5=2XCHAP 23346 100 0 0 0 0 TRIAL IN PROGRESS IND-START OF SWITCH 23347 100 246 24 0 0 0 246 *60e RETURN ADD FOR O'LAY(START) 23348 100 0 0 0 0 START OF SECOND STORE AREA 23349 100 1 0 0 0 *80+ 23350 100 0 0 0 0 SPECIAL CHAP INCREMENT IN CMR 23351 100 130 2 0 0 0 130 END OF PRIORITY QUEUE 23352 100 462 2 0 0 0 462 'REQUEST MASTER SWITCH'SUBROUTINE 23353 100 296 6 0 0 0 296 *14e LOCN OF 'OPTA' SWITCH-PTS OVERLAY 23354 100 468 12 0 0 0 468 *41e 23355 100 175 3 0 0 0 175 'OPT OUTSTANDING'WL'S FOR PTS 23356 100 176 12 0 0 0 176 23357 100 0 0 0 0 WL=INDEX IDENTIFIER M/CODE START 23400 PROCR 234 234 SUB ROUTINE H 23401 NOTES RADIX B TO EDIT TIME AND RIBBON SHIFT 23402 100 0 0 0 0 LINK 23403 127 234 7 0 0 0 234 *6e9 gZERO 23412>23404 101 217 36 1 1 0 217 TABLE START 23405 128 102 4 1 2 0 102 23406 126 234 2 0 1 0 234 gLEAVE S/R 23403>23407 106 234 18 0 0 0 234 *6et COUNTER 23408 101 1 1 2 0 SUBTRACT 1 23409 103 234 18 0 0 0 234 COPY 23410 127 234 13 0 0 0 234 gZERO 23411 125 0 1 2 0 CLEAR(A) 23412 124 234 4 1 0 0 234 g 23410>23413 101 217 46 1 3 0 217 TABLE START 23414 128 102 4 1 2 0 102 23415 101 15 1 3 0 23416 102 234 18 0 0 0 234 TRANSFER 23417 126 234 2 0 1 0 234 LEAVE S/R 23418 100 15 0 0 0 *6et 23500 PROCR 235 235 SUB-ROUTINE X 23501 NOTES RADIX B TO UPDATE SWITCH 23502 100 0 0 0 0 23503 101 0 0 1 0 CLEAR B 23504 106 7 0 3 0 TEST IF DESTINATION 23505 105 9 0 3 0 SWITCH SET AT 2 23506 127 235 9 0 1 0 235 gNO 23507 106 9 0 2 0 AMEND SEQUENCE 23508 102 7 0 3 0 CHANGES IN SWITCH 23506>23509 106 9 0 2 0 23510 102 9 0 3 0 23511 106 20 0 2 0 23512 102 20 0 3 0 23513 126 235 2 0 1 0 235 gLEAVE S/R 23600 PROCR 236 236 SUB-ROUTINE BB 23601 NOTES RADIX B TO READ A BLOCK FROM M/T 23602 100 0 0 0 0 LINK 23603 106 212 10 1 0 0 212 *10t SET UP 23604 102 212 18 1 0 0 212 *10t MODIFIER 23616> 23620>23605 100 220 2 1 1 0 220 23606 104 233 26 0 0 0 233 RTE NO 23607 126 100 2 0 0 0 100 gREAD 23608 126 350 2 0 0 0 350 *10t TEST RTE 23609 126 314 2 0 0 0 314 gTEST A1=BLOCK CTR 23610 127 236 21 0 0 0 236 23611 101 0 1 3 0 CLEAR A 23612 126 331 2 0 0 0 331 gSTEP COUNTER BY-1 23613 123 1 0 0 0 TEST 48 ATTEMPTS 23614 100 212 18 0 0 0 212 23615 124 236 17 1 0 0 236 gTRY AND FIND THIS BLOCK 23616 124 236 5 1 0 0 236 gREALIGN ON PREVIOUS BLOCK 23615>23617 124 188 2 0 1 0 188 SET UP LAST 23618 106 190 2 0 0 0 190 BLOCK NUMBER TO 23619 102 1 1 3 0 AVOID SERIAL FAILURE 23620 124 236 5 1 0 0 236 *10t gTRY AGAIN 23610>23621 124 124 0 1 0 UNPACK 23622 106 56 1 0 0 23623 128 228 2 1 0 0 228 23624 124 210 3 1 1 0 210 SET MOD GROUP 3 23625 126 236 2 0 1 0 236 gLEAVE S/R 23700 PROCR 237 237 INPUT/OUTPUT S/R 23701 NOTES RADIX B ALLOC AND OVERLAY 23702 100 0 0 0 0 LINK 23703 118 5 0 0 0 23704 104 233 26 0 0 0 233 RTE NO 23705 125 4096 1 1 0 SET NON-INT 23706 126 100 2 0 0 0 100 g 23707 126 237 2 0 1 0 237 gLEAVE S/R 23800 PROCR 238 238 AUGMENT TIME SPENT IN PROGRAMME S/R 23802 100 0 0 0 0 *09t06t 23803 100 210 3 0 3 0 210 *3+t 23804 106 157 0 0 0 23805 107 46 1 1 0 *3+t 23806 100 212 2 0 3 0 212 SET BINARY 23807 126 238 2 0 1 0 238 *09t06t 23808 115 228 3 0 0 0 228 *££0*££2*3t3*3ee 23809 124 242 83 1 0 0 242 *363 gNO,REJECT 23810 124 477 8 1 0 0 477 *363363 23900 PROCR 239 239 TEST SENTINEL TYPE 5 S/R 23902 100 0 0 0 0 23903 124 212 2 1 1 0 212 MGO 23904 106 228 2 0 0 0 228 TEST SENTINEL BLOCK 23905 105 211 2 0 0 0 211 23906 127 239 12 0 1 0 239 gNO 23907 101 1 0 1 0 23908 106 228 3 0 0 0 228 *3t3*3ee 23909 101 5 1 2 0 23910 127 242 15 0 0 0 242 *3t2*3et NOT ALLOWED ON 326 23911 101 80 1 2 0 *3t2*3et 23906>23912 126 239 2 0 1 0 239 24000 PROCR 240 240 REPORT REQUIRED PROG NOT ON FILE 24001 NOTES RADIX B 24155> 24422> 24524>24002 101 27 1 3 0 IN W/L 24003 126 237 2 0 0 0 237 gCLOSE FILE 24004 126 177 2 0 0 0 177 gREQUEST T/W 24005 101 4 1 3 0 24006 126 234 2 0 0 0 234 gS/R H 24007 124 214 26 0 2 0 214 SET EDIT TABLE FOR LOST 24008 102 217 28 0 0 0 217 24009 124 217 28 0 2 0 217 FORM COMMENT 24010 128 102 6 1 2 0 102 24011 106 209 4 0 0 0 209 26/1/0/0/0 24012 105 233 26 0 0 0 233 RTE NO 24013 102 106 14 0 0 0 106 SET M/R SWITCH=1 24014 106 209 8 0 0 0 209 24015 102 106 24 0 0 0 106 AMEND S/C AT END OF 24016 126 347 2 0 0 0 347 *469 gASSOC TIME SR SI=1 CODING 24017 106 233 26 0 0 0 233 *59t 24018 102 30 0 1 0 *59t 24019 124 181 2 1 0 0 181 gLOG ROUTINE 20908>24020 106 209 9 0 0 0 209 24021 102 106 24 0 0 0 106 RESET S/C 24022 124 225 16 0 1 0 225 *579 24023 102 224 4 1 0 0 224 CLEAR IDENTITY OF LAST PROGRAM USED 24024 124 245 2 1 0 0 245 g 24100 PROCR 241 241 ALLOCATION AND OVERLAY 24101 NOTES RADIX B SUB-ROUTINE A: OPEN FILE IF NECESSARY 24102 100 0 0 0 0 LINK 24103 101 0 1 3 0 *5+t CLEAR CHANGE DECK 24104 124 3 0 3 0 INDICATOR 24105 102 164 0 0 0 *5+t 24106 124 241 10 0 2 0 241 SET UP PSEUDO 24107 101 267 2 1 2 0 267 ROUTE TYPE 24108 104 209 12 0 0 0 209 24109 126 237 2 0 0 0 237 gTEST RTE DEALING WITH D/B 24110 100 210 3 0 3 0 210 AUGMENT BLOCK 24111 124 233 26 0 1 0 233 TEST FIRST TIME ANY 24112 106 190 2 0 0 0 190 PROG TAPE LOADED 24113 127 241 17 0 0 0 241 gYES 24114 101 1 1 3 0 COUNTER 24115 124 233 26 0 1 0 233 24116 107 190 2 0 0 0 190 24113>24117 100 212 2 0 3 0 212 24124>24118 124 233 26 0 1 0 233 STEP FORWARD 24119 119 0 1 3 0 24120 126 351 2 0 0 0 351 gTEST ROUTE NOTING D/B 24121 124 233 26 0 1 0 233 TEST CORRECT BLOCK 24122 124 64 0 1 0 NUMBER 24123 106 1 1 0 0 24124 127 241 18 0 3 0 241 gNO, PROBABLY FBM 24125 124 233 26 0 1 0 233 24126 105 190 2 0 0 0 190 24127 127 241 30 0 1 0 241 gNO, NOT FBM 24128 124 241 2 0 1 0 241 24129 124 1 1 0 0 gLEAVE S/R+1 24127>24130 124 233 26 0 1 0 233 24131 104 190 2 0 0 0 190 TEST24138 125 0 1 2 0 CLEAR REEL COUNTER 24139 124 233 26 0 1 0 233 24140 102 190 34 0 0 0 190 24141 100 214 14 1 2 0 214 24142 101 17 1 3 0 24143 126 237 2 0 0 0 237 gOPEN FILE 24144 118 4119 0 0 0 24145 101 1 1 2 0 TEST A1 24146 127 241 57 0 0 0 241 gYES 24147 101 1 1 2 0 TEST A2 24148 127 241 57 0 0 0 241 gYES 24149 101 1 1 2 0 TEST A3 24150 127 241 57 0 0 0 241 gYES 24151 101 3 1 2 0 TEST A6 24152 127 241 57 0 0 0 241 gYES 24153 124 245 18 0 2 0 245 24154 105 241 2 0 0 0 241 24155 127 240 2 0 0 0 240 gYES:'LOST' 24156 124 491 12 1 0 0 491 *363363 24152> 24150> 24148> 24146>24157 126 241 2 0 1 0 241 gLEAVE S/R 24200 PROCR 242 242 ALLOCATION AND OVERLAY 24201 NOTES RADIX B SUB-ROUTINE B:LOCATE PROGRAMME 24202 100 0 0 0 0 LINK 24214>24203 100 220 8 1 1 0 220 RUN FORWARD 24204 104 233 26 0 0 0 233 24205 126 100 2 0 0 0 100 g 24206 126 236 2 0 0 0 236 *101 gREAD 24207 124 212 2 1 1 0 212 MOD GP 0 24208 124 124 0 1 0 TEST INDEX BLOCK 24209 106 6 1 0 0 24210 105 214 66 1 0 0 214 24211 127 242 16 0 0 0 242 gYES 24212 104 214 66 1 0 0 214 TEST'DOUBT' 24213 105 215 18 1 0 0 215 24214 127 242 3 0 0 0 242 gYES 24226> 24256> 23910>24215 124 242 82 1 0 0 242 *363 gNO,REJECT 24211>24216 124 124 0 1 0 STORE IDENTIFIER 24217 106 11 1 0 0 24218 124 225 16 0 1 0 225 *579 24219 102 224 7 0 0 0 224 24240>24220 126 236 2 0 0 0 236 gS/R B8 24221 124 212 2 1 1 0 212 MG 0 24222 126 212 2 1 3 0 212 SET (MR3)=24/0 24239>24223 101 0 0 1 0 CLEAR B 24224 106 228 2 0 3 0 228 TEST PROG 10=£5 24225 105 211 2 0 0 0 211 24226 127 242 15 0 0 0 242 24227 106 228 2 1 3 0 228 TEST REQUIRED PROG 24228 124 225 16 0 1 0 225 *579 24229 103 224 4 1 0 0 224 1D AND SERIAL 24230 105 221 8 1 0 0 221 24231 127 242 41 0 0 0 242 gYES 24232 118 4123 1 0 0 *70t 24233 105 228 3 0 3 0 228 24234 127 242 41 1 0 0 242 24235 106 221 8 0 0 0 221 24236 105 213 2 0 0 0 213 FIRST PROGM WANTED 24237 127 242 41 0 0 0 242 *70t 24252>24238 125 4 0 3 0 24239 124 242 23 1 0 0 242 24240 124 242 20 1 0 0 242 24237> 24234> 24231>24241 106 228 4 0 3 0 228 TEST PASS IND=4 24242 105 220 11 0 0 0 220 24243 127 242 51 0 1 0 242 gNOT,REJECT IF TRIALS ALLOC 24244 100 220 3 0 2 0 220 *60t 24245 115 233 26 0 0 0 233 PTS ROUTE 24246 101 7 1 2 0 24247 127 242 57 0 1 0 242 24248 106 228 5 0 3 0 228 STORE INDEX IDENTIFIER 24249 102 233 57 0 0 0 233 *60t =PARA 55 24250 124 242 57 1 0 0 242 24243>24251 104 212 6 0 0 0 212 TEST INDICATOR=2 24252 127 242 38 0 1 0 242 gNO,CONTINUE SEARCH 24253 100 220 3 0 2 0 220 *60t 24254 115 233 26 0 0 0 233 24255 101 7 1 2 0 24256 127 242 15 0 0 0 242 *60t 24250> 24247>24257 124 10 0 2 0 FORM UP IDENTIFIER FOR RUNNING 24258 118 5 0 0 0 24259 104 228 5 0 3 0 228 24260 102 221 4 1 0 0 221 24261 106 228 5 0 3 0 228 TEST CORRECT PLACE 24262 124 225 16 0 1 0 225 *579 ON TAPE 24263 105 224 7 0 0 0 224 24264 124 225 16 0 1 0 225 *579 24265 107 224 7 0 0 0 224 24266 127 242 74 0 0 0 242 gYES 24267 127 242 70 0 3 0 242 gRUN BACK 24268 124 38 0 2 0 24269 124 242 71 1 0 0 242 24540> 24267>24270 124 36 0 2 0 24269>24271 100 221 4 1 2 0 221 24272 126 237 2 0 0 0 237 gRUN FWD/BACK 24273 124 242 75 1 0 0 242 *109 24276> 24279> 24266>24274 126 236 2 0 0 0 236 gS/R BB 24273>24275 126 239 2 0 0 0 239 g TEST SENTINEL TYPE 5 24276 127 242 74 0 1 0 242 gNO 24277 106 228 2 0 0 0 228 24278 105 220 10 0 0 0 220 24279 127 242 74 0 1 0 242 gNO 24280 124 242 2 0 1 0 242 24281 124 1 1 0 0 gLEAVE S/R+1 24215>24282 101 81 1 3 0 *361 CODE LETTER A 23809>24283 126 242 2 0 1 0 242 gLEAVE S/R 24300 PROCR 243 243 RETURN FROM P.L.S. AFTER LOADING 24301 NOTES RADIX B 24302 124 27 0 1 0 STORE NO OF CHAPS LOADED 24303 106 4 0 0 0 24304 124 225 16 0 1 0 225 *579 24305 102 224 6 0 0 0 224 24306 124 225 16 0 1 0 225 *57t 24307 106 224 2 0 0 0 224 24308 124 27 0 1 0 STORE ROUTE IN SPECIAL CHAPT 24309 102 159 0 0 0 *57t 24310 126 26 1 2 0 SET(MR2)AT START OF SWITCH 24311 123 28 0 3 0 *59t TEST MOD 24312 101 14 1 2 0 GROUP 3 ALLOCATED 24313 127 243 43 0 0 0 243 gNO 24314 106 209 15 0 0 0 209 SET UP 6/0/0 8 24315 102 2 0 2 0 ACTION IN 2 OF SWITCH 24316 106 4 0 0 0 FORM MODIFIER TO 24317 101 111 2 1 2 0 111 GIVE THIS SWITCHES 24318 118 4127 1 0 0 W/L'S 24319 118 2 1 3 0 24320 102 6 0 0 0 24321 106 209 21 0 0 0 209 SET UP 6/1/0 IN 24322 104 6 0 0 0 SWITCH 24323 102 26 0 2 0 24324 106 129 5 0 3 0 129 SET UP 28/1/1 W/L'S 24325 103 3 0 2 0 IN 3 OF SWITCH 24326 104 209 16 0 0 0 209 24/1/0 TO BLISTER SPACE IN 24327 102 28 0 2 0 28 OF SWITCH 24328 106 4 0 2 0 *09t06t*09t062 TEST TIMINGS ON 24329 127 243 34 0 2 0 243 *09t06t gYES 24330 106 28 0 2 0 SET UP 26/0/3 24331 102 27 0 2 0 IN 27 OF SWITCH 24332 106 209 17 0 0 0 209 SET UP 24/1/0 TO TOP OF PQ 24333 102 4 0 2 0 *09t062 24329>24334 106 209 17 0 0 0 209 SET UP 24/1/0 TO TOP OF PQ 24335 102 6 0 2 0 IN 4 OF SWITCH 24336 106 3 0 2 0 24337 127 243 42 0 2 0 243 24338 102 243 41 0 0 0 243 24339 106 243 76 0 0 0 243 24340 118 5 0 0 0 24341 100 0 0 0 0 24337>24342 101 0 1 3 0 24313>24343 123 26 1 0 0 SET TAG 0 IN MOD 24344 123 30 1 0 0 GROUP 3 24345 123 28 1 0 0 *59t 24346 106 176 23 0 0 0 176 24347 124 26 0 1 0 FORM SI=4 LINK 24348 101 14 1 2 0 24349 103 35 0 2 0 24350 102 7 0 2 0 SET SI=4 24351 124 27 0 1 0 *60t TEST TRIAL 24352 106 11 0 0 0 *60t 24353 127 246 14 0 0 0 246 gNO 24354 106 26 0 0 0 *60t SET TRIALS IND 24355 102 233 46 0 0 0 233 24356 126 480 2 0 0 0 480 24357 106 218 6 1 0 0 218 RESTORE MOD GROUP 3 24358 128 26 0 0 0 24359 106 106 16 0 0 0 106 SET M/R SWITCH AT 2 24360 102 106 14 0 0 0 106 24361 124 24 0 2 0 SET LAST CHAP READ AT 24 24362 124 225 16 0 1 0 225 *579 24363 102 224 6 0 0 0 224 24364 106 222 7 0 0 0 222 TRIAL DATA IND 24365 124 233 45 0 1 0 233 24366 124 4 1 0 0 gPTS 24367 124 233 45 0 1 0 233 *££0*££1*49e LINK UP FROM 10015>24368 124 2 0 1 0 *49e STORE (ABC) 24369 100 30 1 0 0 *49t 24370 106 209 6 0 0 0 209 26/0/1 2 RESTORE(9) 24371 102 9 0 0 0 24372 124 2 0 1 0 RESTORE (ABC) 24373 100 30 1 1 0 24374 124 233 45 0 1 0 233 *49t LINK UP FROM 24375 124 5 1 0 0 *60t gPTS 24376 102 6 0 0 0 *599 24377 127 244 23 0 0 0 244 *££0*££2*57e 24378 124 244 25 1 0 0 244 *14e 24379 127 245 12 0 0 0 245 *573 gNO 24380 127 244 25 0 0 0 244 *££2*14e57e 24400 PROCR 244 244 ENTRY FOR OVERLAY. 24401 NOTES RADIX B 10009>24402 124 212 2 1 1 0 212 SET MOD GROUP 0 24403 124 2 0 1 0 24404 100 30 1 0 0 24405 126 250 2 0 0 0 250 *599 gSTORE MOD GROUP 3 S/R 24406 106 209 6 0 0 0 209 *49t 26/0/1 2 RESTORE (9) 24407 102 9 0 0 0 *49t 24408 106 100 8 0 0 0 100 STORE DETAILS IN 24409 102 44 0 1 0 SWITCH 24410 126 238 2 0 0 0 238 *099 gAUGMENT TIME SPENT 24411 126 462 2 0 0 0 462 gREQUEST M/R FOR OVERLAY 24412 106 221 34 0 0 0 221 *16t 37915>24413 127 244 17 0 0 0 244 *14e57e*57e gUPTIME NOT IN 24414 126 379 2 0 0 0 379 gCLOSE RT 24415 127 103 7 0 3 0 103 gDELAY STILL IN PROCESS 24416 126 380 2 0 0 0 380 *16t SET EVERYTHING BACK 24413>24417 124 3 0 1 0 *57t 24418 106 159 0 0 0 SELECT AND STORE CH RT FROM SPECIAL CHAP 24419 103 233 26 0 0 0 233 24420 126 249 2 0 0 0 249 gS/R-SEARCH LIST FOR RT 24421 124 244 23 1 0 0 244 *14e gRT FOUND IN LIST 24422 124 240 2 1 0 0 240 *57t g'LOST' 24421> 24377>24423 106 212 6 0 0 0 212 *14t SET OPT A SWITCH AT2 24424 102 296 6 0 0 0 296 *14t 24380> 24378>24425 125 127 1 0 0 *579169 24426 106 37 0 1 0 START OF LAST CH. 24427 102 4 1 0 0 24428 106 30 0 1 0 TEST IF OVERLAYING 24429 105 4 0 2 0 CHPT IS AN INITIAL 24430 127 244 33 0 3 0 244 gYES CHPT 24431 106 210 8 0 0 0 210 24432 107 30 0 1 0 24430>24433 106 12 1 2 0 PROG ID & SL NO 24434 102 221 8 1 0 0 221 24435 106 30 0 1 0 24436 102 221 13 0 0 0 221 24437 124 270 2 0 2 0 270 *464 00004 24438 102 42 0 1 0 24439 106 9 0 1 0 SET SI=2 24440 102 7 0 1 0 24441 106 2 1 0 0 STORE (MR1) 24442 102 221 6 1 0 0 221 24443 126 107 8 1 1 0 107 SET (MR1) FOR M/R 24444 124 214 72 0 2 0 214 SET EDIT TABLE FOR O'LAY 24445 102 217 28 0 0 0 217 24446 124 217 28 0 2 0 217 EDIT COMMENT INTO SP CHAP 24447 124 3 0 1 0 24448 128 130 1 2 0 24449 124 3 0 1 0 24450 124 130 0 2 0 24451 123 168 0 2 0 gTYPE 24500 PROCR 245 245 OVERLAY 2 24501 NOTES RADIX B 24024>24502 100 220 3 0 2 0 220 24503 124 221 7 0 1 0 221 *60t TEST PROGRAM UNDER TRIAL 24504 106 11 0 0 0 24505 127 245 11 0 0 0 245 *573 gNO 24506 106 220 3 0 0 0 220 *572 SET BITS 1-3 24507 114 233 26 0 0 0 233 *572 OF PROG ROUTE 24508 124 233 45 0 1 0 233 24509 124 0 1 0 0 *60t gPTS 24510 125 0 1 2 0 *572*601 24505>24511 114 233 26 0 0 0 233 *572 24379>24512 106 209 10 0 0 0 209 SET UP A.S.L'S 24513 124 233 26 0 1 0 233 24514 102 64 0 0 0 24515 106 209 11 0 0 0 209 24516 102 124 0 0 0 24517 126 241 2 0 0 0 241 gS/R A 24518 124 245 23 1 0 0 245 gFILE HAS BEEN OPENED 24519 106 221 8 1 0 0 221 TEST LAST PROG READ 24520 124 225 16 0 1 0 225 *579 WAS THIS PROG 24521 105 224 4 1 0 0 224 24522 127 245 26 0 0 0 245 gYES 24518>24523 126 242 2 0 0 0 242 gS/R B 24524 124 240 2 1 0 0 240 g'LOST' 24525 124 245 44 1 0 0 245 g 24631> 24522>24526 106 221 13 0 0 0 221 TEST THIS CHAP= 24527 124 225 16 0 1 0 225 *579 LAST CHAPT LOADED+1 24528 105 224 6 0 0 0 224 24529 101 1 1 2 0 24530 127 245 41 0 0 0 245 gYES 24531 127 245 44 0 2 0 245 gYES TEST THIS CHAP>LAST 24532 124 225 16 0 1 0 225 *579 24533 106 224 7 0 0 0 224 24534 118 4123 1 0 0 SET UP PROG'S IDENTIFIER 24535 124 10 0 2 0 24536 118 5 1 0 0 24537 102 221 4 1 0 0 221 24538 124 245 24 0 2 0 245 SET LINK IN S/R B 24539 102 242 2 0 0 0 242 24540 124 242 70 1 0 0 242 gS/R B 24530>24541 100 210 8 0 2 0 210 24542 124 40 0 2 0 24543 126 237 2 0 0 0 237 gSTEP BACK 24548> 24551> 24554> 24632> 24531> 24525>24544 126 236 2 0 0 0 236 gS/R BB 24545 124 124 0 1 0 TEST CHAPTER 24546 106 12 1 0 0 HEADING BLOCK 24547 105 214 68 1 0 0 214 24548 127 245 44 0 1 0 245 gNO 24549 106 228 4 1 0 0 228 TEST CORRECT PROG 24550 105 221 8 1 0 0 221 IDENTITY AND 24551 127 245 44 0 1 0 245 gNO SERIAL NO 24552 106 228 2 0 0 0 228 TEST IF REQUIRED 24553 105 221 13 0 0 0 221 CHAPTER 24554 127 245 44 0 1 0 245 gNO 24555 106 108 12 0 0 0 108 SET M/R SWITCH 24556 102 106 13 0 0 0 106 NON-INT 24557 106 218 2 1 0 0 218 STORE GP 3 REGS 24558 128 222 12 0 0 0 222 24559 124 212 2 1 1 0 212 RESET MOD GP 0 24560 126 221 6 1 2 0 221 SET (MR2) FOR PROG 24561 106 32 0 2 0 OVERLAYED CH NO 24562 104 32 0 2 0 SET MR2 FOR START OF 24563 104 37 0 2 0 START OF LAST CH CH TO BE OVERLAYED 24564 102 28 1 0 0 24565 124 210 3 1 1 0 210 SET MOD GP3 24566 124 3 0 2 0 *14t SET OPT A SWITCH AT 3 24567 102 296 6 0 0 0 296 *14t 24568 106 18 0 2 0 START OF CH 24569 103 28 1 0 0 SET (MR2)=START CH 24570 126 247 2 0 0 0 247 gLOAD S/R 24600 PROCR 246 246 OVERLAY (3) 24601 NOTES RADIX B 24602 106 221 13 0 0 0 221 STORE NO OF CHAP LOADED 24603 124 225 16 0 1 0 225 *579 24604 102 224 6 0 0 0 224 24605 124 221 7 0 1 0 221 *60t TESTPROG 24606 106 11 0 0 0 UNDER TRIAL 24607 127 246 10 0 0 0 246 gNO 24608 124 233 45 0 1 0 233 24609 124 7 1 0 0 *60t gPTS 24607>24610 124 212 2 1 1 0 212 0 SET MOD GROUP 0 24611 126 221 6 1 2 0 221 SET (MR2) FOR PROG 24612 106 35 0 2 0 24613 102 7 0 2 0 SET SI=4 24353>24614 106 218 6 1 0 0 218 RESTORE GROUP 3 REGISTERS 24615 128 26 0 0 0 46815>24616 126 107 8 1 1 0 107 SET (MR1) FOR M/R (NEEDED FOR PTS) 24617 106 106 16 0 0 0 106 SET M/R SWITCH AT 2 24618 102 106 14 0 0 0 106 24619 100 220 3 0 2 0 220 *60t BITS 1-3 24620 106 220 3 0 0 0 220 7 24621 114 233 26 0 0 0 233 *60t RESET ROUTE IN CASE OF PTS 24622 126 480 2 0 0 0 480 24623 124 103 7 1 0 0 103 gHEAD OF QUEUE 24624 102 221 2 0 0 0 221 *60t RETURN FROM PTS(START) 24625 106 209 10 0 0 0 209 24626 124 233 26 0 1 0 233 24627 102 64 0 0 0 24628 106 209 11 0 0 0 209 24629 102 124 0 0 0 24630 106 221 2 0 0 0 221 24631 127 245 26 0 0 0 245 gALIGNED AT END OF CHAP 24632 124 245 44 1 0 0 245 gALIGNED AT START OF PROG 24700 PROCR 247 247 LOAD SUB-ROUTINE 24701 NOTES RADIX B LOAD NEXT CHAPTER 24702 100 0 0 0 0 LINK 24703 102 221 5 0 0 0 221 STORE START OF PARAMETER TABLE 24704 101 16 0 1 0 *60t TEST PTS 24705 115 247 2 0 0 0 247 LOADED 24706 127 247 9 0 0 0 247 gNO 24707 106 4 0 0 0 24708 124 247 10 1 0 0 247 *60t g 24706>24709 106 28 0 0 0 SET IND MOD REG 1 AT 24708>24710 102 221 16 1 0 0 221 START OF CHAPTER 24741>24711 126 236 2 0 0 0 236 gS/R BB 24712 106 212 2 1 0 0 212 SET IND MOD REG 2 AT 24713 102 221 18 1 0 0 221 24:0 24740>24714 124 221 18 0 1 0 221 STORE NEXT WORD 24715 106 228 2 1 0 0 228 24716 103 221 2 1 0 0 221 24717 105 210 6 0 0 0 210 TEST FOR END OF 24718 127 247 42 0 0 0 247 gYES CHAPTER 24719 104 210 7 0 0 0 210 TEST FOR MINUS ZERO 24720 127 248 2 0 0 0 248 gYES 24721 125 0 1 2 0 TEST FOR PARAMETER 24722 101 4 0 1 0 IN Q3 24723 115 221 2 0 0 0 221 24724 127 248 6 0 1 0 248 gYES 24725 106 221 5 0 0 0 221 FORM ABSOLUTE LOCATION OF PARAMETER 24726 107 221 2 0 0 0 221 24727 106 221 3 0 0 0 221 TEST INFORMATION 24728 127 247 32 0 3 0 247 gYES IS NEGATIVE 24729 124 221 2 0 1 0 221 ADD PARAMETER VALUE 24730 104 0 0 0 0 24731 124 247 34 1 0 0 247 24728>24732 124 221 2 0 1 0 221 SUBTRACT PARAMETER VALUE 24733 105 0 0 0 0 24731>24734 124 221 16 0 1 0 221 STORE IN CHAPTER 24735 102 0 0 0 0 24805> 24818>24736 123 1 0 0 0 24737 100 221 16 0 0 0 221 24821>24738 123 2 0 0 0 24739 100 221 18 0 0 0 221 24740 124 247 14 1 0 0 247 gDEAL WITH NEXT LOCATION 24741 124 247 11 1 0 0 247 gREAD AND UNPACK NEXT BLOCK 24718>24742 126 247 2 0 1 0 247 gLEAVE S/R 24800 PROCR 248 248 LOAD SUB-ROUTINE CONT 24801 NOTES RADIX B 24720>24802 106 218 4 1 0 0 218 STACK MINUS ZERO 24803 124 221 16 0 1 0 221 24804 128 0 1 0 0 24805 124 247 36 1 0 0 247 g 24724>24806 101 3840 1 2 0 TEST FOR 15 IN Q3 24807 127 248 19 0 0 0 248 gYES 24808 106 221 3 0 0 0 221 STORE WORD IN CHAPTER 24809 124 221 16 0 1 0 221 24810 102 0 0 0 0 24811 100 212 6 0 2 0 212 FORM AND PACK 24812 110 221 2 0 0 0 221 ENTRY POINT 24813 118 4126 0 0 0 TO 3B M/R 24814 101 158 1 1 0 24815 100 210 2 0 2 0 210 24816 124 221 16 0 1 0 221 24817 114 0 0 0 0 24818 124 247 36 1 0 0 247 g 24807>24819 106 221 3 0 0 0 221 STEP ON STACKING LOCATION COUNTER 24820 107 221 16 0 0 0 221 24821 124 247 38 1 0 0 247 g 24822 100 0 0 0 0 *££0*££2*14e*42e*46e*5+e 24823 127 264 27 0 1 0 264 *163 gNO 24824 100 285 45 0 0 0 285 *0138te (12)RE-READ 24900 PROCR 249 249 SET INDIRECT MR AND SEARCH MULTI-ROUTE LOADING,LIST 24902 100 0 0 0 0 *57t 24903 102 108 27 0 0 0 108 STORE A 24904 101 36 1 3 0 SET INDIRECT MR=36:0 24905 102 225 17 0 0 0 225 24906 102 225 16 0 0 0 225 24913>24907 106 108 27 0 0 0 108 SELECT A 24908 124 225 16 0 1 0 225 SEARCH LIST 24909 105 224 2 0 0 0 224 24910 127 249 16 0 0 0 249 gAVAIL 24911 123 6 0 0 0 STEP MOD BY 6 24912 100 225 16 0 0 0 225 24913 124 249 7 1 0 0 249 gDO NEXT SEARCH 24914 124 249 2 0 1 0 249 gLEAVE S/R+1 END OF MOD 24915 124 1 1 0 0 24910>24916 126 249 2 0 1 0 249 *57t gLEAVE SR 25000 PROCR 250 250 STORE MOD GROUP 3 S/R 25002 100 0 0 0 0 *59t STORE MOD 25003 100 212 2 0 3 0 212 SET BINARY 25004 106 3 0 1 0 GROUP 3 25005 127 250 9 0 2 0 250 gNOT 28/1/1 25006 102 250 8 0 0 0 250 25007 106 212 20 1 0 0 212 25008 128 129 8 1 1 0 129 FORMED BULK COPY ORDER 25005>25009 126 250 2 0 1 0 250 gLEAVE S/R 25100 PROCR 251 251 USE OF ASSEMBLER TABLE 25200 CONST 252 252 1 USE OF ASSEMBLER TABLE 25202 (D)£££££ ; CH0 LAST RT NO & TYPE 25204 0; CH0 DB INDICATORS 25206 0; CH3 RT 0 1ST WD 25208 0; CH3 RT 0 2ND WD 25210 £££££ ; CH1 LAST RT NO & TYPE 25212 0; CH1 DB INDICATORS 25214 0; CH3 RT 1 1ST WD 25216 0; CH3 RT 1 2ND WD 25218 £££££ ; CH2 LAST RT NO & TYPE 25220 0; CH2 DB INDICATORS 25222 0; CH3 RT 2 1ST WD 25224 0; CH3 RT 2 2ND WD 25226 £££££ ; CH3 LAST RT NO & TYPE 25228 0; CH3 DB INDICATORS 25230 0; CH3 RT 3 1ST WD 25232 0; CH3 RT 3 2ND WD 25234 £££££ ; CH4 LAST RT NO & TYPE 25236 0; CH4 DB INDICATORS 25238 0; CH3 RT 4 1ST WD 25240 0; CH3 RT 4 2ND WD 25242 £££££ ; CH5 LAST RT NO & TYPE 25244 0; CH5 DB INDICATORS 25246 0; CH3 RT 5 1ST WD 25248 0; CH3 RT 5 2ND WD 25250 £££££ ; CH6 LAST RT NO & TYPE 25252 0; CH6 DB INDICATORS 25254 0; CH3 RT 6 1ST WD 25256 0; CH3 RT 6 2ND WD 25258 £££££ ; CH7 LAST RT NO & TYPE 25260 0; CH7 DB INDICATORS 25262 0; CH3 RT 7 1ST WD 25264 0; CH3 RT 7 2ND WD 25266 0; *02t3:t4£t*53t0tt3:t4£t 25268 0; RT 19/18 PROG NO 25270 0; RT 17/16 FILE ID 25272 0; *53t0tt3:t4£t 25274 0; RT 25/24 PROG NO 25276 0; RT 27/26 PROG NO 25278 0; RT 25/24 FILE ID 25280 0; RT 27/26 FILE ID 25282 0; *53t0tt3:t4£t 25284 0; RT 19/18 REEL NO 25286 0; PADDING 25288 0; *53t0tt3:t4£t 25290 0; RT 25/24 REEL NO 25292 0; RT 27/26 REEL NO 25300 CONST 253 253 1 P/T I/P(CH2)W/L'S 25302 (D)0; *53t0tt3:t4£t 25304 0; 2ND WORD 25306 0; RT 1 25308 0; 25310 0; RT 2 25312 0; 25314 0; RT 3 25316 0; 25400 CONST 254 254 1 40-COL CARD READER W/L'S 25402 (A); *16t0tt3:t4£t 25404 ; RT 4 2ND WORD 25406 ; RT5 1ST WORD 25408 ; RT5 2ND WORD 25410 ; RT6 1ST WORD 25412 ; RT6 2ND WORD 25414 ; RT7 1ST WORD 25416 ; RT7 2ND WORD 25500 CONST 255 255 1 P/TI/P(CH2)W/L'S 25600 CONST 256 256 1 PADDING 25602 (D)0; *3:t4£t 25604 0; 25700 CONST 257 257 1 CHANNEL 16 ETC 25702 (D)£££££ ; *3:t4£t CH 16 25704 0; CH16 DB INDS 25706 0; 25708 0; 25710 £££££ ; CH17 25712 0; 25714 0; 25716 0; 25718 £££££ ; CH18 25720 0; 25722 0; 25724 0; 25726 £££££ ; CH19 25728 0; 25730 0; 25732 0; 25734 £££££ ; CH20 25736 0; 25738 0; 25740 0; 25742 £££££ ; CH21 25744 0; 25746 0; 25748 0; 25800 CONST 258 258 1 MISC WL'S AND CONSTANTS 25802 (A)*(D)00410000; *:SP:1:SP:SP 25804 (D)0; COL 1 25806 0; COL 2&6 25808 0; COL 3 25810 0; COL 4 25812 0; COL 5 25814 0001+00080; BULK COPY FOR LOG 25816 2001+00000; BULK CLEAR FOR PRINTER W/E 25818 0; (MR2) 25820 8000000000; 25822 0; LIB CARD SERIAL NUMBER, ROUTE BEING REWO 25824 (A)SNT? ; 25826 HDG ; 25828 FINIS; 25830 (D)7t(A)END(D)7e; (END) 25832 0; USED IN ABANDON S/R 25900 CONST 259 259 1 MATRIX FOR LIBRARIAN CARDS 25902 (D)0; *25t*05t 25904 0; 25906 0; 25908 0; 25910 0; 25912 0; 25914 0; 25916 0; 25918 0; 25920 0; 25922 0; 25924 0; 25926 0; 25928 0; 25930 0; 25932 0; 25934 0; 25936 0; 25938 0; 25940 0; 25942 0; 25944 0; 25946 0; 25948 0; 25950 0; 25952 0; 26000 CONST 260 260 1 W/L'S FOR P/T O/P 26002 (D)0; *05t CARD O/P ANNEXE 26004 ; 26006 ; 26008 ; *05t 26010 (D)0001000024; *259*059 LIB CRD 26012 (D)0; '(64+R)' 26014 0; INDIRECT MODIFIER 26016 3£00000000; 26018 7.00000000; 26020 0; REEL NO. FILE IDENTITY 26022 0; W/L 26024 7.7.7.7.7.; 26026 3.00000000; 26100 TABLE 261 261 1 26101 NOTES 26102 258 4 0 0 2 0 3 0 0 0 0 0 0 COMMENT 26104 258 7 0 0 0 0 3 2 0 1 0 0 0 ROUTE NUMBER 26106 102 2 0 0 2 0 1 0 1 0 0 0 0 SP,TAB 26108 258 6 0 0 0 0 5 0 0 0 0 0 0 COL 2 26110 211 22 0 0 2 0 2 0 0 0 0 0 1 /////L/E,L/E 26112 258 4 0 0 2 0 3 0 0 0 0 0 0 COMMENT 26114 258 7 0 0 0 0 3 2 0 1 0 0 0 ROUTE NUMBER 26116 102 2 0 0 2 0 1 0 1 0 0 0 0 SP,TAB 26118 258 6 0 0 0 0 5 0 0 0 0 0 0 COL 2 26120 102 2 0 0 2 0 1 0 1 0 0 0 0 SP,TAB 26122 258 8 0 0 0 0 5 0 0 3 0 0 0 COL 3 26124 102 2 0 0 2 0 1 0 1 0 0 0 0 SP,TAB 26126 258 10 0 0 2 0 5 0 0 0 0 0 0 COLUMN 4 26128 211 22 0 0 2 0 2 0 1 0 0 0 1 SP,L/E L/E 26130 258 4 0 0 2 0 3 0 0 0 0 0 0 COMMENT 26132 258 7 0 0 0 0 3 2 0 1 0 0 0 ROUTE NUMBER 26134 102 2 0 0 2 0 1 0 1 0 0 0 0 SP TAB 26136 258 6 0 0 0 0 5 0 0 0 0 0 0 COL 2 26138 102 2 0 0 2 0 1 0 1 0 0 0 0 SP TAB 26140 258 8 0 0 2 0 5 0 0 0 0 0 0 COL 3 26142 102 2 0 0 2 0 1 0 1 0 0 0 0 SP TAB 26144 258 10 0 0 2 0 5 0 0 0 0 0 0 COL 4 26146 102 2 0 0 2 0 1 0 0 0 0 0 0 TAB 26148 258 12 0 0 0 0 5 0 0 5 0 0 0 COL 5 26150 211 22 0 0 2 0 2 0 0 0 0 0 1 L/E,L/E 26152 102 74 0 0 0 0 5 0 0 4 0 0 1 *679 26154 258 12 0 0 0 0 5 0 0 0 0 0 1 *8£9 26200 TABLE 262 262 1 26201 NOTES 26202 258 4 0 0 2 0 3 0 0 0 0 0 0 COMMENT 26204 258 7 0 0 0 0 3 2 0 1 0 0 0 ROUTE NUMBER 26206 102 2 0 0 2 0 1 0 0 0 0 0 0 TAB 26208 258 6 0 0 0 0 5 0 0 0 0 0 0 COL 2 26210 102 2 0 0 2 0 1 0 0 0 0 0 0 TAB 26212 258 8 0 0 0 0 5 0 0 0 0 0 0 COL 3 26214 102 2 0 0 2 0 1 0 1 0 0 0 0 SP,TAB 26216 258 10 0 0 0 0 5 0 0 0 0 0 0 COL 4 26218 102 2 0 0 2 0 1 0 2 0 0 0 0 2 SP,TAB 26220 258 12 0 0 2 0 5 0 0 0 0 0 0 COL 5 26222 211 22 0 0 2 0 2 0 0 0 0 0 1 L/E,L/E 26224 211 22 0 0 2 0 2 0 0 0 0 0 1 *3£t*712 SUM 26226 258 23 0 0 0 0 3 2 2 1 0 0 0 *3£t*712 LIB NO 26228 258 23 0 0 0 0 3 2 2 1 0 0 0 *71t*3£9 LIB NO 26230 211 22 0 0 2 0 2 0 0 0 0 0 1 SUM 26232 260 20 0 0 0 0 5 0 5 0 0 0 0 REEL PROGM 10 26234 258 23 0 0 0 0 3 2 2 1 0 0 0 *71t*3£9 LIB NO 26236 214 24 0 0 2 0 4 1 3 0 0 0 1 /////3SP L/E N/E N/E R/S 26300 PROCR 263 263 W.L'S FOR OPTIONS AND ZZZ COMMENT 26301 NOTES RADIX 26302 101 0 0 3 0 CONSTANT 26303 100 295 2 0 0 0 295 *14e (1)ABANDON 26304 100 410 9 0 0 0 410 (2)ALARM TYPE 3 26305 100 416 2 0 0 0 416 (3) 26306 100 289 8 0 0 0 289 (4) ALARM TYPE 2 26307 100 289 6 0 0 0 289 (5) 26308 100 289 4 0 0 0 289 (6) 26309 100 289 2 0 0 0 289 (7) 26310 100 106 11 0 0 0 106 *42e (8) ALARM TYPE 1 26311 100 280 32 0 0 0 280 *42e (9) 26312 100 290 2 0 0 0 290 *46e (10)REOFFER OPTIONS 26313 100 286 37 0 0 0 286 (11)RE-WRITE 26314 100 285 5 0 0 0 285 *0138te (12)RE-READ 26315 100 291 2 0 0 0 291 *5+e (13)CHANGE DECKS 26316 100 263 25 0 0 0 263 *77t (14)ZZZ08 26317 100 442 34 0 0 0 442 *77t (15)CONTINUE RUN FWD 26437> 26438> 26704> 26714> 26724> 26750> 27254> 44753> 44754> 44755> 44807> 44912> 44914> 10012>26318 126 312 2 0 0 0 312 gZZZ01 30238> 37808>26319 126 312 2 0 0 0 312 g 02 27713> 28403> 28410> 30035> 37308> 40608>26320 126 312 2 0 0 0 312 g 03 42117>26321 126 312 2 0 0 0 312 g 04 44413> 44417> 44605> 44606>26322 126 312 2 0 0 0 312 g 05 44510> 44707>26323 126 312 2 0 0 0 312 g 06 44538> 44720>26324 126 312 2 0 0 0 312 g 07 44214>26325 126 312 2 0 0 0 312 g 08 27010> 45019>26326 126 312 2 0 0 0 312 g 09 43605>26327 126 312 2 0 0 0 312 g10 26328 100 210 3 0 3 0 210 *££0*££2*063 26329 106 157 0 0 0 *063063 26400 PROCR 264 264 SET UP SI 26401 NOTES RADIX B 10016>26402 101 267 2 1 2 0 267 PSEUDOROWTETYPE PROGRAMMED 26403 102 31 0 1 0 TEST ROUTE 26404 124 252 2 0 2 0 252 USE OF ASSR TABLE 26405 102 32 0 1 0 26406 106 209 6 0 0 0 209 *49t 26407 102 9 0 0 0 *49t 26408 106 3 0 1 0 *59t STORING MOD GROUP 3 26409 127 264 31 0 2 0 264 TEST 28/1/1 26410 126 250 2 0 0 0 250 *59t STORE MOD GROUP 3 S/R 26411 124 264 31 1 0 0 264 10003>26412 124 212 2 1 1 0 212 SET MOD GROUP 0 26413 124 2 0 1 0 STORE (AB) IN SI 26414 100 30 1 0 0 26415 106 3 0 1 0 *59t STORING MOD GROUP 3 26416 127 264 20 0 2 0 264 gNOT 28/1/1 26417 102 264 19 0 0 0 264 26418 106 212 20 1 0 0 212 26419 128 129 8 1 1 0 129 *59t 26416>26420 106 100 2 0 0 0 100 SET UP LINK IN SI 26421 102 44 1 1 0 SET ASSOC TIME=0 26422 106 209 6 0 0 0 209 *49t 26/0/1 2 RESTORE (9) 26423 102 9 0 0 0 *49t 26424 106 31 0 1 0 *169199 26425 101 48 1 2 0 *19t TEST SELECT REEL COUNTER 26426 127 449 2 0 0 0 449 *19t gYES 24823>26427 101 1 1 2 0 *16t*19+ 0000000049 26428 124 2 0 1 0 TEST UPTIME POCKET SELECT 26429 127 12 0 0 0 *16t gYES-UPTIME 28808> 35110> 42105> 42742>26430 126 338 2 0 0 0 338 SET SI=1 26411> 26409>26431 124 2 0 1 0 *063 OBEY TEST ROUTE(SET DECIMAL) 26432 124 7 1 0 0 *063063 g51+7 (6/0/0/0/157) 26433 107 46 1 1 0 *09t06t 26434 100 212 2 0 3 0 212 SET (C) FOR BINARY 35211>26435 124 2 0 1 0 26436 124 7 1 0 0 *09t06t 26437 124 263 18 1 0 0 263 *££0*££2*03e*02e*04e*05e*19e*1ee*30e*2.e 26438 124 263 18 1 0 0 263 *49e*16e*56e82e*82e*81e 26439 124 436 11 1 0 0 436 *1te M/T INPUT 26440 124 268 2 1 0 0 268 *££2*1te1te 26500 PROCR 265 265 FORM INTERCHANGE AREA ADDRESSES 26501 NOTES RADIX B 20903> 11826> 11002>26502 119 56 0 1 0 *099069*3+9 RESET MILLISECOND TIMER 20909> 12519> 12319> 12119> 11919> 11719> 11519> 11319> 11119> 10624>26503 103 188 2 1 0 0 188 26504 118 6 0 3 0 FORM INSTRUCTION SWITCH SAS 20000 26600 PROCR 266 266 NB THE PRECEDING ORDER IS'SWITCH SAS'SET AT'26/0/0gDB:DETECT 26601 NOTES DURING'SET DB IND'IF DB FOUND IN'TEST ROUTE'IN PROG SWITCH 42167>26602 104 32 0 1 0 *4£2*3:2 PSEUDO ROUTE 26603 104 263 2 0 0 0 263 *4£2*3:2 1/0/3 ORDER 26604 124 188 3 0 1 0 188 RTE TYPE 1-48*OR*SR LINK-THIS ADDRESS+1 26700 PROCR 267 267 SWITCH SI 26701 NOTES RADIX B 26702>26702 124 267 2 1 0 0 267 26703 124 405 2 1 0 0 405 *03e*3:4*4£4 P/T O/P 3 3 26704 124 263 18 1 0 0 263 ZZZ COMMENT 26705 124 388 2 1 0 0 388 *05e*3:4*4£4 DEC O/P 4 4 26706 124 390 2 1 0 0 390 *3:4*4£4 PRINTER 3 3 26707 124 373 2 1 0 0 373 *02e*3:4*4£4 P/T I/P 3 3 26708 124 375 2 1 0 0 375 *04e CARD I/P 26709 124 420 2 1 0 0 420 *3:4*4£4 M/T I/P 3 3 26710 124 433 2 1 0 0 433 *3:4*4£4 M/T O/P 3 3 26711 124 390 2 1 0 0 390 *3:4*4£4 PRINTER 3 3 26712 124 395 2 1 0 0 395 *30e*4£4*3:4 AUTOLEC3 3 26713 124 401 2 1 0 0 401 *03e P/T O/P OPEN FILE 26714 124 263 18 1 0 0 263 ZZZ COMMENT 26715 124 387 2 1 0 0 387 *05e DEC CARD OUTPUT 26716 124 269 4 1 0 0 269 PRINTER 26717 124 364 2 1 0 0 364 *02e P/T INPUT 26718 124 366 2 1 0 0 366 *04e DEC CARD INPUT 26719 124 409 2 1 0 0 409 MAG TAPE INPUT 26720 124 424 2 1 0 0 424 MAG TAPE OUTPUT 26721 124 269 4 1 0 0 269 PRINTER 26722 124 394 2 1 0 0 394 *30e AUTOLECTOR 26723 124 408 2 1 0 0 408 *03e P/T OUTPUT CLOSE FILE 26724 124 263 18 1 0 0 263 ZZZ COMMENT 26725 124 391 2 1 0 0 391 *05e DEC CARD OUTPUT 26726 124 268 2 1 0 0 268 PRINTER 26727 124 383 2 1 0 0 383 *1te1te*02e P/T INPUT 26728 124 383 2 1 0 0 383 *1te1te*04e DEC CARD INPUT 26729 124 423 2 1 0 0 423 *1te MAG TAPE INPUT 26730 124 436 2 1 0 0 436 MAG TAPE OUTPUT 26731 124 268 2 1 0 0 268 PRINTER 26732 124 268 2 1 0 0 268 *30e AUTOLECTOR 26733 124 424 2 1 0 0 424 MAG TAPE OUTPUT OPEN FILE 26734 124 409 2 1 0 0 409 MAG TAPE INPUT 32 26735 124 437 2 1 0 0 437 CURRENT USE O/P REWIND 26736 124 437 4 1 0 0 437 CURRENT USE I/P 34 26737 124 438 4 1 0 0 438 CURRENT USE O/P RUN BACK 26738 124 438 11 1 0 0 438 CURRENT USE I/P 36 26739 124 438 2 1 0 0 438 CURRENT USE I/P RUN FORWARD 26740 124 438 2 1 0 0 438 CURRENT USE I/P 38 26741 124 444 4 1 0 0 444 O/PgO/P STEP BACK 26742 124 443 2 1 0 0 443 I/PgI/P 40 26743 124 446 4 1 0 0 446 *1ee FUTURE USE O/P STEP FORWARD 26744 124 446 2 1 0 0 446 *1ee FUTURE USE I/P 42 26745 124 444 2 1 0 0 444 O/PgI/P STEP BACK 26746 124 443 4 1 0 0 443 I/PgO/P 44 26747 124 434 2 1 0 0 434 gMAG TAPE OUTPUT CLOSE REEL 26748 124 422 2 1 0 0 422 MAG TAPE INPUT 46 26749 124 448 2 1 0 0 448 SET REEL NUMBER 26750 124 263 18 1 0 0 263 gZZZ01 SELECT 48 26751 124 378 2 1 0 0 378 *16t49t56t82t81t81t*16e UPT POCKET SEL 26752 124 397 2 1 0 0 397 *49t56t81t82t*49e MICR INPUT 26753 124 398 2 1 0 0 398 *49e MICR POCKET SELECT 26754 124 396 2 1 0 0 396 *49e MICR OPEN FILE 26755 124 400 2 1 0 0 400 *56e82e DATA TRANS OPEN FILE 26756 124 399 2 1 0 0 399 *56e82e DATA TRANS READ 26757 124 269 4 1 0 0 269 *81t82t*81e OPEN 5-8 HOLE P/T 26758 124 268 2 1 0 0 268 *81e CLOSE 5-8 HOLE P/T 26759 124 390 2 1 0 0 390 *81e*3:4 OUTPUT 0000000003 26760 124 389 2 1 0 0 389 *82e NHKG OUTPUT 26761 124 269 4 1 0 0 269 *82e NHKG OPEN 26762 124 391 7 1 0 0 391 *82e NHKG CLOSE 26800 PROCR 268 268 UPDATE USE OF ASSEMBLER TABLE ETC. 26801 NOTES RADIX 39108> 40804> 40814> 26758> 26732> 26731> 26726> 26440>26802 124 188 2 0 1 0 188 26803 119 0 1 2 0 SET ROUTE TO MANUAL OR UNLOAD 26804 106 211 2 0 0 0 211 26805 102 188 3 0 0 0 188 SET RT TYPE AT £5 43618>26806 106 188 2 0 0 0 188 26807 126 299 2 0 0 0 299 gCLEAR D/B INDICATOR 37322> 37325> 37520> 39008> 39011> 39507> 39717> 42017> 43319> 43723> 44624>26808 126 349 2 0 0 0 349 gUPDATE ASSEMBLER TABLE 26907> 37517> 37803> 37805> 38322> 39010> 39926> 40516> 40632> 40913> 42155> 42157> 42210> 43714> 43927> 44615> 44632> 45053> 10030>26809 124 2 0 1 0 RESTORE MOD GROUP 26810 124 29 1 1 0 26811 124 2 0 1 0 *59t STORE ABC 26812 100 30 1 0 0 26813 124 2 0 1 0 PREPARE FOR ENTRY 26814 106 26 0 0 0 TO SWITCH 26815 102 268 16 0 0 0 268 26816 100 0 0 0 0 *59t 26817 124 2 0 1 0 26818 124 28 1 0 0 g COMMERCIAL PROG. 26900 PROCR 269 269 UPDATE ASSEMBLER TABLE:SET UP (AB) 26901 NOTES RADIX B 38706> 39404> 39607> 40007>26902 102 188 3 0 0 0 188 STORE RTE TYPE 36426>26903 126 349 2 0 0 0 349 gUPDATE USE OF ASSEMBLER TABLE 40105> 40116> 26761> 26757> 26721> 26716>26904 106 40 0 1 0 SET(A)=RUN NUMBER 26905 118 4127 0 0 0 44815> 44909> 44918>26906 100 212 2 0 2 0 212 SET (B)=0 26907 124 268 9 1 0 0 268 gRESET MOD GP 27000 PROCR 270 270 ROUTE CLOSED ROUTINE 27001 NOTES RADIX B 27002 106 209 4 0 0 0 209 *462 LARGE AND NEGATIVE 27003 102 45 0 1 0 *462 SET PROG TIME TO INHIBIT'RC'COMMENT 27004 126 347 2 0 0 0 347 *469 SET PROG TIME 3 MINS AHEAD OF CLOCK 27005 106 270 17 0 0 0 270 27006 124 3 0 1 0 SET SETTING FOR S101 27007 102 176 0 0 0 TO TEST ROUTE 27008 106 30 0 1 0 *13t TEST RTE 7/7 27009 101 175 1 2 0 *3:+ 00023 27010 127 263 26 0 0 0 263 *13t gYES,ZZZ COMMENT 27011 106 214 28 1 0 0 214 SET RC FOR COMMENT 27012 102 258 4 1 0 0 258 27013 126 356 2 0 0 0 356 gSET UP PROGRAMME NO 27014 101 4 1 3 0 27015 126 345 2 0 0 0 345 gEDIT TIME SET UP RTE NO 27016 124 282 11 1 0 0 282 gOUTPUT COMMENT 27017 126 338 2 0 0 0 338 27100 PROCR 271 271 DOUBTFUL BLOCK: PREPARATION 27101 NOTES RADIX B 27102 100 0 0 0 0 LINK=SI+11 27103 124 271 2 0 1 0 271 SET UP (MR1) 27104 106 25 1 0 0 27105 102 2 1 0 0 27106 100 210 10 0 2 0 210 SET (MR3)=8*CH NO 27107 115 30 0 1 0 27108 126 272 2 0 0 0 272 gSET D/B INDICATOR 27109 124 271 2 0 1 0 271 27110 124 1 1 0 0 gSI+12 27200 PROCR 272 272 SET DOUBTFUL BLOCK INDICATOR 27202 100 0 0 0 0 LINK 27203 102 6 1 0 0 SET (MR3) = 8 * CH NO 27204 100 220 3 0 2 0 220 STORE RTE NO IN W/L 27205 115 252 2 0 3 0 252 27206 102 109 2 0 0 0 109 27207 101 1 0 1 0 27208 106 252 3 0 3 0 252 *16t TEST BEFORE POCKET 27209 101 49 1 2 0 SELECT ON UPTIME 27210 127 272 50 0 0 0 272 *16t gYES SPURIOUS 27211 106 252 3 0 3 0 252 *49t 27212 101 50 1 2 0 TEST MICR READ 27213 127 284 2 0 0 0 284 gYES 27214 101 1 1 2 0 TEST MICR WRITE 27215 127 284 2 0 0 0 284 *49t gYES 27216 106 31 0 1 0 *56t82t 27217 101 54 1 2 0 27218 124 2 0 3 0 27219 127 12 0 0 0 gYES 27220 106 31 0 1 0 27221 101 267 2 1 1 0 267 27222 101 399 24 1 2 0 399 27223 118 6 0 0 0 27224 127 284 2 0 0 0 284 *56t82t 27225 106 252 3 0 3 0 252 *82t D/B LINK 27226 101 58 1 2 0 MANDATORY 27227 127 284 2 0 0 0 284 *82t 27228 106 31 0 1 0 *81t 5-8 HOLE OUTPUT 27229 101 57 1 2 0 27230 127 284 2 0 0 0 284 *81t gYES 27231 106 252 3 0 3 0 252 *83t 27232 101 5 1 2 0 27233 127 272 37 0 1 0 272 gNOT P/T INPUT 27234 106 33 0 1 0 27235 101 1 1 2 0 27236 127 272 50 0 0 0 272 *83t 8-HOLE P/T SPURIOUS 27233>27237 106 252 3 0 3 0 252 27238 105 211 2 0 0 0 211 27239 127 272 52 0 0 0 272 gYES 27240 106 252 3 0 3 0 252 TEST RT TYPE 0 27241 127 272 43 0 1 0 272 gNO 27242 124 11 0 2 0 SET RTE TYPE 11 27241>27243 124 109 2 0 1 0 109 27244 118 0 1 0 0 SET RT TYPE AS D/B INDICATOR 27245 114 252 4 1 3 0 252 27246 106 103 15 0 0 0 103 SET SAS=2 27247 102 265 4 0 0 0 265 27248 106 108 25 0 0 0 108 SET SLAS=2 27249 102 103 14 0 0 0 103 27236> 27210>27250 106 211 2 0 0 0 211 CLEAR ASSEMBLER TABLE 27251 102 252 3 0 3 0 252 27239>27252 126 272 2 0 1 0 272 27253 100 0 0 0 0 *££0*££2 27254 124 263 18 1 0 0 263 *03e*02e*04e*05e*30e*2.e 27255 127 279 34 0 0 0 279 *42e 27256 127 285 61 0 0 0 285 *43e 27257 101 280 8 1 3 0 280 *66e 27258 126 351 2 0 0 0 351 *09e06e TEST RTE NOTING D/B 27259 127 285 45 0 1 0 285 *013 gNO 27260 127 279 34 0 2 0 279 *42t42e gNO 27261 124 282 7 1 0 0 282 *2.286e PRINTER 4 27300 PROCR 273 273 DOUBTFUL BLOCK : DETECTION 27302 100 0 0 0 0 LINK 27303 100 210 10 0 2 0 210 SET (MR3)=8*CH NO 27304 102 109 2 0 0 0 109 27305 115 109 2 0 0 0 109 27306 102 6 1 0 0 27307 100 220 3 0 2 0 220 STORE 'RTE NO WITHIN CH' 27308 115 109 2 0 0 0 109 27309 102 109 2 0 0 0 109 27310 101 1 0 1 0 TEST D/B INDICATOR 27311 124 109 2 0 1 0 109 SET FOR THIS ROUTE 27312 118 0 1 0 0 27313 115 252 4 1 3 0 252 27314 127 276 5 0 0 0 276 gNO 27400 PROCR 274 274 DOUBTFUL BLOCK : INITIATION 27402 118 1 0 0 0 27403 114 252 4 1 3 0 252 CLEAR D/B INDICATOR 27404 118 109 2 1 2 0 109 27405 118 4120 0 0 0 SET SDB AT ROUTE TYPE 27406 103 109 19 0 0 0 109 27407 101 2 1 2 0 TEST T/W 27408 127 274 14 0 0 0 274 gYES 27409 101 9 1 2 0 TEST NOTE DB 27410 127 274 14 0 0 0 274 gYES 27411 106 188 3 0 0 0 188 27412 124 3 0 1 0 27413 102 174 0 0 0 27410> 27408>27414 102 109 2 0 0 0 109 27419>27415 124 109 2 0 1 0 109 TEST ALL 27416 104 252 4 1 0 0 252 ENTRIES ZERO 27417 123 8 0 0 0 27418 100 109 2 0 0 0 109 27419 124 274 15 1 0 0 274 27420 127 274 31 0 1 0 274 gNO 27421 101 128 1 3 0 *3:t 27422 102 212 16 0 0 0 212 27427>27423 124 212 16 0 1 0 212 27424 104 252 4 1 0 0 252 27425 123 8 0 0 0 27426 100 212 16 0 0 0 212 27427 124 274 23 1 0 0 274 27428 127 274 31 0 1 0 274 *3:t 27429 106 108 24 0 0 0 108 18/0/36 RESET SWITCH SAS 27430 102 265 4 0 0 0 265 27428> 27420>27431 124 109 19 0 1 0 109 27500 PROCR 275 275 DOUBTFUL BLOCK SWITCH 27502>27502 124 275 2 1 0 0 275 SWITCH SDB 27503 124 277 2 1 0 0 277 *03e P/T O/P 27504 124 187 2 1 0 0 187 TYPEWRITER 2 27505 124 282 7 1 0 0 282 *05e CARD OUTPUT 3 27506 124 282 2 1 0 0 282 *2.286e PRINTER 4 27507 124 279 4 1 0 0 279 *429*02e P/T INPUT 5 27508 124 279 9 1 0 0 279 *421*02e P/T INPUT 5 27509 124 279 7 1 0 0 279 *421*04e 27510 124 279 2 1 0 0 279 *429*04e CARD INPUT 6 27511 124 285 2 1 0 0 285 M/T INPUT 7 27512 124 286 2 1 0 0 286 M/T OUTPUT 8 27513 124 282 7 1 0 0 282 SPECIAL PRINTER 9 27514 124 284 2 1 0 0 284 *30e AUTOLECTOR 10 27600 PROCR 276 276 NOTE D/B 27602 106 210 3 0 0 0 210 11 27603 124 3 0 1 0 SET D/B IND IN SP CH 27604 102 160 0 0 0 27314>27605 106 188 2 1 0 0 188 27606 118 6 0 3 0 27607 126 273 2 0 1 0 273 g 27700 PROCR 277 277 PAPER TAPE OUTPUT DOUBTFUL BLOCK 27503>27702 106 31 0 1 0 *03t 27703 101 267 2 1 1 0 267 TEST D/B GENUINE 27704 101 404 10 1 2 0 404 27705 105 209 12 0 0 0 209 27706 127 288 2 0 1 0 288 gNO 27707 126 339 2 0 0 0 339 SET (MR3)=(3) 27708 106 188 0 3 0 *28t TEST NON STD 27709 127 277 22 0 0 0 277 gNO 27710 106 194 0 3 0 RESET(64+R) 27711 102 192 0 3 0 27712 106 33 0 1 0 TEST LINK 27713 127 263 20 0 0 0 263 gNO ZZZ COMMENT 27714 101 15 0 1 0 RETURN TO PROGRAMME 27715 114 44 0 1 0 BY LINK 27716 106 214 42 1 0 0 214 SET UP DB FOR COMMENT 27717 102 258 4 1 0 0 258 27718 126 361 2 0 0 0 361 gSET UP PART OF COMMENT 27719 106 291 4 0 0 0 291 SET SETTING OF 27720 102 176 0 3 0 S101 TO TEST ROUTE 27721 124 282 11 1 0 0 282 gOUTPUT COMMENT 27709>27722 101 0 1 3 0 *28t 27723 100 210 10 0 2 0 210 *73t*74t 27724 115 188 2 0 0 0 188 TEST CHANNEL 6 27725 101 48 1 2 0 27726 127 277 47 0 0 0 277 *73t*74t gYES P/T O/P ASS 27733> 27739>27727 124 3 0 3 0 *73t GP ASSEMBLER 27728 124 190 0 2 0 27729 124 188 2 0 3 0 188 27730 102 64 0 0 0 27731 106 260 26 1 0 0 260 27732 126 278 2 0 0 0 278 gOUTPUT S/R 27733 127 277 27 0 1 0 277 gD/B OCCURED 27734 101 10 1 3 0 SET COUNTER FOR 27742>27735 102 192 0 3 0 NUMBER OF DB MARKS 27736 101 31 1 3 0 27737 118 8 0 0 0 27738 126 278 2 0 0 0 278 gOUTPUT S/R 27739 127 277 27 0 1 0 277 gD/B OCCURED 27740 106 192 0 3 0 27741 101 2 1 2 0 27742 127 277 35 0 1 0 277 gNEXT D/B INDICATOR 27745>27743 106 260 26 1 0 0 260 27744 126 278 2 0 0 0 278 gOUTPUT S/R 27745 127 277 43 0 1 0 277 *73t gD/B OCCURRED 27746 124 277 59 1 0 0 277 *739*749 27750> 27754> 27726>27747 106 260 18 1 0 0 260 *74t P/T ASSEMBLER 27748 102 154 1 0 0 SET UP WORD 27749 126 278 2 0 0 0 278 gOUTPUT S/R 27750 127 277 47 0 1 0 277 gD/B OCCURED 27751 106 211 16 1 0 0 211 SET FAULTY BLOCK MARKER 27752 102 154 1 0 0 SET UP WORD 27753 126 278 2 0 0 0 278 gOUTPUT S/R 27754 127 277 47 0 1 0 277 gD/B OCCURED 27758>27755 106 260 18 1 0 0 260 B/E 27756 102 154 1 0 0 SET UP WORD 27757 126 278 2 0 0 0 278 gOUTPUT S/R 27758 127 277 55 0 1 0 277 *74t gD/B OCCURRED 27746>27759 106 214 42 1 0 0 214 SET DB FOR COMMENT 27760 102 258 4 1 0 0 258 27761 124 277 63 0 2 0 277 27762 124 282 10 1 0 0 282 gOUTPUT COMMENT 27763 126 339 2 0 0 0 339 gSET(MR3)=(3) 27764 106 194 0 3 0 RESET(64+R) 27765 102 192 0 3 0 27766 106 174 0 3 0 RESTORE RTE TYPE 27767 102 31 0 1 0 27768 102 174 0 3 0 CLEAR W/L 27769 124 403 6 1 0 0 403 gO/P BLOCK S/R 27800 PROCR 278 278 PAPER TAPE OUTPUT DOUBTFUL BLOCK OUTPUT S/R 27802 100 0 0 0 0 *03t LINK 27803 102 190 1 3 0 *739 STORE WORD 27804 124 188 2 0 1 0 188 OUTPUT 27805 119 0 0 0 0 27806 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 27807 126 339 2 0 0 0 339 SET(MR3)=(3) 27808 106 160 0 3 0 TEST D/B OCCURED 27809 126 278 2 0 1 0 278 g 27900 PROCR 279 279 D/B, P/T & CARD INPUT 27901 NOTES RADIX B OFFER OPTIONS 27510>27902 101 280 6 1 3 0 280 *42t*66e 27903 124 279 5 1 0 0 279 g 27507>27904 101 280 2 1 3 0 280 27903>27905 124 3 0 1 0 27906 102 158 0 0 0 *42t 27509>27907 101 6 1 3 0 *422*04t 27908 124 279 10 1 0 0 279 *04t 27508>27909 101 5 1 3 0 *029 27908>27910 102 280 44 0 0 0 280 *422 27911 124 3 0 1 0 PROG SP CHAP START 27912 106 174 0 0 0 27913 101 7 1 2 0 READING? 27914 127 279 26 0 2 0 279 *42t42e gNO 27915 106 33 0 1 0 TEST IF LINK SPECIFIED IN Q6-10 B 27916 127 279 26 0 0 0 279 *42e gNO 28206> 28570>27917 101 15 0 1 0 27918 114 44 0 1 0 27919 106 214 42 1 0 0 214 SET 'DB' FOR COMMENT 27920 102 258 4 1 0 0 258 27921 126 361 2 0 0 0 361 gSET UP PART OF COMMENT 27922 106 270 17 0 0 0 270 SET SETTING OF S101 27923 124 3 0 1 0 TO TEST ROUTE 27924 102 176 0 0 0 27925 124 282 11 1 0 0 282 gOUTPUT COMMENT 27916> 27914>27926 106 258 2 1 0 0 258 *42t SET UP ALARM 1 27927 102 258 4 1 0 0 258 27928 126 362 2 0 0 0 362 gSET RTE TO MANUAL ETC 27929 126 345 2 0 0 0 345 gEDIT TIME 27930 124 897 0 2 0 *14+46+*14+*46+ 003840089600385 27931 102 41 0 1 0 PERMISSIBLE OPTIONS 27932 101 261 2 1 3 0 261 SELECT TABLE START LOCN. 27933 124 335 2 1 0 0 335 *42t 27260> 27255>27934 101 280 2 1 3 0 280 *422 27935 124 282 10 1 0 0 282 28000 PROCR 280 280 *42 OPTIONS 8 & 9 28001 NOTES RADIX B 28002 126 329 2 0 0 0 329 g READ 28003 126 352 2 0 0 0 352 *42t*09e06e TEST RTE NOTING D/B 28004 125 0 1 2 0 *66t 28005 124 280 7 1 0 0 280 28006 106 210 15 0 0 0 210 28005>28007 102 210 16 0 0 0 210 *66t 28008 126 341 2 0 0 0 341 28009 102 2 1 3 0 CLEAR SECOND WORD OF ANNEXE 28010 126 329 2 0 0 0 329 gREAD 28011 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 28012 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 28013 126 344 2 0 0 0 344 gS/R WW 28014 124 210 16 0 1 0 210 *669 28015 106 0 1 3 0 TEST ALIGNMENT CORRE 28016 124 109 2 0 1 0 109 28017 105 252 6 1 0 0 252 28018 127 281 2 0 1 0 281 gNO 28019 124 210 16 0 1 0 210 *669 28020 106 2 1 3 0 28021 124 109 2 0 1 0 109 28022 105 252 8 1 0 0 252 28023 127 281 2 0 1 0 281 gNO 28024 106 188 2 0 0 0 188 *16t 28025 105 100 33 0 0 0 100 TEST UPTIME*UPTIME ROUTE SMALL 28026 127 280 32 0 2 0 280 gNO 28027 126 378 12 0 0 0 378 28028 124 280 32 1 0 0 280 gACCEPTED 28029 106 32 0 1 0 MEANT TO REJECT? 28030 127 281 2 0 1 0 281 gRE OFFER OPTIONS gNO 28031 126 378 6 0 0 0 378 *16t 44 OF SWITCH 28028> 28026>28032 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 28033 102 2 1 3 0 CLEAR SECOND WORD OF ANNEXE 28034 126 329 2 0 0 0 329 gREAD 28035 124 3 0 1 0 28036 106 158 0 0 0 TEST IF P/T 28037 101 280 2 1 2 0 280 28038 127 280 40 0 0 0 280 28039 106 210 8 0 0 0 210 SET UP ROUTE TYPE 28038>28040 101 5 1 1 0 28041 124 287 52 1 0 0 287 *42t 28042 106 280 44 0 0 0 280 *422 28043 124 287 52 1 0 0 287 28044 100 0 0 0 0 *422 28100 PROCR 281 281 ALIGNMENT INCORRECT FOR OPTION 8 28101 NOTES RADIX B 28030> 28023> 28018>28102 126 339 2 0 0 0 339 *42t 28103 126 344 2 0 0 0 344 gS/R WW 28104 124 109 2 0 1 0 109 SET FIRST TWO WORDS FOR COMMENT 28105 106 252 6 1 0 0 252 28106 102 258 8 1 0 0 258 28107 124 109 2 0 1 0 109 28108 106 252 8 1 0 0 252 28109 102 258 10 1 0 0 258 28110 106 214 42 1 0 0 214 SETDB/ FOR COMMENT 28111 102 258 4 1 0 0 258 28112 106 158 0 3 0 SELECT RETURN LINK 28113 126 362 2 0 0 0 362 g SET RTE TO MANUAL 28114 124 370 8 1 0 0 370 gOUTPUT COMMENT 28200 PROCR 282 282 DOUBTFUL BLOCK:PRINTER 28201 NOTES RADIX B 27506>28202 106 33 0 1 0 *2.286t TEST IF LINK SPECIFIED 28203 105 30 0 1 0 *54t44t 28204 127 282 7 0 0 0 282 28205 106 33 0 1 0 *54t44t 28206 127 279 17 0 1 0 279 *2.286t gYES 28204> 27513> 27505> 27261>28207 106 214 42 1 0 0 214 SET DB/ FOR COMMENT 28208 102 258 4 1 0 0 258 28209 101 283 2 1 3 0 283 32010> 37408> 40620> 27935> 27762>28210 126 362 2 0 0 0 362 gSET RTE TO MANUAL ETC 37103> 38311> 38316> 38320> 45051> 27925> 27721> 27016>28211 124 261 2 0 2 0 261 SELECT TABLE START 28212 124 336 2 1 0 0 336 gOUTPUT COMMENT 28300 PROCR 283 283 PRINTER:ROUTINE AFTER D/B 28301 NOTES RADIX B 28302 126 330 2 0 0 0 330 gWRITE 28303 101 4 1 3 0 *2.486+ 00009 28304 124 287 52 1 0 0 287 gEND ROUTINE 28400 PROCR 284 284 DOUBTFUL BLOCK-AUTOLECTOR & CHEQUE SORTER 39918> 27514> 27230> 27227> 27224> 27215> 27213>28402 106 33 0 1 0 *30t49t56t81t82t82t 28403 127 263 20 0 0 0 263 gNO ZZZ COMMENT 30037>28404 101 15 0 1 0 RETURN TO PROGRAM 28405 114 44 0 1 0 BY LINK 28406 106 35 0 1 0 SET SI=4 28407 102 7 0 1 0 28408 106 33 0 1 0 ENSURE LINK NOT 28409 105 39 0 1 0 BOGUS 28410 127 263 20 0 0 0 263 gOPEN FILE,ZZZ COMMENT 28411 124 397 15 1 0 0 397 gRETURN TO PROGM 28500 PROCR 285 285 DOUBTFUL BLOCK:M/T INPUT 28501 NOTES RADIX B 42132> 27511>28502 126 314 2 0 0 0 314 TEST A1=BLOCK COUNTER 28503 127 288 2 0 1 0 288 gNO TO END ROUTINE 28504 124 285 45 1 0 0 285 *019 STEP BACK 50/8 BLOCK 28515> 28548>28505 106 212 6 0 0 0 212 28506 126 306 2 0 0 0 306 g 28559> 29350>28507 126 342 2 0 0 0 342 *019 28577>28508 126 329 2 0 0 0 329 gREAD 28509 126 343 2 0 0 0 343 *019 28510 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 28511 124 3 0 1 0 TEST D/B IND SET 28512 106 160 0 0 0 28513 127 285 29 0 0 0 285 *43e 28514 126 358 2 0 0 0 358 gSTEP CTR OF TRIES=C 28515 127 285 5 0 1 0 285 *013 gNO 28516 124 3 0 1 0 TEST RTE TYPE 7 28517 106 174 0 0 0 28518 101 7 1 2 0 28519 127 285 23 0 1 0 285 gNO 28520 106 33 0 1 0 TEST LINK TO BE AMEN 28521 127 285 23 0 0 0 285 gNO 28522 127 285 65 0 2 0 285 g YES 28521> 28519>28523 125 0 1 2 0 28524 124 3 0 1 0 28525 102 175 0 0 0 28526 101 6145 1 3 0 *14+5++*14+*5++ 020480614402049 28668>28527 102 41 0 1 0 28528 124 294 2 1 0 0 294 gOFFER OPTIONS 28513>28529 106 214 42 1 0 0 214 *43t SET UP'DB' 28530 102 258 4 1 0 0 258 28531 126 361 2 0 0 0 361 gSET UP PART OF COMMENT 28532 106 109 8 1 0 0 109 SET UP I/P:1 28533 102 258 10 1 0 0 258 28534 101 285 63 1 3 0 285 SET UP LINK FOR SI=5 28729>28535 126 363 2 0 0 0 363 g & SETTING OF S101 28536 124 3 0 1 0 SET UP NO OF ATTEMPTS 28537 106 167 0 0 0 28538 100 210 3 0 3 0 210 *519 28539 107 258 10 1 0 0 258 28540 100 212 2 0 3 0 212 *519 28541 125 0 1 2 0 28542 124 3 0 1 0 CLEAR COUNTER C 28543 102 167 0 0 0 28544 124 432 11 1 0 0 432 *43t 28504> 27259>28545 124 188 2 0 1 0 188 *01t TEST<52/10 BLOCKS 28546 106 190 2 0 0 0 190 28547 101 82 1 2 0 *8t4 00010 28548 127 285 5 0 3 0 285 gYES 28549 101 50 1 3 0 *8t4 00008 28550 126 306 2 0 0 0 306 gSTEP BACK 50 BLOCKS,FORWARD 1 28551 126 339 2 0 0 0 339 gSET(MR3)=(3) 28552 101 48 1 3 0 *8t4 COUNTER 00006 28560>28553 102 177 0 3 0 28554 126 355 2 0 0 0 355 STEP FORWARD 28555 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 28556 126 339 2 0 0 0 339 gSET(MR3)=(3) 28557 106 177 0 3 0 STEP COUNTER BY 28558 105 210 8 0 0 0 210 MINUS ONE AND 28559 127 285 7 0 0 0 285 gYES TEST END 28560 124 285 53 1 0 0 285 *01t 27256>28561 124 3 0 1 0 *432 CLEAR COUNTER 28562 102 167 0 0 0 *432 28563 101 7 1 3 0 28564 124 287 52 1 0 0 287 28522>28565 101 7 1 3 0 28566 102 31 0 1 0 RESET RTE TYPE 7 IN SI+31 28567 124 3 0 1 0 28568 102 167 0 0 0 CLEAR ATTEMPTS COUNTER 28569 106 33 0 1 0 28570 124 279 17 1 0 0 279 g AMEND LINK 28571 127 287 33 0 0 0 287 *££0*££2*43e 28572 127 286 48 0 0 0 286 *01e01e 28573 127 293 36 0 0 0 293 *01t01e 28574 127 287 30 0 1 0 287 *51e gOMIT 28575 126 351 2 0 0 0 351 *09e06e TEST RTE NOTING D/B 28576 127 425 25 0 0 0 425 *43e43e*51e51e gBLOCK 7 28577 124 285 8 1 0 0 285 *01901e 28600 PROCR 286 286 DOUBTFUL BLOCK:M/T OUTPUT 28601 NOTES RADIX B 27512>28602 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 28603 124 188 2 0 1 0 188 TEST BLOCK 7 28604 106 190 2 0 0 0 190 28605 101 7 1 2 0 28606 127 286 11 0 1 0 286 gNO 28607 106 6 0 0 0 TEST FINISHED 28608 118 4124 0 0 0 OPENING FILE 28609 101 14 1 2 0 28610 127 288 2 0 1 0 288 gYES IGNORE O/B 28606>28611 106 0 1 3 0 STORE A1 28612 124 3 0 1 0 28613 102 178 1 0 0 28614 126 331 2 0 0 0 331 28615 101 3 1 3 0 STEP BACK 3 BLOCKS 28623>28616 126 306 2 0 0 0 306 gFORWARD 1 28617 126 355 2 0 0 0 355 gSTEP FORWARD 28618 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 28619 124 3 0 1 0 TEST D/B OCCURRED 28620 106 160 0 0 0 28621 127 286 24 0 0 0 286 gNO 28622 101 2 1 3 0 28623 124 286 16 1 0 0 286 gTRY AGAIN 28676> 28681> 28694> 28621>28624 126 314 2 0 0 0 314 gTEST A1=BLOCK CTR 28625 127 286 69 0 1 0 286 gNO 28626 126 339 2 0 0 0 339 gSET(MR3)=3 28627 102 171 0 3 0 CLEAR OPTION INDICATOR 28628 102 186 0 3 0 28689>28629 126 321 2 0 0 0 321 g 28630 126 341 2 0 0 0 341 gSET MR3=(64+R) 28631 106 211 16 1 0 0 211 SET A1=FAULTY BLOCK WORD 28632 102 0 1 3 0 28633 124 3 0 3 0 PACK 28634 106 178 1 0 0 28635 101 15 0 1 0 28636 114 0 1 3 0 28663>28637 126 341 2 0 0 0 341 gSET (MR3) = (64+R) 28638 124 3 0 1 0 28639 106 179 1 0 0 28640 105 220 3 0 0 0 220 28641 127 286 48 0 0 0 286 gBLOCK 7 28642 106 2 1 3 0 TEST A2=R/M'S 28643 105 211 8 1 0 0 211 28644 127 286 47 0 0 0 286 *01e01e 28645 124 1 0 2 0 AUGMENT 2ND WORD 28646 107 3 1 3 0 28644>28647 126 342 2 0 0 0 342 *019 gSET ASL FOR HI-D 28641> 28572>28648 126 330 2 0 0 0 330 WRITE 28649 126 343 2 0 0 0 343 *019 28650 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 28651 100 210 3 0 3 0 210 *8£t SET DECIMAL 28652 101 1 1 3 0 AUGMENT 28653 124 188 2 0 1 0 188 DB'S 28654 107 193 2 0 0 0 193 COUNT 28655 100 212 2 0 3 0 212 *8£t SET BINARY 28656 124 3 0 1 0 TEST D/B IND SET 28657 106 160 0 0 0 28658 127 287 2 0 0 0 287 *43e 28659 101 1 1 3 0 *43t*51t STEP DB'S COUNTER 28660 124 188 2 0 3 0 188 28661 107 192 2 0 0 0 192 *43t*51t 28662 126 358 2 0 0 0 358 gSTEP COUNTER C 28663 127 286 37 0 1 0 286 gNO TEST C=6 28664 106 212 6 0 0 0 212 28665 124 3 0 1 0 28666 102 175 0 0 0 28667 101 5121 1 3 0 *14+5++*14+*5++ 010240512001025 28668 124 285 27 1 0 0 285 g 28625>28669 126 315 2 0 0 0 315 gTEST A1 FOR FBM 28670 124 286 82 1 0 0 286 gFMB FOUND 28671 126 339 2 0 0 0 339 gSET(MR3)=3 28672 101 286 24 1 3 0 286 STORE RETURN LOCATION 28673 102 162 0 3 0 28674 126 323 2 0 0 0 323 28675 126 316 2 0 0 0 316 gALIGNMENT FAILURE 28676 124 286 24 1 0 0 286 g 28677 126 318 2 0 0 0 318 gTEST BLOCK 6 28678 124 291 27 1 0 0 291 gOPEN REEL 28679 126 317 2 0 0 0 317 gREREAD 28680 126 319 2 0 0 0 319 gSTEP ATTEMPTS COUNTER 28681 124 286 24 1 0 0 286 g 28670>28682 101 3 0 1 0 28683 126 339 2 0 0 0 339 SET(MR3)=3 28684 115 179 1 3 0 CORRECTLY FOR REWRIT 28685 102 221 2 0 0 0 221 28686 126 341 2 0 0 0 341 (MR3)=(64+R) 28687 115 1 1 3 0 28688 105 221 2 0 0 0 221 28689 127 286 29 0 0 0 286 gYES 28690 101 3 1 3 0 28691 126 306 2 0 0 0 306 gSTEP BACK(3)FORWARD 1 28692 126 355 2 0 0 0 355 gSTEP FORWARD 28693 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 28694 124 286 24 1 0 0 286 g 28700 PROCR 287 287 DB/COMMENT:M/T OUTPUT 28701 NOTES RADIX B 29347> 28658>28702 106 214 42 1 0 0 214 *43t SET UP'DB' 28703 102 258 4 1 0 0 258 28704 126 345 2 0 0 0 345 gEDIT TIME, SET UP ROUTE NUMBER 28705 126 356 2 0 0 0 356 gSET UP PROGRAMME NUMBER 28706 124 3 0 1 0 SET UP BLOCK NUMBER 28707 106 179 1 0 0 28708 102 258 8 0 0 0 258 28709 126 188 2 1 3 0 188 *519 28710 101 1 1 3 0 *5:t OMIT CATEGORY 28711 126 332 2 0 0 0 332 gTEST CATEGORY SET 28712 127 287 16 0 0 0 287 *5:t*51e gEVERY D/B 28713 106 192 2 0 3 0 192 *51t TEST COUNTER 28714 101 11 1 2 0 REACHED 12 28715 127 287 30 0 3 0 287 gNOT 12 28712>28716 100 210 3 0 3 0 210 CONVERT AND 28717 101 213 2 1 3 0 213 28718 112 192 2 0 3 0 192 FOR COMMENT 28719 102 258 11 1 0 0 258 CONVERT TO ALPHA 28720 106 258 10 1 0 0 258 28721 101 64 1 2 0 28722 100 212 2 0 3 0 212 28723 124 3 0 3 0 28724 102 167 0 0 0 28725 102 192 2 0 3 0 192 *51t 28726 106 109 10 1 0 0 109 SET UP O/P:1 28727 102 258 10 1 0 0 258 28728 124 287 30 0 2 0 287 28729 124 285 35 1 0 0 285 g OUTPUT 'DB' 28715> 28574>28730 106 30 1 1 0 SET UP ROUTE NO AND TYPE 28731 102 188 2 1 0 0 188 28732 126 359 2 0 0 0 359 *43t 28571>28733 124 3 0 1 0 *4315195:9 CLEAR COUNTER 28734 102 167 0 0 0 *4315195:9 28735 126 341 2 0 0 0 341 gSET(MR3)=(64+R) 28736 124 3 0 1 0 RESTORE A1 28737 106 178 1 0 0 28738 102 0 1 3 0 28739 106 210 8 0 0 0 210 28740 126 333 2 0 0 0 333 gSTEP BLOCK CNTR BY 1 28741 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 28742 126 188 2 1 2 0 188 *01t 28743 100 210 8 0 2 0 210 SET(B) 28744 124 3 0 1 0 28745 106 179 1 0 0 TEST BLOCK 7 28746 105 220 3 0 0 0 220 28747 127 287 49 0 0 0 287 gYES 28748 126 342 2 0 0 0 342 *01t 28747>28749 126 330 2 0 0 0 330 gWRITE 28750 126 343 2 0 0 0 343 *019 28751 106 212 5 0 0 0 212 SET RTE TYPE 8 28564> 28304> 28043> 28041>28752 103 188 3 0 0 0 188 28753 126 349 2 0 0 0 349 gUPDATE ASSEMELER TABLE 28754 126 359 2 0 0 0 359 gSET SI=4, RESTORE LINK FOR SI=3 28800 PROCR 288 288 DOUBTFUL BLOCK:END ROUTINE 28801 NOTES RADIX B 28610> 28503> 27706>28802 126 339 2 0 0 0 339 gSET (MR3) = (3) 28803 106 174 0 3 0 RESTORE RTE TYPE 28804 127 288 6 0 1 0 288 28805 106 188 3 0 0 0 188 29130> 28804>28806 102 31 0 1 0 28807 102 174 0 3 0 CLEAR W/L 28808 124 264 30 1 0 0 264 g 28900 PROCR 289 289 OPTIONS 4,5,6 & 7 28901 NOTES RADIX B 28902 124 4 0 2 0 SELECT 4 28903 124 289 7 1 0 0 289 g 28904 101 3 1 3 0 SELECT 3 28905 124 289 7 1 0 0 289 g 28906 106 212 6 0 0 0 212 SELECT 2 28905> 28903>28907 126 306 2 0 0 0 306 STEP BACK(A)BLOCKS FORWARD 1 28908 126 339 2 0 0 0 339 gSET (MR3)=(3) 28909 106 171 0 3 0 TEST REALIGNING 28910 101 286 24 1 2 0 286 28911 127 289 26 0 0 0 289 gYES 28912 100 210 8 0 2 0 210 *01t SET(B) 28913 126 188 2 1 2 0 188 SET(MR2)=R 28914 106 190 2 0 2 0 190 TEST BLOCK SIX OR 28915 101 8 1 2 0 SEVEN 28916 127 289 18 0 3 0 289 gYES 28917 126 342 2 0 0 0 342 *01t 28916>28918 126 329 2 0 0 0 329 gREAD 28919 126 343 2 0 0 0 343 *019 28920 106 164 0 3 0 *5+t TEST IF CHD 28921 127 289 27 0 1 0 289 *5+t gYES 28922 101 7 1 3 0 SET RTE TYPE 28928>28923 102 188 3 0 0 0 188 28924 106 171 0 3 0 28925 124 351 5 1 0 0 351 g UPDATE ASSEMBLER TABLE 28911>28926 126 355 2 0 0 0 355 gSTEP FORWARD 28921>28927 125 0 1 2 0 28928 124 289 23 1 0 0 289 gCLEAR ASSEMBLER TABLE 29000 PROCR 290 290 OPTION 10:REOFFER OPTIONS 29001 NOTES RADIX B 20222>29002 125 0 1 2 0 *46t DRAIN 29003 126 346 2 0 0 0 346 gEDIT TIME 29004 124 335 4 1 0 0 335 gOFFER OPTIONS 29100 PROCR 291 291 OPTION 13 29102 124 291 6 0 2 0 291 *5+t 29103 126 362 2 0 0 0 362 gUNLOAD 29104 126 338 2 0 0 0 338 gSET SI=1 29105 124 462 11 1 0 0 462 gSI+1 29106 126 339 2 0 0 0 339 gSET(MR3)=(3) 29107 106 164 0 3 0 29108 127 292 15 0 1 0 292 gYES 29109 106 187 0 3 0 TEST CHANGE DECKS IN MISALIGNMENT 29110 127 291 20 0 0 0 291 gNO 29111 126 322 2 0 0 0 322 TEST ALIGNING FROM O/P 29112 124 291 18 1 0 0 291 gNO 29113 106 212 6 0 0 0 212 29119>29114 102 175 0 3 0 29115 106 183 0 3 0 29116 102 172 0 3 0 29117 124 292 8 1 0 0 292 gCHANGE DECKS 29112>29118 125 0 1 2 0 29119 124 291 14 1 0 0 291 g 29110>29120 126 340 2 0 0 0 340 gSET(MR3)=R 29121 124 3 0 1 0 TEST IF I/P 29122 106 175 0 0 0 29123 127 291 33 0 1 0 291 gNO 29124 106 190 2 0 3 0 190 29125 101 9 1 2 0 TEST D/B IN OPEN 29126 127 292 2 0 2 0 292 *5+t gNO CHANGE DECKFILE 29135> 30834> 28678>29127 126 339 2 0 0 0 339 gSET (MR3)=(3) 29128 101 291 31 1 3 0 291 SET UP PSEUDO RTE TYPE 29129 101 267 2 1 2 0 267 29130 124 288 6 1 0 0 288 gEND ROUTINE 29131 126 339 2 0 0 0 339 gSET(MR3)=(3) 29132 124 307 12 1 0 0 307 g 29123>29133 106 190 2 0 3 0 190 *5+t TEST D/B IN 29134 101 6 1 2 0 OPEN FILE 29135 127 291 27 0 3 0 291 gYES 29200 PROCR 292 292 CHANGE DECKS(1) 29126>29202 126 339 2 0 0 0 339 *5+t SET(MR3)=(3) 29203 106 175 0 3 0 TEST IF I/P 29204 127 292 8 0 0 0 292 gYES 29205 124 188 2 0 1 0 188 STORE BLOCK COUNTER 29206 106 190 2 0 0 0 190 29207 124 292 13 1 0 0 292 g 29204> 29117>29208 124 188 2 0 1 0 188 29209 106 190 2 0 0 0 190 STORE BLOCK COUNTER 29210 100 210 3 0 3 0 210 MINUS ONE SET DECIMAL 29211 105 210 8 0 0 0 210 29212 100 212 2 0 3 0 212 SET BINARY 29207>29213 103 170 0 3 0 29214 102 164 0 3 0 SET INDICATOR FOR OPEN REEL 29108>29215 106 175 0 3 0 TEST IF I/P 29216 127 292 28 0 1 0 292 gNO 29217 106 170 0 3 0 TEST BLOCK NO 29218 101 8 1 2 0 <8 29219 127 292 26 0 2 0 292 gNO 29220 124 188 2 0 1 0 188 29221 119 0 0 3 0 RUN FORWARD 29222 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 29223 126 355 2 0 0 0 355 gSTEP FORWARD 29224 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 29225 124 292 42 1 0 0 292 g 29219>29226 126 410 2 0 0 0 410 gOPEN INPUT REEL 29227 124 292 42 1 0 0 292 g 29216>29228 106 170 0 3 0 29229 101 6 1 2 0 29230 127 292 36 0 1 0 292 gNOT BLOCK 7 29231 124 188 2 0 1 0 188 TEST IF OPENING FILE 29232 106 64 0 0 0 29233 118 4124 0 0 0 29234 101 14 1 2 0 29235 127 425 22 0 0 0 425 *51e51e*43e43e 29230>29236 126 425 2 0 0 0 425 gOPEN OUTPUT REEL 29237 106 170 0 3 0 29238 101 7 1 2 0 29239 127 292 42 0 1 0 292 g NOT BLOCK 8 29240 101 2 1 3 0 29241 126 306 2 0 0 0 306 STEP BACK 2 FORWARD 1 42675> 29239> 29227> 29225>29242 126 339 2 0 0 0 339 gSET(MR3)=(3) 29243 106 170 0 3 0 29244 124 188 2 0 1 0 188 SET UP BLOCK 29245 103 190 2 0 0 0 190 COUNTER 29246 100 210 3 0 3 0 210 DECIMAL STEP FORWARD 29247 101 9 1 2 0 SUB 9 (BLOCK COUNTER)-9 29262>29248 100 212 2 0 3 0 212 BINARY BLOCKS 29249 127 292 63 0 0 0 292 gBLOCK 9 OR END OF STEP FORWARD 29250 127 292 63 0 3 0 292 gBLOCK<9 29251 102 177 0 3 0 STORE COUNTER IN C+177 29257>29252 126 342 2 0 0 0 342 *019 SET ASL FOR HIGH DENSITY 29253 126 355 2 0 0 0 355 STEP FORWARD 29254 126 343 2 0 0 0 343 *019 CLEAR BIT 1 ASL 29255 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 29256 126 315 2 0 0 0 315 TEST A1 FOR FBM'S 29257 124 292 52 1 0 0 292 gYES DON'T COUNT THIS BLOCK 29258 126 339 2 0 0 0 339 SET (MR3)=(3) 29259 106 177 0 3 0 COUNTER 29260 100 210 3 0 3 0 210 DECIMAL 29261 101 1 1 2 0 SUB 1 29262 124 292 48 1 0 0 292 gTEST ZERO 29279> 29282> 29311> 29250> 29249>29263 126 314 2 0 0 0 314 gTEST A1=BLOCK COUNTER 29264 127 293 12 0 0 0 293 gYES 29265 127 293 2 0 3 0 293 TEST A1 29272> 29265>29302 126 339 2 0 0 0 339 *5+t SET(MR3)=(3) 29303 102 185 0 3 0 CLEAR ATTEMPTS CTR 29304 106 170 0 3 0 *01t TEST BLOCK<8 29305 101 8 1 2 0 29306 127 293 8 0 3 0 293 gYES 29307 126 342 2 0 0 0 342 *01t SET(MR2)=R FOR 90K 29306>29308 126 355 2 0 0 0 355 gSTEP FORWARD 29309 126 343 2 0 0 0 343 *019 29356>29310 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 29311 124 292 63 1 0 0 292 g 29271> 29264>29312 126 339 2 0 0 0 339 gSET(MR3)=3 29313 102 171 0 3 0 CLEAR INDICATORS 29314 102 186 0 3 0 29315 106 187 0 3 0 TEST CHANGE DECKS 29316 127 293 39 0 0 0 293 gNO IN ALIGNMENT FAILURE 29317 106 175 0 3 0 TEST IF I/P 29318 127 293 35 0 0 0 293 *01t01e 29319 126 355 2 0 0 0 355 gSTEP FORWARD 29338>29320 106 210 8 0 0 0 210 29321 126 333 2 0 0 0 333 STEP BLOCK COUNTER BY 1 29322 126 339 2 0 0 0 339 gSET(MR3)=(3) 29323 102 173 0 3 0 CLEAR INDICATOR 29324 102 164 0 3 0 TEST IN OPEN FILE 29325 106 175 0 3 0 29326 127 293 32 0 1 0 293 gO/P 29327 106 170 0 3 0 29328 101 8 1 2 0 29329 127 293 32 0 3 0 293 29330 106 181 0 3 0 TEST ALIGNING FROM 29331 127 421 39 0 0 0 421 gNO S FWD OR BACK FOR I/ 29329> 29326>29332 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 29333 124 3 0 1 0 29334 126 172 0 1 0 gLEAVE SR 29318>29335 126 342 2 0 0 0 342 *019 28573>29336 126 329 2 0 0 0 329 gREAD 29337 126 343 2 0 0 0 343 *019 29338 124 293 20 1 0 0 293 g 29316>29339 126 321 2 0 0 0 321 g'SER'COMMENT IF REQUIRED 29340 126 339 2 0 0 0 339 gSET(MR3)=(3) 29341 102 167 0 3 0 CLEAR D/B ATTEMPTS CTR 29342 102 164 0 3 0 29343 106 175 0 3 0 TEST IF I/P 29344 127 293 48 0 0 0 293 gYES 29345 126 341 2 0 0 0 341 gSET(MR3)=(64+R) 29346 102 2 1 3 0 CLEAR SECOND WORD 29347 124 287 2 1 0 0 287 *43e 29344>29348 106 210 8 0 0 0 210 29349 126 333 2 0 0 0 333 gSTEP BLOCK CTR. BY ONE 29350 124 285 7 1 0 0 285 *01901e 29267>29351 124 3 0 1 0 TEST IF INDICATOR 29352 106 186 0 0 0 SET 29353 127 293 2 0 0 0 293 29354 101 2 1 3 0 STEP BACK 2 29355 126 306 2 0 0 0 306 gFORWARD 1 29356 124 293 10 1 0 0 293 *5+t g 29400 PROCR 294 294 OFFER OPTIONS FOR M/T DOUBTFUL BLOCK 28528>29402 126 339 2 0 0 0 339 gSET(MR3)=(3) 29403 106 164 0 3 0 *5+t TEST IF IN CH DECKS 29404 127 320 7 0 1 0 320 *5+t gYES 29405 106 258 2 1 0 0 258 SETUPALARMONE 29406 102 258 4 1 0 0 258 29407 102 187 0 3 0 CLEAR COUNTER C 29408 102 167 0 3 0 29409 126 361 2 0 0 0 361 gSET UP PART OF COMMENT 29410 106 175 0 3 0 TEST IF I/P 29411 127 294 15 0 0 0 294 gYES 29412 124 3 0 1 0 SET UP STORED 29413 106 179 1 0 0 BLOCK NUMBER 29414 102 258 8 0 0 0 258 29411>29415 124 3 0 1 0 SET UP I/P:1 29416 124 175 0 1 0 OR O/P:1 29417 106 109 8 1 0 0 109 29418 102 258 10 1 0 0 258 29419 101 69 1 3 0 SET UP SIX ATTEMPTS 29420 107 258 10 1 0 0 258 29421 101 261 12 1 3 0 261 SELECT TABLE START 29422 124 335 2 1 0 0 335 gOFFER OPTIONS 29500 PROCR 295 295 OPTION 1=ABANDON PROGRAMME 29501 NOTES RADIX B 19937>29502 106 30 0 1 0 *14t SET UP RTE NO 29503 102 188 2 0 0 0 188 29504 106 39 0 1 0 TEST M/R OR PTS 29505 105 107 11 0 0 0 107 29506 127 296 2 0 0 0 296 gYES 29614>29507 124 3 0 1 0 *60t TEST A TRIAL 29508 106 11 0 0 0 29509 127 295 16 0 0 0 295 gNO 29510 126 473 2 0 0 0 473 *459 RESTORE 07 DETAILS 29511 106 108 10 0 0 0 108 29512 124 233 26 0 1 0 233 RESTORE A.S.L. 29513 102 64 0 0 0 29514 124 233 45 0 1 0 233 29515 124 6 1 0 0 *60t 29509>29516 126 462 2 0 0 0 462 *14t gREQUEST M/R 29640> 29707> 51715> 20417>29517 102 106 2 0 0 0 106 SET INDICATOR 29518 101 2 1 3 0 RESET ABANDON/UNLOAD INDICATOR 29519 102 179 0 0 0 29520 124 2 0 1 0 29521 124 37 0 1 0 29522 102 16 0 0 0 29523 106 39 0 1 0 SET UP PROGRAM NO 29524 102 221 12 0 0 0 221 29525 126 298 2 0 0 0 298 gCLEAR D/B INDICATORS 29526 106 221 34 0 0 0 221 *16t TEST UPTIME IN 29527 127 295 41 0 0 0 295 gNO 29528 106 221 38 0 0 0 221 29529 105 2 0 0 0 29530 127 295 41 0 1 0 295 *851 gNO 29531 127 295 34 0 1 0 295 *859 gNO 29532 102 221 38 1 0 0 221 CLEAR INDICATORS 29533 124 295 38 1 0 0 295 *85t 29531>29534 106 221 40 0 0 0 221 29535 105 2 0 0 0 29536 127 295 41 0 1 0 295 2ND SET 29537 102 221 40 1 0 0 221 *85t 29533>29538 106 221 34 0 0 0 221 DECREASE NO OF UPTIME PROGS 29539 101 2 1 2 0 COUNTER BY 2 29540 102 221 34 0 0 0 221 *16t 29536> 29530> 29527>29541 106 3 0 1 0 *59t TEST PROGRAM USES MOD GROUP 3 29542 127 295 63 0 2 0 295 gNO 29543 106 209 14 0 0 0 209 SET UP 6/0/0 IN 2 OF SWITCH 29544 102 2 0 1 0 29545 106 0 0 1 0 100/1/0 ACTION 29546 101 8191 1 1 0 TURN INTO 29547 101 1 1 1 0 100/1/1 ACTION 29548 102 26 0 1 0 29549 106 209 18 0 0 0 209 FORM 2/0/0 44 IN 3 OF SWITCH 29550 104 2 0 0 0 29551 102 3 0 1 0 29552 106 209 19 0 0 0 209 FORM UP 24/1/0 IN 6 OF SWITCH 29553 102 6 0 1 0 29554 106 209 20 0 0 0 209 FORM UP 26/0/3 IN 28 OF SWITCH 29555 105 2 0 0 0 29556 102 28 0 1 0 29557 106 4 0 1 0 *09t06t*06209t TEST TIMINGS ON 29558 127 295 63 0 2 0 295 *09t06t gYES 29559 106 6 0 1 0 29560 102 4 0 1 0 29561 106 28 0 1 0 29562 102 27 0 1 0 *59t*06209t 29558> 29542>29563 106 9 0 1 0 CLOSE PROG SWITCH FIRMLY 29564 102 7 0 1 0 29565 124 106 2 0 1 0 106 AMEND EDIT TABLE FOR 29566 124 214 54 0 2 0 214 ABDON'OR'END' 29567 102 482 2 0 0 0 482 29568 124 106 2 0 1 0 106 29569 124 295 70 1 0 0 295 29569>29570 106 9 0 1 0 CORRUPT SI+35 TO PREVENT 29571 102 35 0 1 0 SWITCH BEING OPENED 29572 126 179 2 0 0 0 179 gSEARCH LOG QUEUE S/R 29573 124 176 12 0 2 0 176 TEST OPTION OUTSTANDING 29574 105 175 4 0 3 0 175 FOR THIS PROG 29575 127 295 77 0 1 0 295 gNO 29576 102 175 3 0 0 0 175 CLEAR OPT OUTSTANDING INDICATOR 29575>29577 102 175 4 0 3 0 175 CLEAR A 29578 102 175 4 0 3 0 175 CLEAR LOG REQUEST 29579 124 475 2 1 0 0 475 gEND ROUTINE 29580 124 208 2 1 0 0 208 *££0*££2*41e gXXX COMMENT 29581 127 301 5 0 3 0 301 *28e gNO 29582 127 302 2 0 3 0 302 *03e gNO 29583 127 301 5 0 2 0 301 *28e033 gNO 29584 127 296 33 0 0 0 296 *57e 29585 124 203 2 1 0 0 203 *60e 29586 124 477 8 1 0 0 477 *363 29587 126 351 2 0 0 0 351 *09e06e TEST RTE NOTING D/B 29588 127 302 2 0 2 0 302 *03e03e gNO 29600 PROCR 296 296 ABANDON OPTION: DURING A MASTER ROUTINE OPERATION 29601 NOTES RADIX B 29506>29602 124 3 0 1 0 *14t 29603 102 164 0 0 0 29604 124 296 6 0 1 0 296 29605 124 296 7 1 0 0 296 29606 100 0 0 0 0 SWITCH 29605>29607 124 296 25 1 0 0 296 (S)=0 ALLOC PREP 29608 124 296 15 1 0 0 296 (S)=1 ALLOC & LOADING 29609 124 297 4 1 0 0 297 (S)=2 O'LAY PREP 29610 124 297 2 1 0 0 297 (S)=3 O'LAY 29611 124 297 8 1 0 0 297 *41e 29612 124 297 10 1 0 0 297 (S)=5 READING CONTROL DATA 29613 124 208 2 1 0 0 208 (S)=6 gXXX COMMENT 29614 124 295 7 1 0 0 295 *60e TRIAL SETTING (5)=7 29608>29615 106 218 6 1 0 0 218 RESTORE GP 3 REGISTERS 29616 128 26 0 0 0 29617 123 26 1 0 0 *59t SET TAG 0 29618 123 30 1 0 0 IN MOD GROUP 3 29619 123 28 1 0 0 *59t 29620 106 233 7 0 0 0 233 TEST ALLOCATED YET 29621 127 296 27 0 0 0 296 *57e gYES 29622 125 0 1 2 0 TEST IF ANY PROGRAMM 29623 126 479 2 0 0 0 479 gS/R M* STILL AWAITING 29624 124 484 2 1 0 0 484 gNO,REJECT COMMENT UNLOADING 29607>29625 101 86 1 3 0 *363 CODE LETTER F 29626 124 491 11 1 0 0 491 *361 C REG COMMENT 29621>29627 106 233 26 0 0 0 233 *57t CH CH RT 29628 126 249 2 0 0 0 249 gFIND RT IN LIST 29629 124 296 31 1 0 0 296 gFOUND 29630 124 296 41 1 0 0 296 gINTERNAL IMPOSSIBILITY 29629>29631 101 0 1 3 0 29632 124 225 16 0 1 0 225 *57t 29584>29633 102 224 4 1 0 0 224 CLEAR IS LAST PROG LOCATED 29634 106 221 8 0 0 0 221 29635 126 479 2 0 0 0 479 gS/R M* 29636 124 296 42 1 0 0 296 gNOT FOUND 29637 124 4 0 1 0 29638 124 230 3 0 1 0 230 29639 126 36 1 1 0 SET MR1 FOR PROG 29640 124 295 17 1 0 0 295 gABANDON PROGRAM 29630>29641 101 2 1 3 0 'M' 29636>29642 101 98 1 1 0 'K' 29643 124 208 3 1 0 0 208 gXXX COMMENT 29700 PROCR 297 297 ABANDON OPTION: DURING OVERLAY, STORE DUMP, OR READING CD 29701 NOTES RADIX B 29610>29702 106 218 6 1 0 0 218 *14t 29703 128 26 0 0 0 29609>29704 106 209 9 0 0 0 209 RESET M/R SWITCH 29705 102 106 24 0 0 0 106 IN CASE OF LOST 29706 126 221 6 1 1 0 221 SET(MR1)FOR PROG 29707 124 295 17 1 0 0 295 gABANDON PROGRAM 29611>29708 124 214 74 0 2 0 214 *41t 29709 124 468 6 1 0 0 468 *41t gTYPE COMMENT 29612>29710 106 222 18 0 0 0 222 RESTORE (64+R) 29711 124 222 20 0 1 0 222 29712 102 64 0 0 0 29713 106 222 19 0 0 0 222 *01t TEST READING FILES BLOCK 29714 127 297 17 0 0 0 297 *01t gYES 29715 101 84 1 3 0 CODE LETTER D 29716 124 498 5 1 0 0 498 gNO CD COMMENT 29714>29717 106 499 2 0 0 0 499 *01t TEST ISSUE 6 PLS 29718 101 535 2 1 2 0 535 READING CD 29719 127 297 22 0 3 0 297 gNO 29720 124 296 25 0 2 0 296 FRIG RETURN LINK 29721 102 499 2 0 0 0 499 29719>29722 126 459 2 0 1 0 459 gCLEAR UP S/R G 29800 PROCR 298 298 CLEAR D/B INDICATORS FOR PROGM'S ROUTES 29802 100 0 0 0 0 29803 126 354 2 0 0 0 354 gSET(MR3) 29837>29804 106 34 1 3 0 TEST RELEASED 29805 127 298 36 0 3 0 298 gYES 29806 118 4118 1 0 0 *52t 29817> 29820>29807 118 1 1 0 0 ROUTE OR ALT RT TYPE 29808 127 298 18 0 0 0 298 gZERO 29809 102 221 2 0 0 0 221 STORE 29810 118 2 1 0 0 29811 125 0 1 2 0 29812 118 2 1 0 0 STORE ROUTE OR 29813 102 221 3 0 0 0 221 ALTERNATE ROUTE 29814 106 221 2 0 0 0 221 RESTORE ROUTE TYPE 29815 124 221 3 0 1 0 221 IN 64+R 29816 102 64 0 0 0 29817 124 298 7 1 0 0 298 gCONTINUE 29808>29818 118 4 1 0 0 29819 125 0 1 2 0 29820 127 298 7 1 1 0 298 gAB NON-ZERO CONTINUE 29821 105 34 1 3 0 SET ENTRY NEGATIVE 29822 102 34 1 3 0 *52t 29823 101 3 0 1 0 29824 125 0 1 2 0 *521 29825 115 34 0 3 0 29826 126 299 2 0 0 0 299 gCLEAR A D/B INDICATOR 29827 125 0 1 2 0 29828 101 3 0 1 0 TEST THIS ROUTE 29829 115 34 0 3 0 IN ASSEMBLER TABLE 29830 124 258 32 0 1 0 258 29831 105 252 2 0 0 0 252 29832 127 298 36 0 1 0 298 gNO 29833 106 211 2 0 0 0 211 29834 124 258 32 0 1 0 258 SET RTE TYPE £5 29835 102 252 3 0 0 0 252 29832> 29805>29836 125 2 0 3 0 TEST END OF TABLE 29837 124 298 4 1 0 0 298 gNO 29838 126 298 2 0 1 0 298 gYES 29900 PROCR 299 299 CLEAR D/B INDICATOR 29902 100 0 0 0 0 LINK 29903 118 4127 1 0 0 STORE 8*CH 29904 118 1 1 3 0 29905 118 3 0 3 0 29906 102 258 32 0 0 0 258 29907 118 3 1 3 0 STORE RTE 29908 102 258 33 0 0 0 258 29909 101 1 0 1 0 CLEAR D/B INDICATOR 29910 124 258 33 0 1 0 258 29911 118 0 1 0 0 29912 124 258 32 0 1 0 258 29913 114 252 4 1 0 0 252 29914 126 299 2 0 1 0 299 g 30000 PROCR 300 300 WARNING OF END ROUTINE 30001 NOTES RADIX B 30002 100 0 0 0 0 LINK=SI+12 30003 124 300 2 0 1 0 300 SET (MR1) WITH PROG LINK 30004 126 24 1 1 0 30005 106 31 0 1 0 *56t82t TEST DATA 30006 101 54 1 2 0 TRANS READ 30007 124 2 0 3 0 30008 127 9 0 0 0 *56t82t gNEXT PROG 30009 106 31 0 1 0 *16t TEST CARD READ 30010 101 6 1 2 0 30011 127 381 2 0 0 0 381 gUPTIME MANUAL S/R 30012 101 10 1 2 0 OPEN FILE/CARD 38027> 38103>30013 124 2 0 1 0 30014 127 18 0 0 0 *16t gRC ROUTINE 30015 106 30 1 1 0 SET UP ROUTE NO. & TYPE 30016 102 188 2 1 0 0 188 30017 106 188 3 0 0 0 188 *56t82t TEST IF FROM 30018 101 267 2 1 1 0 267 SECIND TEST 30019 101 399 24 1 2 0 399 ROUTE OF 30020 118 6 0 0 0 DATA TRANS 30021 127 300 38 0 1 0 300 gNO 30022 124 300 52 1 0 0 300 *56t82t 30023 106 188 3 0 0 0 188 *81t 5-8 HOLE P/T 30024 101 57 1 2 0 30025 127 300 38 0 1 0 300 *81t 30026 106 188 3 0 0 0 188 *49t TEST MICR READ 30027 101 50 1 2 0 30028 127 300 52 0 0 0 300 gYES BEFORE READ ORDER 30029 106 188 3 0 0 0 188 TEST IF FROM 30030 101 267 2 1 1 0 267 SECOND TEST 30031 101 397 13 1 2 0 397 ROUTE 30032 118 6 0 0 0 30033 127 300 38 0 1 0 300 *49t 30034 106 33 0 1 0 *49t81t 30035 127 263 20 0 0 0 263 gNO,ZZZ COMMENT SPECIFIED 30036 104 210 8 0 0 0 210 AUGMENT LINK BY 1 30037 124 284 4 1 0 0 284 *49t81t 30033> 30025> 30021>30038 106 188 2 0 0 0 188 TEST IF M/T 30039 101 128 1 2 0 *3:t 30040 127 301 2 0 3 0 301 *3:t*03e*28e gNO 30041 101 24 1 2 0 *3:2*224*234 000000000800016 30042 127 301 2 0 2 0 301 *3:2*03e03e*28e033 gNO 30043 106 188 3 0 0 0 188 TEST RTE TYPE 8 30044 101 8 1 2 0 30045 127 305 2 0 0 0 305 gYES RTE TYPE 8 30046 101 40 1 2 0 TEST RTE TYPE 48 30047 127 300 52 0 0 0 300 gYES 30048 125 0 1 2 0 CLEAR W/E INDICATOR 30049 101 16 0 1 0 30050 124 188 2 0 1 0 188 30051 114 190 34 0 0 0 190 30219> 30047> 30028> 30022>30052 126 300 2 0 1 0 300 gSI+12 30100 PROCR 301 301 WARNING OF END:P/T OUTPUT 30042> 30040>30102 125 0 1 2 0 *03t*28t 30103 101 1 0 1 0 TEST PAPER TAPE 30104 115 188 3 0 0 0 188 *28t OUTPUT 23202 29583> 29581>30105 106 188 3 0 0 0 188 *281 30106 105 210 8 0 0 0 210 TEST RTE TYPE 1 30107 127 302 2 0 1 0 302 gNO 30108 105 210 2 0 0 0 210 30109 124 3 0 1 0 SET W/E INDICATOR 30110 102 157 0 0 0 30111 126 300 2 0 1 0 300 gSI+12 30200 PROCR 302 302 WARNING OF END:PRINTER 30201 NOTES RADIX B FOR ALTERATION IN HARDWARE 30107> 29588> 29582>30202 106 188 3 0 0 0 188 TEST ROUTE TYPE 30203 101 4 1 2 0 *2.4 00009 30204 127 302 20 0 0 0 302 g4OR9 30205 101 10 1 2 0 30206 127 304 2 0 0 0 304 g14 OR 19 30207 101 10 1 2 0 30208 127 302 20 0 0 0 302 *86t g29 30209 101 5 1 1 0 30210 127 302 20 0 0 0 302 g24 30211 101 10 1 1 0 30212 127 304 2 0 0 0 304 g14 30213 101 10 1 1 0 *86t 30214 127 302 20 0 0 0 302 g24 OR 29 30215 106 188 3 0 0 0 188 *54t44t 30216 101 267 2 1 1 0 267 30217 101 390 10 1 2 0 390 TEST SINGLE ANNEX WORKING 30218 105 209 12 0 0 0 209 *54t44t 30219 127 300 52 0 1 0 300 gNO TO SI+12 30214> 30210> 30208> 30204>30220 106 188 3 0 0 0 188 STORE ROUTE TYPE IN SPECIAL CHAPTER 30221 124 3 0 1 0 30222 102 157 0 0 0 30223 124 3 0 1 0 *2.t CLEAR INDICATOR 30224 102 156 0 0 0 *2.t 30225 124 303 2 0 2 0 303 RETURN LOCATION 30226 126 362 2 0 0 0 362 gSET RTE TO MANUAL, ETC. 30227 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 30228 124 3 0 1 0 *86t 30229 106 157 0 0 0 30230 101 4 1 2 0 30231 127 302 58 0 0 0 302 30232 101 20 1 2 0 30233 127 302 58 0 0 0 302 *86t 30243> 30252>30234 125 2 0 3 0 *2.t TEST IF MULTI-FORM 30235 124 6 0 1 0 TEST ANNEXE LIM WD BLOCK 30236 123 0 0 3 0 30237 101 15 1 2 0 30238 127 263 19 0 0 0 263 gYES, ZZZ COMMENT 30239 124 6 0 1 0 30240 100 0 1 2 0 30248>30241 118 2 1 3 0 TEST END OF WORD 30242 125 0 1 2 0 30243 127 302 34 1 0 0 302 gYES 30244 118 6 1 3 0 30245 101 62 1 2 0 TEST B/E 30246 127 302 58 0 0 0 302 gYES gNO 30247 101 32 1 1 0 TEST L/E 30248 127 302 41 0 1 0 302 gNO 30249 125 2 0 3 0 TEST TRACK 8 30250 100 220 13 0 2 0 220 30251 115 0 0 3 0 30252 127 302 34 0 0 0 302 gNO 30253 124 188 2 0 1 0 188 STORE ASL YES 30254 106 64 0 0 0 AS INDICATOR 30255 124 3 0 1 0 30256 102 156 0 0 0 30257 106 214 46 1 0 0 214 *2.t 30404> 30246> 30233> 30231>30258 102 258 8 1 0 0 258 30259 106 214 44 1 0 0 214 'WE' 30260 102 258 4 1 0 0 258 30261 124 370 7 1 0 0 370 gOUTPUT COMMENT 30300 PROCR 303 303 WARNING OF END:PRINTER 30301 NOTES RADIX B CONT. 30302 126 339 2 0 0 0 339 gSET(MR3)=(3) 30303 106 156 0 3 0 *2.t TEST MULTI-FORM 30304 127 303 27 0 0 0 303 gNO 30305 106 258 16 1 0 0 258 BULK CLEAR 128-155 OF SPECIAL CHAPTER 30306 124 3 0 1 0 30307 128 128 1 1 0 30308 106 214 44 1 0 0 214 'WE' 30309 102 132 1 3 0 30310 106 214 46 1 0 0 214 'CHECK' 30311 103 136 1 3 0 30312 103 144 1 3 0 30313 102 152 1 3 0 30314 106 214 10 1 0 0 214 B/E WD 30315 102 154 1 3 0 30316 106 210 14 0 0 0 210 SET UP A.S.L. 30317 104 3 0 0 0 30318 124 188 2 0 1 0 188 30319 102 64 0 0 0 30320 126 330 2 0 0 0 330 gWRITE 30321 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 30322 126 339 2 0 0 0 339 gSET (MR3)=(3) 30323 106 156 0 3 0 RESTORE ASL 30324 124 188 2 0 1 0 188 30325 102 64 0 0 0 30326 102 156 0 3 0 *2.t CLEAR IND 30304>30327 126 330 2 0 0 0 330 gWRITE 30328 101 4 1 3 0 *2.486+ 00009 30329 102 188 3 0 0 0 188 30330 106 157 0 3 0 ORIGINAL ROUTE TYPE 30331 124 351 7 1 0 0 351 gTEST ROUTE DEALING WITH D/B 30400 PROCR 304 304 WARNING OF END PRINTER 30401 NOTES RADIX B OPEN FILE 30212> 30206>30402 124 267 21 0 2 0 267 RETURN LINK 30403 126 362 2 0 0 0 362 gSET RTE TO MANUAL, ETC. 30404 124 302 58 1 0 0 302 gCOMMENT 30500 PROCR 305 305 WARNING OF END 30501 NOTES RADIX B MAGNETIC TAPE OUTPUT 30045>30502 126 340 2 0 0 0 340 gSET (MR3)=R 30503 101 16 0 1 0 TEST W/E INDICATOR 30504 115 190 34 0 3 0 190 SET 30505 127 305 13 0 1 0 305 gYES 30506 106 210 6 0 0 0 210 SET W/E INDICATOR 30507 114 190 34 0 3 0 190 30508 106 33 0 1 0 TEST IF LINK TO BE 30509 127 428 35 0 0 0 428 gNO AMENDED 30510 101 15 0 1 0 30511 114 44 0 1 0 30512 124 428 35 1 0 0 428 gSI + 12 30505>30513 105 210 6 0 0 0 210 TEST IF INDICATOR 30514 127 305 18 0 1 0 305 gYES IS. 30515 105 209 12 0 0 0 209 SET INDICATOR AS . 30516 107 190 34 0 3 0 190 30517 124 428 35 1 0 0 428 gSI+12 30514>30518 126 350 2 0 0 0 350 gTEST ROUTE DEALING WITH D/B 30519 126 435 2 0 0 0 435 gSET UP END OF REEL SENTINEL 30520 126 310 2 0 0 0 310 gWRITE END OF TAPE INF 30521 126 334 2 0 0 0 334 gSTEP REEL COUNTER 30522 126 357 2 0 0 0 357 gCOUNT 500 M. SECS 30523 126 451 2 0 0 0 451 *8£9 30524 126 324 2 0 0 0 324 gUNLOAD. NEW TAPE 30525 126 425 2 0 0 0 425 gOPEN OUTPUT REEL 30526 126 351 2 0 0 0 351 *££0*££2*09e06e 30527 126 385 2 0 0 0 385 *163 30528 102 185 0 3 0 *5+e CLEAR ATTEMPTS COUNTER 30600 PROCR 306 306 STEP BACK (A) BLOCKS, FORWARD 1 BLOCK 30601 NOTES RADIX B 30602 100 0 0 0 0 LINK 30603 124 3 0 1 0 SET UP CNTR 30604 102 177 0 0 0 30605 106 306 2 0 0 0 306 30606 124 3 0 1 0 STORE LINK 30607 102 161 0 0 0 30608 126 357 2 0 0 0 357 gCOUNT 500 MILLISECS 30616>30609 124 188 2 0 1 0 188 STEP BACK 30610 119 0 1 0 0 30611 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 30612 126 339 2 0 0 0 339 SET(MR3)=3 30613 106 177 0 3 0 SELECT CNTR 30614 105 210 8 0 0 0 210 SUBT 1 TEST COUNTER=0 30615 103 177 0 3 0 STORE CNTR 30616 127 306 9 0 1 0 306 gNO 30617 126 357 2 0 0 0 357 gCOUNT 500 MILLISECS 30618 126 355 2 0 0 0 355 gSTEP FORWARD 30619 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 30620 124 3 0 1 0 30621 126 161 0 1 0 g LEAVE S/R 30700 PROCR 307 307 RUN FORWARD STEP FORWARD & READ 30701 NOTES RADIX B 30702 100 0 0 0 0 30703 126 339 2 0 0 0 339 gSET (MR3)=(3) 30704 106 164 0 3 0 *8£t TEST OPT 13 30705 127 307 10 0 1 0 307 gYES 30706 124 188 2 0 1 0 188 CLEAR DB COUNT 30707 102 193 2 0 0 0 193 30708 124 188 2 0 1 0 188 CLEAR O/P COUNT 30709 102 193 26 0 0 0 193 *8£t 30705>30710 106 307 2 0 0 0 307 30711 102 165 0 3 0 29132>30712 125 0 1 2 0 DRAIN 30713 102 157 0 3 0 CLEAR INDICATORS 30714 102 158 0 3 0 30715 126 340 2 0 0 0 340 gSET (MR3)=R 30716 100 210 6 0 2 0 210 TEST IF THIS REEL 30717 115 190 98 0 3 0 190 HAS BEEN REWOUND 30718 127 307 22 0 0 0 307 gNO 30719 125 0 1 2 0 CLEAR REWIND IND 30720 114 190 98 0 3 0 190 30721 126 357 2 0 0 0 357 gCOUNT 500 MILLISECS 30718>30722 124 188 2 0 1 0 188 RUN FORWARD 30723 119 0 0 3 0 30724 126 343 2 0 0 0 343 *019 CLEAR BIT 1 OF ASL 30725 126 351 2 0 0 0 351 gTEST RTE NOTING D/B 30726 126 355 2 0 0 0 355 g STEP FORWARD 30727 126 351 2 0 0 0 351 gTEST RTE NOTING D/B 30728 101 5 1 3 0 30729 124 188 2 0 1 0 188 SET BLOCK CNTR=5 30730 102 190 2 0 0 0 190 30731 126 308 2 0 0 0 308 gREAD, TEST BLOCK 30732 126 341 2 0 0 0 341 gSET MR3=64+R 30733 106 7 1 3 0 30734 124 188 2 0 1 0 188 *8£t STORE 30735 103 193 50 0 0 0 193 *8£t SPOOL NO 30736 124 3 0 1 0 30737 102 182 0 0 0 30738 124 3 0 1 0 30739 126 165 0 1 0 g LEAVE S/R 30800 PROCR 308 308 READ & TEST BLOCK 30801 NOTES RADIX B 30802 100 0 0 0 0 LINK 30803 106 210 8 0 0 0 210 30804 126 333 2 0 0 0 333 gSTEP BLOCK CNTR 30805 126 339 2 0 0 0 339 gSET (MR3)=(3) 30806 106 308 2 0 0 0 308 STORE LINK 30807 102 166 0 3 0 30842>30808 126 329 2 0 0 0 329 g READ 30809 126 343 2 0 0 0 343 *019 CLEAR BIT 1 OF ASL 30810 106 164 0 3 0 *5+t TEST CHD 30811 127 308 38 0 1 0 308 *5+t gYES 30812 101 7 1 3 0 SET RTE TYPE 7 30813 102 188 3 0 0 0 188 30814 126 350 2 0 0 0 350 gTEST RTE DEALING WITH D/B 30832> 30837> 30839>30815 126 314 2 0 0 0 314 gTEST A1=BLOCK COUNTER 30816 127 308 25 0 1 0 308 gNO 30817 126 339 2 0 0 0 339 gSET(MR3)=(3) 30818 102 171 0 3 0 CLEAR OPTION INDICATOR 30819 102 186 0 3 0 CLEAR INDICATOR 30820 106 187 0 3 0 TEST CHD INDICATOR 30821 127 308 23 0 1 0 308 gYES 30822 126 321 2 0 0 0 321 g 30821>30823 124 3 0 1 0 30824 126 166 0 1 0 g LEAVE S/R 30816>30825 126 315 2 0 0 0 315 gTEST A1 FOR FBM 30826 124 308 40 1 0 0 308 gFBM FOUND 30827 101 308 15 1 3 0 308 SELECT RETURN LOCATION 30828 124 3 0 1 0 30829 102 162 0 0 0 30830 126 323 2 0 0 0 323 gTEST OPTION INDICATOR 30831 126 316 2 0 0 0 316 gALIGNMENT FAILURE 30832 124 308 15 1 0 0 308 g 30833 126 318 2 0 0 0 318 gTEST BLOCK 6 30834 124 291 27 1 0 0 291 g 30835 126 317 2 0 0 0 317 gREREAD 30836 126 319 2 0 0 0 319 gSTEP ATTEMPTS COUNTER 30837 124 308 15 1 0 0 308 g 30846> 30811>30838 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 30839 124 308 15 1 0 0 308 g 30826>30840 126 339 2 0 0 0 339 gSET (MR3)=(3) 30841 106 186 0 3 0 TEST ALREADY STEPPED BACK DURING 30842 127 308 8 0 0 0 308 REALIGNMENT gNO READ NEXT BLOCK 30843 101 3 1 3 0 30844 126 306 2 0 0 0 306 gSTEP BACK 3,FORWARD 1 30845 126 329 2 0 0 0 329 gREAD 30846 124 308 38 1 0 0 308 g 30900 PROCR 309 309 WRITE 'FINIS' BLOCK 30901 NOTES RADIX B 30902 100 0 0 0 0 LINK 30903 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 30904 106 210 8 0 0 0 210 STEP BLOCK COUNTER 30905 126 333 2 0 0 0 333 g 30906 124 188 2 0 1 0 188 SELECT BLOCK CNTR 30907 106 190 2 0 0 0 190 30908 102 1 1 3 0 1ST WORD 30909 106 211 8 1 0 0 211 SELECT R/M WORD 30910 102 2 1 3 0 2ND WORD 30911 106 258 28 1 0 0 258 SELECT 'FINIS' 30912 102 4 1 3 0 3RD WORD 30913 106 214 10 1 0 0 214 SELECT B/E WORD 30914 102 6 1 3 0 4TH WORD 30915 126 342 2 0 0 0 342 *019 SET(MR3)=(64+R)FOR 90K 30916 126 330 2 0 0 0 330 gWRITE 30917 126 343 2 0 0 0 343 *019 30918 106 309 2 0 0 0 309 STORE LINK 30919 124 3 0 1 0 30920 102 197 0 0 0 30921 106 212 5 0 0 0 212 SET RTE TYPE 8 30922 102 188 3 0 0 0 188 30923 126 350 2 0 0 0 350 gTEST RTE, DEALING WITH D/B 30924 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 30925 106 211 6 1 0 0 211 SELECT SENTINEL TYPE 3 30926 104 212 6 0 0 0 212 30927 124 3 0 1 0 30928 126 197 0 1 0 gLEAVE S/R 31000 PROCR 310 310 WRITE END OF TAPE INFORMATION 31001 NOTES RADIX B 31002 100 0 0 0 0 31003 102 0 1 3 0 SET 1ST WORD AT SENTINEL TYPE 31004 106 210 8 0 0 0 210 STEP BLOCK COUNTER 31005 126 333 2 0 0 0 333 g 31006 124 188 2 0 1 0 188 SELECT BLOCK COUNTER 31007 106 190 2 0 0 0 190 31008 102 5 1 3 0 3RD WORD 31009 126 342 2 0 0 0 342 *019*8t9 31010 126 330 2 0 0 0 330 gWRITE 31011 126 343 2 0 0 0 343 *019*8t9 31012 106 310 2 0 0 0 310 STORE LINK 31013 124 3 0 1 0 31014 102 197 0 0 0 31015 106 212 5 0 0 0 212 SET RTE TYPE 8 31016 102 188 3 0 0 0 188 31017 126 350 2 0 0 0 350 gTEST RTE DEALING WITH D/B 31018 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 31019 106 258 30 1 0 0 258 SELECT (END) 31020 103 0 1 3 0 1ST WORD 31021 102 2 1 3 0 2ND WORD 31022 126 342 2 0 0 0 342 *019*8t9 31023 126 330 2 0 0 0 330 gWRITE 31024 126 343 2 0 0 0 343 *019*8t9 31025 126 351 2 0 0 0 351 gTEST RTE NOTING D/B 31026 125 0 1 2 0 31027 126 331 2 0 0 0 331 gAUGMENT BLOCK CTR BY-1 31028 124 3 0 1 0 31029 126 197 0 1 0 gLEAVE S/R 31100 PROCR 311 311 SET UP FILE I.D. FOR M/T COMMENT 31101 NOTES RADIX B 31102 100 0 0 0 0 LINK 31103 126 340 2 0 0 0 340 gSET (MR3)=R 31104 106 190 98 0 3 0 190 SET UP FILE ID/ 31105 118 2 0 0 0 31106 101 113 1 1 0 31107 118 4 0 0 0 31108 102 258 12 1 0 0 258 31109 101 3 0 1 0 COLLATE REEL NO 31110 115 190 34 0 3 0 190 31111 118 4127 1 0 0 31112 118 1 0 0 0 31113 118 1 1 0 0 31114 126 311 2 0 1 0 311 g LEAVE S/R 31200 PROCR 312 312 ZZZ COMMENT 31201 NOTES RADIX B 31202 100 0 0 0 0 LINK 31203 101 4 1 3 0 31204 126 361 2 0 0 0 361 gEDIT TIME, SET UP PROG. NO. 31205 106 258 7 0 0 0 258 SET UP RTE NO 31206 102 258 8 0 0 0 258 31207 106 214 48 1 0 0 214 SET UP 'ZZZ' 31208 102 258 4 1 0 0 258 31209 106 312 2 0 0 0 312 SET UP CODE NUMBER 31210 101 263 18 1 2 0 263 31211 102 258 7 0 0 0 258 *131 31212 103 258 7 0 0 0 258 *13t 31213 101 9 1 2 0 TEST 22209 31214 127 312 16 0 1 0 312 gNO 31215 102 258 8 0 0 0 258 CLEAR ROUTE NO 31214>31216 125 0 1 2 0 *13t 31217 102 188 3 0 0 0 188 31218 126 349 2 0 0 0 349 g CLEAR ASSEMBLER TABLE 31219 106 438 2 0 0 0 438 STORE SETTING OF S101 31220 124 3 0 1 0 31221 102 176 0 0 0 31222 124 432 10 1 0 0 432 gOUTPUT COMMENT 31300 PROCR 313 313 IDENTIFICATION FAILURE 31301 NOTES RADIX B 31913> 32308>31302 106 162 0 3 0 RETURN LOCN 31303 102 171 0 3 0 31304 126 341 2 0 0 0 341 gSET(MR3)=(64+R) 31305 106 1 1 3 0 SET UP ACTUAL BLOCK NO 31306 102 258 10 0 0 0 258 31307 106 108 31 1 0 0 108 SET UP ALARM TYPE 2 31308 102 258 4 1 0 0 258 31309 126 361 2 0 0 0 361 gEDIT TIME,SET UP PROG NO 31310 124 4217 0 2 0 *14+5++*14+*5++ 001200421600121 31311 102 41 0 1 0 31312 102 258 12 1 0 0 258 CLEAR COL 5 31313 101 262 2 1 3 0 262 SELECT TABLE START LOCATION 31314 124 335 2 1 0 0 335 gOFFER OPTIONS 31400 PROCR 314 314 TEST A1=BLOCK CTR 31402 100 0 0 0 0 LINK 31403 126 341 2 0 0 0 341 gSET MR3=(64+R) 31404 106 1 1 3 0 ACTUAL BLOCK NO 31405 124 188 2 0 1 0 188 31406 105 190 2 0 0 0 190 EXPECTED 31407 126 314 2 0 1 0 314 31500 PROCR 315 315 TEST FOR FBM S/R 31502 100 0 0 0 0 LINK 31503 126 341 2 0 0 0 341 gSET MR3=64+R 31504 106 0 1 3 0 31505 118 4118 1 0 0 31511>31506 118 2 1 0 0 31507 101 95 1 2 0 TEST CHARACTER IS FB 31508 127 315 10 0 1 0 315 gNO 31509 126 315 2 0 1 0 315 gLEAVE S/R 31508>31510 125 0 1 2 0 31511 127 315 6 1 1 0 315 31512 124 315 2 0 1 0 315 31513 124 1 1 0 0 gFBM NOT FOUND 31600 PROCR 316 316 ALIGNMENT FAILURE S/R 31602 100 0 0 0 0 LINK 31603 106 316 2 0 0 0 316 STORE LINK IN 31604 124 3 0 1 0 SPECIAL CHAPTER 31605 102 183 0 0 0 31606 126 341 2 0 0 0 341 gSET MR3=64+R 31607 124 3 0 1 0 TEST ATTEMPTS COUNTER 31608 106 185 0 0 0 ZERO 31609 127 316 13 0 1 0 316 gNO 31610 106 1 1 3 0 STORE ACTUAL BLOCK NO 31611 124 3 0 1 0 31612 102 184 0 0 0 31609>31613 124 188 2 0 1 0 188 TEST EXPECTED BLOCK 31614 106 190 2 0 0 0 190 >ACTUAL BLOCK 31615 100 210 3 0 3 0 210 SET DECIMAL 31616 105 1 1 3 0 31617 127 316 51 0 0 0 316 gA1=BLOCK COUNTER 31618 127 316 36 0 3 0 316 gNO 31619 101 8 1 2 0 TEST DIFFERENCE <8 31620 127 316 54 0 2 0 316 g NO 31621 101 7 1 1 0 31622 100 212 2 0 3 0 212 SET BINARY 31623 127 316 32 0 0 0 316 g 31631>31624 124 3 0 1 0 31625 102 177 0 0 0 31626 126 355 2 0 0 0 355 gSTEP FORWARD 31627 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 31628 124 3 0 1 0 TEST ALIGNED 31629 106 177 0 0 0 CORRECTLY 31630 105 210 8 0 0 0 210 31631 127 316 24 0 1 0 316 gNO 31647> 31623>31632 126 322 2 0 0 0 322 gTEST O/P OR I/P 31633 124 316 48 1 0 0 316 gI/P 31634 126 355 2 0 0 0 355 gSTEP FORWARD 31635 124 316 49 1 0 0 316 g 31618>31636 106 1 1 3 0 EXPECTED 31633>31648 126 329 2 0 0 0 329 gREAD 31635>31649 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 31650 126 319 2 0 0 0 319 gSTEP ATTEMPTS COUNTER 31617>31651 100 212 2 0 3 0 212 SET BINARY 31652 124 3 0 1 0 31653 126 183 0 1 0 gLEAVE S/R 31643> 31640> 31620>31654 100 212 2 0 3 0 212 SET BINARY 31655 124 316 2 0 1 0 316 31656 124 1 1 0 0 gLEAVE S/R+1 31700 PROCR 317 317 ALIGNMENT FAILURE(11)-REREAD 31702 100 0 0 0 0 LINK 31703 106 317 2 0 0 0 317 STORE LINK IN 31704 124 3 0 1 0 SPECIAL CHAPTER 31705 102 173 0 0 0 31706 106 212 6 0 0 0 212 31707 126 306 2 0 0 0 306 gSTEP BACK 2,FORWARD 1 31708 126 322 2 0 0 0 322 gTEST I/P OR O/P 31709 124 317 14 1 0 0 317 g 31710 126 355 2 0 0 0 355 gSTEP FORWARD 31715>31711 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 31712 124 3 0 1 0 31713 126 173 0 1 0 gLEAVE S/R 31709>31714 126 329 2 0 0 0 329 gREAD 31715 124 317 11 1 0 0 317 g 31800 PROCR 318 318 ALIGNMENT FAILURE(111)-BLOCK 6 TEST 31802 100 0 0 0 0 LINK 31803 106 318 2 0 0 0 318 STORE LINK IN 31804 124 3 0 1 0 SPECIAL CHAPTER 31805 102 173 0 0 0 31806 124 188 2 0 1 0 188 TEST EXPECTED BLOCK= 31807 106 190 2 0 0 0 190 31808 101 6 1 2 0 31809 127 318 26 0 1 0 318 gNO 31810 126 319 2 0 0 0 319 gSTEP ATTEMPTS COUNTER 31811 106 185 0 3 0 TEST IF REWOUND ONCE ALREADY 31812 105 212 6 0 0 0 212 31813 127 318 17 0 1 0 318 gNO 31814 126 329 2 0 0 0 329 gREAD 31815 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 31816 124 316 48 1 0 0 316 gALIGNMENT FAILURE 31813>31817 126 357 2 0 0 0 357 gCOUNT 500 MILLISECS 31818 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 31819 124 188 2 0 1 0 188 REWIND 31820 119 0 1 1 0 31821 106 210 6 0 0 0 210 31822 124 188 2 0 1 0 188 SET REWIND INDICATOR 31823 107 190 98 0 0 0 190 TO COUNT 500 MILLI-SECS 31824 124 3 0 1 0 31825 126 173 0 1 0 gLEAVE S/R 31809>31826 124 318 2 0 1 0 318 31827 124 1 1 0 0 gLEAVE S/R+1 31900 PROCR 319 319 STEP ATTEMPTS COUNTER S/R 31902 100 0 0 0 0 LINK 31903 126 339 2 0 0 0 339 gSET(MR3)=(3) 31904 106 185 0 3 0 STEP ATTEMPTS COUNTER 31905 104 210 8 0 0 0 210 31906 103 185 0 3 0 31907 101 6 1 2 0 TEST COUNTER IS SIX 31908 127 319 10 0 0 0 319 gYES 31909 126 319 2 0 1 0 319 gLEAVE S/R 31908>31910 126 320 2 0 0 0 320 *5+e CLEAR C+185 TEST IF IN OPT 13 31911 106 210 8 0 0 0 210 SET INDICATOR 31912 102 187 0 3 0 31913 124 313 2 1 0 0 313 32000 PROCR 320 320 CLEAR 185 AND TEST IF IN CHANGE DECKS 32002 100 0 0 0 0 *5+t 32003 102 185 0 3 0 32004 106 164 0 3 0 TEST IN OPT 13 32005 127 320 7 0 1 0 320 gYES 32006 126 320 2 0 1 0 320 32005> 29404>32007 106 214 90 1 0 0 214 SET UP'CMD' 32008 102 258 4 1 0 0 258 32009 101 291 6 1 3 0 291 SELECT RETURN LINK 32010 124 282 10 1 0 0 282 gUNLOAD-OUTPUT COMMENT 32100 PROCR 321 321 COMMENT ON ALIGNMENT FAILURE CURED 32102 100 0 0 0 0 LINK 32103 101 2 1 3 0 *50t*5:t 32104 126 332 2 0 0 0 332 TEST CATEGORY SET 32105 127 321 28 0 1 0 321 *5:t gNO COMMENT 32106 106 321 2 0 0 0 321 STORE 32107 124 3 0 1 0 LINK 32108 102 173 0 0 0 32109 124 3 0 1 0 TEST ATTEMPTS COUNTE 32110 106 185 0 0 0 ZERO 32111 127 321 24 0 0 0 321 gYES 32112 106 214 82 1 0 0 214 SET UP 'SER' 32113 102 258 4 1 0 0 258 32114 126 361 2 0 0 0 361 gSET UP PART OF COMMENT 32115 102 258 12 1 0 0 258 CLEAR COL 5 32116 124 3 0 1 0 SET UP FOUND SERIAL NO 32117 106 184 0 0 0 32118 102 258 10 0 0 0 258 32119 124 3 0 1 0 CLEAR ATTEMPTS CTR 32120 102 185 0 0 0 32121 124 321 23 0 2 0 321 32122 124 426 63 1 0 0 426 g 32123 126 359 2 0 0 0 359 gSET SI=4,RESTORE LINK FOR SI=3 32111>32124 106 30 1 1 0 STORE RTE NUMBER AND 32125 102 188 2 1 0 0 188 TYPE 32126 124 3 0 1 0 32127 126 173 0 1 0 *50t 32105>32128 125 0 1 2 0 32129 124 3 0 1 0 32130 102 185 0 0 0 CLEAR ATTEMPTS COUNTER 32131 126 321 2 0 1 0 321 32200 PROCR 322 322 TEST ALIGNING FROM O/P S/R 32202 100 0 0 0 0 LINK 32203 126 339 2 0 0 0 339 SET(MR3)=(3) 32204 106 162 0 3 0 TEST ALIGNING FROM 32205 101 286 24 1 2 0 286 M/T O/P DB 32206 127 322 21 0 0 0 322 gYES 32207 101 286 24 1 1 0 286 *5+t TEST ALIGNING FROM 32208 101 292 63 1 2 0 292 CHANGE DECKS 32209 127 322 13 0 1 0 322 gNO 32210 106 175 0 3 0 TEST IF O/P 32211 127 322 21 0 1 0 322 *5+t gYES 32218> 32220>32212 126 322 2 0 1 0 322 gLEAVE S/R 32209>32213 106 162 0 3 0 *5+t TEST ALIGNING FROM 32214 101 446 8 1 2 0 446 *1et STEP FORWARD 32215 127 322 19 0 0 0 322 gYES 32216 101 446 8 1 1 0 446 *1et TEST ALIGNING FROM 32217 101 444 45 1 2 0 444 STEP BACK 32218 127 322 12 0 1 0 322 gNO 32215>32219 106 181 0 3 0 TEST O/P 32220 127 322 12 0 1 0 322 *5+t gNO 32211> 32206>32221 124 322 2 0 1 0 322 32222 124 1 1 0 0 gLEAVE S/R+1 32300 PROCR 323 323 TEST OPTION INDICATOR S/R 32302 100 0 0 0 0 LINK 32303 124 3 0 1 0 TEST OPTION 32304 106 171 0 0 0 INDICATOR SET 32305 127 323 9 0 0 0 323 gNO 32306 126 339 2 0 0 0 339 SET(MR3)=(3) 32307 126 320 2 0 0 0 320 *5+e CLEAR C+185 TEST IF IN OPT 13 32308 124 313 2 1 0 0 313 32305>32309 126 323 2 0 1 0 323 gLEAVE S/R 32400 PROCR 324 324 UNLOAD CALL FOR NEW TAPE 32401 NOTES RADIX B 32402 100 0 0 0 0 LINK 32403 106 324 2 0 0 0 324 32404 126 362 2 0 0 0 362 gUNLOAD ETC. 42207>32405 126 326 2 0 0 0 326 *179 ALTERNATE ROUTES 41065>32406 106 215 16 1 0 0 215 SET UP'NEW' 32407 102 258 4 1 0 0 258 32408 101 4 1 3 0 32409 126 345 2 0 0 0 345 gEDIT TIME, SET UP RTE NO 32410 126 311 2 0 0 0 311 g 32411 102 258 8 0 0 0 258 STORE REEL NO 32412 124 432 10 1 0 0 432 gOUTPUT COMMENT 32500 PROCR 325 325 ALTERNATE PAPER TAPE ROUTES 32501 NOTES RADIX B 32502 100 0 0 0 0 *02t*18t88t 32503 126 327 2 0 0 0 327 *18t gALTERNATE ROUTES 32504 124 325 6 1 0 0 325 g 32505 126 325 2 0 1 0 325 *18t 53139> 32504>32506 126 212 12 1 3 0 212 SET (MR3)=12:0 32521>32507 124 221 3 0 1 0 221 COPY FILE DETAILS 32508 106 252 50 0 3 0 252 *53+3:+ 00042 32509 124 188 2 0 1 0 188 32510 102 252 50 0 3 0 252 *53+3:+ 00042 32511 124 221 3 0 1 0 221 *53t0tt3:t 32512 106 252 54 0 0 0 252 *53+3:+ 00046 32513 124 188 2 0 1 0 188 32514 102 252 54 0 0 0 252 *53+3:+ 00046 32515 124 221 3 0 1 0 221 32516 106 252 66 0 0 0 252 *53+3:+ 00058 32517 124 188 2 0 1 0 188 32518 102 252 66 0 0 0 252 *53+3:+ 00058 32519 126 325 2 0 1 0 325 *53t0tt3:t 32520 125 4 0 3 0 TEST ALL DETAILS COP 32521 124 325 7 1 0 0 325 gNO 32522 126 325 2 0 1 0 325 gLEAVE S/R 32600 PROCR 326 326 ALTERNATE MAGNETIC TAPE ROUTES 32601 NOTES RADIX B 32602 100 0 0 0 0 *17t LINK 32603 126 327 2 0 0 0 327 gALTERNATE ROUTES 32604 124 326 6 1 0 0 326 g 32605 126 326 2 0 1 0 326 32604>32606 126 108 18 1 3 0 108 SET (MR3) 32612>32607 124 221 3 0 1 0 221 COPY FILE DETAILS 32608 106 190 2 0 3 0 190 32609 124 188 2 0 1 0 188 32610 102 190 2 0 3 0 190 32611 125 32 0 3 0 *244*234*224 000240001600008 32612 124 326 7 1 0 0 326 gNO 32613 126 326 2 0 1 0 326 g LEAVE S/R 32700 PROCR 327 327 ALTERNATE ROUTES 32701 NOTES RADIX B 32702 100 0 0 0 0 *17t18t LINK 32703 106 39 0 1 0 TEST M/R 32704 105 230 2 0 0 0 230 32705 127 327 33 0 0 0 327 gYES 32706 126 353 2 0 0 0 353 gSELECT RTE NO FROM LAST CHAPTER 32707 127 327 12 0 0 0 327 gYES TEST REQ'D ENTRY 32708 125 2 0 3 0 TEST END OF TABLE 32709 124 353 4 1 0 0 353 *17t18t gNO 45013>32710 101 87 1 3 0 CODE LETTER G 32711 124 208 3 1 0 0 208 g OUTPUT XXX COMMENT 32707>32712 101 12 0 1 0 *17t18t 32713 115 34 0 3 0 TEST ALT. RTE. ALLOC 32714 105 210 5 0 0 0 210 32715 127 327 33 0 0 0 327 gNO 32716 106 34 0 3 0 INTERCHANGE ROUTE NUMBERS 32717 118 5 0 0 0 32718 104 35 0 3 0 32719 102 34 1 3 0 32720 101 3 0 1 0 32721 115 34 0 3 0 32722 126 328 2 0 0 0 328 gS/R 32723 124 188 2 0 1 0 188 32724 106 64 0 0 0 SET UP NEW (64+R) 32725 124 221 2 0 1 0 221 32726 102 64 0 0 0 32727 106 188 2 0 0 0 188 STORE RTE NUMBER 32728 102 221 3 0 0 0 221 32729 106 221 2 0 0 0 221 32730 103 30 0 1 0 SET UP RTE NO IN SI & 137/2 32731 102 188 2 0 0 0 188 32732 126 327 2 0 1 0 327 g LEAVE S/R 32715> 32705>32733 124 327 2 0 1 0 327 32734 124 1 1 0 0 g 32800 PROCR 328 328 CHANGE ROUTE NUMBERS IN PARAMETER LISTS 32802 100 0 0 0 0 *17t18t11t13t LINK 32803 102 221 2 0 0 0 221 STORE NEW RTE NUMBER 32804 106 6 0 0 0 SET (MR3) = O/PSN OF RTE IN LIST 32805 105 3 0 0 0 32806 118 4119 1 0 0 32807 113 212 6 0 0 0 212 32808 102 6 1 0 0 32809 106 3 0 0 0 SET (MR2) = START OF LAST CHAP + 32810 103 4 0 0 0 2 * (NO OF CHAPS INITIALLY -1)/START OF 32811 105 212 6 0 0 0 212 32812 102 5 0 0 0 32813 106 4 0 2 0 32814 104 4 0 2 0 32815 107 5 0 0 0 32816 104 210 8 0 0 0 210 SET (MR3) = 0/NO OF CHAPS INITIALLY + 32828>32817 104 20 0 2 0 POSN OF RTE IN LIST + 1 + START OF CTH 32818 107 6 0 0 0 32819 106 0 0 3 0 TEST CORRECT RTE NO 32820 105 188 2 0 0 0 188 32821 127 328 24 0 0 0 328 gYES 32822 101 86 1 3 0 SELECT CODE LETTER 'F' 32823 124 208 3 1 0 0 208 gXXX COMMENT 32821>32824 106 221 2 0 0 0 221 SUBSTITUTE NEW RTE NO 32825 102 0 0 3 0 32826 105 20 0 2 0 SUBTRACT START OF CTH CHAP 32827 125 2 0 2 0 TEST ALL CHAPTERS 32828 124 328 17 1 0 0 328 gNO AMENDED 32829 126 328 2 0 1 0 328 gLEAVE S/R 32900 PROCR 329 329 READ 32901 NOTES RADIX B 32902 100 0 0 0 0 LINK 32903 124 188 2 0 1 0 188 READ 32904 119 0 0 1 0 32905 126 329 2 0 1 0 329 g LEAVE S/R 33000 PROCR 330 330 WRITE 33001 NOTES RADIX B 33002 100 0 0 0 0 LINK 33003 124 188 2 0 1 0 188 WRITE 33004 119 0 0 0 0 33005 126 330 2 0 1 0 330 gLEAVE S/R 33100 PROCR 331 331 STEP BLOCK COUNTER BY-1 33102 100 0 0 0 0 33103 100 210 3 0 3 0 210 SET DECIMAL 33104 101 1 1 2 0 33105 126 333 2 0 0 0 333 gSTEP COUNTER 33106 126 331 2 0 1 0 331 gLEAVE S/R 33200 PROCR 332 332 TEST OMIT CATEGORY 33202 100 0 0 0 0 *5:t 33203 102 221 2 0 0 0 221 STORE CATEGORY NO 33204 100 210 8 0 2 0 210 ALIGN ON 33205 124 221 2 0 1 0 221 CATEGORY SETTING 33206 118 0 1 3 0 33207 115 508 20 0 0 0 508 COLLATE CATEGORY 33208 126 332 2 0 1 0 332 gLEAVE S/R 33300 PROCR 333 333 STEP BLOCK COUNTER BY (A) 33301 NOTES RADIX B 33302 100 0 0 0 0 LINK 33303 100 210 3 0 3 0 210 SET DECIMAL 33304 124 188 2 0 1 0 188 RTE. NO. 33305 107 190 2 0 0 0 190 M/T FILE DETAILS BLOCK COUNTER 33306 100 212 2 0 3 0 212 SET BINARY 33307 126 333 2 0 1 0 333 g LEAVE S/R 33400 PROCR 334 334 STEP REEL COUNTER BY 1 33401 NOTES RADIX B 33402 100 0 0 0 0 LINK 33403 106 210 8 0 0 0 210 33404 100 210 3 0 3 0 210 33405 124 188 2 0 1 0 188 33406 107 190 34 0 0 0 190 33407 100 212 2 0 3 0 212 33408 126 334 2 0 1 0 334 gLEAVE S/R 33500 PROCR 335 335 OFFER OPTIONS 33501 NOTES RADIX B 41523> 44233> 31314> 29422> 27933>33502 124 3 0 1 0 EDIT INTO SPECIAL CHAP 33503 128 130 1 2 0 29004>33504 126 176 2 0 0 0 176 gREQUEST T/W FOR OPTIONS 33505 106 258 14 1 0 0 258 SELECT TABLE ENTRY 33506 104 3 0 0 0 33507 128 102 4 1 1 0 102 BULKCOPY TO T/W ANNEXE 33508 101 263 2 1 3 0 263 SET UP LOCN BEFORE 1ST OPTION 33509 102 43 0 1 0 33510 106 2 0 0 0 SET (913/2)=SI+0 33511 102 222 4 0 0 0 222 33512 106 210 6 0 0 0 210 SET 15 IN Q5 OF (SI+38) 33513 102 38 0 1 0 33514 124 181 2 1 0 0 181 gOUTPUT COMMENT 33600 PROCR 336 336 OUTPUT COMMENT 33601 NOTES RADIX B 37010> 43212> 45127> 28212>33602 124 3 0 1 0 SET UP COMMENT IN SPCHAPTER 33603 128 130 1 2 0 41442> 42673>33604 126 177 2 0 0 0 177 gREQUEST T/W 33605 106 258 14 1 0 0 258 SELECT TABLE ENTRY 33606 104 3 0 0 0 33607 128 102 4 1 1 0 102 BULK COPY TO T/W ANNEXE 33608 124 3 0 1 0 33609 106 176 0 0 0 SET SWITCH S101 33610 102 336 11 0 0 0 336 33611 100 0 0 0 0 SWITCH S 101 33612 124 181 2 1 0 0 181 gOUTPUT COMMENT 33700 PROCR 337 337 NB PREVIOUS ORDER IS'SWITCH 101',EITHER'25/1/0 0'IF'ZZZ'COMMENT 33701 NOTES OR'26/0/0'TO'SET SI=1'OR'SET SI=5' 33800 PROCR 338 338 SET SI=1 33801 NOTES RADIX B 33802 100 0 0 0 0 LINK 33803 106 209 4 0 0 0 209 33804 105 30 0 1 0 33805 102 7 0 1 0 *163 33806 126 338 2 0 1 0 338 gLEAVE S/R 33900 PROCR 339 339 SET (MR3)=(3) 33901 NOTES RADIX B 33902 100 0 0 0 0 LINK 33903 106 3 0 0 0 33904 102 6 1 0 0 33905 126 339 2 0 1 0 339 gLEAVE S/R 34000 PROCR 340 340 SET(MR3)=R 34001 NOTES RADIX B 34002 100 0 0 0 0 LINK 34003 106 188 2 0 0 0 188 34004 102 6 1 0 0 34005 126 340 2 0 1 0 340 gLEAVE S/R 34100 PROCR 341 341 SET (MR3)=(64+R) 34101 NOTES RADIX B 34102 100 0 0 0 0 LINK 34103 124 188 2 0 1 0 188 34104 106 64 0 0 0 34105 102 6 1 0 0 34106 126 341 2 0 1 0 341 gLEAVE S/R 34200 PROCR 342 342 SET(64+R)FOR HIGH DENSITY 34202 100 0 0 0 0 *01t 34203 126 188 2 1 2 0 188 SET(MR2)=R 34204 100 210 8 0 2 0 210 SET(B) 34205 106 191 64 0 2 0 191 34206 114 64 0 2 0 34207 126 342 2 0 1 0 342 gLEAVE S/R 34300 PROCR 343 343 CLEAR BIT 1 OF ASL IF HIGH DENSITY 34302 100 0 0 0 0 *01t 34303 125 0 1 2 0 34304 100 210 8 0 2 0 210 SET(B)=1 34305 124 188 2 0 1 0 188 34306 114 64 0 0 0 CLEAR BIT 1 34307 126 343 2 0 1 0 343 34400 PROCR 344 344 SUBROUTINE WW 34402 100 0 0 0 0 *42t 34403 125 0 1 2 0 34404 100 220 3 0 2 0 220 34405 115 188 2 0 0 0 188 34406 102 109 2 0 0 0 109 *16t53t0tt 34407 106 188 2 0 0 0 188 34408 118 1 0 3 0 34409 118 4127 0 0 0 34410 101 3 1 2 0 34411 127 344 16 0 0 0 344 gYES 34412 106 109 2 0 0 0 109 34413 118 2 0 3 0 SET W/L=4R+88 34414 101 88 1 1 0 *0t+53+3:+ 00056 34415 124 344 18 1 0 0 344 34411>34416 106 109 2 0 0 0 109 *16t53t0tt 34417 118 3 0 3 0 SET W/L=8R 34415>34418 102 109 2 0 0 0 109 34419 126 344 2 0 1 0 344 34500 PROCR 345 345 EDIT TIME SET UP RTE NO 34501 NOTES RADIX 34502 100 0 0 0 0 LINK 34503 126 346 2 0 0 0 346 gEDIT TIME 34504 100 210 12 0 3 0 210 SET (C)=66668 34505 101 213 28 1 3 0 213 SELECT TABLE START LOCN 34506 112 30 0 1 0 CONVERT RTE NUMBER 34507 100 212 2 0 3 0 212 RESET(C)BINARY 34508 102 258 7 0 0 0 258 34509 126 345 2 0 1 0 345 gLEAVE S/R 34600 PROCR 346 346 EDIT TIME R/S IF REQ INTO SP CHPT 34601 NOTES RADIX B 34602 100 0 0 0 0 LINK 34603 101 217 36 1 1 0 217 34604 124 3 0 1 0 34605 128 128 1 2 0 34606 126 346 2 0 1 0 346 gLEAVE S/R 34607 103 0 0 0 0 *££0*££2*2£e 34608 126 212 2 1 3 0 212 *4:3 34609 126 385 2 0 0 0 385 *163 34610 126 351 2 0 0 0 351 *09e06e TEST RTE NOTING D/B 34611 125 0 1 2 0 *3:3*4£3 34612 127 367 31 0 0 0 367 *16e 34700 PROCR 347 347 SET ASSOC TIME=CURRENT TIME+3 MIN 34701 NOTES 0 34702 100 0 0 0 0 *46t 34703 100 210 9 0 3 0 210 *31t SET(C)=66t6.6 34704 106 347 2 0 0 0 347 *6£t 34705 101 270 5 1 2 0 270 34706 127 347 9 0 1 0 347 34707 106 45 0 1 0 34708 127 347 14 0 0 0 347 *6£t 34706>34709 106 156 0 0 0 SELECT CURRENT TIME 34710 104 212 11 0 0 0 212 ADD 48(=3MIN) 34711 102 45 0 1 0 SET ASSOC TIME 34712 100 212 2 0 3 0 212 RESET (C) BINARY 34713 126 347 2 0 1 0 347 LEAVE S/R 34708>34714 106 156 0 0 0 *6£t 34715 101 2 1 1 0 34716 102 45 0 1 0 34717 100 212 2 0 3 0 212 SET BINARY 34718 124 127 11 1 0 0 127 *31t*6£t 34719 106 156 0 0 0 *312 34720 104 347 23 0 0 0 347 ADD 3 MIN 34721 102 45 0 1 0 34722 126 347 2 0 1 0 347 34723 100 3808 0 1 0 *2£e CONSTANT 34800 PROCR 348 348 CLEAR RTE TYPE AND D/B INDICATOR 34801 NOTES RADIX B 34802 100 0 0 0 0 LINK 34803 125 0 1 2 0 34804 102 188 3 0 0 0 188 CLEAR RTE TYPE 34805 124 3 0 1 0 34806 102 160 0 0 0 34807 126 348 2 0 1 0 348 gLEAVE S/R 34900 PROCR 349 349 UPDATE USE OF ASSEMBLER TABLE 34901 NOTES RADIX B 34902 100 0 0 0 0 LINK 34903 125 0 1 2 0 DRAIN 34904 100 210 10 0 2 0 210 SET (B)=56 34905 115 188 2 0 0 0 188 SET(MR3)=8*CH.NO 34906 102 6 0 0 0 34907 106 188 2 1 0 0 188 UPDATE TABLE 34908 102 252 2 1 3 0 252 34909 126 349 2 0 1 0 349 gLEAVE S/R 35000 PROCR 350 350 TEST RTE DEALING WITH D/B 35001 NOTES RADIX B TIMINGS ON 35002 100 0 0 0 0 LINK 35003 106 350 2 0 0 0 350 SELECT LINK 35004 124 351 5 1 0 0 351 35100 PROCR 351 351 TEST ROUTE NOTING D/B 35101 NOTES RADIX B TIMINGS ON 35102 100 0 0 0 0 LINK 35103 126 348 2 0 0 0 348 gCLEAR RTE TYPE AND D/B INDICATOR 35104 106 351 2 0 0 0 351 SELECT LINK 35004> 28925>35105 101 267 2 1 2 0 267 SET UP PSEUDO ROUTE TYPE IN SI 35106 104 209 12 0 0 0 209 36559> 37606> 42141> 30331>35107 102 31 0 1 0 35108 126 349 2 0 0 0 349 g UPDATE ASSEMBLER TABLE 35109 102 45 0 1 0 SET ASSOC. TIME=0 35110 124 264 30 1 0 0 264 g SET SI=1, TEST RTE 35200 PROCR 352 352 TEST RTE NOTING D/B 35201 NOTES RADIX B TIMINGS OFF 35202 100 0 0 0 0 *09t06t 35203 126 348 2 0 0 0 348 gCLEAR RTE TYPE AND D/B INDICATOR 35204 106 352 2 0 0 0 352 SELECT LINK 35205 101 267 2 1 2 0 267 SET UP PSEUDO ROUTE TYPE 35206 104 209 12 0 0 0 209 IN SI+31 35207 102 31 0 1 0 35208 126 349 2 0 0 0 349 UPDATE ASSEMBLER TABLE 35209 102 45 0 1 0 SET ASS TIME=0 35210 126 338 2 0 0 0 338 gSET SI=1 35211 124 264 35 1 0 0 264 gSI+7 35300 PROCR 353 353 SELECT RTE NOS FROM LAST CHAPTER 35301 NOTES RADIX B 35302 100 0 0 0 0 *11t13t17t18t 35303 126 354 2 0 0 0 354 gSET (MR3)=START OF LC+2*NO OF FILES/STA 45012> 52972> 32709>35304 125 0 1 2 0 COLLATE RTE NO FROM LIST 35305 101 3 0 1 0 35306 115 34 0 3 0 35307 105 188 2 0 0 0 188 35308 126 353 2 0 1 0 353 g LEAVE S/R 35400 PROCR 354 354 SET (MR3)=START OF LC+2*NO OF FILES/START OF LC SUBROUTINE 35402 100 0 0 0 0 35403 106 3 0 0 0 35404 103 6 0 0 0 35405 104 5 0 3 0 35406 104 5 0 3 0 35407 102 7 0 0 0 35408 126 354 2 0 1 0 354 35500 PROCR 355 355 STEP FORWARD 35501 NOTES RADIX B 35502 100 0 0 0 0 LINK 35503 124 188 2 0 1 0 188 STEP FORWARD 35504 119 0 1 3 0 35505 126 355 2 0 1 0 355 g LEAVE S/R 35600 PROCR 356 356 SET UP PROGRAMME NUMBER 35601 NOTES RADIX B 35602 100 0 0 0 0 LINK 35603 106 39 0 1 0 35604 102 258 6 0 0 0 258 35605 126 356 2 0 1 0 356 g LEAVE S/R 35700 PROCR 357 357 COUNT 500 MILLISECS 35701 NOTES RADIX B 35702 100 0 0 0 0 LINK 35703 106 487 2 0 0 0 487 *5.t*3+t*092*062 35704 127 357 28 0 1 0 357 *3t1 35705 127 357 29 0 1 0 357 *3t9 35706 126 339 2 0 0 0 339 SET(MR3)=(3) 35707 106 357 2 0 0 0 357 STORE LINK 35708 102 190 0 3 0 35709 106 157 0 0 0 35710 102 191 0 3 0 35721>35711 124 357 13 0 2 0 357 FOR SI=5 LINK 35712 124 462 9 1 0 0 462 35713 100 210 3 0 3 0 210 DECIMAL 35714 106 157 0 0 0 35715 124 3 0 1 0 35716 105 191 0 0 0 35717 127 357 19 0 2 0 357 35718 104 209 12 0 0 0 209 10,000 35717>35719 101 384 1 2 0 35720 100 212 2 0 3 0 212 BIN 35721 127 357 11 0 3 0 357 gNOT TIME YET 35722 126 359 2 0 0 0 359 gSET SI=4,RESTORE LINK FOR SI=3 35723 106 30 1 1 0 RESTORE RT. TYPE 35724 102 188 2 1 0 0 188 35725 126 351 2 0 0 0 351 TEST ROUTE NOTING D/B 35726 124 3 0 1 0 35727 126 190 0 1 0 *5.t*3+t*092*062 35704>35728 106 357 33 0 0 0 357 *3t1 35705>35729 101 2143 1 3 0 *3t9*2e4*2+4*2:4 00000028390485402000 35731>35730 101 1 1 2 0 35731 127 357 30 0 1 0 357 35732 126 357 2 0 1 0 357 35733 100 6192 0 3 0 *3t1 35800 PROCR 358 358 STEP COUNTER C 35801 NOTES RADIX B 35802 100 0 0 0 0 LINK 35803 124 3 0 1 0 STEP COUNTER C 35804 106 167 0 0 0 35805 104 210 8 0 0 0 210 35806 124 3 0 1 0 35807 103 167 0 0 0 35808 101 6 1 2 0 35809 126 358 2 0 1 0 358 g LEAVE S/R 35900 PROCR 359 359 SET SI=4, RESTORE LINK FOR SI=3 35901 NOTES RADIX B 35902 100 0 0 0 0 LINK 35903 124 270 2 0 2 0 270 *464 00004 35904 102 42 0 1 0 35905 106 35 0 1 0 SET SI=4 35906 102 7 0 1 0 *163 35907 126 359 2 0 1 0 359 gLEAVE S/R 36000 PROCR 360 360 SET SI=5 36001 NOTES RADIX B 36002 100 0 0 0 0 LINK 36003 106 35 0 1 0 36004 104 212 6 0 0 0 212 36005 102 7 0 1 0 *163 36006 126 360 2 0 1 0 360 g LEAVE S/R 36100 PROCR 361 361 SET UP PART OF ALARM & DB/COMMENT 36101 NOTES RADIX B 36102 100 0 0 0 0 LINK 36103 126 345 2 0 0 0 345 gEDIT TIME, SET UP RTE NO 36104 126 356 2 0 0 0 356 gSET UP PROG NO 36105 124 188 2 0 1 0 188 SET UP EXPECTED BLOCK NO 36106 106 190 2 0 0 0 190 36107 102 258 8 0 0 0 258 36108 126 361 2 0 1 0 361 g LEAVE S/R 36200 PROCR 362 362 SET ROUTE TO MANUAL OR UNLOAD 36201 NOTES RADIX B 36202 100 0 0 0 0 LINK 36203 101 267 2 1 2 0 267 SET PSEUDO RTE TYPE 36204 102 31 0 1 0 36205 106 211 3 0 0 0 211 36206 102 188 3 0 0 0 188 UPDATE ASSEMBLER TABLE 36207 126 349 2 0 0 0 349 gCLEAR ASSEMBLER TABLE 36208 124 188 2 0 1 0 188 SET RTE TO MANUAL ORUNLOAD 36209 119 0 1 2 0 36210 126 347 2 0 0 0 347 *469 SET PROG TIME 3 MINS AHEAD OF CLOCK 36211 106 270 17 0 0 0 270 36212 124 3 0 1 0 SET SETTING FOR S101 36213 102 176 0 0 0 TO TEST ROUTE 36214 101 4 1 3 0 36215 126 345 2 0 0 0 345 gEDIT TIME, SET UP RTE. NO. 36216 126 356 2 0 0 0 356 gSET UP PROG NO 36217 126 362 2 0 1 0 362 gLEAVE S/R 36300 PROCR 363 363 SET LINK FOR SI=5 & SETTING FOR S101 36301 NOTES RADIX B 36302 100 0 0 0 0 LINK 36303 102 42 0 1 0 SET LINK FOR SI=5 36304 106 176 21 0 0 0 176 36305 124 3 0 1 0 SET SETTING FOR S101 36306 102 176 0 0 0 36307 126 363 2 0 1 0 363 g LEAVE S/R 36400 PROCR 364 364 *07 OPEN PAPER TAPE INPUT FILE 36401 NOTES RADIX B 26717>36402 106 210 8 0 0 0 210 *02t SET REEL CNTR=1 36403 124 188 2 0 1 0 188 36404 102 252 66 0 0 0 252 *53+0t+3:+*53+3:+ 0005000058 36405 126 367 2 0 0 0 367 gREAD, TEST SENTINEL 36406 126 368 2 0 0 0 368 gTEST REEL NO 36407 127 370 2 0 1 0 370 gHDG COMMENT TEST REEL CNTR=t 36408 126 369 2 0 0 0 369 g TEST CORRECT FILE 36409 127 370 2 0 1 0 370 gHDG COMMENT LETTER & SUITE NO 36410 106 3 1 3 0 STORE PROG NO 36411 124 188 2 0 1 0 188 36412 102 252 50 0 0 0 252 *53+3:+ 00042 36413 106 5 0 3 0 STORE FILE ID 36414 124 188 2 0 1 0 188 36415 102 252 54 0 0 0 252 *53+3:+ 00046 36416 101 3 0 1 0 STORE REEL NO 36417 115 5 1 3 0 36418 124 188 2 0 1 0 188 36419 102 252 66 0 0 0 252 *53+0t+3:+*53+3:+ 0005000058 36420 126 377 2 0 0 0 377 *429 STORE FIRST TWO WORD 36421 101 5 1 3 0 *02t SELECT RTE TYPE 36608>36422 102 188 3 0 0 0 188 *02t04t 36423 124 3 0 1 0 36424 102 168 0 0 0 CLEAR(168) 36425 126 329 2 0 0 0 329 g READ 36426 124 269 3 1 0 0 269 gUPDATE ASSEMBLER TABLE 36500 PROCR 365 365 UNLOAD:OPEN PAPER TAPE I/P REEL 36501 NOTES RADIX B 37329>36502 101 365 35 1 3 0 365 *02t 36503 126 362 2 0 0 0 362 gUNLOAD ETC 36504 126 325 2 0 0 0 325 *189 gALTERNATE ROUTES 36505 106 215 16 1 0 0 215 SET UP'NEW' 36506 102 258 4 1 0 0 258 36507 101 4 1 3 0 36508 126 345 2 0 0 0 345 gEDIT TIME, SET UP RTE NO 36509 126 340 2 0 0 0 340 gSET (MR3)=R 36510 106 252 54 0 3 0 252 *53+3:+ FILE ID 00046 36511 118 1 0 0 0 36512 101 49 1 1 0 36513 118 4 0 0 0 36514 102 258 10 1 0 0 258 36515 106 252 66 0 3 0 252 *53+0t+3:+*53+3:+ 0005000058 RL CTR=t? 36516 101 10 1 2 0 36517 127 365 33 0 0 0 365 gYES 36518 106 252 66 0 3 0 252 *53+0t+3:+*53+3:+ 0005000058 RL CTR=99 36519 100 210 3 0 3 0 210 36520 101 153 1 2 0 36521 127 365 31 0 0 0 365 gYES 36522 101 154 1 1 0 STEP REEL COUNTER 36532>36523 100 212 2 0 3 0 212 36524 103 252 66 0 3 0 252 *53+0t+3:+*53+3:+ 0005000058 36525 102 258 19 1 0 0 258 SET UP REEL NO 36526 106 258 18 1 0 0 258 36534>36527 107 258 10 1 0 0 258 36528 106 252 50 0 3 0 252 *53+3:+ 00042 36529 102 258 8 0 0 0 258 36530 124 432 11 1 0 0 432 gOUTPUT COMMENT 36521>36531 106 210 8 0 0 0 210 SET REEL CNTR=-1 36532 124 365 23 1 0 0 365 g 36517>36533 101 4112 1 3 0 SET-? FOR COMMENT 36534 124 365 27 1 0 0 365 g 36535 126 367 2 0 0 0 367 gREAD, TEST SENTINEL 36536 126 368 2 0 0 0 368 gTEST REEL NO 36537 127 371 2 0 1 0 371 gHDG COMMENT TEST REEL CNTR=t 36538 115 5 1 3 0 STORE REEL NO 36539 124 188 2 0 1 0 188 36540 102 252 66 0 0 0 252 *53+0t+3:+*53+3:+ 0005000058 36541 106 3 1 3 0 TEST CORRECT PROG NO 36542 124 188 2 0 1 0 188 36543 105 252 50 0 0 0 252 *53+3:+ 00042 36544 127 371 2 0 1 0 371 gHDG COMMENT 36545 106 5 0 3 0 TEST CORRECT FILE ID 36546 124 188 2 0 1 0 188 36547 105 252 54 0 0 0 252 *53+3:+ 00046 36548 127 371 2 0 1 0 371 gHDG COMMENT 36549 124 3 0 1 0 36550 102 168 0 0 0 CLEAR(168) 36551 106 365 60 0 0 0 365 CLEAR FIRST 36552 118 5 0 0 0 EIGHT LOCATIONS 36553 124 188 2 0 1 0 188 36554 124 64 1 2 0 36555 128 0 0 0 0 36556 126 329 2 0 0 0 329 gREAD 36557 101 5 1 3 0 SET UP RTE TYPE 36558 103 188 3 0 0 0 188 36559 124 351 7 1 0 0 351 g TEST RTE, DEALING WITH D/B 36560 102 8 0 0 0 36600 PROCR 366 366 OPEN CARD INPUT FILE 36601 NOTES RADIX B 26718>36602 126 367 2 0 0 0 367 *04t READ,TEST SENTINEL 36603 126 369 2 0 0 0 369 g TEST FILE LETTER & 36604 127 370 2 0 1 0 370 gHDG COMMENT SUITE NO 36605 106 210 15 0 0 0 210 *669 36606 126 377 2 0 0 0 377 *429 STORE FIRST 2 WORDS 36607 101 6 1 3 0 SELECT RTE TYPE 36608 124 364 22 1 0 0 364 g 36700 PROCR 367 367 READ, TEST ROUTE, TEST SENTINEL 36701 NOTES RADIX B 36702 100 0 0 0 0 LINK 36703 106 367 2 0 0 0 367 36704 124 3 0 1 0 36705 102 168 0 0 0 36706 126 329 2 0 0 0 329 gREAD 36707 124 3 0 1 0 *04t*02t 36708 106 168 0 0 0 36709 101 366 3 1 2 0 366 36710 127 367 30 0 0 0 367 *02t*04t*16e 36711 101 5 1 3 0 *02+ 00006 36732>36712 102 188 3 0 0 0 188 36713 126 351 2 0 0 0 351 TEST ROUTE NOTING D/B 36714 124 3 0 1 0 TEST D/B 36715 106 160 0 0 0 OCCURRED 36716 127 367 20 0 0 0 367 gNO 36717 126 419 2 0 0 0 419 gSET UP HDG 36718 106 214 42 0 0 0 214 SET UP D/B 36719 124 370 6 1 0 0 370 g 36716>36720 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 36721 106 0 1 3 0 36722 105 211 12 1 0 0 211 TEST SENTINEL BLOCK 36723 127 372 2 0 1 0 372 gNO, 'SNT?' COMMENT 36724 101 4 0 1 0 TEST SENTINEL 36725 115 5 1 3 0 TYPE 1 36726 101 256 1 2 0 36727 127 372 2 0 1 0 372 gNO, 'SNT?' COMMENT 36728 124 3 0 1 0 36729 126 168 0 1 0 gLEAVE S/R 36710>36730 126 384 2 0 0 0 384 *169 TEST UPTIME 34612>36731 101 6 1 3 0 SELECT RT 36732 124 367 12 1 0 0 367 gTEST RTE 36800 PROCR 368 368 TEST REEL NUMBER 36801 NOTES RADIX B 36802 100 0 0 0 0 *02t LINK 36803 101 3 0 1 0 TEST REEL NO=t 36804 115 5 1 3 0 36805 105 213 14 0 0 0 213 36806 127 368 11 0 0 0 368 gYES 36807 104 213 14 0 0 0 213 TEST CORRECT REEL NO 36808 124 188 2 0 1 0 188 36809 105 252 66 0 0 0 252 *53+0t+3:+*53+3:+ 0005000058 36810 127 368 13 0 1 0 368 gNO 36806>36811 124 368 2 0 1 0 368 LEAVE S/R BY LINK+1 36812 124 1 1 0 0 g 36810>36813 124 188 2 0 1 0 188 TEST REEL CNTR=t 36814 106 252 66 0 0 0 252 *53+0t+3:+*53+3:+ 0005000058 36815 105 213 14 0 0 0 213 36816 126 368 2 0 1 0 368 g LEAVE S/R 36900 PROCR 369 369 TEST FILE LETTER & SUITE NUMBER 36901 NOTES RADIX B 36902 100 0 0 0 0 LINK 36903 101 768 0 1 0 COLLATE FILE LETTER 36904 115 4 1 3 0 36905 101 28 0 1 0 COLLATE SUITE NO. 36906 115 3 1 3 0 36907 102 258 4 1 0 0 258 NEGATE (A) 36908 115 33 0 1 0 36909 118 6 0 0 0 36910 115 32 0 1 0 36911 105 258 4 1 0 0 258 36912 126 369 2 0 1 0 369 g LEAVE S/R 37000 PROCR 370 370 HDG COMMENT OPEN P/T I/P FILE 37001 NOTES RADIX B 36604> 36409> 36407>37002 126 419 2 0 0 0 419 gSET UP HDG 37003 101 12 0 1 0 SET UP FILE LETTER 37004 115 33 0 1 0 37005 118 6 0 0 0 37204> 41445> 36719>37006 102 258 8 1 0 0 258 30261>37007 102 258 11 1 0 0 258 28114>37008 102 258 12 1 0 0 258 CLEAR COL 5 37009 124 261 30 0 2 0 261 37010 124 336 2 1 0 0 336 gOUTPUT COMMENT 37100 PROCR 371 371 HDG COMMENT:OPEN P/T INPUT REEL 37101 NOTES RADIX B 36548> 36544> 36537>37102 126 419 2 0 0 0 419 *02t gSET UP HDG 37103 124 282 11 1 0 0 282 gOUTPUT COMMENT 37200 PROCR 372 372 HDG COMMENT:NO SENTINEL 37201 NOTES RADIX B 36727> 36723>37202 126 419 2 0 0 0 419 gSET UP HDG 37203 106 258 24 1 0 0 258 SET UP SNT? 37204 124 370 6 1 0 0 370 gOUTPUT COMMENT 37300 PROCR 373 373 PAPER TAPE INPUT 37301 NOTES RADIX 26707>37302 102 373 12 0 0 0 373 *02t*4£1*3:1 37303 125 0 1 2 0 *6693:94£9 37304 126 377 2 0 0 0 377 *429 STORE FIRST 2 WORDS 37305 126 341 2 0 0 0 341 *422 37306 106 0 1 3 0 *422 37307 105 211 16 1 0 0 211 TEST F8M 37308 127 263 20 0 0 0 263 gYES 37309 105 211 14 1 0 0 211 SUBT SENTINEL MINUS FAULTY BLOCK WORD 37310 127 373 26 0 0 0 373 gYES TEST SENTINEL BLOCK 37311 126 430 2 0 0 0 430 *3:94£9 IAA 37312 100 0 0 0 0 *4£1*3:1 37313 125 0 1 2 0 CLEAR 2ND WORD 37314 124 188 2 0 1 0 188 OF ANNEXE 37315 124 64 0 1 0 37316 102 2 1 0 0 37317 106 33 0 1 0 *83t 37318 101 1 1 2 0 37319 127 373 23 0 1 0 373 gNOT 8-HOLE 37320 124 188 2 0 1 0 188 37321 119 0 1 1 0 READ 37322 124 268 8 1 0 0 268 *83t gUPDATE ASS TABLE 37319>37323 124 188 2 0 1 0 188 READ 37324 119 0 0 1 0 37325 124 268 8 1 0 0 268 gUPDATE ASSEMBLER TABLE 37310>37326 101 4 0 1 0 SET(B)=0.0.£.0.0 37327 115 5 1 3 0 COLLATE SENTINEL TYPE IN Q3 37328 101 512 1 2 0 SUBTRACT 2 IN Q3 TEST SENTINEL TYPE 2 37329 127 365 2 0 0 0 365 gOPEN NEXT I/P TAPE 37400 PROCR 374 374 SET UP SENTINEL:INPUT 37512>37402 106 188 3 0 0 0 188 STORE RTE TYPE 37403 124 3 0 1 0 37404 102 157 0 0 0 37405 106 258 24 1 0 0 258 SET UP SNT 37406 102 258 4 1 0 0 258 37407 101 376 2 1 3 0 376 37408 124 282 10 1 0 0 282 gOUTPUT 37500 PROCR 375 375 CARD INPUT 37501 NOTES RADIX B 26708>37502 102 375 15 0 0 0 375 *04t*3:3*4£3 37503 126 382 2 0 0 0 382 *16t TEST W/E IND 37504 127 381 12 0 0 0 381 *859 gEXTRA READ 37505 127 381 18 0 0 0 381 *16t*851 gEXTRA READ 38129>37506 106 210 15 0 0 0 210 *669 37835>37507 126 377 2 0 0 0 377 *429 STORE FIRST 2 WORDS 37834>37508 126 341 2 0 0 0 341 *422 SET(MR3)=(644R) 37509 106 0 1 3 0 *422 37510 127 375 13 0 3 0 375 gYES TEST 1ST WORD NEG 37511 105 211 12 1 0 0 211 SUBT SENTINEL WORD TEST SENTINEL BLOCK 37512 127 374 2 0 0 0 374 gYES 37510>37513 125 0 1 0 0 37514 126 430 2 0 0 0 430 *3:94£9 1AA SIR 37515 100 0 0 0 0 *4£1*3:1 37516 126 382 2 0 0 0 382 *16t TEST WIE IND 37517 127 268 9 0 0 0 268 *16t gPROGM 37518 124 188 2 0 1 0 188 READ 37519 119 0 0 1 0 37520 124 268 8 1 0 0 268 g 37600 PROCR 376 376 READ AFTER SENTINEL TYPE 3 37601 NOTES RADIX B 37602 126 329 2 0 0 0 329 gREAD 37603 124 3 0 1 0 37604 106 157 0 0 0 37605 103 188 3 0 0 0 188 37606 124 351 7 1 0 0 351 gTEST RTE,DEALING WITH D/B 37700 PROCR 377 377 STORE FIRST TWO WORDS S/R 37702 100 0 0 0 0 *42t 37703 102 369 2 0 0 0 369 *669 37704 126 341 2 0 0 0 341 SET(MR3)=(64+R) 37705 126 344 2 0 0 0 344 gS/R WW 37706 124 369 2 0 1 0 369 *669 37707 106 2 1 3 0 37708 124 109 2 0 1 0 109 37709 102 252 8 1 0 0 252 STORE SECOND WORD 37710 124 369 2 0 1 0 369 *669 37711 106 0 1 3 0 37712 124 109 2 0 1 0 109 37713 103 252 6 1 0 0 252 STORE FIRST WORD 37714 106 0 1 3 0 *669 37715 126 377 2 0 1 0 377 37800 PROCR 378 378 POCKET-SELECT UPTIME CARD READER 26751>37802 126 378 12 0 0 0 378 *16t gSTACK 37803 124 268 9 1 0 0 268 gPROGM 37804 126 378 6 0 0 0 378 37805 124 268 9 1 0 0 268 gPROGM 37806 100 0 0 0 0 37807 106 33 0 1 0 TEST LINK Q6-9 37808 127 263 19 0 0 0 263 gMISSING,ZZZ02 COMMENT 37809 101 15 0 1 0 PACK IN 44 OF SWITCH 37810 114 44 0 1 0 37811 126 378 6 0 1 0 378 37812 100 0 0 0 0 37813 106 32 0 1 0 37814 127 378 17 0 0 0 378 gPOCKET 2. 37815 106 440 9 0 0 0 440 19/0/2 INSTRUCTION REJECT 37816 124 378 18 1 0 0 378 37814>37817 106 330 4 0 0 0 330 19/0/0 INSTRUCTION ACCEPT 37816>37818 102 378 23 0 0 0 378 37819 106 188 2 0 0 0 188 PACK IN ROUTE NO 37820 101 7 0 1 0 PACKING CONST Q1-3 37821 114 378 23 0 0 0 378 19/ / ORDER 37822 114 378 24 0 0 0 378 26/1/0 ORDER 37823 119 0 0 0 0 POCKET SELECT 37824 126 0 1 0 0 TEST ROUTE 37825 100 1 0 0 0 CLOSED 37826 100 2 0 0 0 ENGAGED 37827 100 3 0 0 0 DOUBTFUL 37828 124 378 30 1 0 0 378 gSTATUS 4 37829 126 378 12 0 1 0 378 gAVAILABLE 37828>37830 124 378 12 0 1 0 378 37831 124 1 1 0 0 *16t gS/R+1 37832 124 379 34 1 0 0 379 *££0*££2*85e 37833 124 380 25 1 0 0 380 *85e85e 37834 124 375 8 1 0 0 375 *66e42e 37835 124 375 7 1 0 0 375 *66e 37836 124 390 4 1 0 0 390 *3:e4£e 37837 105 221 38 0 0 0 221 *85t85e 37900 PROCR 379 379 CLOSE UPTIME ROUTE 37902 100 0 0 0 0 *16t 37903 124 221 38 0 1 0 221 *852*0:t 37904 106 45 0 0 0 HAS BEEN PAUSED 37905 127 379 8 0 2 0 379 gNO 37906 124 379 2 0 1 0 379 YES LEAVE S/R+2 37907 124 2 1 0 0 *852*0:t 37905>37908 106 2 1 0 0 STORE 2,3 37909 102 221 36 1 0 0 221 37933>37910 124 221 35 0 1 0 221 *859 37911 106 221 38 0 0 0 221 SELECT START OF SWITCH 37912 127 379 31 0 0 0 379 *859 37913 105 221 36 0 0 0 221 TEST O'LAY PROGM 37914 127 379 27 0 0 0 379 *859 gYES 37915 127 244 13 0 0 0 244 *851 gYES 37920>37916 124 221 35 0 1 0 221 *859 37921>37917 124 221 39 0 1 0 221 37918 126 0 1 0 0 TEST ROUTE 37919 124 379 27 1 0 0 379 *85e CLOSED 37920 124 379 16 1 0 0 379 *859 ENGAGED 37921 124 379 17 1 0 0 379 *851 ENGAGED 37922 124 379 24 1 0 0 379 DOUBTFUL 37923 124 379 27 1 0 0 379 *85e W/E 37922>37924 124 221 35 0 1 0 221 CLOSE ROUTE 37925 124 221 39 0 1 0 221 37926 119 0 1 3 0 37923> 37919> 37914>37927 101 2 1 3 0 *85t 37928 104 221 35 0 0 0 221 ALL UPTIME PROGS DONE? 37929 105 221 34 0 0 0 221 37930 127 379 34 0 2 0 379 gYES 37912>37931 101 2 1 3 0 37932 107 221 35 0 0 0 221 STEP MODIFIER 37933 124 379 10 1 0 0 379 *85t 37930> 37832>37934 106 221 43 0 0 0 221 BEEN THOUGH SIR BEFORE? 37935 127 379 52 0 1 0 379 gYES 37936 126 212 8 1 3 0 212 SET UP MR3 TO STORE 7'S 37949>37937 106 6 0 0 0 37938 101 111 2 1 1 0 111 37939 126 386 2 0 0 0 386 *85t85e UPTIME? 37940 127 379 46 0 0 0 379 gYES 37941 106 111 9 0 3 0 111 37942 124 221 42 0 1 0 221 37943 102 221 44 0 0 0 221 37944 106 111 11 0 3 0 111 37945 102 111 9 0 3 0 111 37940>37946 101 1 1 3 0 37947 107 221 42 0 0 0 221 STEP MODIFIER 37948 125 48 0 3 0 37949 124 379 37 1 0 0 379 gNEXT SWITCH 37950 106 380 23 0 0 0 380 MAKE RC W/E GO TO END 37951 102 381 3 0 0 0 381 37935>37952 106 380 17 0 0 0 380 CORRUPT 160 37953 102 264 31 0 0 0 264 37954 106 177 10 0 0 0 177 STOP COMMENTS 37955 102 177 9 0 0 0 177 37956 102 221 35 0 0 0 221 CLEAR COUNTER 37957 102 221 42 0 0 0 221 CLEAR 7'S MODIFIER 12714>37958 106 104 4 0 0 0 104 SET L6=2 UNSET REQUEST 37959 102 103 27 0 0 0 103 TYPEWRITER 37960 106 221 43 0 0 0 221 AUGMENT NO TIMES 37961 101 1 1 1 0 37962 103 221 43 0 0 0 221 BEEN THROUGH S/R 37963 101 3 1 2 0 37964 126 379 2 0 1 0 379 38000 PROCR 380 380 SET EVERYTHING BACK AFTER ALLOC OR O'LAY WITH UPTIME 38002 100 0 0 0 0 *16t 38003 106 223 2 0 0 0 223 *09t062*06t09t TEST TIMINGS ON 38004 127 380 7 0 0 0 380 *09t062 gNO 38005 106 333 3 0 0 0 333 YES 38006 124 380 8 1 0 0 380 *06t09t*09t062 38004>38007 106 264 28 0 0 0 264 *09t062 SET BACK 160 38006>38008 102 264 31 0 0 0 264 38009 106 380 27 0 0 0 380 REPLACE RC LINK 38010 102 381 3 0 0 0 381 38011 106 221 36 1 0 0 221 REPLACE 2,3 38012 102 2 1 0 0 38013 106 379 59 0 0 0 379 ALLOW COMMENTS 38014 102 177 9 0 0 0 177 38015 102 221 43 0 0 0 221 38016 124 380 28 1 0 0 380 38017 124 380 18 1 0 0 380 38017>38018 106 2 0 0 0 38019 126 386 2 0 0 0 386 *85t85e UPTIME? 38020 127 127 11 0 1 0 127 gNO PRIORITY QUEUE 38021 124 2 0 1 0 38022 124 7 1 0 0 gCONTINUE 38023 124 380 24 1 0 0 380 *85e85e 38023>38024 127 381 4 0 1 0 381 *859 gNOT COMPLETED YET 37833>38025 127 381 9 0 1 0 381 *851 38026 124 127 11 1 0 0 127 gPRIORITY QUEUE 38027 127 300 13 0 0 0 300 38016>38028 126 212 8 1 3 0 212 38046>38029 124 221 42 0 1 0 221 38030 106 221 44 0 0 0 221 38031 127 380 42 0 1 0 380 gNOT UPTIME 38032 101 1 1 2 0 SET IND 38033 102 221 43 0 0 0 221 38034 106 112 17 0 3 0 112 *85t*0:t TEST ALREADY CLOSED 38035 127 380 39 0 2 0 380 gNO 38036 125 0 1 2 0 38037 105 112 17 0 3 0 112 SET SWITCH SETTING POSITIVE 38038 124 380 40 1 0 0 380 *85t*0:t 38035>38039 106 111 9 0 3 0 111 STORE SWITCH SETTING 38038>38040 102 112 17 0 3 0 112 38041 106 111 11 0 3 0 111 CLOSE PROGRAM 38031>38042 102 111 9 0 3 0 111 RESTORE 7'S 38043 101 1 1 3 0 38044 107 221 42 0 0 0 221 38045 125 48 0 3 0 38046 124 380 29 1 0 0 380 gNEXT SWITCH 38047 125 0 1 2 0 38048 102 221 42 0 0 0 221 38049 102 221 44 1 0 0 221 CLEAR STORED 38050 102 221 46 1 0 0 221 SWITCHES 38051 102 221 48 1 0 0 221 38052 102 221 50 1 0 0 221 38053 126 380 2 0 1 0 380 38100 PROCR 381 381 MANUAL UPTIME S/R 30011>38102 126 382 2 0 0 0 382 *16t TEST W/E INDICATOR 38103 127 300 13 0 0 0 300 gRC ROUTINE 38024>38104 106 381 23 0 0 0 381 *85t 38105 127 381 9 0 0 0 381 38106 106 30 0 1 0 38107 102 381 24 0 0 0 381 38108 124 381 25 1 0 0 381 *85t 38105> 38025>38109 106 30 0 1 0 38110 102 381 23 0 0 0 381 38111 124 381 25 1 0 0 381 37504>38112 106 30 0 1 0 *85t 38113 105 381 23 0 0 0 381 38114 127 381 18 0 0 0 381 38115 125 0 1 2 0 38116 102 381 24 0 0 0 381 38117 124 381 19 1 0 0 381 *85t 38114> 37505>38118 102 381 23 0 0 0 381 38117>38119 126 338 2 0 0 0 338 SET SI=1 38120 126 329 2 0 0 0 329 EXTRA READ 38121 126 349 2 0 0 0 349 gUPDATE ASS.TABLE 38122 124 127 11 1 0 0 127 38123 100 0 0 0 0 INDICATORS 38124 100 0 0 0 0 *859 38111> 38108>38125 106 30 1 1 0 38126 102 188 2 1 0 0 188 STORE RT,RT TYPE 38127 106 35 0 1 0 CLOSE SWITCH 38128 102 7 0 1 0 38129 124 375 6 1 0 0 375 *66e42e*66e 38200 PROCR 382 382 TEST UPTIME INDICATOR 38202 100 0 0 0 0 *16t 38203 106 30 0 1 0 TEST 1ST INDICATOR 38204 105 381 23 0 0 0 381 38205 127 382 8 0 0 0 382 *85t 38206 106 30 0 1 0 TEST 2ND INDICATOR 38207 105 381 24 0 0 0 381 *85t 38205>38208 126 382 2 0 1 0 382 38300 PROCR 383 383 CLOSE P/T & DECIMAL CARD INPUT FILE 38301 NOTES RADIX B 26728> 26727>38302 106 109 6 1 0 0 109 *1tt SET UP'EDG' 38303 102 258 4 1 0 0 258 38304 126 384 2 0 0 0 384 *169 TEST PTIME 38305 126 362 2 0 0 0 362 gSET ROUTE TO MANUAL, ETC. 38306 124 383 21 0 2 0 383 38307 126 363 2 0 0 0 363 gSET LINK FOR SI=5,SETTING OF S101 38308 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 38309 106 0 1 3 0 TEST SENTINEL BLOCK 38310 105 211 12 1 0 0 211 38311 127 282 11 0 1 0 282 *5:1 gNO,EDG COMMENT 38312 127 383 18 0 1 0 383 *5:9 38313 101 4 0 1 0 38314 115 5 1 3 0 38315 101 768 1 2 0 38316 127 282 11 0 1 0 282 *5:1 NO,EDG COMMENT 38317 127 383 21 0 0 0 383 *5:t gYES,TYPE 3 38312>38318 101 4 1 3 0 OMIT EDG? 38319 126 332 2 0 0 0 332 38320 127 282 11 0 0 0 282 *5:t gMAKE COMMENT 38317>38321 126 359 2 0 0 0 359 gSET SI=4, RESTORE LINK FOR SI=3 38322 124 268 9 1 0 0 268 gRESET MOD GROUP 38400 PROCR 384 384 OPEN & CLOSE CARD FILES FOR UPTIME 38402 100 0 0 0 0 *16t LINK 38403 106 188 2 0 0 0 188 ROUTE NUMBER 38404 105 100 33 0 0 0 100 MIN CD RTE * ASSUMES UPTIME RTE SMALLER 38405 127 384 42 0 2 0 384 gNO 38406 106 188 3 0 0 0 188 *1tt 38407 101 16 1 2 0 TEST OPEN 38408 127 384 13 0 0 0 384 gYES 38409 124 3 0 1 0 38410 106 174 0 0 0 38411 101 16 1 2 0 38412 127 384 29 0 1 0 384 *1tt gNO 38408>38413 106 2 0 0 0 38414 126 386 2 0 0 0 386 *85t85e TEST PROG 38415 127 384 29 0 0 0 384 ALREADY OPENED FILE gNO 38416 101 2 1 3 0 38417 107 221 34 0 0 0 221 38418 106 221 38 0 0 0 221 *85t 38419 127 384 21 0 0 0 384 g1ST LOCS FREE 38420 101 2 1 3 0 38419>38421 102 378 12 0 0 0 378 *85t 38422 106 2 0 0 0 38423 124 378 12 0 1 0 378 *859 38424 102 221 38 0 0 0 221 38425 106 188 2 0 0 0 188 SELECT RT 38426 124 378 12 0 1 0 378 *859 38427 102 221 39 0 0 0 221 38428 102 378 12 0 0 0 378 *859 38415> 38412>38429 106 188 2 0 0 0 188 PACK IN RTE NO 38430 101 7 0 1 0 38431 114 384 38 0 0 0 384 19/0/0 INSTRUCTION 38432 114 384 33 0 0 0 384 26/1/0 INSTRUCTION 38434> 38435>38433 126 0 1 0 0 TEST RTE 38434 124 384 33 1 0 0 384 gCLOSED 38435 124 384 33 1 0 0 384 gENGAGED 38436 124 384 38 1 0 0 384 gDOUBTFUL 38437 124 384 43 1 0 0 384 gSTATUS 4 38436>38438 119 0 0 0 0 gSELECT POCKET 2 38439 125 0 1 2 0 38440 102 381 23 0 0 0 381 CLEAR MANUAL INDICATORS 38441 102 381 24 0 0 0 381 *859 38405>38442 126 384 2 0 1 0 384 gAVAILABLE 38437>38443 124 2 0 1 0 38444 124 18 1 0 0 gRC ROUTINE 38500 PROCR 385 385 SET UP SI+45 IF UPTIME STOPPED OTHERWISE SI+7 38502 100 0 0 0 0 *16t 38503 102 221 2 0 0 0 221 STORE SWITCH SETTING 38504 106 221 43 0 0 0 221 TEST UPTIME STOPPED 38505 127 385 9 0 2 0 385 gNO 38506 106 2 0 0 0 38507 126 386 2 0 0 0 386 *85t85e 38508 127 385 12 0 0 0 385 gYES 38505>38509 106 221 2 0 0 0 221 38510 102 7 0 1 0 SET UP SI+7 38511 126 385 2 0 1 0 385 gLEAVE S/R 38508>38512 106 221 2 0 0 0 221 38513 102 45 0 1 0 SET UP SI+45 38514 126 385 2 0 1 0 385 gLEAVE S/R 38600 PROCR 386 386 TEST UPTIME 38602 100 0 0 0 0 *16t*85t 38603 105 221 38 0 0 0 221 38604 127 386 7 0 0 0 386 38605 104 221 38 0 0 0 221 38606 105 221 40 0 0 0 221 38604>38607 126 386 2 0 1 0 386 38700 PROCR 387 387 OPEN CARD OUTPUT FILE 38701 NOTES RADIX B 26715>38702 125 0 1 2 0 *05t 38703 126 392 2 0 0 0 392 *259 gS/R LC 38704 124 256 0 2 0 38705 126 393 2 0 0 0 393 gSET UP SENTINEL 38706 124 269 2 1 0 0 269 gUPDATE ASSEMBLER TABLE 38800 PROCR 388 388 CARD OUTPUT 26705>38802 102 390 4 0 0 0 390 *05t*3:1*4£1 38803 126 392 2 0 0 0 392 *259 gS/R LC 38804 124 390 3 1 0 0 390 *3:e4£e 38900 PROCR 389 389 NHKG OUTPUT 26760>38902 102 389 3 0 0 0 389 *82t*3:2*4£2 38903 100 0 0 0 0 *3:2*4£2 38904 126 430 2 0 0 0 430 *3:94£9 IAA S/R 37303 38905 126 330 2 0 0 0 330 O/P 38906 124 399 4 1 0 0 399 39000 PROCR 390 390 PRINTER OUTPUT 39001 NOTES RADIX B 26759> 26711> 26706>39002 102 390 4 0 0 0 390 *3:1*4£1 38804>39003 126 430 2 0 0 0 430 *3:94£9 1AA SIR 37836>39004 100 0 0 0 0 *3:1*4£1 39005 126 330 2 0 0 0 330 39006 106 30 0 1 0 *54t44t 39007 105 33 0 1 0 TEST SINGLE ANNEX 39008 127 268 8 0 1 0 268 gNO UPDATE ASS TABLE 39009 126 350 2 0 0 0 350 gTEST ROUTE DEALING WITH W/E OR D/B 39010 124 268 9 1 0 0 268 *54t44t gPROGRAM 39011 124 268 8 1 0 0 268 *541*441 gUPDATE USE OF ASS TABLE 39100 PROCR 391 391 CLOSE CARD OUTPUT FILE 39101 NOTES RADIX B 26725>39102 125 0 1 2 0 *05t 39103 126 392 2 0 0 0 392 *259 gS/R LC 39104 124 768 0 2 0 39105 126 393 2 0 0 0 393 gSET UP SENTINEL 39106 102 188 3 0 0 0 188 26762>39107 126 350 2 0 0 0 350 gTEST RTE DEALING WITH D/B 39108 124 268 2 1 0 0 268 gSET ROUTE TO MANUAL 39200 PROCR 392 392 SUBROUTINE LC 39202 100 0 0 0 0 *25t*05t 39203 124 188 2 0 1 0 188 TEST LIB CARD 39204 106 64 0 0 0 BEING PROCESSED 39205 118 4124 0 0 0 ON THIS ROUTE 39206 101 13 1 2 0 39207 127 392 9 0 0 0 392 gYES 39208 126 392 2 0 1 0 392 gNO 39207>39209 126 338 2 0 0 0 338 gSET SI=1 39210 124 176 22 1 0 0 176 gSI+9 39211 124 428 24 1 0 0 428 AVOID PUNCHING LIB CARDS IN STORE DUMP. 39212 124 2 0 1 0 PUNCH LIB CARDS OUT OF STORE DUMP. 39300 PROCR 393 393 SET UP SENTINEL 39301 NOTES RADIX B 39302 100 0 0 0 0 *05t 39303 104 214 10 0 0 0 214 B/E 39304 118 2 0 0 0 39305 102 260 8 1 0 0 260 39306 106 33 0 1 0 FILE ID 39307 118 1 0 0 0 39308 107 260 9 0 0 0 260 39309 106 211 12 1 0 0 211 SENTINEL WORD 39310 102 260 4 1 0 0 260 39311 106 32 0 1 0 PROGRAM IDENTITY 39312 102 260 7 1 0 0 260 39313 102 260 2 1 0 0 260 CLEAR FUNCTION WORD 39314 124 260 2 0 2 0 260 39315 124 188 2 0 1 0 188 EDIT 39316 124 64 0 1 0 39317 129 0 0 0 0 39318 126 330 2 0 0 0 330 gWRITE 39319 124 3 0 2 0 39320 126 393 2 0 1 0 393 gLEAVE S/R 39400 PROCR 394 394 OPEN AUTOLECTOR FILE 26722>39402 126 329 2 0 0 0 329 *30t gREAD 39403 101 10 1 3 0 SELECT RTE TYPE 39404 124 269 2 1 0 0 269 gUPDATE ASSR TABLE 39500 PROCR 395 395 AUTOLECTOR INPUT 26712>39502 102 395 4 0 0 0 395 *30t*3:1*4£1 39503 126 430 2 0 0 0 430 *3:94£9 1AA SIR 39504 100 0 0 0 0 *3:1*4£1 39505 124 188 2 0 1 0 188 39506 119 0 0 1 0 READ 39507 124 268 8 1 0 0 268 g 39600 PROCR 396 396 OPEN FILE-CHEQUE READER 26754>39602 106 33 0 1 0 *49t SET UP ASL 39603 101 15 0 1 0 39604 124 188 2 0 1 0 188 39605 114 64 0 0 0 39606 106 211 3 0 0 0 211 CLEAR ASSR TABLE 39607 124 269 2 1 0 0 269 *49t gUPDATE ASSR TABLE 39700 PROCR 397 397 INPUT-CHEQUE READER 26752>39702 106 32 0 1 0 *49t READ 39703 124 2 0 1 0 SET ASL ODD 39704 100 32 0 2 0 OR EVEN ACCORDING 39705 124 188 2 0 1 0 188 TO LITERAL OF 39706 114 64 0 0 0 INTERCODE ACTION 39707 124 188 2 0 1 0 188 39708 119 0 0 1 0 39709 125 0 1 2 0 CLEAR ASL OF 39710 124 188 2 0 1 0 188 ROUTE 39711 114 64 0 0 0 39712 126 350 2 0 0 0 350 gTEST RTE DEALING WITH D/B 39713 106 209 13 0 0 0 209 SET(9) 26/0/18 39714 102 9 0 0 0 *49t 39805> 28411>39715 106 211 3 0 0 0 211 *49t56t30t81t82t82t 39716 102 188 3 0 0 0 188 39717 124 268 8 1 0 0 268 39800 PROCR 398 398 POCKET SELECT-CHEQUE READER 26753>39802 124 188 2 0 1 0 188 *49t 39803 119 0 0 0 0 39804 126 350 2 0 0 0 350 gTEST RTE DEALING WITH D/B 39805 124 397 15 1 0 0 397 g 39900 PROCR 399 399 READ DATA TRANSMISSION 26756>39902 124 188 2 0 1 0 188 *56t82t 39903 119 0 0 1 0 38906>39904 106 211 3 0 0 0 211 *82t 39905 102 188 3 0 0 0 188 UPDATE ASS TABLE 39906 126 349 2 0 0 0 349 39910>39907 124 188 2 0 1 0 188 TEST ROUTE 39908 126 0 1 0 0 39909 124 399 13 1 0 0 399 CLOSED 39910 124 399 7 1 0 0 399 ENGAGED 39911 124 399 19 1 0 0 399 D/B 39912 124 399 13 1 0 0 399 W/E 39921> 39912> 39909>39913 126 357 2 0 0 0 357 AVAILABLE 300 SECS 39914 106 399 22 0 0 0 399 39915 127 399 24 0 0 0 399 gNO D/B 39916 101 0 1 3 0 39917 102 399 22 0 0 0 399 39918 124 284 2 1 0 0 284 gEXIT VIA D/B LINK 39911>39919 101 1 1 3 0 SET D/B MARKER 39920 102 399 22 0 0 0 399 39921 124 399 13 1 0 0 399 39922 100 0 0 0 0 *82t 39923 126 350 2 0 0 0 350 *821 TEST ROUTE DEALING WITH D/B 39915>39924 106 211 3 0 0 0 211 CLEAR ASSR TABLE £££££ 39925 102 188 3 0 0 0 188 39926 124 268 9 1 0 0 268 40000 PROCR 400 400 OPEN FILE DATA TRANSMISSION 26755>40002 106 33 0 1 0 *56t82t 40003 101 15 0 1 0 TX 40004 124 188 2 0 1 0 188 40005 114 64 0 0 0 40006 106 211 3 0 0 0 211 40007 124 269 2 1 0 0 269 40100 PROCR 401 401 OPEN PAPER TAPE FILE 26713>40102 126 339 2 0 0 0 339 *03t 40103 106 188 3 0 0 0 188 *28t TEST NON STANDARD 40104 118 4124 0 0 0 40105 127 269 4 0 1 0 269 *28t gYES 31202 40106 106 33 0 1 0 STORE FILE IDENTITY 40107 102 195 0 3 0 40108 124 65 0 2 0 SET REEL COUNTER=1 40109 102 196 0 3 0 40110 126 407 2 0 0 0 407 gSET UP SENTINEL BLOCK 40111 124 188 2 0 1 0 188 STORE ASL 40112 106 64 0 0 0 40113 103 192 0 3 0 40114 102 194 0 3 0 40115 126 403 2 0 0 0 403 gOUTPUT BLOCK 40116 124 269 4 1 0 0 269 gPROGM 40200 PROCR 402 402 TEST BLOCK END-TYPING ON PT ASSEMBLER AND NON-STD PT O/P THEREON 40202 100 0 0 0 0 *29274t 40203 106 212 14 1 0 0 212 SET UP INDIRECT MOD REGISTER 40204 102 260 14 1 0 0 260 40205 100 260 16 1 2 0 260 40217>40206 115 154 1 0 0 COLLATE WORD TO BE OUTPUT 40207 102 260 22 1 0 0 260 W/L 40208 115 260 24 1 0 0 260 TEST WORD CONTAINS BLOCK END CHARACTER 40209 105 260 22 1 0 0 260 40210 127 402 20 0 0 0 402 gYES 18286>40211 123 2 0 0 0 STEP INDIRECT MOD REGISTER 40212 100 260 14 0 0 0 260 40213 124 402 15 1 0 0 402 g 40214 124 402 18 1 0 0 402 g 40213>40215 125 0 1 2 0 40216 118 4126 1 0 0 40217 124 402 6 1 0 0 402 gTEST NEXT CHARACTER 40214>40218 123 1 0 0 0 STEP LINK 40219 100 402 2 0 0 0 402 40210>40220 126 402 2 0 1 0 402 gLEAVE S/R 40300 PROCR 403 403 PAPER TAPE OUTPUT BLOCK S/R 40302 100 0 0 0 0 *03t LINK 40303 106 403 2 0 0 0 403 STORE LINK IN SPECIAL CHAPTER 40304 124 3 0 1 0 40305 102 156 0 0 0 27769>40306 126 339 2 0 0 0 339 gSET(MR3)=(3) 40307 100 210 10 0 2 0 210 *73t*74t 40308 115 188 2 0 0 0 188 TEST CHANNEL 6 40309 101 48 1 2 0 40310 127 403 46 0 0 0 403 *73t*74t gYES P/T O/P ASS 40311 124 3 0 3 0 *73t GP ASSEMBLER 40312 124 190 0 2 0 LOCATION IN SPECIAL 40313 124 188 2 0 1 0 188 CHAPTER 40314 102 64 0 0 0 40338>40315 101 8 1 3 0 SET UP MODIFIER 40335>40316 102 193 0 3 0 40317 101 63 1 3 0 FORM COLLATION 40318 124 3 0 3 0 CONSTANT IN 40319 124 193 0 3 0 CORRECT POSITION 40320 118 0 0 0 0 40321 118 4118 1 0 0 40322 124 3 0 3 0 COLLATE NEXT 40323 124 192 0 3 0 CHARACTER 40324 115 0 1 0 0 40326>40325 118 4126 1 0 0 ALIGN CHARACTER 40326 127 403 25 0 1 0 403 TO CORRECT 40327 118 2 1 0 0 POSITION 40328 118 8 0 0 0 40329 103 190 1 3 0 STORE WORD 40330 105 260 26 1 0 0 260 TEST B/E 40331 127 403 39 0 0 0 403 gYES 40332 126 404 2 0 0 0 404 gO/P S/R 40333 106 193 0 3 0 TEST END OF WORD 40334 101 2 1 2 0 40335 127 403 16 0 2 0 403 gNO 40336 101 2 1 3 0 STEP WORD MODIFIER 40337 107 192 0 3 0 40338 124 403 15 1 0 0 403 gNEXT WORD 40331>40339 106 188 0 3 0 TEST NON STANDARD 40340 127 403 42 0 1 0 403 gYES 40341 126 404 2 0 0 0 404 gO/P S/R 40340>40342 106 194 0 3 0 RESET(64+R) 40343 124 188 2 0 3 0 188 40344 102 64 0 0 0 *73t 40345 124 403 66 1 0 0 403 *739*749 40355> 40310>40346 124 3 0 3 0 *74t P/T ASSEMBLER 40347 124 192 0 3 0 BE OUTPUT ASSEMBLER 40348 106 0 1 0 0 40349 102 154 1 0 0 40350 126 402 2 0 0 0 402 gTEST FOR B/E 40351 124 403 56 1 0 0 403 gB/E FOUND 40352 126 404 2 0 0 0 404 gO/P S/R 40353 101 2 1 3 0 STEP INDIRECT 40354 107 192 0 3 0 WORD MODIFIER 40355 124 403 46 1 0 0 403 gNEXT WORD 40351>40356 101 8 1 3 0 40357 105 260 14 0 0 0 260 40358 102 260 13 0 0 0 260 40359 106 154 1 0 0 CLEAR CHARACTERS AFTER B/E 40360 124 260 14 0 1 0 260 40361 118 4120 0 0 0 40362 124 260 13 0 1 0 260 40363 118 0 0 0 0 40364 102 154 1 0 0 40365 126 404 2 0 0 0 404 *74t 40345>40366 124 3 0 1 0 40367 126 156 0 1 0 gLEAVE S/R 40400 PROCR 404 404 PAPER TAPE OUTPUT S/R 40402 100 0 0 0 0 *03t LINK 40403 106 404 2 0 0 0 404 40404 102 183 0 3 0 40405 124 188 2 0 1 0 188 O/P WORD 40406 119 0 0 0 0 40407 101 1 1 3 0 40408 102 188 3 0 0 0 188 40409 126 350 2 0 0 0 350 gTEST RTE DEALING WITH D/B 40410 126 339 2 0 0 0 339 gSET (MR3)=(3) 40411 124 3 0 3 0 40412 126 183 0 1 0 40500 PROCR 405 405 PAPER TAPE OUTPUT END ROUTINE 26703>40502 102 405 4 0 0 0 405 *03t*3:1*4£1 40503 126 430 2 0 0 0 430 *3:94£9 1AA SIR 40504 100 0 0 0 0 *3:1*4£1 40505 126 339 2 0 0 0 339 gSET(MR3)=(3) 40506 124 188 2 0 1 0 188 STORE ASL 40507 106 64 0 0 0 40508 103 192 0 3 0 40509 102 194 0 3 0 40510 106 188 3 0 0 0 188 *28t TEST IF NON-STAND 40511 118 4124 0 0 0 40512 127 405 14 0 0 0 405 gNO 40513 102 188 0 3 0 *28t NON STAND P/T 40512>40514 126 403 2 0 0 0 403 gOUTPUT BLOCK S/R 40515 106 157 0 3 0 TEST W/E OCCURED 40516 127 268 9 0 2 0 268 gNO,RETURN TO PROGM 40600 PROCR 406 406 PAPER TAPE OUTPUT-CHANGE REEL 40602 126 339 2 0 0 0 339 *03t SET(MR3)=(3) 40603 106 194 0 3 0 RESET(64+R) 40604 102 192 0 3 0 40605 106 188 0 3 0 *28t TEST IF NON STAND 40606 127 406 13 0 0 0 406 gNO 40607 106 33 0 1 0 TEST LINK 40608 127 263 20 0 0 0 263 gNO ZZZ COMMENT 40609 104 210 8 0 0 0 210 AUGMENT LINK TO 40610 101 15 0 1 0 RETURN TO PROGRAMME 40611 114 44 0 1 0 BY LINK+1 40612 124 406 30 1 0 0 406 *28t gPROGRAM 40606>40613 126 407 2 0 0 0 407 gSET UP SENTINEL BLOCK 40614 106 209 12 0 0 0 209 SET SENTINEL TYPE 2 40615 107 4 1 2 0 40616 126 403 2 0 0 0 403 gOUTPUT BLOCK S/R 40617 106 215 16 1 0 0 215 SET UP 'NEW' 40618 102 258 4 1 0 0 258 40619 101 406 21 1 3 0 406 40620 124 282 10 1 0 0 282 gOUTPUT COMMENT 40621 126 339 2 0 0 0 339 SET(MR3)=(3) 40622 100 210 3 0 3 0 210 SET DECIMAL 40623 101 1 1 3 0 AUGMENT REEL COUNTER 40624 107 197 1 3 0 40625 100 212 2 0 3 0 212 SET BINARY 40626 106 194 0 3 0 RESET(64+R) 40627 102 192 0 3 0 40628 126 407 2 0 0 0 407 gSET UP SENTINEL BLOCK 40629 126 403 2 0 0 0 403 gOUTPUT BLOCK S/R 40612>40630 125 0 1 2 0 CLEAR W/E INDICATOR 40631 102 157 0 3 0 40632 124 268 9 1 0 0 268 gRETURN TO PROG 40700 PROCR 407 407 SET UP SENTINEL BLOCK 40702 100 0 0 0 0 *03t LINK 40703 124 188 2 0 3 0 188 SET(MR2)=64+R 40704 126 64 1 2 0 40705 106 211 12 1 0 0 211 SET UP SENTINEL WORD 40706 102 0 1 2 0 40707 106 39 0 1 0 SET UP PROGM NUMBER 40708 102 3 1 2 0 40709 106 195 0 3 0 SET UP FILE IDENTITY 40710 118 2 0 0 0 40711 101 65 1 1 0 SENTINEL TYPE 1 40712 118 4 0 0 0 40713 104 196 0 3 0 REEL NUMBER 40714 102 4 1 2 0 40715 106 260 18 1 0 0 260 SET UP B/E 40716 102 6 1 2 0 40717 126 407 2 0 1 0 407 *03t gLEAVE S/R 40800 PROCR 408 408 CLOSE PAPER TAPE OUTPUT FILE 26723>40802 126 339 2 0 0 0 339 *03t gSET(MR3)=(3) 40803 106 188 0 3 0 *28t TEST NON STAND 40804 127 268 2 0 1 0 268 *28t 40805 126 407 2 0 0 0 407 gSET UP SENTINEL BLOCK 40806 106 209 12 0 0 0 209 SET SENTINEL TYPE 3 40807 104 209 12 0 0 0 209 40808 107 4 1 2 0 40809 124 188 2 0 1 0 188 STORE ASL 40810 106 64 0 0 0 40811 103 192 0 3 0 40812 102 194 0 3 0 40813 126 403 2 0 0 0 403 gOUTPUT BLOCK S/R 40814 124 268 2 1 0 0 268 gSET RTE TO MANUAL 40900 PROCR 409 409 OPEN MAGNETIC TAPE INPUT FILE 40901 NOTES RADIX B 26734> 26719>40902 126 410 2 0 0 0 410 gOPEN REEL 40903 126 340 2 0 0 0 340 gSET (MR3)=R 40904 101 990 0 1 0 SET UP (AB) FOR RETURN TO PROGRAMME 40905 115 40 0 1 0 Q1-4 CURRENT RUN NUMBER 40906 118 4123 1 0 0 Q6-9 SOURCE RUN NUMBER 40907 115 191 32 0 3 0 191 Q10 SOURCE FILE NO 40908 118 4123 1 0 0 40909 106 190 98 0 3 0 190 40910 118 9 1 0 0 42405>40911 124 3 0 1 0 SET (B)=SPOOL NO 40912 100 182 0 2 0 40913 124 268 9 1 0 0 268 gRESET MOD GROUP 40713 41000 PROCR 410 410 OPEN MAGNETIC TAPE INPUT REEL 41001 NOTES RADIX B 41002 100 0 0 0 0 LINK 41003 126 339 2 0 0 0 339 gSET (MR3)=(3) 41004 106 410 2 0 0 0 410 STORE LINK 41005 102 168 0 3 0 41608>41006 124 188 2 0 1 0 188 SET IND IF FILE HAS BEEN 41007 106 190 34 0 0 0 190 OPENED BEFORE 41008 102 156 0 3 0 41009 126 307 2 0 0 0 307 gRUN FORWARD ETC 41010 126 308 2 0 0 0 308 gREAD TEST BLOCK 41011 126 339 2 0 0 0 339 gSET (MR3)=(3) 41012 106 156 0 3 0 TEST FILE BEING OPENED FOR FIRST TIME 41013 127 410 26 0 0 0 410 gYES 41014 118 4126 1 0 0 41015 101 15 1 2 0 (TESTX=£) 41016 127 411 52 0 1 0 411 gNO 41017 118 4 1 0 0 SETX=Y 41018 101 12 0 1 0 41019 124 188 2 0 1 0 188 41020 114 190 34 0 0 0 190 41021 106 188 2 0 0 0 188 41022 105 233 26 0 0 0 233 41023 127 410 29 0 1 0 410 41024 126 341 2 0 0 0 341 41025 124 410 43 1 0 0 410 41013>41026 124 257 0 2 0 SET REEL CTR=1:1 41027 124 188 2 0 1 0 188 41028 103 190 34 0 0 0 190 41023>41029 102 158 0 3 0 SET IND 3 41030 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 41031 101 28 0 1 0 *48t 41032 115 15 1 3 0 41033 102 258 12 0 0 0 258 TEST CORRECT 41034 115 32 0 1 0 SUITE NUMBER 41035 105 258 12 0 0 0 258 41036 127 414 2 0 1 0 414 *48t 41037 101 12 0 1 0 TEST CORRECT FILE 41038 115 6 0 3 0 LETTER 41039 102 258 12 0 0 0 258 41040 115 33 0 1 0 41041 105 258 12 0 0 0 258 41042 127 414 2 0 1 0 414 gNO, HDG COMMENT 41406> 41025>41043 106 15 1 3 0 STORE PROGRAMME NO 41044 103 260 20 0 0 0 260 *719 STORE FOR COMMENT 41045 124 188 2 0 1 0 188 41046 102 190 66 0 0 0 190 41047 106 6 0 3 0 STORE FILE IDENTITY 41048 124 188 2 0 1 0 188 41049 102 190 98 0 0 0 190 41162>41050 106 9 1 3 0 STORE RUN AND RE-RUN NUMBERS 41051 124 188 2 0 1 0 188 41052 102 191 32 0 0 0 191 41053 101 3 0 1 0 TEST CORRECT REEL 41054 124 188 2 0 1 0 188 NUMBER 41055 115 190 34 0 0 0 190 41056 105 11 1 3 0 41057 127 415 2 0 1 0 415 gNO, OFFER OPTIONS 41058 127 414 43 0 0 0 414 *££0*££2*01e gYES REJECT 41059 126 212 2 1 3 0 212 *4:34te (MR3)=24:0 41060 126 351 2 0 0 0 351 *09e06e TEST RTE NOTING D/B 41061 127 426 62 0 0 0 426 *3£e71e gNO 41062 127 426 60 0 0 0 426 *3£e gNO 41063 127 411 45 0 0 0 411 *01e01e 41064 124 426 35 1 0 0 426 *5+e gNO 41065 124 324 6 1 0 0 324 *17e gNEW COMMENT 41066 127 442 21 0 0 0 442 *773 gOFFER *4 41100 PROCR 411 411 OPEN MAGNETIC TAPE INPUT REEL(2) 41101 NOTES RADIX B 42823>41102 106 17 1 3 0 TEST 90K TAPE 41103 105 210 8 0 0 0 210 41104 127 411 12 0 1 0 411 *01e gNO 41105 125 0 1 2 0 *72t 41106 101 7 0 1 0 41107 115 30 0 1 0 CHANNEL 2? 41108 101 32 1 2 0 41109 127 411 12 0 1 0 411 *72t 41110 106 211 6 0 0 0 211 *01t 41111 124 411 13 1 0 0 411 41109> 41104>41112 125 0 1 2 0 41111>41113 124 188 2 0 1 0 188 SET LOW/HIGH DENSITY 41114 102 191 64 0 0 0 191 *01t 41115 124 3 0 1 0 TEST OPENED FOR 41116 106 165 0 0 0 INPUT 41117 101 410 10 1 2 0 410 41118 127 428 29 0 1 0 428 gNO 41119 126 339 2 0 0 0 339 gSET (MR3)=(3) 41120 106 158 0 3 0 TEST IND 3 41121 127 411 44 0 0 0 411 *01e01e 41122 125 0 1 2 0 CLEAR IND 3 41123 102 158 0 3 0 41124 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 41125 126 431 2 0 0 0 431 gSET UP COMMENT 41126 106 17 1 3 0 *01t TEST 90K TAPE 41127 127 411 30 0 0 0 411 gNO 41128 106 492 14 1 0 0 492 SET UP HIP 41129 124 411 31 1 0 0 411 *01t 41127>41130 106 214 52 1 0 0 214 SET UP 'LIP' 41129>41131 102 258 4 1 0 0 258 41132 126 339 2 0 0 0 339 gSET (MR3) = (3) 41133 106 182 0 3 0 SET UP TAPE NO 41134 102 258 10 0 0 0 258 41135 106 262 32 1 0 0 262 *71t SET UP TABLE 41136 102 262 22 1 0 0 262 FOR PROG IDENTITY 41137 106 262 30 1 0 0 262 *3£t 41138 102 262 28 1 0 0 262 *71t*3£t 41139 124 411 41 0 2 0 411 SELECT LINK 41140 124 426 63 1 0 0 426 41141 126 359 2 0 0 0 359 gSET SI=4, RESTORE LINK FOR SI=3 41142 106 30 0 1 0 RESTORE ROUTE NO 41143 102 188 2 0 0 0 188 41121>41144 126 342 2 0 0 0 342 *019 41063>41145 126 308 2 0 0 0 308 gREAD 41146 126 343 2 0 0 0 343 *019 42832>41147 126 339 2 0 0 0 339 gSET(MR3)=(3) 41148 106 168 0 3 0 41149 102 410 2 0 0 0 410 41150 102 168 0 3 0 CLEAR(168) 41151 126 410 2 0 1 0 410 41016>41152 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 41153 126 413 2 0 0 0 413 gTEST CORRECT SOURCE BLOCK 41154 126 412 2 0 0 0 412 g TEST Y>X 41155 127 411 61 0 2 0 411 gNO 41156 106 190 34 0 3 0 190 SET X=Y 41157 118 2 0 0 0 41158 114 190 34 0 3 0 190 41159 124 3 0 1 0 SET IND 3 41160 102 158 0 0 0 41155>41161 126 341 2 0 0 0 341 gSET(MR3)=(64+R) 41162 124 410 50 1 0 0 410 g 41200 PROCR 412 412 FORM X-Y FOR TEST ON REEL COUNTER 41201 NOTES RADIX B 41202 100 0 0 0 0 LINK 41203 126 340 2 0 0 0 340 gSET (MR3) =R 41204 101 3 0 1 0 STORE Y 41205 115 190 34 0 3 0 190 41206 118 2 1 0 0 41207 102 258 12 0 0 0 258 41208 115 190 34 0 3 0 190 FORM X-Y 41209 105 258 12 0 0 0 258 41210 126 412 2 0 1 0 412 gLEAVE S/R 41300 PROCR 413 413 TEST CORRECT SOURCE BLOCK 41301 NOTES RADIX B 41302 100 0 0 0 0 LINK 41303 106 15 1 3 0 TEST CORRECT 41304 103 260 20 0 0 0 260 *719 STORE FOR COMMENT 41305 124 188 2 0 1 0 188 PROGRAMME NUMBER 41306 105 190 66 0 0 0 190 41307 127 417 2 0 1 0 417 gNO, HDG COMMENT 41308 106 6 0 3 0 TEST CORRECT FILE 41309 124 188 2 0 1 0 188 IDENTITY 41310 105 190 98 0 0 0 190 41311 127 417 2 0 1 0 417 gNO, HDG COMMENT 41312 101 30 0 1 0 TEST CORRECT RUN 41313 115 9 1 3 0 NUMBER 41314 102 221 2 0 0 0 221 41315 124 188 2 0 1 0 188 41316 115 191 32 0 0 0 191 41317 105 221 2 0 0 0 221 41318 127 417 2 0 1 0 417 gNO, HDG COMMENT 41319 126 413 2 0 1 0 413 gLEAVE S/R 41400 PROCR 414 414 HDG COMMENT FOR FIRST OPEN INPUT FILE 41401 NOTES RADIX B 41042> 41036>41402 125 0 1 2 0 TEST IF SUITE IS 41403 101 28 0 1 0 060 41404 115 39 0 1 0 41405 105 108 7 0 0 0 108 41406 127 410 43 0 0 0 410 gYES 41407 126 418 2 0 0 0 418 gSET UP BLOCK, UNLOAD 41408 101 28 0 1 0 SET UP SUITE NO 41409 115 32 0 1 0 41410 102 258 8 0 0 0 258 41411 101 12 0 1 0 41412 115 33 0 1 0 FORM UP FILE LETTER-/REEL 1 41413 118 2 0 0 0 41414 101 4209 1 1 0 -/ 41415 118 4 0 0 0 41416 101 65 1 1 0 1 41417 102 258 12 1 0 0 258 41709>41418 102 258 10 0 0 0 258 CLEAR RUN&RERUN NO 41419 106 262 36 1 0 0 262 SET UP LTE 41420 102 262 22 1 0 0 262 41421 124 262 2 0 2 0 262 41422 124 3 0 1 0 EDIT INTO SP CHAP 41423 128 130 1 2 0 41424 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 41425 106 15 1 3 0 SET UP PROG NO 41426 102 258 8 0 0 0 258 41427 106 6 1 3 0 SET UP FILE 1D/REEL NO 41428 118 2 0 0 0 41429 101 113 1 1 0 / 41430 118 4 0 0 0 41431 104 10 1 3 0 REEL NO 41432 102 258 12 1 0 0 258 41433 106 9 1 3 0 SET UP RUN & RERUN NO 41434 102 258 10 0 0 0 258 41435 106 216 36 1 0 0 216 SET UP LAST TABLE ENTRY 41436 102 262 22 1 0 0 262 41437 124 262 10 0 2 0 262 EDIT INTO SP CHAP 41438 124 3 0 1 0 41439 128 146 1 2 0 41440 106 261 10 1 0 0 261 RESTORE LAST TABLE ENTRY 41441 102 262 22 1 0 0 262 41442 124 336 4 1 0 0 336 gOUTPUT COMMENT 41058>41443 126 418 2 0 0 0 418 *012 gSET UP HDG 41444 106 214 64 1 0 0 214 SET UP 45K 41445 124 370 6 1 0 0 370 gOUTPUT COMMENT 41500 PROCR 415 415 REEL NUMBER FAILURE 41501 NOTES RADIX B COMMENT AND OFFER OPTIONS 41057>41502 126 418 2 0 0 0 418 gSET UP HDG 41503 106 109 4 1 0 0 109 SET UP *,*,3,SP,SP 41504 102 258 4 1 0 0 258 41505 126 346 2 0 0 0 346 g EDIT TIME 41506 126 311 2 0 0 0 311 SET UP REEL NUMBER 41507 104 258 12 1 0 0 258 41508 102 258 8 1 0 0 258 41509 126 341 2 0 0 0 341 SET (MR3=64+R) 41510 101 15 0 1 0 41511 115 10 0 3 0 41512 104 258 12 1 0 0 258 41513 102 258 10 1 0 0 258 41514 101 12 0 1 0 41515 124 188 2 0 1 0 188 41516 114 190 34 0 0 0 190 SET X=0 IN REEL COUNTER 41517 124 3 0 1 0 SET UP TAPE NUMBER 41518 106 182 0 0 0 41519 102 258 12 1 0 0 258 41520 124 519 0 2 0 *14+46+*14+*46+ 000060051800007 41521 102 41 0 1 0 41522 101 261 30 1 3 0 261 41523 124 335 2 1 0 0 335 gOFFER OPTIONS 41600 PROCR 416 416 OPTIONS 2 AND3 41601 NOTES RADIX B REEL NUMBER FAILURE 41602 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 41603 106 11 1 3 0 PACK IN ACTUAL REEL NO. 41604 101 3 0 1 0 41605 124 188 2 0 1 0 188 41606 114 190 34 0 0 0 190 41607 126 339 2 0 0 0 339 gSET (MR3)=(3) 41608 124 410 6 1 0 0 410 gOPEN REEL 41700 PROCR 417 417 HDG COMMENT FOR SUBSEQUENT OPEN REELS 41701 NOTES RADIX B 42817> 41318> 41311> 41307>41702 126 418 2 0 0 0 418 gSET UP HDG 41703 126 340 2 0 0 0 340 gSET (MR3)=R 41704 106 190 66 0 3 0 190 SET UP PROG NO 41705 102 258 8 0 0 0 258 41706 126 311 2 0 0 0 311 gSET UP FILE ID 41707 107 258 12 1 0 0 258 41708 106 191 32 0 3 0 191 SET UP RUN & RERUN NOS 41709 124 414 18 1 0 0 414 g 41800 PROCR 418 418 SET UP HDG COMMENT 41801 NOTES RADIX B 41802 100 0 0 0 0 LINK 41803 126 357 2 0 0 0 357 gCOUNT 500 M SECS 41804 106 258 26 1 0 0 258 SET UP 'HDG' 41805 102 258 4 1 0 0 258 41806 124 3 0 1 0 41807 106 165 0 0 0 41808 101 1 1 2 0 RETURN LINK 41809 126 362 2 0 0 0 362 gUNLOAD, ETC. 41810 126 418 2 0 1 0 418 g LEAVE S/R 41900 PROCR 419 419 SET UP HDG COMMENT (PAPER TAPE OR CARDS) 41902 100 0 0 0 0 LINK 41903 106 258 26 1 0 0 258 SET UP HDG 41904 102 258 4 1 0 0 258 41905 124 367 6 0 2 0 367 RETURN LINK 41906 126 362 2 0 0 0 362 gUNLOAD ETC 41907 126 419 2 0 1 0 419 gLEAVE S/R 42000 PROCR 420 420 MAGNETIC TAPE INPUT 42001 NOTES RADIX B 26709>42002 102 420 11 0 0 0 420 *4£1*3:1 42128>42003 126 314 2 0 0 0 314 TEST A1=BLOCK COUNTER 42004 127 421 6 0 1 0 421 gNO 42005 126 339 2 0 0 0 339 SET(MR3)=(3) 42006 102 171 0 3 0 CLEAR OPTION INDICATOR 42007 102 186 0 3 0 CLEAR INDICATOR 42008 106 185 0 3 0 TEST ATTEMPTS COUNTER ZERO 42009 127 421 2 0 1 0 421 gNO 42010 126 430 2 0 0 0 430 *3:94£9 1AA S/R 42011 100 0 0 0 0 *4£1*3:1 42012 126 342 2 0 0 0 342 *019 42013 126 329 2 0 0 0 329 READ 42014 126 343 2 0 0 0 343 *019 42015 106 210 8 0 0 0 210 STEP BLOCK COUNTER 42016 126 333 2 0 0 0 333 g 42017 124 268 8 1 0 0 268 gUPDATE ASSEMBLER TABLE,RETURN TO PROG 42100 PROCR 421 421 MT INPUT:BLOCK NUMBER NOT AS EXPECTED 42101 NOTES RADIX B 42009>42102 126 321 2 0 0 0 321 g'SER' COMMENT 42103 101 7 1 3 0 42104 102 31 0 1 0 SET ROUTE TYPE='MT IN' 42105 124 264 30 1 0 0 264 gANOTHER READ ORDER 42004>42106 126 315 2 0 0 0 315 gTEST A1 FOR FBM 42107 124 421 33 1 0 0 421 gFBM FOUND 42108 106 1 1 3 0 TEST A1=SENTINEL 42109 105 211 7 1 0 0 211 TYPE 2 42110 105 210 8 0 0 0 210 42111 127 421 42 0 0 0 421 gYES 42112 105 210 8 0 0 0 210 TEST A1=SENTINEL 42113 127 421 18 0 1 0 421 gNO 42114 106 5 1 3 0 TEST A3=BL CNTR 42115 124 188 2 0 1 0 188 42116 105 190 2 0 0 0 190 42117 127 263 21 0 0 0 263 gYES ZZZ4 COMMENT 42145> 42113>42118 101 421 62 1 3 0 421 SELECT RETURN LOCATION 42119 124 3 0 1 0 42120 102 162 0 0 0 42121 126 323 2 0 0 0 323 gTEST OPTION LINK 42122 126 316 2 0 0 0 316 gALIGNMENT FAILURE 42123 124 421 26 1 0 0 421 42124 126 317 2 0 0 0 317 gREREAD 42125 126 319 2 0 0 0 319 gSTEP ATTEMPTS COUNTER 42123>42126 124 3 0 1 0 TEST D/B OCCURRED 42127 106 160 0 0 0 42128 127 420 3 0 0 0 420 gNO 42129 101 7 1 3 0 42130 124 3 0 1 0 42131 102 174 0 0 0 42132 124 285 2 1 0 0 285 gD/B ROUTINE 42107>42133 124 3 0 1 0 TEST INDICATOR SET 42134 106 186 0 0 0 42135 127 421 38 0 0 0 421 gNO 42136 101 3 1 3 0 STEP BACK 3 BLOCKS 42137 126 306 2 0 0 0 306 FORWARD 1 42135>42138 126 329 2 0 0 0 329 gREAD 29331>42139 101 7 1 3 0 42140 103 188 3 0 0 0 188 42141 124 351 7 1 0 0 351 gTEST ROUTE 42111>42142 106 5 1 3 0 TEST A3=BL CNTR 42143 124 188 2 0 1 0 188 42144 105 190 2 0 0 0 190 42145 127 421 18 0 1 0 421 gNO 42146 106 39 0 1 0 *6+t PROG ID 42147 105 210 17 0 0 0 210 07008 42148 127 421 56 0 1 0 421 gNOT 07008 42149 106 258 28 1 0 0 258 FINIS 07008 42150 102 4 1 3 0 42151 126 430 2 0 0 0 430 *4£93:9 IAA FOR FCC 42152 106 420 11 0 0 0 420 *4£2*3:2 42153 102 421 54 0 0 0 421 IAA 42154 100 0 0 0 0 *4£2*3:2 42155 124 268 9 1 0 0 268 *6+t 42148>42156 106 33 0 1 0 TEST LINK 42157 127 268 9 0 3 0 268 gYES 42158 126 334 2 0 0 0 334 gSTEP REEL COUNTER 42159 126 357 2 0 0 0 357 gCOUNT 500 MILLISECS 42160 126 324 2 0 0 0 324 gUNLOAD, 'NEW' COMMENT 42161 126 410 2 0 0 0 410 gOPEN NEW REEL 42162 101 7 1 3 0 SET UP RTE TYPE 42163 103 188 3 0 0 0 188 42164 102 31 0 1 0 42165 106 188 2 0 0 0 188 42166 118 6 0 3 0 42167 124 266 2 1 0 0 266 *4£4*3:4 gMAIN PATH 4 4 42200 PROCR 422 422 CLOSE MAGNETIC TAPE INPUT REEL 42201 NOTES RADIX B 43404> 26748>42202 126 334 2 0 0 0 334 gSTEP REEL COUNTER 42203 126 357 2 0 0 0 357 gCOUNT 500 M.SECS. 42204 126 362 2 0 0 0 362 gUNLOAD 42205 124 422 8 0 2 0 422 42206 126 363 2 0 0 0 363 gSET LINK FOR SI=5 & SETTING FOR S101 42207 124 324 5 1 0 0 324 *17e 42208 126 359 2 0 0 0 359 gSET SI=4, RESTORE LINK FOR SI=3 42209 126 451 2 0 0 0 451 *8£9 gTMS COMMENT 42210 124 268 9 1 0 0 268 gRESET MOD. GROUP 42300 PROCR 423 423 CLOSE MAGNETIC TAPE INPUT FILE 42301 NOTES RADIX B 26729>42302 126 341 2 0 0 0 341 *1tt gSET(MR3)=(64+R) 42303 106 4 1 3 0 TEST 'FINIS' BLOCK 42304 105 258 28 1 0 0 258 42305 127 436 12 0 0 0 436 gYES 42306 106 1 1 3 0 TEST SENTINEL TYPE 3 42307 105 211 7 1 0 0 211 42308 105 212 6 0 0 0 212 42309 127 436 12 0 0 0 436 gYES 42310 101 4 1 3 0 *5:t OMIT EDG? 42311 126 332 2 0 0 0 332 42312 127 436 8 0 1 0 436 *5:t gYES 42313 126 451 2 0 0 0 451 *8£9 42314 106 109 6 1 0 0 109 SET UP'EDG' 42315 102 258 4 1 0 0 258 42316 126 357 2 0 0 0 357 COUNT 500 MILLISECS 42317 126 362 2 0 0 0 362 gUNLOAD ETC 42318 124 188 2 0 1 0 188 SET UP BLOCK NO. 42319 106 190 2 0 0 0 190 42320 102 258 8 0 0 0 258 42321 124 188 2 0 3 0 188 CLEAR BLOCK COUNTER 42322 102 190 2 0 0 0 190 42323 124 188 2 0 1 0 188 CLEAR REEL COUNTER 42324 102 190 34 0 0 0 190 42325 126 326 2 0 0 0 326 *179 gALTERNATE ROUTES 42326 124 383 21 0 2 0 383 42327 126 363 2 0 0 0 363 gSET LINK FOR SI=5 SETTING OF S101 42328 124 432 10 1 0 0 432 gOUTPUT COMMENT 42400 PROCR 424 424 OPEN MAGNETIC TAPE OUTPUT FILE 42401 NOTES RADIX B 26733> 26720>42402 126 425 2 0 0 0 425 gOPEN MAG TAPE O/P REEL 42403 106 40 0 1 0 42404 118 4127 0 0 0 42405 124 409 11 1 0 0 409 g 42500 PROCR 425 425 OPEN MAGNETIC TAPE OUTPUT REEL 42501 NOTES RADIX B 42502 100 0 0 0 0 LINK 42503 126 339 2 0 0 0 339 gSET(MR3)=(3) 42504 106 425 2 0 0 0 425 42505 102 168 0 3 0 LINK TO 168 OF SPECIAL CHAP 42506 126 188 2 1 2 0 188 SET(MR2)=R 42507 106 64 0 2 0 STORE CURRENT ASL 42508 102 221 2 0 0 0 221 *5+9 42509 102 163 0 3 0 *5+1 42510 101 14 1 3 0 FORM NEW ASL 42511 118 4 0 0 0 C+106 42512 104 3 0 0 0 42513 101 106 1 1 0 42514 105 221 2 0 0 0 221 *5+t TEST ALREADY SET UP 42515 127 425 20 0 0 0 425 gYES 42516 104 221 2 0 0 0 221 *5+t 42517 102 64 0 2 0 42518 106 221 2 0 0 0 221 *5+t 42519 102 163 0 3 0 *5+t 42515>42520 101 15 1 3 0 SET TAG 15 42521 123 126 1 3 0 IN LIMIT WORD 29235>42522 101 0 1 3 0 *43t*51t CLEAR DB'S COUNTER 42523 124 188 2 0 3 0 188 42524 102 192 2 0 0 0 192 *43t*51t 28576>42525 126 307 2 0 0 0 307 gRUN FORWARD ETC 42526 124 3 0 1 0 *5+t TEST CHD 42527 106 164 0 0 0 42528 127 425 33 0 0 0 425 gNO 42529 124 3 0 1 0 42530 106 189 0 0 0 TEST OPEN FILE 42531 127 428 2 0 0 0 428 gNO,REOPEN O/P REEL 42532 124 425 38 1 0 0 425 *5+t YES REWRITE BLOCK 7 42528>42533 126 429 2 0 0 0 429 gTEST TAPE RELEASED S/R 42534 124 428 2 1 0 0 428 gNO 42535 101 1 1 3 0 42536 124 3 0 1 0 42537 102 189 0 0 0 SET OPEN FILE IND(FOR CMD 42532>42538 126 340 2 0 0 0 340 gSET (MR3)=R 42539 106 190 34 0 3 0 190 TEST REEL COUNTER 42540 103 221 2 0 0 0 221 42541 127 425 56 0 0 0 425 gYES =0 42542 118 4126 1 0 0 TEST X=£ 42543 101 15 1 2 0 42544 127 425 50 0 1 0 425 gNO 42545 118 4 1 0 0 SET X=Y 42546 101 12 0 1 0 42547 124 188 2 0 1 0 188 42548 114 190 34 0 0 0 190 42549 124 425 58 1 0 0 425 gYES 42544>42550 126 412 2 0 0 0 412 gFORM X-Y TEST Y>X IN REEL 42551 127 425 64 0 2 0 425 g 42552 106 190 34 0 3 0 190 SET X=Y 42553 118 2 0 0 0 42554 114 190 34 0 3 0 190 42555 124 425 64 1 0 0 425 g 42541>42556 124 257 0 2 0 SET REEL COUNTER=1:1 42557 102 190 34 0 3 0 190 42549>42558 106 32 0 1 0 STORE PROGRAMME NO 42559 102 190 66 0 3 0 190 42560 106 33 0 1 0 STORE FILE IDENTITY 42561 102 190 98 0 3 0 190 42562 106 40 0 1 0 STORE RUN & RE-RUN NUMBERS 42563 102 191 32 0 3 0 191 42555> 42551>42564 126 341 2 0 0 0 341 gSET(MR3)=(64+R) 42600 PROCR 426 426 SET UP LOP COMMENT AND SOURCE BLOCK 42601 NOTES RADIX B 42602 124 7 0 2 0 SET UP XERONIC WORD 42603 124 188 2 0 1 0 188 42604 103 190 2 0 0 0 190 42605 103 1 1 3 0 42606 104 211 20 1 0 0 211 42607 102 4 1 3 0 42608 102 2 1 3 0 CLEAR 2ND WORD 42609 124 188 2 0 1 0 188 SET UP PROG NO 42610 106 190 66 0 0 0 190 42611 103 260 20 0 0 0 260 *719 STORE FOR COMMENT 42612 102 15 1 3 0 42613 106 100 17 0 0 0 100 SET UP DATE 42614 102 13 1 3 0 42615 106 214 10 1 0 0 214 SET UP B/E WORD 42616 102 18 1 3 0 42617 126 431 2 0 0 0 431 gSET UP FILE, RUN & REEL 42618 124 188 2 0 1 0 188 *01t TEST 90K FILE 42619 106 191 64 0 0 0 191 42620 127 426 22 0 0 0 426 gNO 42621 106 210 8 0 0 0 210 *01t 42620>42622 102 17 1 3 0 SET UP 45/90K IND 42623 126 330 2 0 0 0 330 gWRITE 42624 126 429 2 0 0 0 429 gTEST TAPE RELEASED S/R 42625 124 426 32 1 0 0 426 *5+e gNO 42631>42626 106 258 10 0 0 0 258 *8:t SPOOL NO 42627 105 196 2 0 3 0 196 TEST=NEXT IN LIST 42628 127 426 30 0 1 0 426 *8:t NOg 42629 102 196 2 0 3 0 196 DELETE TAPE NO 42628>42630 125 1 0 3 0 *8:t 42631 124 426 26 1 0 0 426 *8:t 42625>42632 124 3 0 1 0 *5+t TEST IF CHANGE 42633 106 164 0 0 0 DECKS 42634 127 426 74 0 1 0 426 *5+t gYES 41064>42635 101 8 1 3 0 SET ROUTE TYPE 8 42636 102 188 3 0 0 0 188 42637 126 350 2 0 0 0 350 gTEST RTE DEALING WITH D/B 42638 126 341 2 0 0 0 341 gSET(MR3)=(64+R) 42639 126 431 2 0 0 0 431 gSET UP COMMENT 42640 106 214 50 1 0 0 214 SET UP 'LOP' 42641 102 258 4 1 0 0 258 42642 126 339 2 0 0 0 339 gSET (MR3)=(3) 42643 106 182 0 3 0 42644 102 258 10 0 0 0 258 42645 102 189 0 3 0 CLEAR OPEN FILE IND(FOR CHD) 42646 124 188 2 0 1 0 188 *01t TEST 90K FILE 42647 106 191 64 0 0 0 191 42648 127 426 53 0 0 0 426 *3£e71e*3£e gNO 42649 101 24 0 1 0 SET UP'H'IN'HOP'COMMENT 42650 124 88 0 2 0 42651 118 3 0 0 0 42652 114 258 5 0 0 0 258 *01t 42648>42653 100 210 3 0 3 0 210 *3£t SET DECIMAL 42654 106 258 23 0 0 0 258 STEP CARD SERIAL NUMBER 42655 104 210 8 0 0 0 210 42656 100 212 2 0 3 0 212 SET BINARY 42657 102 258 23 0 0 0 258 *3£t 42658 106 262 26 1 0 0 262 *3£t*3£2712 42659 102 262 22 1 0 0 262 *3£t*3£2712 41062>42660 106 262 32 1 0 0 262 *71t 42661 102 262 22 1 0 0 262 *71t 41061>42662 124 426 76 0 2 0 426 41140> 32122>42663 126 363 2 0 0 0 363 gSET LINK FOR SI=5, SETTING OF S101 42664 124 262 2 0 2 0 262 SELECT TABLE START LOCATION 42665 124 3 0 1 0 SET UP COMMENT IN SPECIAL CHAPTER 42666 128 130 1 2 0 42667 106 262 24 1 0 0 262 *3£t*712 42668 102 262 22 1 0 0 262 *3£t*712 42669 106 262 30 1 0 0 262 *71t 42670 102 262 22 1 0 0 262 42671 106 262 34 1 0 0 262 *3£t 42672 102 262 28 1 0 0 262 *71t*3£t 42673 124 336 4 1 0 0 336 g OUTPUT COMMENT 42634>42674 126 352 2 0 0 0 352 *5+t*09e06e TEST RTE NOTING D/B 42675 124 292 42 1 0 0 292 *5+t 42676 126 359 2 0 0 0 359 gSET SI=4,RESTORE LINK FOR SI=3 42700 PROCR 427 427 SET UP AND PUNCH LIBRARIAN CARD 42701 NOTES RADIX B 42702 124 428 24 1 0 0 428 *251 gAVOID 42703 124 2 0 1 0 *25t SET (MR3)=(64+R) 42704 124 30 0 1 0 42705 106 64 0 0 0 42706 102 6 1 0 0 42707 106 30 0 1 0 STORE RTE NUMBER 42708 124 3 0 1 0 42709 102 158 0 0 0 42710 124 427 43 0 2 0 427 SET UP RTE NO & TYPE FOR CARDS 42711 101 267 2 1 2 0 267 42712 118 5 0 0 0 42713 104 260 10 0 0 0 260 42714 102 30 1 1 0 42715 106 258 23 0 0 0 258 SET UP CARD SERIAL NO 42716 102 3 1 3 0 42717 124 3 0 1 0 42718 106 182 0 0 0 SET UP SPOOL NO 42719 102 5 1 3 0 42720 124 3 0 1 0 SET (MR2)=R 42721 106 158 0 0 0 42722 102 4 1 0 0 42723 106 190 66 0 2 0 190 SET UP PROGRAMME NO 42724 102 7 1 3 0 42725 106 191 32 0 2 0 191 SET UP RUN AND RERUN NOS 42726 102 9 1 3 0 42727 106 190 98 0 2 0 190 SET UP FILE IDENTITY 42728 118 6 0 0 0 42729 102 10 1 3 0 42730 101 3 0 1 0 SET UP REEL NO 42731 115 190 34 0 2 0 190 42732 118 1 0 0 0 42733 104 139 0 0 0 42734 102 258 13 1 0 0 258 42735 106 258 12 1 0 0 258 42736 107 10 1 3 0 42737 106 138 0 0 0 SET UP DATE 42738 102 13 1 3 0 42739 106 214 10 1 0 0 214 SET UP B/E 42740 102 14 1 3 0 42741 102 0 1 3 0 42747>42742 124 264 30 1 0 0 264 gSET SI=1,TEST ROUTE,ETC 42743 124 260 10 0 1 0 260 TEST ANOTHER LIB 42744 106 64 0 0 0 CARD BEING PROCESSED 42745 118 4124 0 0 0 42746 101 13 1 2 0 42747 127 427 42 0 0 0 427 gYES 42748 124 3 0 1 0 42749 124 158 0 1 0 EDIT INTO MATRIX FORM 42750 124 64 0 1 0 42751 124 0 0 2 0 42752 129 259 2 0 0 0 259 42753 106 258 20 1 0 0 258 AUGMENT BY B40 42754 107 259 8 1 0 0 259 42755 101 3 1 3 0 SET UP RTE NO AND TYPE FOR CARDS 42756 118 5 0 0 0 42757 104 260 10 0 0 0 260 42758 103 188 2 1 0 0 188 42759 124 260 11 0 1 0 260 UPDATE ASSEMBLER TABLE 42760 102 252 2 1 0 0 252 42761 124 260 10 0 1 0 260 INTERCHANGE AREA ADDRESSES 42762 101 3520 0 3 0 42763 124 188 2 0 1 0 188 OUTPUT 42764 119 0 0 0 0 42765 126 350 2 0 0 0 350 gTEST RTE DEALING WITH D/B 42766 124 260 10 0 1 0 260 INTERCHANGE AREA ADDRESSES 42767 101 3520 0 3 0 42768 106 4 0 0 0 SET UP ROUTE NO 42769 103 30 0 1 0 42770 102 188 2 0 0 0 188 42771 124 188 2 0 1 0 188 CLEAR 2ND WORD 42772 124 64 0 1 0 42773 102 2 1 0 0 42774 124 428 24 1 0 0 428 *25t g 42800 PROCR 428 428 RE-OPEN MAGNETIC TAPE OUTPUT REEL 42801 NOTES RADIX B 42534> 42531>42802 124 188 2 0 1 0 188 TEST REEL COUNTER 42803 106 190 34 0 0 0 190 =0 42804 127 432 2 0 0 0 432 gYES RT1 COMMENT 42805 118 4126 0 0 0 TESTX=£ 42806 101 15 1 2 0 42807 127 432 2 0 0 0 432 gYES RT1 COMMENT 42808 126 412 2 0 0 0 412 gFORM X-Y TEST Y>X IN REEL 42809 127 432 2 0 3 0 432 gYES RT1 COMMENT 42810 126 308 2 0 0 0 308 gREAD, TEST BLOCK 42811 126 341 2 0 0 0 341 gSET MR3=64+R 42812 126 413 2 0 0 0 413 gTEST CORRECT SOURCE BLOCK 42813 101 3 0 1 0 TEST CORRECT REEL 42814 124 188 2 0 1 0 188 NUMBER 42815 115 190 34 0 0 0 190 42816 105 11 1 3 0 42817 127 417 2 0 1 0 417 gNO, HDG COMMNET 42818 124 3 0 1 0 RESTORE ASL 42819 106 163 0 0 0 42820 124 2 0 1 0 42821 124 30 0 1 0 42822 102 64 0 0 0 42823 124 411 2 1 0 0 411 g 42774> 42702> 39211>42824 124 3 0 1 0 RESTORE ASL 42825 106 163 0 0 0 42826 124 2 0 1 0 42827 124 30 0 1 0 42828 102 64 0 0 0 41118>42829 124 3 0 1 0 TEST LINK FROM 42830 106 168 0 0 0 W/E PROCEDURE 42831 101 306 2 1 2 0 306 42832 127 411 47 0 1 0 411 gNO 42833 106 212 5 0 0 0 212 SET UP ROUTE TYPE 42834 102 31 0 1 0 30517> 30512> 30509>42835 124 2 0 1 0 42836 124 12 1 0 0 gSI+12 42900 PROCR 429 429 TEST TAPE RELEASED S/R 42902 100 0 0 0 0 42903 126 212 10 1 3 0 212 *4:34te (MR3)=48:0 42904 124 3 0 1 0 SPOOL EX SENTINEL 42905 106 182 0 0 0 42906 103 258 10 0 0 0 258 STORE FOR COMMENT 42907 118 4127 1 1 0 *8+t WORKING TAPE? 42908 127 429 10 0 0 0 429 YESg 42909 118 1 1 1 0 *8+t 42914> 42908>42910 105 196 2 0 3 0 196 TEST=NEXT IN LIST 42911 127 429 16 0 0 0 429 gYES 42912 104 196 2 0 3 0 196 42913 125 1 0 3 0 42914 124 429 10 1 0 0 429 gNEXT ONE 42915 126 429 2 0 1 0 429 gLEAVE S/R NOT IN RT1 42911>42916 124 429 2 0 3 0 429 42917 124 1 1 0 0 gS/R+1 IN RT1 43000 PROCR 430 430 INTERCHANGE AREA ADDRESSES FOR FCC 43002 100 0 0 0 0 *3:t4£t 43003 106 32 0 1 0 PSEUDOROUTE 43004 102 430 15 0 0 0 430 WL 43005 124 430 15 0 1 0 430 43006 100 64 0 2 0 PSEUDOROUTE START LOCNgB 43007 124 188 2 0 1 0 188 43008 106 64 0 0 0 ROUTE START LOCN 43009 124 430 15 0 1 0 430 43010 102 64 0 0 0 gPSEUDOROUTE START 43011 118 10 1 1 0 (B)gA 43012 124 188 2 0 1 0 188 43013 102 64 0 0 0 PSEUDO ROUTEgROUTE 43014 126 430 2 0 1 0 430 43015 100 0 0 0 0 WL FOR THIS S/R 43100 PROCR 431 431 SET UP'LIP'AND'LOP'COMMENTS 43101 NOTES RADIX B 43102 100 0 0 0 0 LINK 43103 126 345 2 0 0 0 345 gEDIT TIME,SET UP RTE NUMBER 43104 126 356 2 0 0 0 356 SET UP PROGRAMME NUMBER 43105 124 188 2 0 1 0 188 SET UP FILE IDENTITY 43106 106 190 98 0 0 0 190 43107 103 6 1 3 0 43108 118 2 0 0 0 43109 101 113 1 1 0 43110 118 4 0 0 0 43111 102 258 12 1 0 0 258 43112 101 3 0 1 0 43113 124 188 2 0 1 0 188 SET UP FILE IDENTITY/REEL NUMBER 43114 115 190 34 0 0 0 190 43115 102 258 9 1 0 0 258 43116 106 258 8 0 0 0 258 43117 107 258 12 1 0 0 258 43118 102 10 1 3 0 SET UP REEL NUMBER 43119 124 188 2 0 1 0 188 SET UP RUN AND RE-RUN NUMBERS 43120 106 191 32 0 0 0 191 43121 103 258 8 0 0 0 258 43122 102 9 1 3 0 43123 126 431 2 0 1 0 431 43200 PROCR 432 432 SET UP 'RTI' COMMENT 43201 NOTES RADIX B 42809> 42807> 42804>43202 126 357 2 0 0 0 357 gCOUNT 500 MILLISECS 43203 106 214 40 1 0 0 214 SET UP 'RTI' 43204 102 258 4 1 0 0 258 43205 124 425 25 0 2 0 425 43206 126 362 2 0 0 0 362 gUNLOAD ETC 43207 124 3 0 1 0 SET UP TAPE NUMBER 43208 106 182 0 0 0 43209 102 258 8 0 0 0 258 42328> 32412> 31222>43210 102 258 10 1 0 0 258 CLEAR COL 4 36530> 28544>43211 124 261 12 0 2 0 261 SELECT TABLE START LOCATION 43212 124 336 2 1 0 0 336 gOUTPUT COMMENT 43300 PROCR 433 433 MAGNETIC TAPE OUTPUT 43301 NOTES RADIX 26710>43302 102 433 4 0 0 0 433 *4£1*3:1 43303 126 430 2 0 0 0 430 *3:94£9 1AA SS/R 43304 100 0 0 0 0 *4£1*3:1 43305 126 188 2 1 2 0 188 SET(MR2)=R 43306 126 341 2 0 0 0 341 SET(MR3)=(64+R) 43307 102 2 1 3 0 SET 2ND WORD OF BLOCK=0 43308 106 190 2 0 2 0 190 SELECT BLOCK WITHIN REEL CTR 43309 100 210 3 0 3 0 210 SET(C) DECIMAL STEP COUNTER BY 1 43310 104 210 8 0 0 0 210 ADD 1 43311 103 1 1 3 0 INSERT BLOCK NO. 43312 102 190 2 0 2 0 190 STORE BLOCK WITHIN 43313 101 1 1 3 0 *8£t 43314 107 193 26 0 2 0 193 *8£t 43315 100 212 2 0 3 0 212 SET BINARY 43316 126 342 2 0 0 0 342 *019 43317 126 330 2 0 0 0 330 WRITE 43318 126 343 2 0 0 0 343 *019 43319 124 268 8 1 0 0 268 gUPDATE USE OF ASSEMBLER TABLE 43400 PROCR 434 434 CLOSE MAGNETIC TAPE OUTPUT REEL 43401 NOTES RADIX B 26747>43402 126 435 2 0 0 0 435 gSET UP END OF REEL SENTINEL 43403 126 310 2 0 0 0 310 gWRITE END OF REEL INFORMATION 43404 124 422 2 1 0 0 422 gUNLOAD 43500 PROCR 435 435 SET UP END OF REEL SENTINEL 43501 NOTES RADIX B 43502 100 0 0 0 0 LINK 43503 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 43504 106 211 8 1 0 0 211 SET R/M WORD IN 2ND. WORD 43505 102 2 1 3 0 43506 106 214 10 1 0 0 214 SET B/E WORD IN 4TH. WORD 43507 102 6 1 3 0 43508 106 211 6 1 0 0 211 43509 104 210 8 0 0 0 210 43510 126 435 2 0 1 0 435 gLEAVE S/R 43600 PROCR 436 436 CLOSE MAGNETIC TAPE OUTPUT FILE 43601 NOTES RADIX B 26730>43602 124 188 2 0 3 0 188 TEST BLOCK COUNTER 43603 106 190 2 0 0 0 190 =5 43604 101 6 1 2 0 43605 127 263 27 0 3 0 263 gYES ZZZ10 JUST REWOUND 43606 126 309 2 0 0 0 309 gWRITE END OF FILE 43607 126 310 2 0 0 0 310 gINFORMATION 42312>43608 125 0 1 2 0 43609 124 188 2 0 1 0 188 43610 102 190 2 0 0 0 190 CLEAR BLOCK CNTR 26439>43611 125 0 1 2 0 *1t1 42309> 42305>43612 124 188 2 0 1 0 188 CLEAR REEL CNTR 43613 102 190 34 0 0 0 190 43614 126 357 2 0 0 0 357 gCOUNT 500 MILLISECS 43615 126 451 2 0 0 0 451 *8£9 43616 126 362 2 0 0 0 362 gUNLOAD 43617 126 326 2 0 0 0 326 *179 gALTERNATE ROUTES 43618 124 268 6 1 0 0 268 g 43700 PROCR 437 437 REWIND 43701 NOTES RADIX B 26735>43702 126 309 2 0 0 0 309 gWRITE END OF 43703 126 310 2 0 0 0 310 gFILE INFORMATION 26736>43704 126 357 2 0 0 0 357 gCOUNT 500 MILLISECS 43705 126 451 2 0 0 0 451 *8£9 43706 126 340 2 0 0 0 340 g SET (MR3)=R 43707 101 3 0 1 0 43708 115 190 34 0 3 0 190 43709 105 210 8 0 0 0 210 1 43710 127 437 15 0 0 0 437 gREEL CTR=1,NO TAPE CHANGE 43711 106 210 8 0 0 0 210 SET REEL CNTR=1 43712 114 190 34 0 3 0 190 43713 126 324 2 0 0 0 324 gUNLOAD, NEW TAPE 43714 124 268 9 1 0 0 268 gRESET MOD GP 43710>43715 124 188 2 0 1 0 188 REWIND 43716 119 0 1 1 0 43717 106 210 6 0 0 0 210 SET REWIND IND TO 43718 107 190 98 0 3 0 190 COUNT 500 M-SECS 43719 101 5 1 3 0 SET BLOCK 43720 124 188 2 0 3 0 188 COUNTER=5 43721 102 190 2 0 0 0 190 43722 102 188 3 0 0 0 188 CLEAR ASSEMBLER TABLE, 43723 124 268 8 1 0 0 268 g RESET MOD GROUP 43800 PROCR 438 438 RUN FORWARD AND BACK (1) 43801 NOTES RADIX B 26740> 26739>43802 125 0 1 2 0 43803 124 438 12 1 0 0 438 gSET PP=0, QQ=0 26737>43804 126 309 2 0 0 0 309 gWRITE END OF FILE 43805 126 310 2 0 0 0 310 gINFORMATION 43806 101 1 1 3 0 STEP BACK 3 FORWARD 1 43810>43807 101 2 1 1 0 43808 126 306 2 0 0 0 306 43809 126 315 2 0 0 0 315 TEST A1 FOR FBM 43810 124 438 7 1 0 0 438 gYES STEP BACK 2 FORWARD 1 44239> 26738>43811 101 15 1 3 0 SET PP=15, QQ=0 43803>43812 124 3 0 1 0 43813 102 180 1 0 0 43814 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 43815 124 2 0 1 0 CLEAR IDENTIFIER WORD 43816 124 33 0 1 0 43817 102 0 1 3 0 43900 PROCR 439 439 RUN FORWARD & BACK (2) 43901 NOTES RADIX B 44017>43902 126 315 2 0 0 0 315 gTEST A1=FBM 43903 124 440 2 1 0 0 440 gYES 43904 124 7 0 2 0 TEST HEADING BLOCK 43905 105 1 1 3 0 43906 127 441 17 0 2 0 441 gYES 43907 106 1 1 3 0 TEST SENTINEL TYPE 3 43908 105 211 7 1 0 0 211 43909 105 210 8 0 0 0 210 43910 127 441 2 0 0 0 441 gYES 43911 105 210 8 0 0 0 210 TEST SENTINEL TYPE 3 43912 127 442 18 0 0 0 442 gYES 43913 124 3 0 1 0 TEST D/B OCCURRED 43914 106 160 0 0 0 43915 127 440 2 0 1 0 440 gYES 43916 124 2 0 1 0 TEST IDENTIFIER WORD 43917 124 33 0 1 0 =0 43918 106 1 1 3 0 43919 127 440 2 0 0 0 440 gYES 43920 105 32 0 1 0 TEST REQUIRED BLOCK 43921 127 442 2 0 1 0 442 gNO 43922 106 1 1 3 0 SET BLOCK CNTR=A1 43923 124 188 2 0 1 0 188 43924 102 190 2 0 0 0 190 43925 124 3 0 1 0 43926 102 181 0 0 0 43927 124 268 9 1 0 0 268 gRESET MOD GP 44000 PROCR 440 440 RUN FORWARD & BACK (3) 44001 NOTES RADIX B 44207> 44215> 44217> 43919> 43915> 43903>44002 124 3 0 1 0 TEST PP=0 44003 106 180 0 0 0 44004 127 440 18 0 0 0 440 gYES 44005 106 212 6 0 0 0 212 44006 126 306 2 0 0 0 306 gSTEP BACK 2, STEP FORWARD 44007 126 357 2 0 0 0 357 gCOUNT 500 M.SECS 44008 124 188 2 0 1 0 188 RUN BACK 44009 119 0 0 2 0 44010 126 351 2 0 0 0 351 gTEST RTE NOTING D/B 44011 126 342 2 0 0 0 342 *019 SET (64+R) FOR HIGH DENSITY 44012 106 210 8 0 0 0 210 44029>44013 126 306 2 0 0 0 306 g STEP BACK, STEP FORWARD 44014 126 343 2 0 0 0 343 *019 CLEAR BIT 1 OF (64+R) 44023>44015 126 329 2 0 0 0 329 gREAD 44016 126 351 2 0 0 0 351 gTEST RTE NOTING D/B 44017 124 439 2 1 0 0 439 g 44116> 44004>44018 126 341 2 0 0 0 341 SET(MR3)=(64+R) 44019 106 4 1 3 0 TEST FINIS 44020 105 258 28 1 0 0 258 44021 127 442 18 0 0 0 442 gYES 44022 126 315 2 0 0 0 315 gTEST A1=FBK 44023 124 440 15 1 0 0 440 gYES 44024 124 188 2 0 1 0 188 RUN FORWARD 44025 119 0 0 3 0 44026 126 351 2 0 0 0 351 gTEST RTE NOTING D/B 44027 126 342 2 0 0 0 342 *019 SET (64+R) FOR HIGH DENSITY 44028 106 212 6 0 0 0 212 44029 124 440 13 1 0 0 440 gSTEP BACK 2, FORWARD 1 44100 PROCR 441 441 RUN FORWARD & BACK (4) 44101 NOTES RADIX B 43910>44102 106 210 8 0 0 0 210 AUGMENT REEL CNTR BY 1 44103 100 210 3 0 3 0 210 44125>44104 124 188 2 0 1 0 188 44105 107 190 34 0 0 0 190 44106 100 212 2 0 3 0 212 44107 126 357 2 0 0 0 357 COUNT 500 MILLISECS 44108 126 324 2 0 0 0 324 gUNLOAD, 'NEW' COMMENT 44109 126 410 2 0 0 0 410 gOPEN INPUT REEL 44110 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 44111 124 2 0 1 0 CLEAR IDENTIFIER WORD 44112 124 33 0 1 0 44113 102 0 1 3 0 44114 126 339 2 0 0 0 339 gSET (MR3)=(3) 44115 102 180 0 3 0 SET PP=0 44116 124 440 18 1 0 0 440 g 43906>44117 126 340 2 0 0 0 340 gSET(MR3)=R 44118 101 3 0 1 0 TEST REEL NO=1 44119 115 190 34 0 3 0 190 44120 105 210 8 0 0 0 210 44121 127 442 8 0 0 0 442 gYES 44122 125 0 1 2 0 AUG MENT REEL CNTR BY-1 44123 100 210 3 0 3 0 210 44124 105 210 8 0 0 0 210 44125 124 441 4 1 0 0 441 g 44200 PROCR 442 442 RUN FORWARD & BACK (5) 44201 NOTES RADIX B 43921>44202 102 258 12 0 0 0 258 STORE DIFFERENCE, AN - REQ'D WORD 44203 126 339 2 0 0 0 339 gSET (MR3)=(3) 44204 106 180 0 3 0 TEST PP=0 44205 127 442 16 0 0 0 442 gYES 44206 106 258 12 0 0 0 258 TEST DIFFERENCE < 0 44207 127 440 2 0 2 0 440 gNO 44121>44208 126 339 2 0 0 0 339 gSET (MR3=((3) 44220>44209 102 180 0 3 0 SET PP=0 44210 106 181 0 3 0 STEP QQ BY 1 44211 104 210 8 0 0 0 210 44212 103 181 0 3 0 44213 101 6 1 2 0 *774 00002 44214 127 263 25 0 0 0 263 *773 gZZZ08 44215 124 440 2 1 0 0 440 g 44205>44216 106 258 12 0 0 0 258 TEST DIFFERENCE > 0 44217 127 440 2 0 3 0 440 gNO 44021> 43912>44218 126 339 2 0 0 0 339 gSET (MR3)=(3) 44219 124 15 0 2 0 44220 124 442 9 1 0 0 442 gSET PP=15 41066>44221 106 214 92 1 0 0 214 *77t OFFER 44222 102 258 4 1 0 0 258 44223 126 361 2 0 0 0 361 EDIT TIME SET UP PROG NO 44224 106 33 0 1 0 IDENTIFIER WORD 44225 102 258 8 0 0 0 258 44226 106 32 0 1 0 IDENTIFIER VALUE 44227 102 258 10 0 0 0 258 44228 102 258 12 1 0 0 258 CLEAR COL 5 44229 101 3 1 3 0 44230 118 13 0 3 0 SET BITS 14 AND 15 44231 102 41 0 1 0 44232 101 262 2 1 3 0 262 TABLE START ADDR. 44233 124 335 2 1 0 0 335 gOFFER OPTIONS 44234 126 362 2 0 0 0 362 OPT 15 SET ROUTE TO MANUAL 44235 101 1 1 3 0 SET REEL COUNTER = 1 44236 124 188 2 0 1 0 188 44237 102 190 34 0 0 0 190 44238 126 410 2 0 0 0 410 OPEN I/P REEL 44239 124 438 11 1 0 0 438 gRUN FORWARD 44300 PROCR 443 443 STEP BACK 1 44301 NOTES RADIX B 26742>44302 124 3 0 1 0 SET N NON-ZERO 44303 102 181 0 0 0 26746>44304 101 3 1 3 0 SET M=L+3 44305 124 444 7 1 0 0 444 g 43627 44306 100 4102 0 3 0 44400 PROCR 444 444 STEP BACK 2 44401 NOTES RADIX B 26745>44402 124 3 0 1 0 SET N NON-ZERO 44403 102 181 0 0 0 26741>44404 126 309 2 0 0 0 309 gWRITE END OF FILE 44405 126 310 2 0 0 0 310 gINFORMATION 44406 101 5 1 3 0 44305>44407 100 210 3 0 3 0 210 44408 104 32 0 1 0 SET M=L+5 44409 100 212 2 0 3 0 212 44410 124 3 0 1 0 44411 102 180 0 0 0 44412 106 32 0 1 0 44413 127 263 22 0 3 0 263 gYES 44414 127 444 29 0 1 0 444 gNO TEST L=0 44415 106 31 0 1 0 44416 101 44 1 2 0 TEST RTE. TYPE=44 44417 127 263 22 0 1 0 263 gNO 44418 124 188 2 0 1 0 188 TEST BLOCK COUNTER=8 44419 106 190 2 0 0 0 190 44420 101 8 1 2 0 44421 127 446 25 0 0 0 446 *019 gYES 44422 127 444 29 0 1 0 444 *012 gNO 44423 101 3 1 3 0 44424 126 306 2 0 0 0 306 STEP BACK 3, FORWARD 1 44425 101 6 1 3 0 44426 124 188 2 0 1 0 188 44427 102 190 2 0 0 0 190 SET BLOCK COUNTER=6 44428 124 446 31 1 0 0 446 *012 44422> 44414>44429 125 0 1 2 0 44430 100 210 3 0 3 0 210 44431 105 32 0 1 0 STEP BLOCK CNTR BY-L-1 44432 126 331 2 0 0 0 331 g 44551>44433 126 340 2 0 0 0 340 gSET (MR3)=R 44434 100 210 3 0 3 0 210 TEST BLOCK CTR > 44435 106 190 2 0 3 0 190 NO. OF HEADING BLOCK 44436 101 6 1 2 0 44437 127 445 2 0 3 0 445 gNO 44459>44438 100 212 2 0 3 0 212 44439 101 213 12 1 3 0 213 CONVERT M 44440 124 3 0 1 0 44441 112 180 0 0 0 44442 126 306 2 0 0 0 306 gSTEP BACK M, FORWARD 1 BLOCK 44443 126 329 2 0 0 0 329 gREAD 44444 126 351 2 0 0 0 351 gTEST ROUTE NOTING D/B 44467> 44470>44445 126 315 2 0 0 0 315 gTEST A1 FOR FBM 44446 124 444 60 1 0 0 444 gFBM FOUND 44447 100 210 3 0 3 0 210 DEC 44448 126 314 2 0 0 0 314 gTEST A1=BLOCK COUNTER 44449 100 212 2 0 3 0 212 BIN 44450 127 446 10 0 0 0 446 gYES 44451 127 444 62 0 3 0 444 gYES TEST A144456 124 3 0 1 0 44457 102 180 0 0 0 44458 100 212 2 0 3 0 212 BIN 44459 124 444 38 1 0 0 444 g 44454> 44446>44460 101 3 1 3 0 SET M=3 44461 124 444 56 1 0 0 444 g 44451>44462 101 444 45 1 3 0 444 SELECT RETURN LOCATION 44463 124 3 0 1 0 44464 102 162 0 0 0 44465 126 323 2 0 0 0 323 gTEST OPTION LINK 44466 126 316 2 0 0 0 316 gALIGNMENT FAILURE 44467 124 444 45 1 0 0 444 44468 126 317 2 0 0 0 317 gREREAD 44469 126 319 2 0 0 0 319 gSTEP ATTEMPTS COUNTER 44470 124 444 45 1 0 0 444 44500 PROCR 445 445 STEP BACK 3 44501 NOTES RADIX B 44437>44502 124 3 0 1 0 STORE BLOCK COUNTER 44503 102 169 0 0 0 44504 124 3 0 1 0 CLEAR M 44505 102 180 0 0 0 44506 101 3 0 1 0 STEP REEL CNTR 44507 115 190 34 0 3 0 190 TEST NO OF REQ'D 44508 105 210 8 0 0 0 210 REEL=0 44509 100 212 2 0 3 0 212 44510 127 263 23 0 0 0 263 gYES, ZZZ COMMENT 44511 114 190 34 0 3 0 190 PACK IN NEW REEL NO 44512 126 357 2 0 0 0 357 COUNT 500 MILLISECS 44513 126 324 2 0 0 0 324 gUNLOAD CALL FOR NEW TAPE 44514 126 410 2 0 0 0 410 gOPEN INPUT REEL 44532>44515 124 188 2 0 1 0 188 RUN FORWARD 44516 119 0 0 3 0 44517 126 351 2 0 0 0 351 gTEST RTE NOTING D/B 44518 126 342 2 0 0 0 342 *019 SET(MR2)=(64+R)FOR 90K 44519 126 329 2 0 0 0 329 gREAD 44520 126 343 2 0 0 0 343 *019 SET(MR2)=(64+R)FOR 90K 44521 126 351 2 0 0 0 351 gTEST RTE NOTING D/B 44522 126 341 2 0 0 0 341 gSET(MR3)=(64+R) 44523 106 1 1 3 0 44524 105 211 7 1 0 0 211 TEST SENTINEL TYPE 2 44525 105 210 8 0 0 0 210 44526 127 445 36 0 0 0 445 gYES 44527 106 0 1 3 0 44528 105 258 30 0 0 0 258 TEST A1=(END) 44529 127 445 32 0 0 0 445 gYES 44530 106 2 1 3 0 44531 105 258 30 0 0 0 258 TEST A2=(END) 44529>44532 127 445 15 0 1 0 445 44533 106 210 8 0 0 0 210 44534 124 3 0 1 0 SET M=1 44535 102 180 0 0 0 44526>44536 124 3 0 1 0 44537 106 160 0 0 0 TEST D/B OCCURRED 44538 127 263 24 0 1 0 263 gYES 44539 100 210 3 0 3 0 210 AUGMENT M BY 3 44540 101 3 1 3 0 -CTR IN SP. CHAP. 44541 124 3 0 1 0 44542 105 169 0 0 0 44543 124 3 0 1 0 44544 107 180 0 0 0 44545 124 3 0 1 0 SET BLOCK CTR.= 44546 106 169 0 0 0 STORED VALUE+A3-1 44547 104 5 1 3 0 44548 105 210 8 0 0 0 210 44549 124 188 2 0 1 0 188 44550 102 190 2 0 0 0 190 44551 124 444 33 1 0 0 444 g 44600 PROCR 446 446 STEP FORWARD 1 44601 NOTES RADIX B 26744>44602 124 3 0 1 0 *1et 44603 102 181 0 0 0 26743>44604 106 32 0 1 0 TEST L<0 44605 127 263 22 0 3 0 263 gYES, ZZZ COMMENT 44606 127 263 22 0 0 0 263 gYES, ZZZ COMMENT TEST L=0 44607 126 331 2 0 0 0 331 gAUGMENT BLOCK COUNTER BY-1 44712> 44743> 44749> 44752>44608 126 314 2 0 0 0 314 gTEST A1=BLOCK COUNTER 44609 127 447 2 0 1 0 447 *1et 44450>44610 124 3 0 1 0 CLEAR OPTION INDICATOR 44611 102 171 0 0 0 44612 126 321 2 0 0 0 321 g'SER' COMMENT 44613 124 3 0 1 0 TEST N=0 44614 106 181 0 0 0 44615 127 268 9 0 0 0 268 44616 125 0 1 2 0 NORMAL 44617 124 3 0 1 0 44618 102 181 0 0 0 SET N=0 44619 126 329 2 0 0 0 329 gREAD 44620 106 210 8 0 0 0 210 STEP BLOCK COUNTER BY 1 44621 126 333 2 0 0 0 333 44622 101 7 1 3 0 SET ROUTE TYPE 7 44623 102 188 3 0 0 0 188 44624 124 268 8 1 0 0 268 gUPDATE ASSR TABLE 44421>44625 126 357 2 0 0 0 357 *01t 44626 124 188 2 0 1 0 188 44627 119 0 1 1 0 REWIND 44628 126 351 2 0 0 0 351 TEST ROUTE NOTING D/B 44629 126 357 2 0 0 0 357 COUNT 500 MS 44630 126 307 2 0 0 0 307 *01t 44428>44631 126 308 2 0 0 0 308 READ, TEST BLOCK 44632 124 268 9 1 0 0 268 gEXIT 44700 PROCR 447 447 STEP FORWARD 2 44701 NOTES RADIX B 44609>44702 106 1 1 3 0 *1et 44703 105 211 7 1 0 0 211 44704 105 210 8 0 0 0 210 44705 127 447 13 0 0 0 447 gYES 44706 105 210 8 0 0 0 210 TEST SENTINEL TYPE 3 44707 127 263 23 0 0 0 263 gYES 44708 126 314 2 0 0 0 314 gTEST A1>BLOCK COUNTER 44709 127 447 44 0 2 0 447 gYES 44710 126 329 2 0 0 0 329 g READ 44711 126 351 2 0 0 0 351 gTEST RTE NOTING D/B 44712 124 446 8 1 0 0 446 g 44705>44713 124 3 0 1 0 TEST D/B OCCURRED 44714 106 160 0 0 0 44715 127 447 21 0 0 0 447 gNO 44716 126 329 2 0 0 0 329 gREAD 44717 126 351 2 0 0 0 351 gTEST RTE NOTING D/B 44718 124 3 0 1 0 44719 106 160 0 0 0 TEST D/B OCCURRED 44720 127 263 24 0 1 0 263 gYES, ZZZ COMMENT 44715>44721 106 210 8 0 0 0 210 44722 100 210 3 0 3 0 210 STEP REEL CNTR BY 1 44723 124 188 2 0 1 0 188 44724 107 190 34 0 0 0 190 44725 126 341 2 0 0 0 341 gSET (MR3)=(64+R) 44726 106 210 8 0 0 0 210 STORE BLOCK COUNTER. 44727 105 5 1 3 0 AUGMENTED BY-A3-1 44728 124 188 2 0 1 0 188 44729 104 190 2 0 0 0 190 44730 124 3 0 1 0 44731 102 169 0 0 0 44732 100 212 2 0 3 0 212 44733 126 357 2 0 0 0 357 COUNT 500 MILLISECS 44734 126 324 2 0 0 0 324 gUNLOAD 'NEW' COMMENT 44735 126 410 2 0 0 0 410 gOPEN NEW INPUT REEL 44736 100 210 3 0 3 0 210 SET DECIMAL 44737 124 3 0 1 0 AUGMENT STORED CTR. 44738 106 169 0 0 0 BY HEADING BLOCKS 44739 101 7 1 1 0 AND RESTORE 44740 124 188 2 0 1 0 188 44741 102 190 2 0 0 0 190 44742 100 212 2 0 3 0 212 SET BINARY 44743 124 446 8 1 0 0 446 g 44709>44744 101 446 8 1 3 0 446 SELECT RETURN LOCATION 44745 124 3 0 1 0 44746 102 162 0 0 0 44747 126 323 2 0 0 0 323 gTEST OPTION LINK 44748 126 316 2 0 0 0 316 gALIGNMENT FAILURE 44749 124 446 8 1 0 0 446 g 44750 126 317 2 0 0 0 317 gREREAD 44751 126 319 2 0 0 0 319 gSTEP ATTEMPTS COUNTER 44752 124 446 8 1 0 0 446 *1et 44753 127 263 18 0 2 0 263 *££0*££2*223*2333:e*2433:e gNO 44754 127 263 18 0 2 0 263 *3:e 44755 127 263 18 0 3 0 263 *3:3 gZZZ01 44756 127 449 15 0 3 0 449 *3:e243*3:e233533 44800 PROCR 448 448 SET REEL COUNTER 26749>44802 106 188 2 0 0 0 188 44803 103 6 1 0 0 SET(MR3)=R TEST IF M/T 44804 101 16 1 2 0 *3:t 44805 127 448 8 0 3 0 448 *3:t 44806 101 111 1 2 0 *224*2343:+*2443:+ 000080001600024 44807 127 263 18 0 3 0 263 *223*2333:e*2433:e gNO:ZZZ01 44805>44808 106 190 34 0 3 0 190 TEST REEL COUNTER=0 44809 127 448 12 0 1 0 448 gNO 44810 124 3840 0 2 0 SETX=£ 44811 102 190 34 0 3 0 190 44809>44812 101 3 0 1 0 SET Y=NEW REEL NO 44813 106 32 0 1 0 44814 114 190 34 0 3 0 190 44815 124 269 6 1 0 0 269 g 44900 PROCR 449 449 SELECT REEL COUNTER 26426>44902 106 30 0 1 0 *19t 44903 103 6 1 0 0 SET(MR3)=R 44904 101 24 1 2 0 *02t*534 TEST P/T 0000000016 44905 127 449 10 0 3 0 449 *3:3*3:e243*3:e233533 gNO 44906 101 5 1 2 0 *534*0t4 0001300013 44907 127 449 10 0 2 0 449 *3:e 44908 106 252 66 0 3 0 252 *53+0t+3:+*53+3:+ 0005000058 44909 124 269 6 1 0 0 269 g 44907> 44905>44910 106 6 0 0 0 *02t 44911 101 128 1 2 0 *3:t242*3:t232532*3:t 44912 127 263 18 0 3 0 263 *3:t gZZZ01 44913 101 24 1 2 0 *234*224 0001600008 44914 127 263 18 0 2 0 263 *3:t242*3:t232532 ZZZ01 44756>44915 101 3 0 1 0 44916 125 0 1 2 0 44917 115 190 34 0 3 0 190 SELECT REEL COUNTER 44918 124 269 6 1 0 0 269 g 45000 PROCR 450 450 RELEASE-ROUTE 10019>45002 124 212 2 1 1 0 212 *13t SET MOD GROUP 0 45003 103 188 2 0 0 0 188 STORE(A) 45004 102 30 0 1 0 45005 126 238 2 0 0 0 238 *069099 gAUGMENT TIME SPENT 45006 126 250 2 0 0 0 250 *599 gSTORE MOD GROUP 3 45007 106 100 18 0 0 0 100 STORE LINK 45008 102 44 1 1 0 45009 126 353 2 0 0 0 353 gSELECT ROUTE NUMBER FROM LAST CHAPTER 45010 127 450 14 0 0 0 450 gYES TEST REQUIRED ENTRY 45011 125 2 0 3 0 TEST END OF TABLE 45012 124 353 4 1 0 0 353 gNO 45013 124 327 10 1 0 0 327 gXXXG COMMENT 45010>45014 101 16 0 1 0 STORE ROUTE TYPE 45015 115 34 0 3 0 45016 118 4124 0 0 0 45017 102 188 3 0 0 0 188 45018 105 34 1 3 0 SET ENTRY NEGATIVE 45019 127 263 26 0 2 0 263 gZZZ09 45020 102 34 1 3 0 45021 101 12 0 1 0 *17t18t 45022 115 34 0 3 0 ROUTE ALLOCATED 45023 105 210 5 0 0 0 210 45024 127 450 27 0 0 0 450 gNO 45025 104 210 5 0 0 0 210 STORE ALTERNATE ROUTE 45026 118 4126 0 0 0 AND SET 45024>45027 102 533 7 0 0 0 533 *17t18t 45028 101 175 1 3 0 *3:+ 00023 45029 126 328 2 0 0 0 328 gCHANGE PARAMETER TABLES 45044>45030 106 188 3 0 0 0 188 SET ROUTE AVAILABLE 45031 124 188 2 0 1 0 188 45032 102 64 0 0 0 45033 100 210 10 0 2 0 210 SET (MR2)=8*CH NO 45034 115 188 2 0 0 0 188 45035 102 4 1 0 0 45036 101 1 0 1 0 CLEAR D/B INDICATOR 45037 124 188 2 0 1 0 188 45038 118 0 1 0 0 45039 114 252 4 1 2 0 252 45040 106 533 7 0 0 0 533 *17t18t 45041 127 450 45 0 0 0 450 gNO 45042 102 188 2 0 0 0 188 SET UP ALT ROUTE 45043 102 533 7 0 0 0 533 CLEAR INDICATOR 45044 124 450 30 1 0 0 450 *17t18t 45041>45045 106 214 86 1 0 0 214 45046 102 258 4 1 0 0 258 45047 126 345 2 0 0 0 345 gEDIT TIME ETC 45048 126 356 2 0 0 0 356 gSET UP PROG NO 45049 124 450 52 0 2 0 450 45050 126 363 2 0 0 0 363 gSET LINK FOR SI=5 45051 124 282 11 1 0 0 282 gOUTPUT COMMENT 45052 126 359 2 0 0 0 359 gSET SI=4 45053 124 268 9 1 0 0 268 gPROG 45100 PROCR 451 451 OUTPUT NO OF O/P DB'S PER REEL 45102 100 0 0 0 0 *8£t 45103 106 451 2 0 0 0 451 STORE RETURN ADDR 45104 124 3 0 1 0 45105 102 197 0 0 0 45106 106 30 1 1 0 SET UP ROUTE NO 45107 103 188 2 1 0 0 188 45108 102 6 1 0 0 (MR3)=R 45109 106 193 2 0 3 0 193 DB COUNT 45110 127 451 31 0 0 0 451 gZERO NO COMMENT 45111 102 258 8 0 0 0 258 45112 102 193 2 0 3 0 193 CLEAR COUNT 45113 106 215 48 1 0 0 215 'TMS' 45114 102 258 4 1 0 0 258 45115 126 345 2 0 0 0 345 EDIT TIME SET UP RTE NO 45116 126 356 2 0 0 0 356 SET UP PROG NO 45117 106 193 26 0 3 0 193 O/P BLOCK COUNT 45118 102 258 10 0 0 0 258 45119 102 193 26 0 3 0 193 CLEAR 45120 106 193 50 0 3 0 193 SPOOL NO 45121 102 258 12 0 0 0 258 45122 101 261 54 1 3 0 261 CONVERT TO ALPHA 45123 128 258 12 1 2 0 258 45124 101 451 28 1 3 0 451 RETURN ADD 45125 126 363 2 0 0 0 363 45126 101 262 2 1 3 0 262 45127 124 336 2 1 0 0 336 gOUTPUT COMMENT 45128 126 359 2 0 0 0 359 45129 106 30 1 1 0 RESTORE 188/2 45130 102 188 2 1 0 0 188 FROM SI+30 45110>45131 124 3 0 1 0 45132 126 197 0 1 0 gLEAVE S/R 45200 PROCR 452 452 LOCKOUT AND OVERFLOW ROUTINE 45201 NOTES RADIX HALT VERSION 20822>45202 124 212 2 1 1 0 212 *34t SET MOD GROUP 0 45203 100 212 2 0 3 0 212 BINARY 45204 106 24 0 0 0 45205 102 38 0 1 0 STORE(24) 45206 124 214 34 0 2 0 214 AMEND EDIT TABLE 45227>45207 102 217 28 0 0 0 217 45208 106 1 0 0 0 STORE(1) 45209 102 40 0 1 0 45210 106 44 0 1 0 STORE LAST 45211 102 41 0 1 0 ENTRY POINT 45212 106 39 0 1 0 STORE PROG NUMBER 45213 103 221 8 0 0 0 221 45214 105 107 11 0 0 0 107 TEST IF MASTER 45215 127 452 28 0 0 0 452 gYES 45216 126 177 2 0 0 0 177 gREQUEST T/W 45217 124 217 28 0 2 0 217 EDIT COMMENT 45218 128 102 6 1 2 0 102 45219 124 4 0 2 0 45220 126 234 2 0 0 0 234 gS/R H 45221 124 181 2 1 0 0 181 gLOG ROUTINE 55608>45222 124 212 2 1 1 0 212 SET MOD GROUP 0 45223 100 212 2 0 3 0 212 BINARY 45224 106 16 0 0 0 STORE(16) 45225 102 38 0 1 0 STORE(16) 45226 124 214 38 0 2 0 214 45227 124 452 7 1 0 0 452 g 45215>45228 106 217 28 0 0 0 217 45229 105 214 34 0 0 0 214 45230 127 452 32 0 0 0 452 gOFLOW 45231 101 1 1 3 0 L'OUT 45230>45232 101 83 1 1 0 45233 124 208 3 1 0 0 208 gXXX COMMENT 45300 PROCR 453 453 CONVERT S/R (FOR LOCKOUT AND OVERFLOW) 45302 100 0 0 0 0 *342 LINK 45303 118 4124 1 0 0 STORE DIVISION NUMBER 45304 118 3 1 3 0 45305 118 4 0 0 0 45306 102 221 2 0 0 0 221 45307 118 13 1 3 0 CONVERT LOCATION WITHIN DIVISION 45308 102 222 12 0 0 0 222 45309 100 210 3 0 3 0 210 SET DECIMAL 45310 101 213 2 1 3 0 213 SELECT TABLE START 45311 112 222 12 0 0 0 222 45312 107 221 2 0 0 0 221 45313 100 212 2 0 3 0 212 SET BINARY 45314 106 221 2 0 0 0 221 45315 126 453 2 0 1 0 453 gLEAVE S/R 45400 PROCR 454 454 LOCKOUT ROUTINE 45401 NOTES RADIX B 55806>45402 124 2 0 1 0 *342 45403 100 30 1 0 0 STORE(A)(B)(C) 45404 100 212 2 0 3 0 212 SET BINARY 45405 126 474 2 0 0 0 474 gSET TAG 15 45406 124 212 2 1 1 0 212 0 SET MOD GROUP 0 45407 106 2 0 0 0 (MR1) 45408 105 107 8 0 0 0 107 M/R LINK TEST FOR M/R LOCKOUT 45409 127 455 16 0 0 0 455 g 45410 125 0 1 2 0 45411 101 15 0 1 0 COLLATE(16) 45412 115 16 0 0 0 45413 105 210 8 0 0 0 210 SUBTRACT ONE 45414 126 453 2 0 0 0 453 gCONVERT S/R 45415 102 38 0 1 0 45416 101 15 0 1 0 COLLATE LAST ENTRY POINT 45417 115 44 0 1 0 45418 126 453 2 0 0 0 453 gCONVERT S/R 45419 102 43 0 1 0 45420 106 32 0 0 0 *3t4 1 45421 126 453 2 0 0 0 453 gCONVERT S/R 45422 102 45 0 1 0 45500 PROCR 455 455 LOCKOUT ROUTINE (2) 45501 NOTES RADIX B 45502 123 177 2 0 2 0 177 *342 REQUEST T/W 45503 106 39 0 1 0 PROG IDENT NO 45504 102 221 2 0 0 0 221 45505 106 38 0 1 0 STORE DETAILS 45506 102 222 12 0 0 0 222 45507 106 43 0 1 0 45508 102 222 13 0 0 0 222 45509 106 45 0 1 0 45510 102 222 14 0 0 0 222 45511 124 217 6 0 2 0 217 EDIT COMMENT 45718>45512 128 102 6 1 2 0 102 45513 124 4 0 2 0 45514 126 234 2 0 0 0 234 gS/R H 45515 124 181 2 1 0 0 181 gLOG ROUTINE 45409>45516 101 84 1 3 0 CODE LETTER (D) 45517 124 208 3 1 0 0 208 g 45600 PROCR 456 456 OVERFLOW ROUTINE 45601 NOTES RADIX B 20907>45602 124 2 0 1 0 *342 STORE (A) (B),(C) 45603 100 30 1 0 0 45604 100 212 2 0 3 0 212 SET BINARY 45605 106 108 13 0 0 0 108 26/0/1/0/24 ARRANGE TO IGNORE 45606 102 25 0 0 0 FURTHER OVERFLOW 45607 124 212 2 1 1 0 212 0 SET MOD GROUP 0 45608 106 2 0 0 0 TEST IF M/R OVERFLOW 45609 105 107 8 0 0 0 107 45610 127 457 19 0 0 0 457 g 45611 106 24 0 0 0 STORE CONTENTS OF COMPARTMENT 24 45612 103 38 0 1 0 45613 118 6 0 0 0 GET RID OF TAG 45614 118 4122 0 0 0 45615 105 210 8 0 0 0 210 SUBTRACT 1 45616 126 453 2 0 0 0 453 gCONVERT S/R 45617 102 45 0 1 0 45618 106 209 7 0 0 0 209 24/1/0/282/0 45619 102 25 0 0 0 RESET (25) 45620 126 177 2 0 0 0 177 gREQUEST T/W 45621 106 39 0 1 0 PROG.IDENT.NO 45622 102 221 2 0 0 0 221 W/L 45700 PROCR 457 457 OVERFLOW ROUTINE 2 45701 NOTES RADIX B 45702 124 2 0 1 0 *342 45703 100 30 1 1 0 SELECT DETAILS & 45704 100 222 12 1 0 0 222 STORE IN FIXED AREAS 45705 100 212 2 0 3 0 212 RESET(C) BINARY 45706 106 45 0 1 0 45707 102 221 3 0 0 0 221 45708 124 3 0 1 0 *60t TEST IF TRIAL 45709 106 11 0 0 0 45710 127 457 17 0 0 0 457 gNO 45711 106 38 0 1 0 TEST IF O'FLOW 45712 118 6 0 0 0 45713 118 4122 0 0 0 45714 101 535 2 1 2 0 535 IN M/R AREA 45715 124 233 45 0 1 0 233 45716 127 3 0 2 0 *60t gNO 45710>45717 124 216 2 0 2 0 216 45718 124 455 12 1 0 0 455 g 45610>45719 101 83 1 3 0 CODE LETTER (C) 45720 124 208 3 1 0 0 208 g 45800 PROCR 458 458 UNASSIGNED ACTION 55809>45802 124 2 0 1 0 *3t2 45803 100 30 1 0 0 STORE A.B C IN SI 45804 124 212 2 1 1 0 212 SET MOD GROUP 0 45805 100 212 2 0 3 0 212 SET BINARY 45806 106 2 0 0 0 TEST IF M/R UA 45807 105 107 8 0 0 0 107 45808 127 458 36 0 0 0 458 gYES:XXX D 45809 125 0 1 2 0 SET UP CONVERT TABLE 45810 101 15 0 1 0 *342 45811 115 0 0 0 0 COLLATE OUT LINK 45812 126 453 2 0 0 0 453 gCONVERT S/R 45813 102 45 0 1 0 *342 45814 102 213 10 0 0 0 213 *34t 45815 100 210 3 0 3 0 210 45816 101 213 2 1 3 0 213 CONVERT LINK 45817 112 0 0 0 0 45818 102 45 0 1 0 45819 100 212 2 0 3 0 212 45820 106 210 11 0 0 0 210 RESET CONVERT TABLE 45821 102 213 10 0 0 0 213 *34t 45822 126 177 2 0 0 0 177 gREQUEST TW 45823 106 39 0 1 0 SET UP PROG NO 45824 102 258 6 0 0 0 258 45825 106 45 0 1 0 SET UP LINK 45826 102 258 8 0 0 0 258 45827 102 258 10 1 0 0 258 45828 102 258 7 0 0 0 258 45829 101 261 12 1 3 0 261 EDIT COMMENT 45830 128 102 6 1 2 0 102 45831 106 214 84 1 0 0 214 SET UP 'CPF' 45832 102 102 6 1 0 0 102 45833 101 4 1 3 0 45834 126 234 2 0 0 0 234 gEDIT TIME 45835 124 181 2 1 0 0 181 gLOG ROUTINE 45808>45836 101 99 1 3 0 45837 124 208 3 1 0 0 208 *3t2 45838 102 226 2 0 0 0 226 *££0*££2*0te*103*4:3103 45839 127 460 44 0 0 0 460 *20e 45840 127 460 44 0 1 0 460 *20e20e 45900 PROCR 459 459 SUB-ROUTINE G 45901 NOTES RADIX B TO READ CONTROL DATA 45902 100 0 0 0 0 LINK 46041>45903 102 222 19 0 0 0 222 FUNCTION NUMBER 45904 106 4 0 0 0 TEST CONTROL DATA 45905 105 100 33 0 0 0 100 RTE ACCEPTABLE 45906 127 460 49 0 3 0 460 gNO, REJECT 45907 106 100 34 0 0 0 100 45908 105 4 0 0 0 45909 127 460 49 0 3 0 460 gNO, REJECT 45910 106 64 0 2 0 45911 102 222 18 0 0 0 222 W/L 45912 106 209 10 0 0 0 209 14/0/0/17/60 SET UP (64+R) 45913 103 460 51 0 0 0 460 *141 45914 102 64 0 2 0 45915 126 107 8 1 1 0 107 SET (MR1) FOR M/R 45916 106 209 11 0 0 0 209 SET UP (64+R1) 45917 103 127 0 0 0 45918 102 227 2 0 0 0 227 *103 45919 101 5 1 3 0 *14t SET OPT P1 SWITCH 45920 102 296 6 0 0 0 296 *14t 45921 101 63 1 3 0 *101 45922 106 4 0 0 0 *109 45923 118 4118 1 0 0 45924 106 4 0 0 0 *04t*02t TEST PAPER TAPE OR 45925 105 100 36 0 0 0 100 CARD ROUTE 45926 127 460 45 0 2 0 460 *04t*02t gCARDS 45927 101 5 1 3 0 *02+ 00006 46046>45928 118 5 0 0 0 45929 104 4 0 0 0 ROUTE NO 45930 100 222 20 1 0 0 222 STORE (AB) 45931 126 100 2 0 0 0 100 gI/P O/P CONTROL READ 45932 100 222 20 1 1 0 222 *102 45933 126 100 2 0 0 0 100 *102 45934 126 350 2 0 0 0 350 *109 45935 106 222 18 0 0 0 222 RESTORE (64+R) 45936 124 222 20 0 1 0 222 45937 102 64 0 0 0 45938 102 460 51 0 0 0 460 *141 45939 106 211 2 0 0 0 211 SET ASSEMBLER TABLE AT £5 45940 124 100 35 0 1 0 100 45941 102 252 3 0 0 0 252 45942 102 296 6 0 0 0 296 *149 CLEAR OPTA SWITCH 45943 106 222 19 0 0 0 222 TEST FN=0 (I.E. PLS) 45944 127 460 42 0 0 0 460 *20e 46000 PROCR 460 460 SUB ROUTINE G (CONT) 46001 NOTES RADIX B 46002 106 226 2 1 0 0 226 TEST 1ST WORD OF 46003 105 211 10 1 0 0 211 BLOCK IS CD WORD 46004 127 498 2 0 1 0 498 gNO, REJECT 46005 106 226 5 1 0 0 226 TEST 2ND WORD ZERO 46006 103 222 10 0 0 0 222 STORE IT 46007 127 460 16 0 1 0 460 gNO 46008 101 5 0 1 0 TEST RTI COMMAND 46009 115 233 7 0 0 0 233 46010 101 1025 1 2 0 46011 127 460 16 0 0 0 460 gYES 46012 101 2 1 2 0 *4tt 46013 127 460 16 0 0 0 460 *4tt 46014 101 5 1 2 0 *4t4 00003 46015 127 460 47 0 3 0 460 gNO 46013> 46011> 46007>46016 106 226 7 1 0 0 226 STORE SERIAL NO OR CH 8 RTE NO 46017 102 222 11 0 0 0 222 46018 106 233 7 0 0 0 233 46019 102 185 0 0 0 46020 106 226 9 1 0 0 226 STORE RUN NUMBER 46021 102 229 5 0 0 0 229 *3t4*3e+ 0000300003 46022 106 222 19 0 0 0 222 TEST ALLOCATE 46023 101 2 1 2 0 COMMAND 46024 127 460 29 0 0 0 460 gYES 46025 101 2 1 2 0 46026 127 460 29 0 0 0 460 gYES 46027 101 5 1 2 0 46028 127 460 42 0 1 0 460 *20e20e 46026> 46024>46029 106 214 10 1 0 0 214 BE WORD INTO ANNEX 46030 102 226 18 1 0 0 226 46031 106 258 17 0 0 0 258 CLEAR WORKING LOCAMONS 46032 101 18 1 2 0 SET UP REG A FOR CLEAR 46033 118 5 0 0 0 46034 128 225 6 0 0 0 225 46035 124 219 2 0 2 0 219 UNPACK ALLOC DATA FR.TRIALgCH CH RT 46036 128 226 10 0 3 0 226 46037 106 233 23 0 0 0 233 *01t TEST HIGH DENSITY 46038 127 460 42 0 0 0 460 *20e 46039 106 222 20 0 0 0 222 ROUTE NUMBER 46040 102 4 1 0 0 46041 124 459 3 1 0 0 459 *01t 46038> 46028> 45944>46042 124 222 20 0 1 0 222 *20t SET RTE TO MANUAL 46043 119 0 1 3 0 *20t 45840> 45839>46044 126 459 2 0 1 0 459 g LEAVE S/R 45926>46045 101 6 1 3 0 *04t*02t 46046 124 459 28 1 0 0 459 *04t*02t 46015>46047 124 81 0 2 0 CODE LETTER A 46048 124 498 3 1 0 0 498 g 45909> 45906>46049 124 83 0 2 0 CODE LETTER C 46050 124 498 5 1 0 0 498 46051 100 0 0 0 0 *141 46100 PROCR 461 461 SUB-ROUTINE Q 46101 NOTES RADIX B TO FORM STORE CONTROL DATA RTE NO 46102 100 0 0 0 0 LINK 46103 101 2 0 1 0 FILL Q2B 46104 125 0 1 2 0 DRAIN 46105 115 222 2 0 0 0 222 IND. SETTING 46106 118 4127 1 0 0 FORM & STORE ROUTE NO. 46107 104 100 35 0 0 0 100 46108 102 4 0 0 0 46109 126 461 2 0 1 0 461 gLEAVE S/R 46200 PROCR 462 462 SUB-ROUTINE U* 46201 NOTES RADIX B REQUEST M/R FOR OVERLAY OR UNLOAD 46202 100 0 0 0 0 LINK 46203 106 462 2 0 0 0 462 STORE LINK IN SPECIAL CHAPTER 46204 124 3 0 1 0 46205 102 169 0 0 0 46206 106 487 2 0 0 0 487 TEST IF ALLOCATOR 46207 127 462 13 0 0 0 462 gNO LINK SET 46208 124 462 6 0 2 0 462 SET LINK FOR SI=5 35712>46209 102 42 0 1 0 46210 126 360 2 0 0 0 360 gSET SI=5 29105>46211 124 2 0 1 0 46212 124 9 1 0 0 gTO S(I+1) 46207>46213 106 9 0 1 0 SET SI=2 46214 103 7 0 1 0 46215 102 487 2 0 0 0 487 SET ALLOCATOR LINK 46216 125 127 1 0 0 SET I1-7 46217 124 3 0 1 0 46218 126 169 0 1 0 gLEAVE S/R 46219 100 226 0 0 0 0 226 *££0*££1*106 46300 PROCR 463 463 STORE DUMP 46301 NOTES RADIX B INITIAL SET-UP ROUTINE (1) 52305> 19988>46302 106 220 11 0 0 0 220 *41t 46303 103 487 2 0 0 0 487 SET ALLOCATOR LINK 46304 102 296 6 0 0 0 296 *149 SET OPT A SWITCH AT 4 46305 106 1 0 0 0 *3tt 46306 102 227 9 1 0 0 227 *3tt*106 46307 106 100 2 0 0 0 100 DIV 0 LOCS 160/161 46308 102 227 43 1 0 0 227 *106 46309 126 474 2 0 0 0 474 *3t1 SET TAG 15 46310 106 153 0 0 0 *3t4 00191 46311 102 227 47 1 0 0 227 *106 46312 106 32 0 0 0 *3t2 46313 102 227 11 1 0 0 227 *3t2*106 46314 102 227 6 1 0 0 227 *106 IN CASE WORD 4 CONTAINS FINIS 46400 PROCR 464 464 STORE DUMP 46401 NOTES RADIX B INITIAL SET-UP ROUTINE (2) 46402 106 107 8 1 0 0 107 *41t SET MR1 FOR M/R 46403 102 2 1 0 0 46404 106 108 12 0 0 0 108 SET M/R SWITCH 46405 102 106 13 0 0 0 106 NON-INT 46406 102 109 22 0 0 0 109 CLEAR MODIFIER 46407 106 225 2 1 0 0 225 *57t RESET PARA TO 46408 102 233 26 0 0 0 233 *57t ORIG CH CH RT 46409 126 472 2 0 0 0 472 gSTORE RTE 7 DETAILS 46410 106 209 11 0 0 0 209 SET UP ASL'S 46411 124 233 26 0 1 0 233 IN 46412 102 64 0 0 0 (71) OR(79)&(126) 46413 106 209 10 0 0 0 209 46414 102 126 0 0 0 46415 106 392 11 0 0 0 392 *25t*05t AVOID PUNCHING 46416 102 427 3 0 0 0 427 *25t*05t LIBRARIAN CARD 46417 106 233 46 0 0 0 233 *60t TEST TRIAL IN 46418 124 233 45 0 1 0 233 46419 127 1 0 1 0 *60t ENTER PTS 46420 100 214 14 1 2 0 214 OPEN O/P FILE 46421 101 18 1 3 0 46422 126 237 2 0 0 0 237 gI/P-O/P S/R 46423 106 392 12 0 0 0 392 *25t*05t RESTORE LIBRARIAN 46424 102 427 3 0 0 0 427 *25t*05t CARD ROUTINE 46425 106 214 10 1 0 0 214 B/E WD 46426 103 227 54 1 0 0 227 *101 46427 102 226 54 1 0 0 226 46428 126 470 2 0 0 0 470 gWRITE S/R LOCATIONS BLOCK 46500 PROCR 465 465 STORE DUMP 46501 NOTES RADIX B DUMP ROUTINE (1) 46502 106 230 2 0 0 0 230 *41t M/R PROG NO SET UP FIRST 46503 102 226 7 1 0 0 226 HEADING BLOCK 46504 106 100 17 0 0 0 100 DATE 46505 102 226 9 1 0 0 226 46506 106 156 0 0 0 TIME 46507 102 226 11 1 0 0 226 46508 124 130 2 0 2 0 130 PRIORITY QUEUE END 46509 102 226 19 1 0 0 226 46537>46510 126 470 2 0 0 0 470 gWRITE S/R 46511 124 109 22 0 1 0 109 SET UP FURTHER 46512 106 230 5 0 0 0 230 HEADING BLOCKS 46513 124 126 0 3 0 46514 103 5 1 0 0 46515 105 211 2 0 0 0 211 TEST FOR £5 46516 127 466 2 0 0 0 466 gYES 46517 124 109 22 0 3 0 109 46518 124 230 5 0 3 0 230 46519 106 39 0 0 0 PROG NO 46520 124 126 0 3 0 46521 102 5 1 0 0 46522 124 109 22 0 3 0 109 46523 124 230 5 0 3 0 230 46524 124 37 0 3 0 46525 106 4 0 0 0 NO OF CHAPS 46526 124 126 0 3 0 46527 102 7 1 0 0 46528 124 109 22 0 3 0 109 FORM BULK COPY TABLE 46529 124 230 5 0 3 0 230 46530 124 37 0 3 0 46531 124 20 0 2 0 46532 104 108 16 1 0 0 108 46533 124 126 0 3 0 COPY CHAPTER 46534 128 9 0 1 0 INFORMATION 46535 101 2 1 3 0 STEP MODIFIER 46536 107 109 22 0 0 0 109 46537 124 465 10 1 0 0 465 gNEXT PROG 46600 PROCR 466 466 STORE DUMP 46601 NOTES RADIX B DUMP ROUTINE(2) 46516>46602 101 4 1 3 0 *41t PREPARE FOR 46603 102 109 22 0 0 0 109 MAIN LOOP 46604 102 109 21 0 0 0 109 46605 102 109 23 0 0 0 109 CLEAR COUNTER 46606 101 8 0 1 0 46607 115 153 0 0 0 SET UP STORE SIZE 46608 127 466 10 0 1 0 466 *3t2 46609 106 258 2 0 0 0 258 *3t2 46608>46610 103 109 24 0 0 0 109 46611 102 108 29 0 0 0 108 SET UP ABSURD TAG 46612 126 469 2 0 0 0 469 gTEST END OF BLOCK S/R 46700 PROCR 467 467 STORE DUMP 46701 NOTES RADIX B DUMP ROUTINE (3)-MAIN OUTPUT LOOP 46719> 46733>46702 124 109 23 0 3 0 109 *41t TEST FOR NEW TAG 46703 123 0 0 3 0 46704 105 108 29 0 0 0 108 46705 127 467 11 0 0 0 467 gNO 46706 107 108 29 0 0 0 108 SET UP NEW TAG 46707 106 108 29 1 0 0 108 46708 124 109 21 0 3 0 109 46709 102 4 1 0 0 46710 126 469 2 0 0 0 469 gTEST END OF BLOCK S/R 46705>46711 101 2 1 3 0 FORM BULK SET UP NEXT 46712 118 5 0 0 0 COPY TABLE LONG WORD 46713 104 109 23 0 0 0 109 OF STORE 46714 124 109 21 0 3 0 109 46715 128 5 0 1 0 46716 126 469 2 0 0 0 469 gTEST END OF BLOCK S/R 46717 123 2 0 0 0 STEP COUNTER TEST END OF STORE 46718 100 109 23 0 0 0 109 46719 124 467 2 1 0 0 467 gNO 46720 101 8 0 1 0 *3et 46721 115 153 0 0 0 TEST SECOND STORE PRINTED 46722 105 109 24 0 0 0 109 46723 127 467 35 0 1 0 467 gYES 46724 106 467 34 0 0 0 467 46725 102 109 23 0 0 0 109 46726 101 4 0 1 0 TEST SECOND STORE 46727 115 153 0 0 0 46728 127 467 35 0 0 0 467 gNO 46729 118 1 0 0 0 46730 104 467 34 0 0 0 467 SET UP SECOND STORE SIZE 46731 103 109 24 0 0 0 109 46732 102 108 29 0 0 0 108 SET UP ABSURD TAG 46733 124 467 2 1 0 0 467 gPRINT SECOND STORE 46734 100 0 1 0 0 *3et 46728> 46723>46735 126 470 2 0 0 0 470 gWRITE S/R 46800 PROCR 468 468 STORE DUMP 46801 NOTES RADIX B END ROUTINE (1) 46802 101 28 1 3 0 *41t CLOSE O/P FILE 46803 126 237 2 0 0 0 237 gI/P-O/P S/R 46804 126 473 2 0 0 0 473 *459 RESTORE ROUTE 7 46805 124 214 60 0 2 0 214 29709>46806 123 168 0 2 0 46807 125 0 1 2 0 DRAIN 46808 102 296 6 0 0 0 296 *149 CLEAR OPT A SWITCH 46809 106 233 46 0 0 0 233 *60t TEST IF PTS 46810 124 233 45 0 1 0 233 46811 127 2 0 1 0 *60t gYES 46812 106 108 10 0 0 0 108 RESTORE ASL 46813 124 233 26 0 1 0 233 46814 102 64 0 0 0 46815 124 246 16 1 0 0 246 gNO 46900 PROCR 469 469 STORE DUMP 46901 NOTES RADIX B TEST END OF BLOCK SUBROUTINE 46902 100 0 0 0 0 *41t LINK 46903 123 4 0 0 0 STEP MODIFIER TEST END OF BLOCK 46904 100 109 21 0 0 0 109 46905 126 469 2 0 1 0 469 gNO 46906 126 470 2 0 0 0 470 gWRITE S/R 46907 106 126 0 0 0 SET UP BLOCK SIZE MODIFIER 46908 103 109 21 0 0 0 109 46909 101 48 1 1 0 46910 102 109 22 0 0 0 109 46911 126 469 2 0 1 0 469 g 47000 PROCR 470 470 STORE DUMP 47001 NOTES RADIX B WRITE SUBROUTINE 47002 100 0 0 0 0 *41t LINK 47003 100 108 14 0 2 0 108 47004 101 8 1 3 0 47005 126 237 2 0 0 0 237 gI/P-O/P S/R 47006 126 350 2 0 0 0 350 *109 47007 106 108 14 1 0 0 108 47008 124 126 0 1 0 BULK CLEAR TA 47009 128 0 0 0 0 47010 126 474 2 0 0 0 474 gSET TAG 15 S/R 47011 126 470 2 0 1 0 470 g 47100 PROCR 471 471 STORE DUMP-W/L'S FOR ROUTE 07 47102 100 0 0 0 0 *45t 47103 100 0 0 0 0 47104 100 0 0 0 0 47105 100 0 0 0 0 47106 100 0 0 0 0 47107 100 0 0 0 0 *019 47200 PROCR 472 472 STORE RT 7 DETAILS 47202 100 0 0 0 0 *41t60t*41t45t 47203 100 220 3 0 2 0 220 PACKS BITS 1-3 IN 47204 106 220 3 0 0 0 220 ROUTE INDICATOR 47205 114 233 26 0 0 0 233 47206 124 233 26 0 1 0 233 47207 106 64 0 0 0 RTE 7 A.S.L. 47208 102 108 10 0 0 0 108 47209 124 233 26 0 1 0 233 *45t 47210 106 190 2 0 0 0 190 BLOCK COUNTERS 47211 102 471 2 0 0 0 471 47212 124 233 26 0 1 0 233 47213 106 190 34 0 0 0 190 REEL COUNTER 47214 102 471 3 0 0 0 471 47215 124 233 26 0 1 0 233 47216 106 190 66 0 0 0 190 PROGM NUMBER 47217 102 471 4 0 0 0 471 47218 124 233 26 0 1 0 233 47219 106 190 98 0 0 0 190 FILE IDENTITY 47220 102 471 5 0 0 0 471 47221 124 233 26 0 1 0 233 47222 106 191 32 0 0 0 191 RUN AND RERUN NUMBER 47223 102 471 6 0 0 0 471 47224 124 233 26 0 1 0 233 *01t 47225 106 191 64 0 0 0 191 90K INDICATORS 47226 102 471 7 0 0 0 471 *45t*01t 47227 124 233 26 0 1 0 233 CLEAR REEL COUNTER 47228 102 190 34 0 0 0 190 47229 126 472 2 0 1 0 472 gLEAVE S/R 47300 PROCR 473 473 RESTORE RT 7 DETAILS 47302 100 0 0 0 0 *41t60t*45t 47303 106 471 2 0 0 0 471 47304 124 233 26 0 1 0 233 47305 102 190 2 0 0 0 190 BLOCK COUNTER 47306 106 471 3 0 0 0 471 47307 124 233 26 0 1 0 233 47308 102 190 34 0 0 0 190 REEL COUNTER 47309 106 471 4 0 0 0 471 47310 124 233 26 0 1 0 233 47311 102 190 66 0 0 0 190 PROGRAM NUMBER 47312 106 471 5 0 0 0 471 47313 124 233 26 0 1 0 233 47314 102 190 98 0 0 0 190 FILE IDENTITY 47315 106 471 6 0 0 0 471 47316 124 233 26 0 1 0 233 47317 102 191 32 0 0 0 191 RUN+RE-RUN NUMBER 47318 106 471 7 0 0 0 471 *01t 47319 124 233 26 0 1 0 233 47320 102 191 64 0 0 0 191 *01t 90K INDICATORS 47321 126 473 2 0 1 0 473 47400 PROCR 474 474 SET TAG 15 SUBROUTINE 47401 NOTES RADIX B 47402 100 0 0 0 0 LINK 47403 106 209 5 0 0 0 209 SET (9) TO IGNORE INTERRUPTION 47404 102 9 0 0 0 47405 126 474 6 0 3 0 474 SET TAG 15 47406 115 474 7 0 0 0 474 47407 125 4096 1 1 0 SET NON-INT 47408 106 209 6 0 0 0 209 47409 102 9 0 0 0 RE-SET(9) 47410 126 474 2 0 1 0 474 g 47500 PROCR 475 475 THE UNLOADER-PRELIMINARIES 29579>47502 126 107 8 1 1 0 107 SET MR1 FOR MASTER 47503 106 221 12 0 0 0 221 PROG ID LOCATE PROG IN PQ 47504 126 479 2 0 0 0 479 gS/R M* 47505 124 476 21 1 0 0 476 gNOT FOUND 47506 102 230 2 0 2 0 230 REMOVE PROG FROM PQ 47507 106 230 3 0 2 0 230 START OF SWITCH 47508 102 6 0 0 0 47509 124 270 2 0 2 0 270 *464 00004 47510 102 42 0 3 0 47600 PROCR 476 476 OUTPUT COMMENT 47602 106 46 1 3 0 *09t06t TOTAL TIME SPENT 47603 118 4125 1 1 0 47604 101 5 0 2 0 ROUND OFF 47605 102 222 8 1 0 0 222 47606 101 213 12 1 3 0 213 DECIMALgBINARY 47607 112 222 8 1 0 0 222 47608 102 222 8 1 0 0 222 47609 100 220 7 0 3 0 220 SET RADIX FOR MINS&SECS 47610 101 213 20 1 3 0 213 47611 112 222 8 1 0 0 222 CONVERT TIME SPENT 47612 102 222 8 1 0 0 222 *09t06t 47613 100 220 7 0 3 0 220 *2£t*091*061 RADIX FOR MINS AND SECS 47614 101 213 20 1 3 0 213 47615 112 104 13 0 0 0 104 CONVERT INEFF TIME 47616 102 221 4 0 0 0 221 *2£t 47617 100 212 2 0 3 0 212 *2£9099069 BINARY 47618 102 104 12 1 0 0 104 *2£9 47619 101 482 2 1 3 0 482 47620 124 478 2 1 0 0 478 gOUTPUT COMMENT 47505>47621 101 97 1 3 0 J 47622 124 208 3 1 0 0 208 gXXX COMMENT 47700 PROCR 477 477 COMMAND REJECTION COMMENT 50218> 50220> 50431> 51631> 51641> 51704> 51706> 51804> 52004> 52107> 52204> 53189> 53193>47702 101 81 1 3 0 *362 CODE LETTER(A) 47703 124 477 5 1 0 0 477 51808> 52009> 52011> 52105> 52209> 52531> 52715> 52803>47704 101 82 1 3 0 CODE LETTER(B) 48743> 49111> 52146> 47703>47705 102 221 4 0 0 0 221 47706 124 481 2 0 2 0 481 START OF TABLE 47707 124 478 2 1 0 0 478 *362 gCOMMENT 48316> 48317> 48705> 50005> 50007> 50105> 50227> 50229> 50804> 50905> 51406> 51523> 51526> 52532> 53045> 53192> 29586> 23810> 19951> 18722>47708 124 481 22 0 2 0 481 START OF TABLE 47800 PROCR 478 478 OPERATOR INTERVENTION END ROUTINE 48411> 49120> 51920> 52015> 52144> 52711> 47707> 47620>47802 102 221 13 0 0 0 221 W/L 47803 126 177 2 0 0 0 177 gREQUEST T/W 47804 106 221 13 0 0 0 221 START OF TABLE 47805 128 102 6 1 2 0 102 SET UP COMMENT 49814> 50428> 50633> 50819> 50929> 51132> 51246> 51317> 51422> 51520> 52221> 52527>47806 126 234 2 0 0 0 234 gS/R M 47807 126 480 2 0 0 0 480 47808 124 181 2 1 0 0 181 gLOG ROUTINE 47900 PROCR 479 479 SUB-ROUTINE M*-TO SEARCH PRIORITY TABLE 47902 100 0 0 0 0 LINK 47903 102 221 2 0 0 0 221 STORE PROGRAMME NUMBER 47904 102 4 1 0 0 CLEAR (MR2) 47912>47905 106 230 2 0 2 0 230 TEST REQUIRED 47906 105 221 2 0 0 0 221 PROGRAMME 47907 127 479 13 0 0 0 479 gYES 47908 106 230 2 0 2 0 230 TEST END OF TABLE 47909 105 211 2 0 0 0 211 47910 127 479 15 0 0 0 479 gYES 52112>47911 125 2 0 2 0 STEP(MR2) 47912 124 479 5 1 0 0 479 g 47907>47913 124 479 2 0 1 0 479 47914 124 1 1 0 0 gLEAVE S/R+1 47910>47915 126 479 2 0 1 0 479 gLEAVE S/R 48000 PROCR 480 480 END ROUTINE AFTER ALLOCATION-OVERLAY-STORE DUMP 48001 NOTES RADIX AND OPERATOR INTERVENTION 48002 100 0 0 0 0 48003 106 221 43 0 0 0 221 *16t 48004 127 480 31 0 2 0 480 g UPTIME NOT STOPPED 48005 106 221 38 0 0 0 221 *85t 48006 127 480 15 0 0 0 480 *85t 48007 126 221 38 1 3 0 221 48008 106 45 0 3 0 REOPEN PROGRAM 48009 127 480 13 0 3 0 480 *85t*0:t 48010 125 0 1 2 0 PAUSED-RESET ORIGINAL 48011 105 45 0 3 0 SWITCH SETTING 48012 124 480 14 1 0 0 480 *85t*0:t 48009>48013 102 7 0 3 0 48012>48014 102 45 0 3 0 48006>48015 106 221 40 0 0 0 221 *85t 48016 127 480 25 0 0 0 480 48017 126 221 40 1 3 0 221 48018 106 45 0 3 0 REOPEN 2ND PROGRAM 48019 127 480 23 0 3 0 480 *0:t 48020 125 0 1 2 0 PAUSED-RESET ORIGINAL 48021 105 45 0 3 0 SWITCH SETTING 48022 124 480 24 1 0 0 480 *0:t 48019>48023 102 7 0 3 0 48022>48024 102 45 0 3 0 *85t 48016>48025 102 221 43 0 0 0 221 CLEAR INDICATORS 48026 106 480 2 0 0 0 480 *85t TEST AFTER OVERLAY 48027 101 246 23 1 2 0 246 48028 127 480 31 0 1 0 480 gNO 48029 106 35 0 2 0 48030 102 7 0 2 0 *16t*85t 48028> 48004>48031 125 1919 1 2 0 SET L2 IF INDICATORS STACKED 48032 101 127 1 2 0 48033 102 103 3 0 0 0 103 48034 125 6143 1 1 0 RESET INDICATORS 48035 106 108 11 0 0 0 108 48036 102 106 13 0 0 0 106 SET M/R SWITCH INT 48037 102 487 2 0 0 0 487 48038 102 296 6 0 0 0 296 *149 48039 106 103 2 0 0 0 103 TEST OPTION OUTSTANDING 48040 127 480 42 0 0 0 480 48041 125 128 1 0 0 48040>48042 126 480 2 0 1 0 480 48100 TABLE 481 481 1 EDIT TABLES FOR COPYING TO C REJ 48102 214 16 0 0 2 0 5 0 0 0 0 0 0 *362 C,SP,R,E,J 48104 221 4 0 0 2 0 1 4 1 0 0 0 0 SP,CODE LETTER 48106 214 12 0 0 2 0 1 3 0 0 0 0 0 N/E 48108 222 10 0 0 0 0 5 0 0 0 0 0 0 PROGRAMME NUMBER 48110 214 12 0 0 2 0 1 3 0 0 0 0 0 N/E 48112 214 20 0 0 2 0 2 0 1 0 0 0 0 SP,G,P 48114 0 185 0 0 0 0 1 2 0 0 0 0 0 T 1 48116 214 20 0 0 2 0 2 3 1 0 0 0 0 SP,F,N 48118 0 185 0 0 0 0 1 4 0 0 0 0 0 T 1 48120 211 22 0 0 2 0 2 0 1 0 0 0 1 *362 SP,L/E,L/E SUM 48122 214 16 0 0 2 0 5 0 0 0 0 0 0 C,SP,R,E,J 48124 214 12 0 0 2 0 2 3 2 0 0 0 0 SP,SP,N/E,N/E 48126 214 20 0 0 2 0 2 0 1 0 0 0 0 SP,G,P 48128 222 2 0 0 0 0 1 2 0 0 0 0 0 GP NO 48130 214 20 0 0 2 0 2 3 1 0 0 0 0 SP,F,N 48132 222 2 0 0 0 0 1 4 0 0 0 0 0 FN NO 48134 211 22 0 0 2 0 2 0 1 0 0 0 1 SP,L/E,L/E 48136 211 22 0 0 2 0 2 0 1 0 0 0 1 *££0*££2*2£e093*2£e063 SUM 48138 211 22 0 0 2 0 2 0 3 0 0 0 1 *2£309e06e 48140 222 8 0 0 1 0 3 5 5 3 0 0 0 *063 48142 222 8 0 0 1 0 2 8 1 0 0 1 0 *063063 48200 TABLE 482 482 1 48202 214 54 0 0 2 0 5 0 0 0 0 0 0 A,B,D,O,N,(OR E,N,D) T12 48204 214 12 0 0 2 0 1 3 0 0 0 0 0 N/E 48206 221 12 0 0 0 0 5 0 0 0 0 0 0 PROGRAMME NUMBER 48208 214 32 0 0 2 0 1 0 5 0 0 0 0 *09t06t*063 SP T 4SP 48210 214 38 0 0 2 0 4 4 1 0 0 0 0 *09t06t*063063 SP T 4SP T 7 48212 214 6 0 0 2 0 5 0 7 0 0 0 0 *2£t 7SP,I,N,E,F,F 48214 221 4 0 0 0 0 2 1 2 1 0 0 0 2SP,MINS 48216 221 4 0 0 0 0 2 3 1 1 0 0 0 *2£t SP,SECS 48218 211 22 0 0 2 0 2 0 2 0 0 0 1 *2£e093*2£e063*2£309e06e SUM 48300 PROCR 483 483 MINI-STORE PRINT 55810>48302 125 4096 1 1 0 *412 SET NON-INT 48303 101 2048 1 3 0 SET UP ASL FOR INPUT 48304 102 0 0 0 0 48305 125 0 1 2 0 DUMMY 48306 119 0 0 1 0 INPUT 48309>48307 126 0 1 0 0 TEST RTE 48308 100 291 0 0 0 CLOSED HALT 1/2/3 48309 124 483 7 1 0 0 483 ENGAGED 48310 100 2049 0 0 0 DOUBTFUL HALT 8/0/1 48311 100 32 0 0 0 WARNING OF END HALT 0/2/0 48312 106 483 10 1 0 0 483 48313 128 2081 1 0 0 48314 124 2081 1 0 0 *412 48315 124 487 82 1 0 0 487 *££0*££2*01e 48316 124 477 8 1 0 0 477 *363363 gREJ 48317 127 477 8 0 1 0 477 *363*36360e gREJ 48318 127 487 87 0 1 0 487 *36e60e gYES REJ 48319 124 488 3 1 0 0 488 *3t3*3ee 48320 124 488 5 1 0 0 488 *3t201e*3et01e 48321 124 491 10 1 0 0 491 *3t33t3*3ee3ee 48322 124 491 11 1 0 0 491 *3t3363*3ee363 48323 124 199 15 1 0 0 199 *41e 48400 PROCR 484 484 REJECT PROGRAMME 29624>48402 101 86 1 3 0 *149 LETTER'F'FROM OPT A SWITCH 48403 102 221 4 0 0 0 221 REJECT AFTER UNLOADING OTHER PROGS 48404 124 212 2 1 1 0 212 SET MOD GROUP 0 48405 106 218 6 1 0 0 218 RESTORE MOD GP 3 REGISTERS 48406 128 26 0 0 0 48407 123 26 1 0 0 *59t SET TAG 0 48408 123 30 1 0 0 IN MOD GROUP 3 48409 123 28 1 0 0 *59t 48410 124 485 2 0 2 0 485 START OF EDIT TABLE 48411 124 478 2 1 0 0 478 g 48500 TABLE 485 485 1 48502 214 88 0 0 2 0 5 0 0 0 0 0 0 R,R,J,E,C 48504 214 38 0 0 2 0 1 4 0 0 0 0 0 T, 48506 221 4 0 0 2 0 1 4 4 0 0 0 0 4 SP,CODE LETTER 48508 214 12 0 0 2 0 1 3 0 0 0 0 0 N/E 48510 221 8 0 0 0 0 5 0 0 0 0 0 0 PROGRAMME NUMBER 48512 211 22 0 0 2 0 2 0 1 0 0 0 1 SP.L/E,L/E 48514 222 8 0 0 1 0 3 5 5 3 0 0 0 *3+t*09t 48516 222 8 0 0 1 0 2 8 1 0 0 1 0 SECS 48518 214 32 0 0 2 0 1 0 5 0 0 0 0 /////5 SP'S N 48520 214 38 0 0 2 0 4 4 1 0 0 0 0 /////SP,T,3 SP'S 48600 CONST 486 486 0 SO'ALLOCATOR'STARTS IN EVEN ADDRESS 48700 PROCR 487 487 THE ALLOCATOR 48701 NOTES RADIX B PREPARATORY 48702 100 0 0 0 0 LINK 48703 106 230 4 1 0 0 230 *40t TEST IF PROGRAM 48704 105 211 2 1 0 0 211 ALREADY 48705 127 477 8 0 1 0 477 gYES ALLOCATED 48706 101 1026 1 3 0 SET UP 4/0/2 48707 102 233 7 0 0 0 233 *40t 48708 125 0 1 2 0 DUMMY ACTION FOR REFERENCES 48709 106 225 7 1 0 0 225 *57t*60t TEST TRIALS ALLOC 48710 127 487 14 0 0 0 487 gNO 48711 106 225 2 0 0 0 225 FORM RTE NUMBER 48712 101 7 1 1 0 48713 124 487 24 1 0 0 487 *60t 48710>48714 100 220 3 0 2 0 220 CONVERT FROM 48715 115 225 13 1 0 0 225 CH CH RT 48716 101 7 1 2 0 TEST ROUTE 7 48717 127 487 42 0 0 0 487 gYES C REJ D 48718 101 7 1 1 0 48719 104 225 13 1 0 0 225 48720 118 3 0 3 0 TO BINARY 48721 118 4127 0 0 0 48722 127 487 68 0 0 0 487 NOT SPECIFIED 48723 101 48 1 2 0 *3:9 48769> 48713>48724 103 225 12 1 0 0 225 48725 101 128 1 2 0 *3:9 48726 127 487 42 0 3 0 487 TEST IN RANGE NOgC REJ D 48727 101 24 1 2 0 *224*234 0000800016 48728 127 487 42 0 2 0 487 NOgC REJ D 48729 101 24 1 1 0 *3:1*224*234 000000000800016 48730 101 152 1 1 0 *3:9*224*234 000000013600144 48731 126 249 2 0 0 0 249 gSEARCH LIST FOR AVAIL CH CH RT 48732 124 487 44 1 0 0 487 gAVAIL 48733 124 225 12 0 1 0 225 gNOT IN LIST SEARCH ASL'S FOR 48734 106 64 0 0 0 AVAIL CH CH RT 48735 103 225 14 1 0 0 225 COPY RT TYPE TO WL 48736 101 4087 1 2 0 TEST ££7 48737 127 487 51 0 0 0 487 gAVAIL 48738 101 1 1 2 0 ££8 48739 127 487 51 0 0 0 487 gAVAIL 48740 101 3 1 2 0 48741 127 487 51 0 0 0 487 gAVAIL 48760> 48728> 48726> 48717>48742 101 84 1 3 0 *363363 48743 124 477 5 1 0 0 477 *361 CREJ D 48767> 48732>48744 106 225 12 1 0 0 225 CH CH RT 48745 103 233 26 0 0 0 233 *57t 48746 106 225 8 1 0 0 225 STORE(A) 48747 102 232 22 1 0 0 232 48748 106 225 10 1 0 0 225 STORE(B) 48749 102 232 24 1 0 0 232 48750 124 487 70 1 0 0 487 *57t 48741> 48739> 48737>48751 101 36 1 3 0 SET INDIRECT MR=36:0 48752 102 225 17 0 0 0 225 48753 102 225 16 0 0 0 225 48759>48754 124 225 16 0 1 0 225 SEARCH FOR FIRST 48755 106 224 3 0 0 0 224 AVAIL SPACE IN 48756 127 487 61 0 0 0 487 gAVOID SPACE LIST 48757 123 6 0 0 0 STEP MOD BY 6 48758 100 225 16 0 0 0 225 48759 124 487 54 1 0 0 487 gLOOK FOR NEXT SPACE 48760 124 487 42 1 0 0 487 gNO ROOM-C REV D 48756>48761 106 225 12 1 0 0 225 STORE CH CH RT 48762 124 225 16 0 1 0 225 INTO LIST 48763 102 224 2 0 0 0 224 48764 106 225 14 1 0 0 225 STORE RT.TYPE IN LIST 48765 124 225 16 0 1 0 225 48766 102 224 3 0 0 0 224 48767 124 487 44 1 0 0 487 48722>48768 106 225 2 0 0 0 225 PUT NORMAL ALLOC RT. 48769 124 487 24 1 0 0 487 *57t 48750>48770 106 225 7 1 0 0 225 TEST TRIALS ALLOC 48771 127 487 82 0 0 0 487 *36e60e*36360e gNO 48772 106 233 46 0 0 0 233 *60t TEST TRIAL ALREADY IN PROCESS 48773 127 487 87 0 1 0 487 *363 gYES CREJC 48774 126 472 2 0 0 0 472 *459 STORE 07 DETAILS 48775 106 210 8 0 0 0 210 SET TRIALS BIT IN 48776 107 233 7 0 0 0 233 ALLOC COMMAND 48777 101 1 1 3 0 *44t RESET PRINT 48778 102 233 28 0 0 0 233 *44t INDICATOR 48779 106 225 7 1 0 0 225 STORE TRIALS IND 48780 102 222 7 0 0 0 222 48781 102 225 6 1 0 0 225 *60t CLEAR TRIALS IND 48771> 48315>48782 106 222 10 1 0 0 222 STORE PROG 1D AND SERIAL NO 48783 103 221 8 1 0 0 221 48784 126 479 2 0 0 0 479 gS/R M 48785 124 488 2 1 0 0 488 *3t201e*3et01e*3t3*3ee 48786 124 487 88 1 0 0 487 *363363 gC REJ B 48773> 48318>48787 101 1 1 3 0 *362 C 48786>48788 101 82 1 1 0 B 48789 124 491 11 1 0 0 491 48800 PROCR 488 488 LOCATE A PIECE OF STORAGE FOR THE FIRST CHUNK OF P.L.S. 48801 NOTES RADIX B 48785>48802 102 106 8 0 0 0 106 *3t1*3e9 48319>48803 106 218 10 1 0 0 218 *01t 48804 128 497 2 1 1 0 497 *01t 48320>48805 106 211 2 1 0 0 211 48806 101 231 2 1 0 0 231 TABLE 48807 105 231 2 1 0 0 231 TEST START 49109>48808 127 488 18 0 0 0 488 gYES 48809 118 10 1 0 0 48810 101 2 1 2 0 48811 102 4 1 0 0 48812 106 1 0 2 0 48813 101 360 1 2 0 BIG ENOUGH? 48814 127 488 17 0 3 0 488 gNO 48815 104 0 0 2 0 48816 124 488 24 1 0 0 488 g 48814>48817 125 0 1 2 0 DRAIN 48808>48818 126 479 2 0 0 0 479 gS/R M* SEARCH FOR A ZERO 48819 124 491 2 1 0 0 491 *3t3363*3ee363*3t33t3*3ee3ee 48820 124 4 0 1 0 STORE TABLE 48821 124 230 3 0 1 0 230 START 48822 124 37 0 1 0 OF 48823 124 140 0 2 0 STRIP 48816>48824 102 233 4 0 0 0 233 48825 124 233 4 0 1 0 233 FORM & STORE 13-BIT FORM OF 48826 101 0 1 3 0 START OF STRIP 48827 102 233 3 0 0 0 233 48900 PROCR 489 489 LOCATE PROGRAMME 48901 NOTES RADIX B 48902 106 108 11 0 0 0 108 SET M/R SWITCH INT. 48903 102 106 13 0 0 0 106 48904 100 210 8 0 2 0 210 *572*60t 48905 115 233 7 0 0 0 233 48906 127 489 8 0 0 0 489 gNO 48907 106 220 3 0 0 0 220 *60t SET BITS 1-3 OF RTE 48906>48908 100 220 3 0 2 0 220 48909 114 233 26 0 0 0 233 *572 48910 106 209 10 0 0 0 209 SET UP A.S.L'S. 48911 124 233 26 0 1 0 233 48912 102 64 0 0 0 48913 106 209 11 0 0 0 209 48914 102 124 0 0 0 48915 126 241 2 0 0 0 241 gS/R A 48916 124 489 17 1 0 0 489 gFILE HAS BEEN OPENED 48916>48917 126 242 2 0 0 0 242 gS/R B 48918 124 491 12 1 0 0 491 *363363 gREJ 48919 106 185 0 0 0 *40t TEST O/WRITE ALLOC 48920 101 1033 1 2 0 48921 127 489 36 0 1 0 489 g 48922 106 231 4 1 0 0 231 SET UP STORE 48923 102 231 2 1 0 0 231 TABLE 48924 124 487 4 0 2 0 487 48925 102 231 4 0 0 0 231 48926 101 487 4 1 2 0 487 48927 107 231 5 0 0 0 231 48928 106 489 35 0 0 0 489 PLANT 24/1/0 ORDER 48929 102 199 43 0 0 0 199 TO REJECT COMMANDS 48930 105 210 8 0 0 0 210 *14t MAKE ABANDON 48931 107 279 30 0 0 0 279 OPTION UNAVAILABLE 48932 107 313 10 0 0 0 313 48933 107 415 20 0 0 0 415 *14t 48934 124 489 36 1 0 0 489 48935 124 199 86 1 0 0 199 *40t*41e 48934> 48921>48936 106 108 12 0 0 0 108 SET M/R SWITCH 48937 102 106 13 0 0 0 106 NON-INT 49000 PROCR 490 490 LOAD FIRST CHAPTER 49001 NOTES RADIX B 49002 101 1 1 3 0 *14t SET OPTA SWITCH AT 1 49003 102 296 6 0 0 0 296 *14t 49004 106 218 2 1 0 0 218 STORE MOD GP 3 REGISTERS 49005 128 222 12 0 0 0 222 49006 106 233 4 0 0 0 233 SET UP (28) FOR STACKING 49007 103 28 1 0 0 49008 103 4 0 0 0 SET UP MR2 FOR STACKING TAG 14 49009 101 360 1 1 0 49010 102 5 0 0 0 49011 126 474 2 0 0 0 474 gSET TAG 15 49012 124 14 0 2 0 STACK TAG 14 49015>49013 123 0 1 2 0 49014 125 2 0 2 0 49015 124 490 13 1 0 0 490 49016 101 14 1 3 0 *59t SET TAG 14 IN MR2 OF MG6 TO 49017 123 26 1 0 0 49018 123 30 1 0 0 49019 123 28 1 0 0 *59t KID PLS INTO ALLOCATING MG3 49020 124 233 2 0 2 0 233 PARAMETER TABLE START 49021 126 247 2 0 0 0 247 gLOAD S/R 49022 126 233 4 0 1 0 233 gTO PROGRAMME LOADING SYSTEM 49100 PROCR 491 491 49101 NOTES RADIX B PROCEDURE AFTER FAILURE TO ALLOCATE 48819>49102 106 106 8 0 0 0 106 *3t2*3et TEST SECOND STORE 49103 127 491 10 0 1 0 491 *363 gYES,REJECT DEALT WITH 49104 101 1 1 3 0 49105 102 106 8 0 0 0 106 49106 106 211 2 1 0 0 211 49107 101 232 2 1 0 0 232 49108 105 232 2 1 0 0 232 49109 124 488 8 1 0 0 488 *3t2*3et 49103> 48321>49110 101 85 1 3 0 *361 48789> 48322> 29626>49111 124 477 5 1 0 0 477 *364 g 00008 48918> 24156>49112 101 81 1 3 0 *362 CODE LETTER A 49113 102 221 4 0 0 0 221 49114 124 225 16 0 1 0 225 *579 49115 106 224 4 1 0 0 224 SET UP PROGRAM FOUND FOR COMMENT 49116 102 222 10 1 0 0 222 49117 124 225 16 0 1 0 225 *579 49118 102 224 4 1 0 0 224 CLEAR IDENTITY LAST PROGRAM USED 49119 124 493 2 0 2 0 493 START OF EDIT TABLE 49120 124 478 2 1 0 0 478 g 49200 CONST 492 492 1 *38 FIXED COMMENT 49202 (A)TIMIN; *09t*3+t 49204 (A)G (D)5.5.; G,SP,SP,L/E,L/E 49206 (A)TIMEN; 49208 (A)D (D)5.5.; *09t*3+t 49210 (A)PTAPE; *07t 49212 (A)PCARD; *07t 49214 (A)HIP ; *019 49216 (A)OMIT; *5:t 49218 (A)SET; 49220 D/B; 49222 SER; 49224 SP; 49226 EDG; 49228 SP -; 49300 TABLE 493 493 1 CREJ EDIT TABLE 49301 NOTES 49302 214 16 0 0 2 0 5 0 0 0 0 0 0 *362 'C REJ' 49304 221 4 0 0 2 0 1 4 1 0 0 0 0 SP,CODE LETTER 49306 214 12 0 0 2 0 1 3 0 0 0 0 0 N/E 49308 221 8 0 0 0 0 5 0 0 0 0 0 0 PROGRAMME NUMBER 49310 214 12 0 0 2 0 1 3 0 0 0 0 0 N/E 49312 222 10 0 0 0 0 5 0 0 0 0 0 0 PROGRAMME NUMBER 49314 214 12 0 0 2 0 1 3 0 0 0 0 0 N/E 49316 214 20 0 0 2 0 2 0 1 0 0 0 0 SP,G,P 49318 0 185 0 0 0 0 1 2 0 0 0 0 0 T 1 49320 214 20 0 0 2 0 2 3 1 0 0 0 0 SP,F,N 49322 0 185 0 0 0 0 1 4 0 0 0 0 0 T 1 49324 211 22 0 0 2 0 2 0 0 0 0 0 1 *362 L/E,L/E 49326 221 3 0 0 0 0 1 0 3 0 0 0 0 *££0*££2*61e 3SP,PRIORITY CLASS 49328 215 14 0 0 2 0 5 0 0 0 0 0 0 *11312e 'ROUCH' 49330 229 3 0 0 0 0 5 0 0 0 0 0 0 *3t3*3ee 49400 TABLE 494 494 1 49402 100 31 0 0 0 0 1 4 3 0 0 0 0 *08t*61e SP,TAG 49404 221 2 0 0 0 0 5 0 1 0 0 0 1 PROGM NO SUM 49500 TABLE 495 495 1 49501 NOTES 49502 215 4 0 0 2 0 5 0 0 0 0 0 0 *0et 'PR CH' 49504 214 22 0 0 2 0 1 1 0 0 0 0 0 N/E 49506 222 10 0 0 0 0 5 0 0 0 0 0 0 PROGRAMME NUMBER 49508 211 22 0 0 2 0 2 0 2 0 0 0 1 *0et 49510 215 10 0 0 2 0 5 0 0 0 0 0 0 *0:t 'REOPE' 49512 214 20 0 0 2 0 1 4 0 0 0 0 0 N 49514 214 22 0 0 2 0 1 1 0 0 0 0 0 N/E 49516 222 10 0 0 0 0 5 0 0 0 0 0 0 PROGRAMME NUMBER 49518 211 22 0 0 2 0 2 0 1 0 0 0 1 *0:t 49520 215 12 0 0 2 0 5 0 0 0 0 0 0 *0+t 'RUNCH' 49522 214 22 0 0 2 0 1 1 0 0 0 0 0 N/E 49524 222 10 0 0 0 0 5 0 0 0 0 0 0 PROGRAMME NUMBER 49526 214 22 0 0 2 0 1 1 0 0 0 0 0 N/E 49528 229 5 0 0 0 0 5 0 0 0 0 0 0 *3t3*3ee 49530 211 22 0 0 2 0 2 0 1 0 0 0 1 *0+t 49532 215 8 0 0 2 0 5 0 0 0 0 0 0 *11t12t*11312e 'AVAIL' 49534 214 22 0 0 2 0 2 1 0 0 0 0 0 N/E,N/E 49536 222 10 0 0 0 0 3 2 0 1 0 0 0 CH. & RTE. 49538 222 11 0 0 0 0 3 2 1 3 0 0 0 CH * RTE(OLD) 49540 211 22 0 0 2 0 2 0 4 0 0 0 1 4 SP,L/E.L/E 49600 CONST 496 496 1 DUMMY PROCEDURE FOR VARIABLE ALLOCATION 49700 CONST 497 497 1 STORED HIGH DENSITY 49702 (D)0; *01t65t 49704 0; 49706 0; 49708 0; 49710 0; 49712 0; 49714 0; 49716 0; 49718 0; 49720 0; *65t 49722 0; 49724 0; 49726 0; 49728 0; 49730 0; 49732 0; 49800 PROCR 498 498 CONTROL DATA REJECTION 49801 NOTES RADIX B 46004>49802 124 82 0 2 0 CODE LETTER B 46048>49803 124 222 20 0 1 0 222 SET ROUTE TO MANUAL 49804 119 0 1 3 0 52529> 46050> 29716>49805 102 221 4 0 0 0 221 49806 126 177 2 0 0 0 177 gREQUEST T/W 49807 106 214 32 1 0 0 214 SET UP NO CD 49808 102 102 6 1 0 0 102 49809 106 221 4 0 0 0 221 SET UP CODE LETTER 49810 102 102 8 1 0 0 102 49811 124 197 4 0 2 0 197 SET UP L/E'S 49812 128 102 10 1 2 0 102 49813 124 4 0 2 0 49814 124 478 6 1 0 0 478 g 49900 PROCR 499 499 READ CONTROL DATA WITHOUT CHECKS 49901 NOTES RADIX B 49902 100 0 0 0 0 *01t 49903 126 499 2 0 1 0 499 *01t 50000 PROCR 500 500 SUB-ROUTINE R 50001 NOTES RADIX B TO OBTAIN AND CHECK FUNCTION NUMBER 50002 100 0 0 0 0 LINK 50003 102 221 2 0 0 0 221 STORE LIMIT 50004 115 222 2 0 0 0 222 TEST IF FUNCTION 50005 127 477 8 0 0 0 477 gYES,REJECT NUMBER=0 50006 105 221 2 0 0 0 221 TEST IF OUTSIDE 50007 127 477 8 0 2 0 477 gYES,REJECT LIMIT 50008 104 221 2 0 0 0 221 50009 126 500 2 0 1 0 500 gLEAVE S/R 50100 PROCR 501 501 FORM CHECK,AND STORE PARAMETER FROM I5-7 50102 100 0 0 0 0 *07t5:t6tt 50103 101 2 0 1 0 TEST RANGE 50104 115 185 0 0 0 COLLATE Q2 50105 127 477 8 0 2 0 477 gOUT OF RANGE 50106 101 0 1 3 0 FORM PARAMETER 50107 115 222 2 0 0 0 222 50108 118 4127 0 0 0 50109 103 108 28 0 0 0 108 50110 126 177 2 0 0 0 177 gREQUEST T/W 50111 106 108 28 0 0 0 108 SET UP MR2 50112 103 4 0 0 0 STORE IT 50113 126 501 2 0 1 0 501 gLEAVE S/R 50200 PROCR 502 502 SUB-ROUTINE S 50201 NOTES RADIX B CHECK ROUTE & FORM IT UP IN BINARY & PLACE IN M.R.2 50202 100 0 0 0 0 *12t11t LINK 50203 101 2 1 3 0 SET MR3=2:0 50204 118 5 0 0 0 50205 102 6 1 0 0 52908>50206 106 222 10 0 3 0 222 CHANNEL AND ROUTE 50207 118 4127 1 0 0 STORE CHANNEL 50208 102 533 2 0 3 0 533 50209 118 1 1 0 0 STORE RTE 50210 102 533 4 0 3 0 533 50211 101 213 12 1 3 0 213 CONVERT CHANNEL NUMBER 50212 112 533 2 0 3 0 533 TO BINARY 50213 103 533 2 0 3 0 533 50214 118 3 0 3 0 PLACE IN MR2 50215 104 533 4 0 3 0 533 50216 103 533 8 0 3 0 533 50217 103 4 1 0 0 50218 127 477 2 0 3 0 477 *364 gNOT IN RANGE 00008 50219 101 176 1 2 0 50220 127 477 2 0 2 0 477 *364 gNO 00008 50221 106 64 0 2 0 PLACE RTE TYPE IN 50222 118 4127 1 0 0 TOP OF B 50223 126 502 2 0 1 0 502 *12t11t gLEAVE S/R 50224 100 477 8 0 0 0 477 *££0*££2*09e*3+e*08e*07e*02e*04e*5:e 50225 100 477 8 0 0 0 477 *69e*68e*67e*66e*6te 50226 124 510 23 1 0 0 510 *3:e3:e 50227 127 477 8 0 2 0 477 *3:e C REJ 50228 127 511 12 0 1 0 511 *8ee gNO 50229 127 477 8 0 1 0 477 *363 50300 PROCR 503 503 GROUP 1 50301 NOTES RADIX B DETERMINE FUNCTION 50302 101 1 0 1 0 *09t08t07t5:t69t68t67t66t6tt86t86t 50303 101 12 1 3 0 *86+6t+*86+ 0001000011 50304 126 500 2 0 0 0 500 g S/R R 50305 102 503 8 0 0 0 503 50306 124 503 8 0 1 0 503 50307 126 503 8 0 1 0 503 50308 100 477 8 0 0 0 477 GEN CONST FUNCTION NO 50309 100 504 2 0 0 0 504 *09e*3+e TIME gSTART TIMINGS 50310 100 505 2 0 0 0 505 *09e*3+e TIME gSTOP TIMINGS 50311 100 506 2 0 0 0 506 *08e PRINT PRIORITY LIST 50312 100 507 2 0 0 0 507 *07e*02e*04e gPREFER PT 50313 100 508 2 0 0 0 508 *5:e gOMIT CATEGORIES 50314 100 509 2 0 0 0 509 *69e gREWIND AND UNLOAD 50315 100 510 2 0 0 0 510 *68e gAVAILABLE ROUTES 50316 100 512 2 0 0 0 512 *67e gAVAILABLE STORAGE 50317 100 513 2 0 0 0 513 *66e gCARD CHECK 50318 100 514 2 0 0 0 514 *86t6tt*6te gCHANGE CHANNEL 50319 100 515 2 0 0 0 515 *869 gPREFER PRINTER 50400 PROCR 504 504 GROUP 1:FUNCTION 1 50401 NOTES RADIX B START TIMINGS 50402 106 223 2 0 0 0 223 *09t*3+t 50403 127 504 29 0 1 0 504 *363 ALREADY ON 50404 126 177 2 0 0 0 177 gREQUEST TYPEWRITER 50405 126 212 8 1 2 0 212 144:0 50414>50406 106 209 2 0 0 0 209 6/0/0/0/157 50407 102 111 6 0 2 0 111 SET UP INSTRUCTIONS IN I/P O/P TO CLEAR 50408 106 265 2 0 0 0 265 19/0/1/0/56 RESET MILLISEC TIMER 50409 102 111 29 0 2 0 111 50410 102 111 48 1 2 0 111 W/L 50411 106 209 3 0 0 0 209 50412 102 111 19 0 2 0 111 50413 125 48 0 2 0 50414 124 504 6 1 0 0 504 g 50415 106 333 3 0 0 0 333 0/0/3/2/1 50416 102 264 31 0 0 0 264 50417 106 209 2 0 0 0 209 6/0/0/0/157 50418 103 264 32 0 0 0 264 50419 103 223 2 0 0 0 223 IND THAT TIMINGS ARE ON 50420 106 485 14 1 0 0 485 AMEND UNLOADER EDIT 50421 102 482 8 1 0 0 482 TABLE 50422 106 485 16 1 0 0 485 50423 102 482 10 1 0 0 482 50424 106 492 2 1 0 0 492 SET UP COMMENT 50425 102 102 6 1 0 0 102 50426 106 492 4 1 0 0 492 50524>50427 102 102 8 1 0 0 102 50428 124 478 6 1 0 0 478 g 50403>50429 125 0 1 2 0 *362 50430 102 222 10 0 0 0 222 50431 124 477 2 1 0 0 477 50500 PROCR 505 505 GROUP 1:FUNCTION 2 50501 NOTES RADIX B STOP TIMINGS 50502 126 177 2 0 0 0 177 *09t*3+t gREQUEST T/W 50503 126 212 8 1 2 0 212 144:0 50511>50504 106 111 8 0 2 0 111 50505 102 111 6 0 2 0 111 50506 106 111 30 0 2 0 111 OVERSTACK TIMING 50507 102 111 29 0 2 0 111 INSTRUCTIONS IN 50508 106 209 9 0 0 0 209 50509 102 111 19 0 2 0 111 50510 125 48 0 2 0 PRIORITY CONTROL 50511 124 505 4 1 0 0 505 g 50512 102 223 2 0 0 0 223 IND 50513 106 264 35 0 0 0 264 OVERSTACK TIMING 50514 102 264 31 0 0 0 264 INSTRUCTIONS IN I/P 50515 106 264 36 0 0 0 264 O/P CONTROL 50516 102 264 32 0 0 0 264 50517 106 485 18 1 0 0 485 AMEND UNLOADER EDIT 50518 102 482 8 1 0 0 482 TABLE 50519 106 485 20 1 0 0 485 50520 102 482 10 1 0 0 482 50521 106 492 6 1 0 0 492 SET UP COMMENT 50522 102 102 6 1 0 0 102 50523 106 492 8 1 0 0 492 50524 124 504 27 1 0 0 504 g 50600 PROCR 506 506 GROUP1: FUNCTION 3 50601 NOTES RADIX B PRINT PRIORITY LIST 50602 126 177 2 0 0 0 177 *08t gREQUEST T/W 50603 101 1008 0 1 0 50604 115 214 12 1 0 0 214 P.SP.Q 50605 102 102 6 1 0 0 102 COMMENT 50606 102 4 1 0 0 MR2 CLEAR MR2 50607 102 6 1 0 0 MR3 50630>50608 106 230 4 0 2 0 230 50609 127 506 29 0 0 0 506 gZERO,PROGRAM ABANDONED 50610 106 230 4 1 2 0 230 PRIORITY TABLE ENTRY 50611 103 221 2 1 0 0 221 W/L 50612 105 211 2 1 0 0 211 15'S TEST END OF TABLE 50613 127 506 31 0 0 0 506 gYES 1ST TEST 50614 124 221 3 0 1 0 221 *61t SWITCH START FIND TAG 50615 124 37 0 1 0 SPECIAL CHAPT START 50616 106 10 0 0 0 TAG 50617 102 100 31 0 0 0 100 *61t STORE TAG IN W/L 50618 124 494 2 0 2 0 494 TABLE START 50619 124 6 0 1 0 50620 128 102 8 1 2 0 102 EDIT ENTRY 50621 106 6 0 0 0 *1.2*1:2*1£2*382 TEST END OF 50622 101 12 1 2 0 IST LINE 50623 127 506 28 0 1 0 506 50624 101 12 0 1 0 50625 115 211 22 0 0 0 211 50626 102 102 12 1 3 0 102 50627 125 2 0 3 0 *1.2*1:2*1£2*382 50623>50628 125 4 0 3 0 50609>50629 125 2 0 2 0 50630 124 506 8 1 0 0 506 g 50613>50631 106 105 6 0 0 0 105 LE'S FOR END OF COMMENT 50632 102 102 8 1 3 0 102 50633 124 478 6 1 0 0 478 g 50700 PROCR 507 507 GP1 FN4: PREFER P/T, PREFER CARDS 50702 101 32 1 2 0 *07t*02t*04t RANGE CHECK 50703 126 501 2 0 0 0 501 FORM,CHECK AND STORE PARAMETER 50704 102 233 35 0 0 0 233 STORE INDICATOR 50705 124 4 0 1 0 MODIFY FOR PTAPE OR PCARDS 50706 106 492 10 1 2 0 492 50707 102 102 6 1 0 0 102 50708 106 214 80 1 0 0 214 L/E L/E 50709 124 508 16 1 0 0 508 *5:9 gSET UP COMMENT 50800 PROCR 508 508 GP1 FN5: OMIT CATEGORIES 50802 101 80 1 2 0 *5:t 50803 126 501 2 0 0 0 501 FORM,CHECK,AND STORE PARAMETER 50804 127 477 8 0 0 0 477 50805 126 332 2 0 0 0 332 TEST CATEGORY S/R 50806 101 8191 1 1 0 50807 114 508 20 0 0 0 508 SET CATEGORY 50808 101 8191 1 2 0 50809 127 508 11 0 0 0 508 gOMIT 50810 101 2 1 3 0 FORM OMITX 50809>50811 102 6 0 0 0 OR SETX 50812 106 492 16 1 3 0 492 FORM OMITX 50813 102 102 6 1 0 0 102 FIRST WORD 50814 124 4 0 1 0 D/B,SER,SP,OR EDG 50815 106 492 18 1 2 0 492 *5:t 50709>50816 102 102 8 1 0 0 102 *07t5:t*02t5:t*04t5:t 50817 106 214 80 1 0 0 214 L/E L/E 50818 102 102 10 1 0 0 102 50819 124 478 6 1 0 0 478 gEND ROUTINE 50820 100 0 0 0 0 50900 PROCR 509 509 REWIND AND UNLOAD PROGRAM TAPE COMMANDS 50902 101 32 1 2 0 *69t 50903 101 2 0 1 0 TEST RANGE 50904 115 185 0 0 0 COLLATE Q2 50905 127 477 8 0 2 0 477 gOUT OF RANGE 50906 118 4127 0 1 0 50907 101 2 1 1 0 50908 118 2 0 3 0 50909 103 429 2 0 0 0 429 50910 127 509 13 0 0 0 509 gYES 50911 101 34 1 3 0 34 50912 124 509 14 1 0 0 509 gSKIP 50910>50913 101 27 1 3 0 27 50912>50914 118 4118 1 0 0 SHIFT(AB) 50915 106 258 28 1 0 0 258 FINIS 50916 124 192 0 1 0 *3:+ 00064 50917 102 4 1 0 0 50918 118 15 1 0 0 SHIFT(AB) 50919 101 128 1 1 0 *3:9 50920 126 100 2 0 0 0 100 I/P O/P S/R 50921 126 177 2 0 0 0 177 gREQUEST T/W 50922 106 215 28 1 0 0 215 TAPE 50923 102 102 6 1 0 0 102 50924 124 429 2 0 1 0 429 50925 100 215 30 1 1 0 215 50926 100 102 8 1 0 0 102 50927 100 213 3 0 3 0 213 50928 125 0 1 2 0 CLEAR A 50929 124 478 6 1 0 0 478 *69t gT/W 49600 51000 PROCR 510 510 GP1 FN7 AVAILABLE ROUTES COMMAND 51002 126 177 2 0 0 0 177 *68t REQUEST TYPEWRITER 51003 101 2 0 1 0 51004 115 185 0 0 0 51005 101 128 1 2 0 51006 127 510 25 0 2 0 510 *3:e CH 16,17,18 51007 101 128 1 1 0 51008 126 510 11 0 0 0 510 *3:t gSET UP CHANNEL NUMBER 51009 101 12 0 1 0 51010 124 510 31 1 0 0 510 SET UP REST OF COMMENT 51011 100 0 0 0 0 *3:t 51012 127 510 17 0 1 0 510 gNOT CHANNEL 0 51013 101 3 1 3 0 SET UP ZERO 51014 118 3 0 0 0 51015 102 221 2 1 0 0 221 51016 124 510 19 1 0 0 510 *3:e3:e 51012>51017 103 221 3 1 0 0 221 SET UP CH NUMBER 51018 118 4127 0 0 0 51016>51019 103 500 2 0 0 0 500 *3:t 51020 124 213 12 0 2 0 213 51021 112 500 2 0 0 0 500 *3:t 51022 118 3 0 3 0 50226>51023 102 500 2 0 0 0 500 51024 126 510 11 0 1 0 510 *3:t 51006>51025 100 210 3 0 3 0 210 51026 101 352 1 1 0 ADD 160 51027 100 213 13 0 3 0 213 51028 126 510 11 0 0 0 510 51029 101 60 0 1 0 *3:t 51030 101 12 0 1 0 *3:1 51010>51031 106 215 24 1 0 0 215 51032 115 221 2 1 0 0 221 51033 102 102 6 1 0 0 102 51034 106 500 2 0 0 0 500 SET UP IND MOD REG 51035 103 533 2 0 0 0 533 8*CH 51036 101 8 1 1 0 9*CH 51037 102 533 3 0 0 0 533 51038 102 533 4 1 0 0 533 MOD REG FOR TYPING 51128>51039 124 533 2 0 1 0 533 ROUTE 51040 106 64 0 0 0 51041 118 4127 1 0 0 TEST AVAILABLE 51042 127 510 53 0 0 0 510 gYES 51043 101 255 1 2 0 TEST POTENTIALLY AVAILABLE 51044 127 511 2 0 1 0 511 *8ee gNO 51045 106 533 2 0 0 0 533 POTENTIALLY AVAILABLE 51046 105 500 2 0 0 0 500 51047 127 510 49 0 1 0 510 51048 101 48 1 1 0 51047>51049 118 3 0 0 0 51050 118 3 1 0 0 51051 101 955 0 1 0 51052 124 511 20 1 0 0 511 g 51154> 51042>51053 106 533 2 0 0 0 533 AVAILABLE 51054 105 500 2 0 0 0 500 51055 127 510 57 0 1 0 510 51056 101 48 1 1 0 51055>51057 118 3 0 0 0 51058 118 3 1 0 0 51059 101 907 0 1 0 51060 124 511 20 1 0 0 511 g 51100 PROCR 511 511 GP1 FN7 AVAILABLE ROUTES COMMAND(2) 51044>51102 125 0 1 2 0 *68t*8et 51103 102 533 6 1 0 0 533 CLEAR INDIRECT MOD REGISTER 51111>51104 124 533 6 0 1 0 533 51105 106 230 4 0 0 0 230 TEST PROS ENDED 51106 127 511 33 0 0 0 511 gYES 51107 105 211 2 0 0 0 211 TEST END OF TABLE 51108 127 511 12 0 0 0 511 gYES 51144> 51151>51109 123 2 0 0 0 STEP MR 51110 100 533 6 0 0 0 533 51111 124 511 4 1 0 0 511 *8et 51108> 50228>51112 106 533 2 0 0 0 533 ROUTE 51113 105 500 2 0 0 0 500 8*CH 51114 127 511 16 0 1 0 511 gNON ZERO 51115 101 48 1 1 0 OBTAIN ZERO 51114>51116 118 3 0 0 0 51117 101 208 1 1 0 TO GIVE U 51118 118 3 0 0 0 51119 101 947 0 1 0 51060> 51052>51120 115 215 26 1 0 0 215 ADD IN REST OF WORD 51121 124 533 4 0 1 0 533 STORE IN 51122 102 102 8 1 0 0 102 T/W ANNEX 51123 101 0 0 1 0 51124 123 2 0 0 0 51125 100 533 4 0 0 0 533 51126 123 1 0 0 0 LAST ROUTE 51127 100 533 2 0 0 0 533 51128 124 510 39 1 0 0 510 gNO 51129 106 214 80 0 0 0 214 L/E,L/E 51130 102 102 24 1 0 0 102 51131 126 107 8 1 1 0 107 (MR1)FOR MASTER 51132 124 478 6 1 0 0 478 gOUTPUT COMMENT 51106>51133 124 533 6 0 1 0 533 *8et 51134 124 230 5 0 1 0 230 SET(MR1)FOR PROG 51135 126 36 1 1 0 WHICH HAS REACHED END 51136 126 354 2 0 0 0 354 gSET(MR3)=LC+2*NO FILES/LC 51143>51137 125 0 1 2 0 51138 101 3 0 1 0 51139 115 34 0 3 0 51140 105 533 2 0 0 0 533 TEST SAME ROUTE 51141 127 511 45 0 0 0 511 gYES 51142 125 1 0 3 0 *17+18+ 00002 51143 124 511 37 1 0 0 511 gNEXT ROUTE 51144 124 511 9 1 0 0 511 gNEXT PROG 51141>51145 101 16 0 1 0 51146 115 34 0 3 0 RTE TYPE IN Q5 51147 102 533 8 0 0 0 533 *13t 51148 100 210 8 0 2 0 210 *17t18t CLEAR BIT 1 OF 51149 114 6 0 0 0 *17t18t MR3 51150 106 34 1 3 0 TEST ROUTE RELEASED 51151 127 511 9 0 3 0 511 gYES 51152 106 533 8 0 0 0 533 *13t 51153 118 4123 1 0 0 RTE TYPE IN Q10 OF 13 51154 124 510 53 1 0 0 510 *68t*8et 51155 124 512 44 1 0 0 512 *££0*££2*3t3*3ee 51156 100 0 0 0 0 SPARE 51200 PROCR 512 512 EXCESS STORE COMMENT 51202 126 177 2 0 0 0 177 *67t gREQUEST T/W 51203 106 215 22 1 0 0 215 SET UP STORE 51204 102 102 6 1 0 0 102 IN T/W ANNEXE 51205 101 20 1 3 0 51206 102 4 1 0 0 51207 126 212 14 1 3 0 212 10:0 51212> 51243> 51248>51208 106 230 21 0 2 0 230 51209 105 211 2 0 0 0 211 SUB 15'5 51210 127 512 14 0 1 0 512 IF NOT 51211 125 4098 0 2 0 YES 51212 124 512 8 1 0 0 512 PICK UP NEXT WORD 51213 124 512 27 1 0 0 512 *3t3*3ee 51210>51214 100 210 3 0 3 0 210 SET DECIMAL 51215 124 213 2 0 2 0 213 51216 112 231 1 0 2 0 231 CONVERT BINgDEC 51217 102 102 74 0 0 0 102 51218 124 261 52 0 2 0 261 51219 124 6 0 1 0 51220 128 102 8 1 2 0 102 51221 100 213 3 0 3 0 213 51222 101 768 0 1 0 51223 114 102 8 1 3 0 102 CLEAR TOP QUARTET OF A 51224 125 2 0 3 0 END OF WORD? 51249>51225 125 4098 0 2 0 51226 124 512 47 1 0 0 512 PICKUP NEXT WORD 51213>51227 106 500 2 0 0 0 500 *3t2*3et 51228 127 512 44 0 3 0 512 IF NEG 51229 101 18 1 3 0 IF POS 51230 102 5 0 0 0 51231 101 38 1 1 0 51232 102 4 0 0 0 51233 101 1008 0 1 0 51234 115 214 22 1 0 0 214 51235 102 102 8 1 3 0 102 SET UP L.E.,N.E.,N.E 51236 106 6 0 0 0 51237 101 2 1 1 0 SET START VALUE MR3 51238 103 6 0 0 0 51239 101 10 1 1 0 51240 102 7 0 0 0 SET UP END VALUE MR3 51241 101 1111 1 2 0 51242 102 500 2 0 0 0 500 SET IND NEG 51243 124 512 8 1 0 0 512 *3t2*3et 51228> 51155>51244 106 214 80 1 0 0 214 51245 102 102 8 1 3 0 102 51246 124 478 6 1 0 0 478 TYPE 51226>51247 125 0 0 3 0 51248 124 512 8 1 0 0 512 51249 124 512 25 1 0 0 512 51300 PROCR 513 513 GP1 FN9:CHECK FIELD ON CARD INPUT 51302 118 1 1 0 0 *66t 51303 125 0 1 2 0 CLEAR A 51304 115 185 0 0 0 51305 115 185 0 0 0 51306 118 4127 0 0 0 51307 102 210 15 0 0 0 210 STORE 2C 51308 126 177 2 0 0 0 177 gREQUEST T/W 51309 106 215 20 1 0 0 215 CARD 51310 102 102 6 1 0 0 102 51311 106 214 46 1 0 0 214 CHECK 51312 102 102 8 1 0 0 102 51313 106 210 15 0 0 0 210 C 51314 118 15 0 3 0 51315 104 214 80 0 0 0 214 2 L/E'S 51316 102 102 10 1 0 0 102 51317 124 478 6 1 0 0 478 g 51400 PROCR 514 514 CHANGE CHANNEL 51402 101 64 1 3 0 *6tt 51403 126 501 2 0 0 0 501 FORM,CHECK AND STOREFROM I5-7 51404 127 514 8 0 0 0 514 IF ZERO 51405 101 1 1 2 0 51406 127 477 8 0 0 0 477 gREJECT 51407 101 1 1 1 0 51404>51408 118 3 0 3 0 STORE 51409 103 100 33 0 0 0 100 51410 103 100 34 0 0 0 100 51411 103 100 35 0 0 0 100 51412 101 4 1 1 0 51413 102 100 36 0 0 0 100 51414 106 215 4 1 0 0 215 51415 102 102 6 1 0 0 102 51416 101 64 1 3 0 51417 104 4 0 0 0 51418 118 8 0 1 0 51419 101 15 0 1 0 51420 115 211 22 0 0 0 211 51421 102 102 8 1 0 0 102 51422 124 478 6 1 0 0 478 51500 PROCR 515 515 SET PREFERRED PRINTER TYPE 51502 126 177 2 0 0 0 177 *86t REQUEST TYPEWRITER 51503 125 0 1 2 0 51504 101 1 0 1 0 COLLATE OUT 51505 115 233 29 0 0 0 233 PRINTER TYPE 51506 101 9 1 2 0 TEST=9 51507 127 515 12 0 1 0 515 gNO 51508 106 215 40 1 0 0 215 SET UP GP 51509 102 102 8 1 0 0 102 51510 101 4 1 3 0 51511 124 515 15 1 0 0 515 g 51507>51512 106 215 42 1 0 0 215 SET UP SP 51513 102 102 8 1 0 0 102 51514 101 9 1 3 0 COLLATE IN 51511>51515 114 233 29 0 0 0 233 NEW PRINTER TYPE 51516 106 215 38 1 0 0 215 REST OF 51517 102 102 6 1 0 0 102 COMMENT 51518 106 214 80 0 0 0 214 L/E,L/E 51519 102 102 10 1 0 0 102 51520 124 478 6 1 0 0 478 *86t 51521 100 477 8 0 0 0 477 *££0*££2*0ee*1.3*0:e*0+e*12e*11e*40e 51522 100 477 8 0 0 0 477 *4te gREJECT 51523 127 477 8 0 1 0 477 *57e363*363 gCREJ 51524 100 477 8 0 0 0 477 *17e18e*61e gREJ 51525 115 222 2 0 0 0 222 *643 TEST IF FUNCTION NO.=0. 51526 127 477 8 0 0 0 477 *643643 YESgREJECT 51527 101 10 1 3 0 *64e61e 51528 101 7 1 3 0 *64e61e0:e0+e 51529 101 9 1 3 0 *64e61e0:e 51600 PROCR 516 516 GROUP 2 51601 NOTES RADIX B DETERMINE FUNCTION 51602 126 461 2 0 0 0 461 gS/R Q 51603 101 14 1 3 0 *643*64e61e0:e0+e*64e61e0:e*64e61e 51604 126 500 2 0 0 0 500 *643643 gS/R R 51605 103 516 12 0 0 0 516 51606 101 11 1 2 0 *61t64t TEST COMMAND USES TAG 51607 127 516 28 0 2 0 516 gYES 51608 101 11 1 1 0 *61t64t 51609 126 459 2 0 0 0 459 gS/R G 51642>51610 124 516 12 0 1 0 516 51611 126 516 12 0 1 0 516 51612 100 0 0 0 0 FUNCTION NUMBER 51613 100 517 2 0 0 0 517 gUNLOAD 51614 100 487 8 0 0 0 487 *17e18e ALLOC 51615 100 477 8 0 0 0 477 gREJECT 51616 100 487 8 0 0 0 487 *17e18e ALLOC 51617 100 477 8 0 0 0 477 gREJECT 51618 100 518 2 0 0 0 518 *0ee*1.3 gINTERCHANGE PRIORITIES 51619 100 520 2 0 0 0 520 *0+t0:t61t64t*0:e OPEN PROG 51620 100 521 2 0 0 0 521 *0+e gRUNCH 51621 100 522 2 0 0 0 522 *0:e gCLOSE PROGRAM 51622 100 477 8 0 0 0 477 *61t64t gREJECT 51623 100 518 2 0 0 0 518 *0ee*1.3*61e gINTERCHANGE 51624 100 520 2 0 0 0 520 *0:e*61e gOPEN PROG 51625 100 522 2 0 0 0 522 *0:e*61e gCLOSE PROG 51626 100 477 8 0 0 0 477 *64t gREJECT 51627 100 517 2 0 0 0 517 *64t gUNLOAD 51607>51628 101 2 0 1 0 FORM TAG NO 51629 101 0 1 3 0 51630 115 185 0 0 0 51631 127 477 2 0 0 0 477 *364 g REJECT 00008 51632 109 212 11 0 0 0 212 51633 118 9 1 0 0 51634 101 108 2 1 1 0 108 FORM SWITCH START 51635 103 108 27 0 0 0 108 51636 101 127 11 1 2 0 127 *2£4 00002 51637 127 517 4 0 2 0 517 gNOT A SWITCH 51638 124 108 27 0 1 0 108 STORE PROG IDENT 51639 106 39 0 0 0 51640 103 222 10 1 0 0 222 51641 127 477 2 0 0 0 477 *364 gREJECT 00008 51642 124 516 10 1 0 0 516 gCOMMANDS 51700 PROCR 517 517 GROUP2: FUNCTION 1 51701 NOTES RADIX B UNLOAD 51702 106 222 10 1 0 0 222 STORE ID OF PROG TO BE UNLOADED 51703 126 479 2 0 0 0 479 gS/R M* 51637>51704 124 477 2 1 0 0 477 *364 gREJECT 00008 51705 106 4 0 0 0 TEST MASTER ROUTINE 51706 127 477 2 0 0 0 477 *364 YES REJECT 00008 51707 124 4 0 1 0 51708 124 230 3 0 1 0 230 SET MR1 FOR PROG 51709 126 36 1 1 0 51710 124 3 0 1 0 *60t 51711 106 11 0 0 0 51712 124 233 45 0 1 0 233 51713 127 9 0 1 0 *60t gYES TO PTS 51714 125 0 1 2 0 *601 51715 124 295 17 1 0 0 295 gABANDON PROGRAM 51800 PROCR 518 518 GROUP 2: FUNCTION 6 51801 NOTES RADIX B INTERCHANGE PRIORITIES 51802 106 222 10 0 0 0 222 *0et*1.2 PROG IDENT NO 51803 126 479 2 0 0 0 479 gS/R M* 51804 124 477 2 1 0 0 477 *364 gREJECT 00008 51805 106 4 0 0 0 TEST IF COMMAND GIVE 51806 103 5 0 0 0 FOR TOP PROG. 51807 101 4 1 2 0 51808 127 477 4 0 3 0 477 *364 gREJECT 00008 51809 106 230 2 1 2 0 230 51810 102 221 2 1 0 0 221 51811 106 229 4 1 2 0 229 *3t4*3e+ 0000200002 51812 102 230 2 1 2 0 230 51813 106 221 2 1 0 0 221 51814 102 229 4 1 2 0 229 *3t4*3e+ 0000200002 51815 106 229 5 0 2 0 229 *3t4*3e+ 0000300003 51816 102 4 0 0 0 51817 101 220 5 1 3 0 220 SET UP (MR'S 2&3) 51818 102 6 0 0 0 51819 126 235 2 0 0 0 235 gS/R X 51900 PROCR 519 519 INTERCHANGE PRIORITIES (2) 51901 NOTES RADIX B 51902 106 4 0 0 0 *0et*1.2 51903 102 6 0 0 0 51904 124 5 0 1 0 RESET MR'S 1&2 51905 106 228 27 0 0 0 228 *3t4*3e+ 0002500025 51906 102 4 0 0 0 51907 126 235 2 0 0 0 235 gS/RX 51908 106 4 0 0 0 51909 102 6 0 0 0 51910 124 5 0 1 0 51911 106 230 3 0 0 0 230 RESET MR'S 2AND3 51912 102 4 0 0 0 51913 126 235 2 0 0 0 235 gS/R X 51914 106 4 0 0 0 51915 102 6 0 0 0 51916 101 220 5 1 3 0 220 RESET (MR'S 2&3) 51917 102 4 0 0 0 51918 126 235 2 0 0 0 235 gS/R X 51919 124 495 2 0 2 0 495 51920 124 478 2 1 0 0 478 52000 PROCR 520 520 GROUP 2 FUNCTION 7 52001 NOTES RADIX B OPEN PROGRAMME 52002 106 222 10 0 0 0 222 *0:t PROG ID NO 52003 126 479 2 0 0 0 479 gS/R M* 52004 124 477 2 1 0 0 477 *364 gREJECT 00008 52005 106 230 3 0 2 0 230 START OF SWITCH 52006 102 4 1 0 0 SET MR2= START OF SW 52007 106 45 0 2 0 *462 ORIGINAL SW.SETTING 52008 105 209 4 0 0 0 209 TEST 26/1/0 INSTRUCTION 52009 127 477 4 0 0 0 477 *462*364 gYES REJECT0000000008 NOT CLOSE 52010 106 45 0 2 0 ORIGINAL SW. SETTING 52011 127 477 4 0 2 0 477 *364 gREJ NOT CLOSED00008 52012 102 7 0 2 0 RESET SWITCH 52013 102 45 0 2 0 CLEAR W/L 52014 101 495 10 1 3 0 495 START OF EDIT TABLE 52015 124 478 2 1 0 0 478 g 52100 PROCR 521 521 GROUP 2: FUNCTION 8 52101 NOTES RADIX B AMEND RUN NUMBER 52102 106 222 10 0 0 0 222 *0+t PROG ID NO 52103 126 479 2 0 0 0 479 gS/R M* 52104 124 521 6 1 0 0 521 gPROG NOT IN PRIORITY LIST 52105 124 477 4 1 0 0 477 *364 gREJ NOT ENDED 00008 52104>52106 126 479 2 0 0 0 479 gS/R M* 52107 124 477 2 1 0 0 477 *364 gREJ NOT IN STO00008 52108 106 230 3 0 2 0 230 START OF SWITCH 52109 102 6 0 0 0 52110 106 39 0 3 0 TEST REQD PROG 52111 105 222 10 0 0 0 222 52112 127 479 11 0 1 0 479 gNO 52113 124 6 0 1 0 *60t TEST PROG UNDER 52114 124 37 0 1 0 TRIAL 52115 106 11 0 0 0 52116 127 521 45 0 1 0 521 *60t*363 52117 106 222 10 0 0 0 222 REPLACE PROG IN PRIORITY LIST 52118 102 230 2 0 2 0 230 52119 106 37 0 3 0 START OF LAST CHAP 52120 102 4 0 0 0 52121 106 229 5 0 0 0 229 *3t4*3e+ 0000300003 52122 103 40 0 3 0 STORE NEW RUN N 52123 102 15 0 2 0 52124 106 226 11 0 0 0 226 TEST (A), (B) 52125 105 214 11 0 0 0 214 SPECIFIED 52126 127 521 31 0 0 0 521 gNO 52127 106 226 12 1 0 0 226 STORE(A),(B) 52128 102 30 1 3 0 52129 106 226 14 1 0 0 226 52130 124 521 32 1 0 0 521 g 52126>52131 102 30 1 3 0 52130>52132 102 32 1 3 0 52133 106 210 3 0 0 0 210 SET (C) DECIMAL 52134 102 34 0 3 0 52135 102 46 1 1 0 CLEAR TIME SPENT IN PROGRAMME 52136 101 15 0 1 0 52137 106 10 0 2 0 TAG 52138 118 4 0 0 0 52139 115 8 0 2 0 ENTRY PT 52140 102 44 0 3 0 52141 106 35 0 3 0 SET SWITCH AT 4 52142 102 7 0 3 0 52143 124 495 20 0 2 0 495 START OF EDIT TABLE 52144 124 478 2 1 0 0 478 52116>52145 124 83 0 2 0 *361 52146 124 477 5 1 0 0 477 *364 g 00008 52200 PROCR 522 522 GROUP 2 FUNCTION 9 52201 NOTES RADIX B CLOSE PROGRAMME 52202 106 222 10 0 0 0 222 *0:t 52203 126 479 2 0 0 0 479 gS/R M* 52204 124 477 2 1 0 0 477 *364 gREJECT 00008 52205 106 230 3 0 2 0 230 52206 102 4 1 0 0 52207 106 7 0 2 0 TEST IF SWITCH 52208 105 9 0 2 0 ALREADY CLOSED 52209 127 477 4 0 0 0 477 *364 gYES REJECT 00008 52210 106 7 0 2 0 STORE SWITCH SETTING IN ASS. TIME 52211 102 45 0 2 0 52212 106 9 0 2 0 CLOSE SWITCH 52213 102 7 0 2 0 52214 126 177 2 0 0 0 177 gREQUEST T/W 52215 101 495 12 1 3 0 495 START OF EDIT TABLE 52216 128 102 8 1 2 0 102 52217 106 215 2 1 0 0 215 FORM COMMENT 52218 102 102 6 1 0 0 102 52219 101 768 0 1 0 52220 114 102 8 1 0 0 102 52221 124 478 6 1 0 0 478 gEDIT TIME 52300 PROCR 523 523 GROUP 3 52301 NOTES RADIX B DETERMINE FUNCTION 52302 101 1 0 1 0 *41t FILL QIB 52303 101 2 1 3 0 LIMIT OF FN. NO. 52304 126 500 2 0 0 0 500 gS/R R 52305 124 463 2 1 0 0 463 gSTORE DUMP 52400 PROCR 524 524 GROUP 4 52401 NOTES RADIX B DETERMINE FUNCTION 52402 126 461 2 0 0 0 461 52403 101 10 1 3 0 *11+12+40+*11+40+ 0000600008 52404 126 500 2 0 0 0 500 gS/R R 52405 103 524 9 0 0 0 524 52406 126 459 2 0 0 0 459 gS/R G 52407 124 524 9 0 1 0 524 52408 126 524 9 0 1 0 524 52409 100 0 0 0 0 FUNCTION NUMBER 52410 100 525 2 0 0 0 525 gSET RELEASED TAPES INDEX 52411 100 487 8 0 0 0 487 gALLOC WITHOUT 52412 100 526 2 0 0 0 526 *4te SET REL TAPES INDEX 52413 100 487 8 0 0 0 487 52414 100 477 8 0 0 0 477 gREJECT 52415 100 527 2 0 0 0 527 *12e*11t12t40t gAVAIL ROUTE 52416 100 528 2 0 0 0 528 *12e gSET ROUTE NOT AVAILABLE 52417 100 529 2 0 0 0 529 *11e gCHANGE ROUTE NO 52418 100 487 3 0 0 0 487 *40e OVERWRITE ALLOC 52500 PROCR 525 525 GROUP4: FUNCTION1 52501 NOTES RADIX B SET RELEASED TAPES INDEX 52502 106 226 5 1 0 0 226 TEST 2ND WORD ZERO 52503 127 525 28 0 1 0 525 gNO 52504 124 24 0 2 0 *4:4 00012 52505 105 525 30 0 0 0 525 52506 102 525 30 0 0 0 525 52507 106 534 4 1 0 0 534 UNPACK INDEX 52508 124 525 30 0 1 0 525 52509 128 196 2 1 0 0 196 52510 125 0 1 2 0 *6.t 52511 124 525 30 0 1 0 525 52512 102 196 2 0 0 0 196 *6.t 52513 106 534 6 1 0 0 534 *4:2*102 52514 124 525 30 0 1 0 525 52515 128 196 14 1 0 0 196 *4:2*102 52516 126 177 2 0 0 0 177 gREQUEST T/W 52517 106 215 46 1 0 0 215 *4tt 'LONG' 52612>52518 102 102 10 1 0 0 102 *4tt 52519 106 214 58 1 0 0 214 'R T I' SET UP COMMENT 52520 102 102 6 1 0 0 102 52521 102 102 8 1 0 0 102 *6.t 52522 106 226 6 1 0 0 226 SER NO 52523 102 102 10 1 0 0 102 *6.t*4t4 000000014 52524 106 214 80 1 0 0 214 52525 102 102 12 1 0 0 102 *6.+4t+*6.44t4 0000800016 52526 102 102 12 1 0 0 102 *4t9*6.+ 0000000008 52527 124 478 6 1 0 0 478 gOUTPUT COMMENT 52603> 52503>52528 124 81 0 2 0 CODE LETTER A 52529 124 498 5 1 0 0 498 g 52530 100 0 0 0 0 IND (SET AT 0 OR 24) 52531 127 477 4 0 1 0 477 *££0*££2*57e36e 52532 127 477 8 0 1 0 477 *57e363 52600 PROCR 526 526 SET RELEASED TAPES INDEX (SHORT) 52601 NOTES RADIX 52602 106 226 5 1 0 0 226 *4tt 52603 127 525 28 0 1 0 525 gNO CD A 52604 101 12 1 3 0 SET UP MODIFIER 52605 105 526 13 0 0 0 526 52606 102 526 13 0 0 0 526 52607 106 534 4 1 0 0 534 COPY TAPE NOS 52608 124 526 13 0 1 0 526 52609 128 196 26 1 0 0 196 52610 126 177 2 0 0 0 177 52611 106 215 44 1 0 0 215 'SHORT' 52612 124 525 18 1 0 0 525 52613 100 0 0 0 0 MODIFIER 52700 PROCR 527 527 GROUP4:FUNCTION6 52701 NOTES RADIX B SET ROUTE AVAILABLE 52702 126 502 2 0 0 0 502 *12t gS/R S 52703 101 255 1 2 0 TEST RTE UNAVAILABLE 52704 127 527 12 0 1 0 527 *57e36e*57e363 CHECK LIST IF MULTI- 52705 118 1 1 0 0 52706 102 64 0 2 0 SET ROUTE AVAILABLE 52724>52707 102 222 11 0 0 0 222 52708 124 215 8 0 2 0 215 *12t AMEND EDIT TABLE 52809> 53185>52709 102 495 32 0 0 0 495 *11t12t*111129 53043>52710 124 495 32 0 2 0 495 START OF EDIT TABLE 52711 124 478 2 1 0 0 478 52704>52712 106 4 0 0 0 *57t*12t CH CH RT IN MR 2 52713 126 249 2 0 0 0 249 gSEARCH LIST 52714 124 527 16 1 0 0 527 gFOUND 52715 124 477 4 1 0 0 477 *364 gNO 00008 52714>52716 124 225 16 0 1 0 225 SET UP 64+R 52717 106 224 3 0 0 0 224 52718 102 64 0 2 0 52719 106 258 17 0 0 0 258 SET UP TABLE ENTRY 52720 101 22 1 2 0 52721 118 5 0 0 0 52722 124 225 16 0 1 0 225 CLEAR AREA 52723 128 224 2 0 0 0 224 52724 124 527 7 1 0 0 527 gCOMMENT 52800 PROCR 528 528 GROUP4:FUNCTION 7 52801 NOTES RADIX B SET ROUTE NOT AVAILABLE 52802 126 502 2 0 0 0 502 *12t gS/R S 52803 127 477 4 0 1 0 477 *364 gREJECT 00008 52804 101 255 1 1 0 SET ROUTE UNAVAILABLE 52805 118 1 1 0 0 52806 102 64 0 2 0 52807 102 222 11 0 0 0 222 52808 124 215 6 0 2 0 215 AMEND EDIT TABLE 52809 124 527 9 1 0 0 527 *12t gCOMMENT 52810 127 531 86 0 0 0 531 *££0*££2*873*88£ gYES REJECT 52811 127 531 86 0 2 0 531 *87e gYES REJECT 52812 127 531 86 0 3 0 531 *87t87e gNO REJECT 52813 127 531 86 0 1 0 531 *87e87e gNO REJECT 52814 127 531 24 0 0 0 531 *853 gYES 52815 127 531 67 0 0 0 531 *87987e gYES 52900 PROCR 529 529 GROUP 4 FUNCTION 8 52901 NOTES RADIX B CHANGE ROUTE NUMBER 52902 126 502 2 0 0 0 502 *11t gS/R S 52903 125 0 1 2 0 DRAIN 52904 118 1 1 0 0 52905 103 531 90 0 0 0 531 *879889 52906 103 533 6 0 3 0 533 52907 125 1 0 3 0 STEP MR3 52908 124 502 6 1 0 0 502 gDECODE OLD ROUTE 52909 106 64 0 2 0 PROG TAG IN Q5 IF OLD ROUTE IN USE 52910 118 4124 0 0 0 52911 127 531 86 0 0 0 531 gNO REJECT 52912 103 533 7 0 0 0 533 STORE TAG 52913 101 13 1 2 0 TEST IF M/R ROUTE 52914 127 531 86 0 2 0 531 *873 gYES REJECT 52915 106 533 6 0 0 0 533 NEW ROUTE TYPE 52916 101 5 1 2 0 TEST P/T I/P 52917 127 529 29 0 0 0 529 *88e gYES SET INDZERO 52918 106 533 3 0 0 0 533 OLD CHANNEL TEST IF M/T ROUTE 52919 101 16 1 2 0 *3:t TEST M/T ROUTE 52920 127 529 58 0 3 0 529 *3:t*87e gNO 52921 101 1 1 2 0 *234*244 0000200003 52922 127 529 58 0 2 0 529 *87t87e gNO 52923 106 533 2 0 0 0 533 *87t88t*87t NEW CHANNEL 52924 101 16 1 2 0 *3:t TEST M/T 52925 127 531 86 0 3 0 531 *3:t gNO REJECT 52926 101 1 1 2 0 *234*244 0000200003 52927 127 531 86 0 2 0 531 *87t gNO REJECT 52928 101 15 1 3 0 *889*871 52917>52929 102 531 90 0 0 0 531 SET IND NEG FOR MT ZERO FOR PT 52930 126 212 8 1 3 0 212 MR3 SPANS SWITCHES 52935>52931 106 112 2 0 3 0 112 TEST OLD ROUTE 52932 105 533 9 0 0 0 533 IN SI+30 52933 127 529 37 0 0 0 529 gYES 52934 125 48 0 3 0 52935 124 529 31 1 0 0 529 gNEXT PROG 52936 124 531 86 1 0 0 531 gNO REJECT 52933>52937 124 6 0 1 0 52938 126 112 8 1 1 0 112 52939 106 31 0 1 0 TEST OPENING FILE 52940 101 15 1 2 0 *88+ 00017 52941 127 529 44 0 3 0 529 *87987e gNO 52942 101 4 1 2 0 *87t*88+ 0000000002 52943 127 529 67 0 3 0 529 *87t gYES 52941>52944 106 31 0 1 0 52945 101 267 2 1 1 0 267 52946 101 305 25 1 2 0 305 *87t TEST REOPEN 52947 127 529 67 0 0 0 529 gYES M/T O/P REEL 52948 101 305 25 1 1 0 305 52949 101 421 61 1 2 0 421 TEST REOPEN 52950 127 529 67 0 0 0 529 gYES M/T I/P REEL 52951 101 421 61 1 1 0 421 52952 101 291 6 1 2 0 291 *5+t TEST IN 52953 127 529 67 0 0 0 529 gYES OPT 13 52954 101 291 6 1 1 0 291 *87t*5+t*889 52955 101 365 35 1 2 0 365 *88t TEST REOPEN 52956 127 529 67 0 0 0 529 *88t gYES P/T I/P REEL 52957 124 531 86 1 0 0 531 *87t88t gNO REJECT 52922> 52920>52958 126 212 8 1 3 0 212 52959 106 533 7 0 0 0 533 TAG 52963>52960 101 1 1 2 0 52961 127 529 65 0 0 0 529 g 52962 125 48 0 3 0 52963 124 529 60 1 0 0 529 gTRY AGAIN 52964 124 531 86 1 0 0 531 gREJECT 52961>52965 124 6 0 1 0 52966 126 112 8 1 1 0 112 52956> 52953> 52950> 52947> 52943>52967 106 533 9 0 0 0 533 OLD ROUTE 52968 102 188 2 0 0 0 188 52969 126 353 2 0 0 0 353 SELECT RTE NO FROM LAST CHAP 52970 127 529 74 0 0 0 529 g 52971 125 2 0 3 0 STEP TO TEST NEXT ROUTE 52972 124 353 4 1 0 0 353 gNO 52973 124 531 86 1 0 0 531 gREJECT 52970>52974 101 16 0 1 0 COLLATE OLD ROUTE TYPE 52975 115 34 0 3 0 AND TEST SAME AS NEW ROUTE TYPE 52976 118 4124 0 0 0 52977 103 533 7 0 0 0 533 *879 COPY OLD ROUTE TYPE 52978 105 533 6 0 0 0 533 52979 127 529 82 0 0 0 529 *87e87e gYES 52980 106 531 90 0 0 0 531 *87t NO MUST BE MT 52981 127 531 86 0 2 0 531 *87t gNOT REJECT 52979>52982 124 533 8 0 1 0 533 TEST NEW ROUTE 52983 106 64 0 0 0 AVAILABLE 52984 118 4127 0 0 0 52985 127 531 86 0 1 0 531 gNO REJECT 52986 106 64 0 2 0 INTERCHANGE ASL'S 52987 124 533 8 0 0 0 533 52988 102 64 0 0 0 52989 106 533 7 0 0 0 533 *87+ 00006 52990 101 4080 1 1 0 ADD ££0 TO MAKE UNAVAILABLE 52991 103 64 0 2 0 53000 PROCR 530 530 CHANGE ROUTE(2) 53002 101 4086 1 2 0 *11t*04t*89t TEST RT TYPE 6 53003 127 530 29 0 1 0 530 *853 gNO 53004 101 7 1 2 0 REPLACE 53005 127 530 29 0 1 0 530 UPTIME ROUTE 53006 106 533 9 0 0 0 533 53007 105 221 39 0 0 0 221 53008 127 530 12 0 1 0 530 53009 106 533 8 0 0 0 533 53010 102 221 39 0 0 0 221 53011 124 530 14 1 0 0 530 53008>53012 106 533 8 0 0 0 533 53013 102 221 41 0 0 0 221 53011>53014 106 533 9 0 0 0 533 TEST W/E IND SET 53015 105 381 24 0 0 0 381 53016 127 530 19 0 1 0 530 gNO 53017 106 533 8 0 0 0 533 REPLACE 53018 102 381 24 0 0 0 381 53016>53019 106 533 9 0 0 0 533 53020 105 381 23 0 0 0 381 53021 127 530 24 0 1 0 530 gNO 53022 106 533 8 0 0 0 533 REPLACE 53023 102 381 23 0 0 0 381 *85t 53021>53024 106 65 0 2 0 INTERCHANGE OTHER 53025 124 533 8 0 1 0 533 HALF OF ASL 53026 102 65 0 0 0 53027 101 1 1 3 0 SET CARD IND=1 53028 124 530 30 1 0 0 530 53005> 53003>53029 125 0 1 2 0 SET CARD IND=0 53028>53030 102 531 91 0 0 0 531 *04t*89t 53031 106 533 8 0 0 0 533 COLLATE NEW ROUTE 53032 118 3 0 0 0 *87+ 00007 53033 104 533 6 0 0 0 533 *87t 53034 118 4 0 0 0 *87t AND ROUTE TYPE 53035 104 533 8 0 0 0 533 INTO SP CH DETAILS 53036 101 403 0 1 0 *87+ 00387 53037 114 34 1 3 0 53038 106 533 8 0 0 0 533 NEW ROUTE 53039 126 328 2 0 0 0 328 ALTER ROUTE NO IN PARAMETER LISTS 53040 127 531 10 0 0 0 531 *££0*££2*043893 53041 127 531 20 0 0 0 531 *042893 gYES 53042 127 531 40 0 1 0 531 *87e88e*87e gNO 53043 124 527 10 1 0 0 527 *12e gCOMMENT 53044 126 351 2 0 0 0 351 *09e06e TEST RTE NOTING D/B 53045 124 477 8 1 0 0 477 *363 gC REJ 53100 PROCR 531 531 CHANGE ROUTE(3) 53102 125 0 1 2 0 *11t 53103 101 3 0 1 0 53104 115 7 0 1 0 TEST OLD RTE SET UP 53105 105 531 9 0 0 0 531 IN SI+7 53106 127 531 14 0 1 0 531 *043893 gNO 53107 105 531 91 0 0 0 531 *04t*89t TEST OLD RTE+1 SET U 53108 127 531 14 0 1 0 531 gNO IN SI IF CARDS 53109 101 1 1 1 0 *04t*89t 53040>53110 104 533 8 0 0 0 533 NEW ROUTE NO 53111 114 7 0 1 0 53112 125 0 1 2 0 53113 102 45 0 1 0 CLEAR ASSOCIATED TIME 53108> 53106>53114 106 30 0 1 0 TEST OLD ROUTE IN SI+30 53115 105 533 9 0 0 0 533 53116 127 531 22 0 1 0 531 *042893*87e88e gNO 53117 105 531 91 0 0 0 531 *04t*89t OLD RTE+1 IN SI+30 53118 127 531 22 0 1 0 531 *87e88e gNO 53119 104 531 91 0 0 0 531 *04t*89t YES 53041>53120 104 533 8 0 0 0 533 SET UP NEW ROUTE 53121 102 30 0 1 0 IN SI+30 53118> 53116>53122 106 531 90 0 0 0 531 *87t88t 53123 127 531 33 0 0 0 531 *889*87e gPT 52814>53124 127 531 40 0 2 0 531 *87t 53125 126 108 18 1 3 0 108 COPY MT FILE 53131>53126 124 533 9 0 1 0 533 DETAILS 53127 106 190 2 0 3 0 190 53128 124 533 8 0 1 0 533 53129 102 190 2 0 3 0 190 53130 125 24 0 3 0 *234*224 0001600008 53131 124 531 26 1 0 0 531 53132 124 531 74 1 2 0 531 *87t gCOMMENT 53123>53133 124 531 74 0 2 0 531 *88t 53134 102 325 2 0 0 0 325 COPY PAPER TAPE 53135 106 533 9 0 0 0 533 FILE DETAILS FOR 53136 102 221 3 0 0 0 221 SUBSEQUENT REELS 53137 106 533 8 0 0 0 533 NEW ROUTE 53138 102 188 2 0 0 0 188 53139 124 325 6 1 0 0 325 *88t*87t88t 53124> 53042>53140 106 533 3 0 0 0 533 SET MR3 53141 118 3 0 3 0 AT 8*OLD CHANNEL 53142 102 6 0 0 0 53143 106 252 2 0 3 0 252 TEST OLD ROUTE LAST 53144 105 533 9 0 0 0 533 TO USE ITS CHANNEL 53145 127 531 60 0 1 0 531 gNO 53146 106 252 3 0 3 0 252 STORE ROUTE TYPE 53147 103 533 7 0 0 0 533 FOR FUTURE USE 53148 105 211 2 0 0 0 211 TEST ASSEMBLER TABLE CLEARED 53149 127 531 60 0 0 0 531 YESg 53150 126 107 8 1 1 0 107 (MR1)FOR MR SWITCH 53151 106 533 9 0 0 0 533 OLD ROUTE 53152 102 30 0 1 0 IN SI+30 53153 126 352 2 0 0 0 352 *09e06e TEST RTE NOTING D/B 53154 124 533 9 0 1 0 533 SET ROUTE 53155 119 0 1 2 0 TO MANUAL 53156 124 3 0 1 0 53157 106 160 0 0 0 TEST D/B OCCURRED 53158 127 531 74 0 0 0 531 gNO 53159 124 531 71 1 0 0 531 gYES 53149> 53145>53160 106 533 3 0 0 0 533 TEST D/B IND SET 53161 118 3 0 3 0 FOR OLD CHANNEL 53162 102 6 0 0 0 8*OLD CHANNEL 53163 101 1 0 1 0 53164 124 533 5 0 1 0 533 OLD ROUTE 53165 118 0 1 0 0 53166 115 252 4 1 3 0 252 COLLATE OUT D/B IND 52815>53167 125 531 74 0 0 0 531 gNO 53168 118 533 7 1 2 0 533 ALIGN TO 53169 118 4120 0 0 0 Q1 OF A 53170 102 533 7 0 0 0 533 53159>53171 106 103 15 0 0 0 103 SET SWITCH SAS 53172 102 265 4 0 0 0 265 =2 53173 124 531 75 1 0 0 531 g 53158>53174 102 533 7 0 0 0 533 STORE D/B IND 53173>53175 106 533 2 0 0 0 533 NEW CH 53176 118 3 0 3 0 53177 102 6 0 0 0 8*NEW CH 53178 101 1 0 1 0 53179 106 533 7 0 0 0 533 53180 124 533 4 0 1 0 533 53181 118 0 1 0 0 COLLATE IN D/B IND 53182 114 252 4 0 3 0 252 FOR NEW ROUTE 53183 126 107 8 1 1 0 107 (MR1)FOR M/R 53184 124 215 14 0 2 0 215 *129 53185 124 527 9 1 0 0 527 *12e gCOMMENT 52985> 52981> 52973> 52964> 52957> 52936> 52927> 52925> 52914> 52911> 52813> 52812> 52811> 52810>53186 126 107 8 1 1 0 107 (MR1)FOR M/R 53187 106 221 11 0 0 0 221 *363 53188 102 221 10 0 0 0 221 *362 53189 124 477 2 1 0 0 477 *362 C REJ A 53190 100 0 0 0 0 *879889 MT/PT INDICATOR 53191 100 0 0 0 0 *11t*049*899 53192 127 477 8 0 2 0 477 *££0*££2*3:e363 gC REJ 53193 127 477 2 0 2 0 477 *3:e36e gC REJ A 53200 PROCR 532 532 GP6 AND GP7 SET ROUTE AVAILABLE AND WITHDRAW ROUTE 53202 101 3 0 1 0 *5£t*12t COLLATE CHANNEL/ROUTE 53203 115 185 0 0 0 53204 101 128 1 2 0 CONVERT RTE 53205 127 532 7 0 3 0 532 *3:e363*3:e36e 53206 101 224 1 1 0 *3:9 53205>53207 101 128 1 1 0 53208 102 222 10 0 0 0 222 STORE FOR ENTRY TO COMMANDS 53209 124 199 78 0 1 0 199 53210 126 524 9 0 1 0 524 53300 CONST 533 533 1 W/L'S FOR OP INT 53302 (D)0; OLD CHANNEL/NEW CHANNEL 53304 0; OLD ROUTE/NEW ROUTE 53306 0; WL/Q1 OF NEW ROUTE 53308 0; OLD RTE/NEW RTE IN BINARY 53400 TABLE 534 534 1 BULK COPY TABLES TO UNPACK RT1 53401 NOTES ALSO TO ENSURE ISUER STARTS IN EVEN LOCATION 53402 226 7 0 0 0 0 8 0 1 0 0 0 0 *££0*££1*1034:3*4:3 T 7 53404 226 7 0 0 0 0 0 0 3 0 0 0 0 *1034:3*4:3 T 7 53406 227 7 0 0 0 0 8 0 1 0 0 0 0 *4:1 T 7 53500 PROCR 535 535 INITIAL SET UP END ROUTINE 53501 NOTES RADIX B 55508>53502 124 535 4 0 3 0 535 53503 124 181 2 1 0 0 181 53504 100 0 0 0 0 53600 PROCR 536 536 FORM UP DIVISION 0 AND 1 DETAILS 10002>53602 102 103 3 0 1 0 103 TEST STORE PRINT 53603 101 60 1 3 0 REQUIRED 53604 101 60 1 2 0 *844 00030 53605 127 536 8 0 0 0 536 gNO 53606 101 1 1 3 0 SET IND 53607 102 558 14 0 0 0 558 53605>53608 101 535 2 1 3 0 535 53609 102 231 2 0 1 0 231 53610 124 551 2 1 0 0 551 53700 PROCR 537 537 STORE PRINT SET UP 53702 125 4096 1 1 0 SET NON-INT 53703 124 547 13 1 3 0 547 STORE INDICATORS 53704 106 542 31 0 0 0 542 53705 124 0 0 3 0 53706 102 25 0 0 0 53707 125 8191 1 1 0 CLEAR INDICATORS 53708 106 547 26 1 0 0 547 *3et SET UP 53709 102 547 4 1 0 0 547 *3et STORE COUNTER 53710 102 547 4 0 0 0 547 *3e1 CLEAR STORE COUNTER 53711 124 550 2 0 2 0 550 EDIT HEADING 53712 126 545 2 0 0 0 545 EDIT AND O/P S/R 53800 PROCR 538 538 TEST FOR TAG CHANGES 53939> 53946> 53959>53802 125 1792 1 2 0 53803 127 538 5 0 0 0 538 STORE I9-11 53804 118 4126 0 1 0 53803>53805 102 547 30 0 0 0 547 STORE TAG 53806 125 1792 1 1 0 CLEAR I9-11 53807 106 547 18 1 0 0 547 COPY 4 SHORT WORDS 53808 104 547 4 0 0 0 547 NUMERICgALPHA 53809 128 548 3 0 1 0 548 53810 124 547 4 0 3 0 547 STORE IST TAG TEST TAG CHANGE 53811 123 0 0 3 0 53812 103 547 6 0 0 0 547 53813 105 547 7 0 0 0 547 SECOND TAG 53814 127 538 16 0 0 0 538 gNO 53815 102 547 3 0 0 0 547 SET TAG CHANGE IND 53814>53816 124 547 4 0 3 0 547 STORE 2ND TAG TEST TAG CHANGE 53817 123 2 0 3 0 53818 103 547 7 0 0 0 547 53819 105 547 6 0 0 0 547 53820 127 539 2 0 0 0 539 gNO 53821 102 547 3 0 0 0 547 SET TAG CHANGE IND 53900 PROCR 539 539 SET UP EDIT TABLES 53910> 53820>53902 124 547 8 0 1 0 547 53903 106 548 2 1 0 0 548 NEXT SHORT WORD TEST ZERO 53904 127 539 8 0 0 0 539 gYES 53905 126 543 2 0 0 0 543 gSET UP SHORT WORD S/R 53906 124 547 8 0 1 0 547 53907 102 548 2 1 0 0 548 53904>53908 123 2 0 0 0 STEP ON SH.WORD CTR 53909 100 547 8 0 0 0 547 TEST 4 SHORT WORDS D 53910 124 539 2 1 0 0 539 gNO 53911 102 547 8 0 0 0 547 RESET COUNTER 53912 106 547 3 0 0 0 547 TEST FOUR ZERO WORDS 53913 127 539 47 0 1 0 539 gNO OR NO TAG CHANGE 54114>53914 125 2 1 2 0 TEST 12 SET 53915 127 542 2 0 1 0 542 gYES 53916 106 547 4 0 0 0 547 53917 124 999 0 0 3 0 TEST PRINTED TO END OF PROGRAM SWITCHES 53918 101 130 2 1 2 0 130 53919 127 539 37 0 3 0 539 gNO 53920 125 32 1 2 0 TEST 16 SET 53921 127 539 37 0 0 0 539 gNO 53922 106 547 4 0 0 0 547 53923 101 8191 1 2 0 53924 127 539 31 0 2 0 539 gNOT IN DIV 0 53925 101 8191 1 1 0 53926 101 535 4 1 2 0 535 53927 127 539 37 0 2 0 539 gNOT IN MASTER 53928 101 535 4 1 3 0 535 53929 102 547 4 0 0 0 547 SKIP REST OF MASTER IN DIV 0 53930 124 539 37 1 0 0 539 53924>53931 124 550 2 0 2 0 550 ARRANGE TO SKIP REST OF MASTER 53932 102 547 4 0 0 0 547 53933 100 547 31 0 2 0 547 53934 118 4124 1 0 0 53935 114 547 4 0 0 0 547 53936 125 32 1 1 0 CLEAR 16 53930> 53927> 53921> 53919>53937 123 4 0 0 0 TEST END OF STORE 53938 100 547 4 0 0 0 547 53939 124 538 2 1 0 0 538 gNO 53940 124 542 2 1 0 0 542 *3e1 gEND ROUTINE 53941 106 547 5 0 0 0 547 *3et TEST SECOND STORE 53942 105 547 29 0 0 0 547 DEALT WITH 53943 127 542 2 0 0 0 542 gYES 53944 106 547 28 1 0 0 547 SET UP STORE COUNTER 53945 102 547 4 1 0 0 547 FOR SECOND STORE 53946 124 538 2 1 0 0 538 *3et gDEAL WITH SECOND STORE 53913>53947 106 547 30 0 0 0 547 TEST IF SELECTED TAG SET 53948 127 540 2 0 0 0 540 gNO 53949 105 547 6 0 0 0 547 TEST TAG1=SEL.TAG 53950 127 540 2 0 0 0 540 gYES 53951 106 547 6 0 0 0 547 53952 101 13 1 2 0 TEST TAG1=13g15 53953 127 540 2 0 2 0 540 gYES 53954 106 547 30 0 0 0 547 53955 105 547 7 0 0 0 547 TEST TAG2=SEL.TAG 53956 127 540 2 0 0 0 540 gYES 53957 106 547 7 0 0 0 547 53958 101 13 1 2 0 TEST TAG2=13g15 53959 127 538 2 0 3 0 538 gNO 54000 PROCR 540 540 DELETE L/E OR B/E 53956> 53953> 53950> 53948>54002 100 547 32 1 2 0 547 15'S INTO B 54003 125 0 1 2 0 54004 124 547 4 0 3 0 547 54005 115 0 1 0 0 COLLATE OUT WORD N' 54006 126 544 2 0 0 0 544 gL/E B/E S/R 54007 106 547 16 1 0 0 547 54008 102 548 10 1 0 0 548 54009 100 547 32 1 2 0 547 54010 124 547 4 0 3 0 547 54011 115 2 1 0 0 COLLATE OUT WORD N+2' 54012 126 544 2 0 0 0 544 gL/E B/E S/R 54013 106 547 16 1 0 0 547 54014 102 548 12 1 0 0 548 54015 124 0 0 3 0 54016 100 210 3 0 3 0 210 DECIMAL 54017 124 547 4 0 1 0 547 ADDRESS WITHIN 54018 101 0 1 3 0 DIVISION 54019 102 547 12 0 0 0 547 54020 124 0 0 3 0 54021 124 213 2 0 2 0 213 54022 112 547 12 0 0 0 547 54023 102 547 12 0 0 0 547 54024 124 0 0 3 0 54025 100 212 2 0 3 0 212 BINARY 54026 124 547 4 0 3 0 547 DIV NO 54027 124 0 0 2 0 54028 124 547 4 0 1 0 547 54029 101 0 1 2 0 54030 118 3 0 3 0 ALIGN IN Q5 54031 107 547 12 0 0 0 547 54100 PROCR 541 541 OUTPUT 54102 106 547 4 0 0 0 547 54103 103 549 40 0 0 0 549 SELECT PRINT LOCATIONS 54104 101 1 1 1 0 SET UP QUARTET VALUES IN EDIT TABLE 54105 103 549 42 0 0 0 549 FOR 4 SHORT WORDS 54106 101 1 1 1 0 54107 103 549 44 0 0 0 549 54108 101 1 1 1 0 54109 102 549 46 0 0 0 549 54110 124 549 2 0 2 0 549 54111 126 545 2 0 0 0 545 gEDIT AND O/P S/R 54112 102 548 16 0 0 0 548 CLEAR BE INDICATOR 54113 102 547 3 0 0 0 547 CLEAR PRINT LINE IND 54114 124 539 14 1 0 0 539 gTEST INDICATORS 54200 PROCR 542 542 END ROUTINE 53943> 53940> 53915>54202 124 0 0 3 0 54203 106 140 0 0 0 54204 127 542 18 0 0 0 542 gNO 54205 125 0 1 2 0 54206 102 547 4 0 0 0 547 CLEAR STORE CTR 54217>54207 124 547 4 0 1 0 547 54208 124 0 0 1 0 54209 101 0 1 3 0 54210 124 0 0 3 0 54211 105 140 0 0 0 54212 127 542 15 0 1 0 542 54213 124 549 60 0 2 0 549 54214 126 545 2 0 0 0 545 54212>54215 123 1 0 0 0 54216 100 547 4 0 0 0 547 54217 124 542 7 1 0 0 542 54204>54218 125 8191 1 1 0 54219 124 0 0 1 0 54220 125 0 1 0 0 54221 124 0 0 3 0 54222 106 209 7 0 0 0 209 54223 124 0 0 3 0 54224 102 25 0 0 0 RESET O'FLOW LINK 54225 102 547 30 0 0 0 547 54226 123 542 27 0 2 0 542 RESET TAG 14 54227 100 0 0 0 0 54228 124 0 0 3 0 54229 124 103 7 1 0 0 103 gPRIORITY QUEUE 54230 124 0 0 3 0 54231 126 24 0 3 0 54300 PROCR 543 543 SET UP SHORT WORD S/R 54302 100 0 0 0 0 54303 102 547 10 1 0 0 547 STORE SHORT WORD 54304 100 547 14 0 2 0 547 54305 115 547 11 0 0 0 547 COLLATE OUT ACTION SIGN BIT SET 54306 118 4125 0 0 0 IN BIT 37 54307 102 548 14 0 0 0 548 54308 124 0 0 3 0 54309 100 210 3 0 3 0 210 SET DECIMAL 54310 124 0 0 3 0 54311 124 213 2 0 2 0 213 54312 103 547 3 0 0 0 547 54313 112 548 14 0 0 0 548 CONVERT TO DECIMAL 54314 102 548 14 0 0 0 548 54315 100 547 11 1 2 0 547 SH.WORD INTO B ALPHAgNUMERIC 54316 118 6 1 0 0 54317 106 548 14 0 0 0 548 54318 118 3 0 3 0 SEPARATE ACTION DISCMOD 54319 118 1 1 3 0 54320 118 2 0 3 0 54321 118 2 1 3 0 54322 102 548 15 0 0 0 548 STORE A,D,M 54323 118 1 1 3 0 54324 118 3 1 0 0 54325 102 548 14 0 0 0 548 ADDRESS 54326 124 0 0 3 0 54327 124 213 2 0 2 0 213 54328 112 548 14 0 0 0 548 CONVERT TO DECIMAL 54329 124 0 0 3 0 54330 100 212 2 0 3 0 212 SET BINARY 54331 102 548 14 0 0 0 548 STORE ADDRESS 54332 106 548 14 1 0 0 548 54333 126 543 2 0 1 0 543 54400 PROCR 544 544 L/E B/E S/R 54402 100 0 0 0 0 54403 102 547 16 1 0 0 547 W/L 54404 100 547 24 1 2 0 547 -3/15 54412>54405 115 547 16 1 0 0 547 TEST FOR L/E 54406 115 547 20 1 0 0 547 54407 127 544 14 0 0 0 544 gYES 54408 115 547 22 1 0 0 547 TEST FOR B/E 54409 127 544 14 0 0 0 544 gYES 54417>54410 118 2 1 0 0 TEST ALL CHARACTERS 54411 101 0 1 3 0 54412 127 544 5 1 1 0 544 gNO 54413 126 544 2 0 1 0 544 gLEAVE S/R 54409> 54407>54414 114 547 16 1 0 0 547 CLEAR CHARACTER 54415 101 91 1 3 0 SET INDICATOR 54416 102 548 16 0 0 0 548 54417 124 544 10 1 0 0 544 g 54500 PROCR 545 545 EDIT AND O/P S/R 54502 100 0 0 0 0 54506> 54511>54503 124 547 2 0 1 0 547 54504 126 0 1 0 0 TEST PRINTER ROUTE 54505 124 545 10 1 0 0 545 gCLOSED HALT 15/0/1 54506 124 545 3 1 0 0 545 gENGAGED 54507 124 545 12 1 0 0 545 D/B HALT 15/0/3 54508 100 3845 0 0 0 W/E HALT 15/./5 54509 124 545 13 1 0 0 545 54505>54510 100 3841 0 0 0 54511 124 545 3 1 0 0 545 54507>54512 100 3843 0 0 0 54509>54513 128 551 4 1 2 0 551 *3t4 EDIT TO ANNEX 00007 54514 124 0 0 3 0 54515 106 258 20 1 0 0 258 FUNCTION WORD 54516 102 551 2 1 0 0 551 INSERT 54517 124 547 2 0 3 0 547 54518 106 64 0 0 0 STORE PRESENT ASL 54519 102 548 17 0 0 0 548 54520 125 0 1 0 0 *869 OR 24/1/0gSP PRINTER 54521 106 545 37 0 0 0 545 *2.286t 54522 124 547 2 0 3 0 547 STORE A SL IN 64+R 54523 102 64 0 0 0 54524 106 545 38 0 0 0 545 START OF EDIT TABLE 54525 124 545 37 0 3 0 545 54526 129 0 0 1 0 EDIT 54527 124 545 31 1 0 0 545 *2.286t*2.t86t 55813>54528 106 545 38 0 0 0 545 54529 124 547 2 0 3 0 547 54530 102 64 0 0 0 *2.t86t 54527>54531 124 547 2 0 1 0 547 54532 119 0 0 0 0 OUTPUT 54533 106 548 17 0 0 0 548 54534 124 547 2 0 3 0 547 54535 102 64 0 0 0 RESTORE ASL 54536 126 545 2 0 1 0 545 54537 114 551 2 0 1 0 551 *2.1869 GP ANNEX START 54538 114 551 2 0 1 0 551 SPECIAL ANNEX START 54600 CONST 546 546 1 ALPHA CONSTANTS 54602 (A)STORE; 54604 PRINT; 54606 OF ; 54608 TAKEN; 54610 ON AT; 54700 CONST 547 547 1 W/L'S COUNTERS AND CONSTANTS 54702 (D)0; TAG CHANGE/PRINTER ROUTE 54704 0000000000; SIZE OF STORE COUNTER 54706 ; TAG 2/TAG 1 54708 800000; SHORT WORD COUNTER 54710 ; W/L L/E B/E S/R 54712 ; (1)/ADDRESS IN DIV 54714 1£000; W/L L/E B/E / 13-17 54716 ; W/L L/E B/E S/R 54718 400000; BULK COPY 54720 1.1.1.1.1.-; CONST FOR L/E B/E S/R 54722 2020202020-; DITTO 54724 3£-; DITTO 54726 0000000000; *3et FIRST STORE SIZE 54728 0800008000; *3et SECOND STORE SIZE 54730 3£00000000; COLLATION CONST/SELECTED TAG 54732 (D)££££££££££; 54734 7.0000007.; 54800 CONST 548 548 1 W/L'S FOR WORDS 54802 (D); 54804 ; 54806 ; 54808 ; 54810 ; 54812 ; 54814 ; 54816 ; 54900 TABLE 549 549 1 MAIN EDIT TABLE 54902 547 12 0 0 0 0 1 0 1 0 0 0 0 54904 547 12 0 0 0 0 4 1 1 3 0 0 0 54906 547 4 0 0 0 0 4 1 1 0 0 0 0 54908 548 3 0 0 0 0 2 1 3 1 0 0 0 54910 548 3 0 0 0 0 1 3 1 0 0 0 0 54912 548 3 0 0 0 0 1 4 1 0 0 0 0 54914 548 2 0 0 0 0 4 1 1 3 0 0 0 54916 548 5 0 0 0 0 2 1 3 1 0 0 0 54918 548 5 0 0 0 0 1 3 1 0 0 0 0 54920 548 5 0 0 0 0 1 4 1 0 0 0 0 54922 548 4 0 0 0 0 4 1 1 3 0 0 0 54924 548 7 0 0 0 0 2 1 3 1 0 0 0 54926 548 7 0 0 0 0 1 3 1 0 0 0 0 54928 548 7 0 0 0 0 1 4 1 0 0 0 0 54930 548 6 0 0 0 0 4 1 1 3 0 0 0 54932 548 9 0 0 0 0 2 1 3 1 0 0 0 54934 548 9 0 0 0 0 1 3 1 0 0 0 0 54936 548 9 0 0 0 0 1 4 1 0 0 0 0 54938 548 8 0 0 0 0 4 1 1 3 0 0 0 54940 0 0 0 0 0 0 5 0 3 4 2 0 0 T 1 54942 0 0 0 0 0 0 5 0 1 4 2 0 0 T 1 54944 0 0 0 0 0 0 5 0 1 4 2 0 0 T 1 54946 0 0 0 0 0 0 5 0 1 4 2 0 0 T 1 54948 548 10 0 0 2 0 5 0 2 0 0 0 0 54950 548 12 0 0 2 0 5 0 2 0 0 0 0 54952 547 6 0 0 0 0 1 4 2 0 0 0 0 54954 547 7 0 0 0 0 1 4 1 0 0 0 0 54956 548 16 0 0 2 0 1 4 1 0 0 0 0 54958 547 34 0 0 2 0 1 0 0 0 0 0 1 SUM 54960 547 4 0 0 0 0 4 1 8 0 0 0 0 54962 547 34 0 0 2 0 1 0 2 0 0 0 1 55000 TABLE 550 550 1 HEADING 55002 546 2 0 0 2 0 5 0 14 0 0 0 0 55004 546 4 0 0 2 0 5 0 1 0 0 0 0 55006 546 6 0 0 2 0 2 0 1 0 0 0 0 55008 0 181 0 0 0 0 5 0 1 0 0 0 0 ///// 55010 0 182 0 0 0 0 2 3 3 1 0 0 0 ///// 55012 546 8 0 0 2 0 5 0 2 0 0 0 0 55014 546 10 0 0 2 0 2 0 1 0 0 0 0 55016 0 138 0 0 1 0 2 4 2 1 0 0 0 ///// 55018 0 138 0 0 1 0 2 6 1 1 0 0 0 ///// 55020 0 138 0 0 1 0 2 8 1 1 0 0 0 ///// 55022 546 10 0 0 2 0 3 2 0 0 0 0 0 55024 0 156 0 0 0 0 2 0 2 0 0 0 0 ///// 55026 0 156 0 0 0 0 2 2 1 0 0 0 0 ///// 55028 547 34 0 0 2 0 1 0 0 0 0 0 1 SUM 55030 0 0 0 0 1 0 0 1 8 0 0 0 0 ///// BULK CLEAR MATRIX 55100 PROCR 551 551 INITIAL SET UP ROUTINE(1) 53610>55102 106 558 6 0 0 0 558 55103 102 17 0 1 0 SET UP (17) 55104 106 557 2 1 0 0 557 *3t2 55105 102 134 1 1 0 *3t2 55106 106 558 9 0 0 0 558 *3t1 55107 102 1 0 1 0 SET UP OR CLEAR (1) 55108 101 64 1 2 0 *3:t4£t SET UP FCC 55109 102 233 34 0 1 0 233 *3:t4£t PARAMETERS 55110 106 209 7 0 1 0 209 55111 124 551 13 1 0 0 551 *££0*££2 55112 127 552 10 0 2 0 552 *££2*57e 55111>55113 102 25 0 1 0 SET UP (25) 55114 101 130 24 1 3 0 130 55115 101 128 1 2 0 FORM M/R SP CH START 55116 102 107 9 0 1 0 107 55117 106 558 7 0 0 0 558 55118 105 231 2 0 1 0 231 55119 102 231 3 0 1 0 231 55120 101 535 2 1 3 0 535 TEST MASTER IN DIV 1 55121 101 536 2 1 2 0 536 55122 127 552 2 0 2 0 552 *57e 55123 106 558 7 0 0 0 558 55124 107 231 2 0 0 0 231 55125 106 558 2 1 0 0 558 SHIFT UP STORE TABLE 55126 124 999 0 0 3 0 55127 128 231 4 0 0 0 231 55128 106 555 8 0 0 0 555 55129 102 555 7 0 0 0 555 55200 PROCR 552 552 INITIAL SET8UP(2) 55122>55202 106 233 26 0 1 0 233 *57t 55203 124 999 0 0 3 0 55204 103 225 2 0 0 0 225 55205 124 999 0 0 3 0 55206 102 224 2 0 0 0 224 55207 101 7 1 3 0 55208 124 999 0 0 3 0 55209 102 224 3 0 0 0 224 *57t 55112>55210 106 209 10 0 1 0 209 55211 124 999 0 0 3 0 55212 124 233 26 0 3 0 233 55213 102 64 0 0 0 55214 106 557 4 0 0 0 557 *45t57t SET UP 71 55215 124 999 0 0 3 0 AS POTENTIALLY 55216 124 233 26 0 3 0 233 AVAILABLE 55217 102 71 0 0 0 *45t57t 55218 106 209 11 0 1 0 209 55219 102 124 0 1 0 55220 101 228 2 1 3 0 228 STACK TAG 13 IN M/R ANNEXES 55221 118 5 0 0 0 55222 101 226 2 1 1 0 226 55223 102 4 1 1 0 55224 101 13 1 3 0 55225 126 556 2 0 0 0 556 55226 101 15 1 3 0 STACK TAG 15 IN A.L.W.'S 55227 123 102 84 1 1 0 102 55228 123 226 56 1 1 0 226 55229 123 227 56 1 1 0 227 *101 55230 106 102 19 1 1 0 102 STORE M/R 55231 118 4123 1 0 0 SERIAL NO 55232 101 7 1 1 0 IN 181 55233 118 4 1 0 0 55234 102 181 0 1 0 55235 106 102 21 1 1 0 102 MOD NO 55236 118 4125 1 0 0 IN 182 55237 102 182 0 1 0 55300 PROCR 553 553 INITIAL SET UP ROUTINE(3) 55302 101 260 2 1 3 0 260 *25t*05t 55303 118 5 0 0 0 STACK TAG 13 IN LIB CARD ANNEXE 55304 101 259 2 1 1 0 259 55305 102 4 1 1 0 55306 101 13 1 3 0 55307 126 556 2 0 0 0 556 55308 106 558 8 0 0 0 558 SET UP LIB CARD ASL 55309 102 119 0 1 0 *25t*05t 55310 106 143 0 1 0 *412 SET UP CONSTANTS 55311 102 483 4 0 1 0 483 FOR MINI STORE PRINT 55312 106 144 0 1 0 55313 102 483 6 0 1 0 483 55314 106 145 0 1 0 55315 102 483 7 0 1 0 483 55316 106 558 10 0 0 0 558 55317 102 140 0 1 0 55400 PROCR 554 554 ON LINE STORE DUMP SET UP 55402 106 558 14 0 0 0 558 TEST STORE PRINT REQUIRED 55403 127 555 2 0 0 0 555 gNO 55404 106 209 5 0 1 0 209 SET TAG 15 55405 102 9 0 1 0 55406 126 554 7 0 3 0 554 55407 115 554 8 0 1 0 554 55408 125 4096 1 1 0 55409 106 209 6 0 1 0 209 55410 102 9 0 1 0 55411 106 153 0 1 0 STORE DETAILS FOR PRINT 55412 123 554 13 0 2 0 554 RESET TAG 14 55413 100 0 0 0 0 55414 118 4124 1 0 0 55415 101 9 1 2 0 *86t 55416 127 554 21 0 1 0 554 gGP PRINTER 55417 106 545 20 0 0 0 545 55418 102 554 34 0 0 0 554 55419 106 558 13 0 0 0 558 55420 102 545 20 0 0 0 545 *86t 55416>55421 125 0 1 2 0 55422 118 1 1 0 0 FIRST STORE SIZE 55423 118 8 0 0 0 55424 102 547 4 1 0 0 547 *3e1 55425 102 547 26 1 0 0 547 *3e9 55426 118 1 1 0 0 55427 118 8 0 0 0 *3et SECOND STORE SIZE 55428 107 547 28 1 0 0 547 *3et 55429 125 0 1 2 0 STORE PRINTER 55430 118 2 1 0 0 ROUTE 55431 102 547 2 0 0 0 547 55432 101 551 2 1 3 0 551 55433 101 50 1 1 0 55434 101 384 1 1 0 *2.1869 55435 104 558 7 0 0 0 558 SET UP STORE TABLE 55436 102 231 4 0 1 0 231 55437 106 558 7 0 0 0 558 55438 104 558 7 0 0 0 558 55439 105 231 4 0 1 0 231 55440 102 231 5 0 1 0 231 55441 101 50 1 3 0 *2.286t 55442 107 545 37 0 0 0 545 *2.286t 55500 PROCR 555 555 INITIAL SET UP (4) 55403>55502 106 231 2 0 1 0 231 SET MR2 FOR CLEARING 55503 102 558 4 0 0 0 558 REST OF DIVS 0 & 1 55504 126 558 4 1 2 0 558 55505 124 999 0 0 3 0 55506 126 107 8 1 1 0 107 SET MR1 FOR MR SWITCH 55507 124 999 0 0 3 0 55508 124 535 2 1 0 0 535 gCLEAR DIV 0 55600 PROCR 556 556 STACK TAG (A) SR 55602 100 0 0 0 0 55606>55603 124 999 0 0 3 0 55604 123 0 1 2 0 55605 125 2 0 2 0 55606 124 556 3 1 0 0 556 55607 126 556 2 0 1 0 556 55608 124 452 22 1 0 0 452 *££0*££1*343 (17) 55700 CONST 557 557 1 55702 (D)+0+0+0+0+0; 55704 ££7; 55800 PROCR 558 558 ISU: INSTRUCTION CONSTANTS 55802 100 231 6 0 0 0 231 SHIFT STORE TABLE 55803 100 12 0 0 0 55804 100 0 0 0 0 CLEAR REST OF DIVS 0 & 1 55805 100 8184 0 1 0 55806 124 454 2 1 0 0 454 *343 (17) 55807 100 0 0 1 0 DIV 1 55808 113 259 2 0 0 0 259 *259 55809 124 458 2 1 0 0 458 *3t1 VA 55810 124 483 2 1 0 0 483 *411 MINI STORE PRINT 55811 106 244 4 0 0 0 244 *3t2 55812 101 38 1 3 0 *3t2 55813 124 545 28 1 0 0 545 *869 55814 100 0 0 0 0 55815 100 1 0 0 0 55900 CONST 559 559 0 ASL'S CHS 0-7 55902 (D): ; *££8 55903 7; M/T 55904 7; 55905 7; 55906 ££7; 55907 ££7; 55908 ££7; 55909 ££; 55910 ££8; CHANNEL 1 55911 ££8; M/T 55912 ££8; START OF ANNEXE 55913 8; FOR PASSES 1 AND 2 55914 8; 55915 8; 55916 8; 55917 ££8; 55918 ££££; CHANNEL 2 55919 ££££; GP OR STD PRINTER 55920 ££££; T/W 55921 ££££; P/T O/P 55922 3; CARD O/P 55923 3; 55924 ££££; 55925 ££££; 55926 ££5; CHANNEL 3 55927 5; P/T I/P 55928 5; 55929 5; 55930 6; CARD I/P 55931 ££; 55932 6; 55933 ££; 55934 ££9; CHANNEL 4 55935 9; GP OR SP PRINTER 55936 9; 55937 ££££; 55938 ££££; 55939 ££££; 55940 ££££; 55941 ££££; 55942 ££££; CHANNEL 5 55943 ££££; SP PRINTER 55944 ££££; 55945 ££££; 55946 ££££; 55947 ££££; 55948 ££££; 55949 ££££; 55950 ££££; CHANNEL 6 55951 ££££; TIMER 55952 ££££; T/W 55953 ££££; P/T O/P 55954 ££££; 55955 ££££; 55956 ££££; 55957 ££££; (T/A/M FOR LIB CARDS) 55958 1; CHANNEL 7 55959 1; P/T OR TIMER 55960 ££; T/W 55961 ££; T/A/M FOR PTS 55962 ££; T/A/M FOR RTE 0 55963 ££; T/A/M FOR PTS 55964 ££; T/A/M FOR STORE DUMP 55965 ££; T/A/M FOR CONTROL DATA 56000 CONST 560 560 0 ASL'S CHS 16&17 56002 (D)££££; 56003 ££££; 56004 ££££; 56005 ££££; 56006 ££££; 56007 ££££; 56008 ££££; 56009 ££££; 56010 ££££; CHANNEL 17 56011 ££££; 56012 ££££; 56013 ££££; 56014 ££££; 56015 ££££; 56016 ££££; 56017 ££££; 56018 ££££; CHANNEL 18 56019 ££££; 56020 ££££; 56021 ££££; 56022 ££££; 56023 ££££; 56024 ££££; 56025 ££££; 56026 ££££; CHANNEL 19 56027 ££££; 56028 ££££; 56029 ££££; 56030 ££££; 56031 ££££; 56032 ££££; 56033 ££££; 56034 ££££; CHANNEL 20 56035 ££££; 56036 ££££; 56037 ££££; 56038 ££££; 56039 ££££; 56040 ££££; 56041 ££££; 56042 ££££; CHANNEL 21 56043 ££££; 56044 ££££; 56045 ££££; 56046 ££££; 56047 ££££; 56048 ££££; 56049 ££££; 56100 END PROGRAMME 09001 SERIAL 0 CHAPS 3 FILES 0 TRAN. AREAS 0 PTS INCLUDED F.PT. NO MOD. GP. NO PRIORITY 1 ENTRY= CH2/ 426 SIZE OF CHAPS 9898 708 506 0 0 0 0 ????????????????????????? FILE ID. RTE. TYPE START LOCN. ALT.ROUTES BLOCK SIZE CHAPT TRAN. AREAS START LOCN. CHAPT SIZE SECTION.START SWITCHES ITEM+ CTRS MR'S 4-20 CHAPT 1 PROCEDURE 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 2 0 0 0 0 3 4 0 0 0 0 4 0 0 0 0 5 0 0 0 0 6 0 0 0 0 7 8 0 0 0 0 8 0 0 0 0 9 0 0 0 0 10 0 0 0 0 0 12 25 1 1 4096 0 24 0 3 0 2 23 0 2 0 1792 0 0 0 0 0 16 0 0 0 0 0 26 0 1 11 2 PROCEDURE 100 18 24 1 0 18 4 24 1 0 3766 2 20 0 0 1 580 4 24 1 0 1947 2 0 0 0 2740 2 24 1 0 1935 2 24 0 0 0 0 0 24 1 0 3115 2 0 0 0 0 0 24 1 0 1975 2 28 24 1 0 3744 2 24 1 0 2020 2 0 0 0 0 0 24 1 0 3102 2 32 24 1 0 3756 2 0 0 0 0 0 0 0 0 0 0 24 1 0 7790 2 36 15 0 1 27 4 0 0 0 2 0 0 0 0 3 0 0 0 0 0 0 40 0 0 0 0 0 24 1 0 1093 2 24 1 0 203 2 24 1 0 1093 2 44 24 1 0 771 2 24 0 1 225 2 24 1 0 3869 2 0 0 0 0 0 48 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 52 0 0 0 0 0 0 0 0 0 0 0 0 0 2 0 0 0 0 0 0 SECTION 101 56 ££££ 0 ££££ 0 ££££ 0 ££££ 0 60 ££££ 0 ££££ 0 ££££ 0 ££££ 0 64 ££££ 0 ££££ 0 ££££ 0 ££££ 0 68 ££££ 0 ££££ 0 ££££ 0 ££££ 0 72 ££££ 0 ££££ 0 ££££ 0 ££££ 0 76 ££££ 0 ££££ 0 ££££ 0 ££££ 0 80 ££££ 0 ££££ 0 ££££ 0 ££££ 0 84 ££££ 0 ££££ 0 ££££ 0 ££££ 0 88 ££££ 0 ££££ 0 ££££ 0 ££££ 0 92 ££££ 0 ££££ 0 ££££ 0 ££££ 0 96 ££££ 0 ££££ 0 ££££ 0 ££££ 0 100 ££££ 0 ££££ 0 ££££ 0 ££££ 0 SECTION 102 104 4525. 0 7:635 0 0 0 0 0 108 0 0 0 0 0 0 0 0 112 0 0 0 0 0 0 0 0 116 0 0 0 0 0 0 0 0 120 0 0 0 0 0 0 0 0 124 0 0 0 0 0 0 0 0 128 0 0 0 0 0 0 0 0 132 0 0 0 0 0 0 0 0 136 0 0 0 0 0 0 0 0 140 0 0 0 0 0 0 0 0 144 0 0 0 0 0 0 0 0 148 0 0 0 0 0 0 0 0 152 0 0 0 0 0 0 0 0 156 0 0 0 0 0 0 0 0 160 0 0 0 0 0 0 0 0 164 0 0 0 0 0 0 0 0 168 0 0 0 0 0 0 0 0 172 0 0 0 0 0 0 0 0 176 0 0 0 0 0 0 0 0 180 0 0 0 0 0 0 0 0 184 5.5. 0 0 0 .5.5. 0 5.5.5 0 PROCEDURE 103 188 0 0 0 0 0 0 0 0 0 0 6 0 0 8 0 24 0 3 2 0 192 2 0 0 44 0 0 0 3 2096 2 24 1 1 2096 2 24 1 0 211 2 196 24 1 0 1230 2 24 1 0 248 2 24 1 0 290 2 24 1 0 200 2 200 24 1 0 1115 2 26 0 0 3970 2 6 0 0 204 2 2 0 0 200 2 204 24 1 0 1115 2 0 0 0 0 0 6 1 0 1764 2 24 1 0 1219 2 208 24 1 0 1245 2 6 0 0 226 2 2 0 0 195 2 25 1 2 1919 0 212 27 0 1 1766 2 24 1 0 248 2 6 0 3 970 2 27 0 1 1021 2 216 25 0 3 2 0 24 1 0 214 2 PROCEDURE 104 218 6 0 0 220 2 2 0 0 213 2 220 24 1 0 248 2 26 1 3 331 2 0 0 0 0 0 0 0 0 0 0 224 0 0 0 0 0 0 0 0 0 0 24 1 0 211 2 0 0 0 0 0 228 0 0 0 0 0 0 0 0 0 0 SECTION 105 230 4525. 0 7:635 0 232 30059 0 6£7:5 0 5.5. 0 57650 0 PROCEDURE 106 236 0 0 0 0 0 0 0 0 4 0 0 0 0 6 0 0 0 0 12 0 240 0 0 0 14 0 0 0 0 16 0 0 0 0 0 0 0 0 0 0 0 244 0 0 0 18 0 24 0 1 3 0 26 0 1 158 0 24 1 0 299 2 248 24 1 0 250 2 24 1 0 259 2 24 1 0 247 2 26 0 0 3901 2 252 26 0 0 4872 2 6 0 0 277 2 2 0 0 248 2 6 1 0 278 2 256 2 1 0 2 0 6 1 0 272 2 24 1 0 3796 2 6 0 0 156 0 260 6 0 0 287 2 5 0 0 287 2 27 0 3 247 2 26 1 1 278 2 264 26 0 1 284 2 24 1 1 271 2 6 1 0 278 2 2 1 0 2 0 268 0 1 1 272 2 26 0 1 286 2 26 0 1 286 2 0 0 0 0 0 PROCEDURE 107 272 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 276 0 0 0 0 0 24 1 0 265 2 0 0 0 236 2 0 0 0 0 0 280 0 0 0 0 0 0 1 0 4097 0 0 0 0 0 0 0 0 0 0 0 284 0 0 0 3885 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 288 0 0 0 0 0 0 0 0 0 0 PROCEDURE 108 290 0 0 2 2052 2 25 1 2 0 0 292 15 0 0 53 2 26 0 0 3910 2 24 1 0 200 2 0 0 3 0 0 296 0 0 0 0 0 0 0 0 5 0 0 0 0 0 0 24 1 0 751 2 300 24 1 0 751 2 26 0 1 24 0 0 0 0 62 0 2 0 0 52 0 304 0 0 0 0 0 0 0 0 20 0 0 0 0 0 0 0 0 0 160 0 308 0 0 0 192 0 0 0 0 3901 2 0 0 0 120 0 27 0 3 751 2 312 18 0 3 6 0 6 0 0 53 2 24 1 0 1230 2 0 0 0 0 0 316 0 0 0 0 0 4 1 1 1028 0 7 0 3 6000 0 2 0 0 0 0 320 5 1 1 5124 0 PROCEDURE 109 321 0 0 0 0 0 0 0 0 64 0 3 0 0 0 0 324 5 1 1 5124 0 7 0 0 0 0 5 0 2 5445 0 7 0 0 65 0 328 5 1 0 5910 0 7 0 0 65 0 6 0 3 1814 0 0 0 0 0 0 332 0 0 0 14 0 0 0 0 6 0 0 0 0 8 0 0 0 0 16 0 336 0 0 0 18 0 0 0 0 20 0 0 0 0 0 0 0 0 1 7999 0 340 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 PROCEDURE 110 344 24 1 0 3795 2 6 0 0 157 0 19 0 1 56 0 6 0 0 396 2 348 6 0 0 444 2 6 0 0 492 2 6 0 0 540 2 PROCEDURE 111 351 0 1 0 381 2 352 0 0 3 2045 2 6 0 0 8 0 2 0 0 395 2 24 1 0 193 2 356 7 1 0 397 2 24 1 0 193 2 24 1 0 751 2 24 1 0 369 2 360 24 1 0 751 2 26 0 0 3901 2 26 0 0 4872 2 6 0 0 386 2 364 2 0 0 358 2 6 1 0 387 2 2 1 0 2 0 6 1 0 381 2 368 24 1 0 3796 2 6 0 0 156 0 5 0 0 396 2 27 0 3 751 2 372 26 1 1 387 2 26 0 1 393 2 24 1 1 380 2 6 1 0 387 2 376 2 1 0 2 0 0 1 1 381 2 26 0 3 395 2 26 0 3 395 2 380 0 0 3 0 0 PROCEDURE 112 381 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 384 0 0 0 0 0 0 0 0 0 0 24 1 0 374 2 0 0 0 351 2 388 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 392 0 0 0 0 0 0 0 0 3885 2 0 0 0 0 0 0 0 0 0 0 396 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 PROCEDURE 113 399 0 1 0 429 2 400 0 0 3 2045 2 6 0 0 8 0 2 0 0 443 2 24 1 0 193 2 404 7 1 0 445 2 24 1 0 193 2 24 1 0 751 2 24 1 0 417 2 408 24 1 0 751 2 26 0 0 3901 2 26 0 0 4872 2 6 0 0 434 2 412 2 0 0 406 2 6 1 0 435 2 2 1 0 2 0 6 1 0 429 2 416 24 1 0 3796 2 6 0 0 156 0 5 0 0 444 2 27 0 3 751 2 420 26 1 1 435 2 26 0 1 441 2 24 1 1 428 2 6 1 0 435 2 424 2 1 0 2 0 0 1 1 429 2 26 0 3 443 2 26 0 3 443 2 428 0 0 0 0 0 PROCEDURE 114 429 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 432 0 0 0 0 0 0 0 0 0 0 24 1 0 422 2 0 0 0 399 2 436 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 440 0 0 0 0 0 0 0 0 3885 2 0 0 0 0 0 0 0 0 0 0 444 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 PROCEDURE 115 447 0 1 0 477 2 448 0 0 3 2045 2 6 0 0 8 0 2 0 0 491 2 24 1 0 193 2 452 7 1 0 493 2 24 1 0 193 2 24 1 0 751 2 24 1 0 465 2 456 24 1 0 751 2 26 0 0 3901 2 26 0 0 4872 2 6 0 0 482 2 460 2 0 0 454 2 6 1 0 483 2 2 1 0 2 0 6 1 0 477 2 464 24 1 0 3796 2 6 0 0 156 0 5 0 0 492 2 27 0 3 751 2 468 26 1 1 483 2 26 0 1 489 2 24 1 1 476 2 6 1 0 483 2 472 2 1 0 2 0 0 1 1 477 2 26 0 3 491 2 26 0 3 491 2 476 0 0 0 0 0 PROCEDURE 116 477 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 480 0 0 0 0 0 0 0 0 0 0 24 1 0 470 2 0 0 0 447 2 484 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 488 0 0 0 0 0 0 0 0 3885 2 0 0 0 0 0 0 0 0 0 0 492 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 PROCEDURE 117 495 0 1 0 525 2 496 0 0 3 2045 2 6 0 0 8 0 2 0 0 539 2 24 1 0 193 2 500 7 1 0 541 2 24 1 0 193 2 24 1 0 751 2 24 1 0 513 2 504 24 1 0 751 2 26 0 0 3901 2 26 0 0 4872 2 6 0 0 530 2 508 2 0 0 502 2 6 1 0 531 2 2 1 0 2 0 6 1 0 525 2 512 24 1 0 3796 2 6 0 0 156 0 5 0 0 540 2 27 0 3 751 2 516 26 1 1 531 2 26 0 1 537 2 24 1 1 524 2 6 1 0 531 2 520 2 1 0 2 0 0 1 1 525 2 26 0 3 539 2 26 0 3 539 2 524 0 0 0 0 0 PROCEDURE 118 525 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 528 0 0 0 0 0 0 0 0 0 0 24 1 0 518 2 0 0 0 495 2 532 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 536 0 0 0 0 0 0 0 0 3885 2 0 0 0 0 0 0 0 0 0 0 540 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 0 0 157 0 544 19 0 1 56 0 6 0 0 595 2 6 0 0 643 2 6 0 0 691 2 548 6 0 0 739 2 24 1 0 3795 2 PROCEDURE 119 550 0 1 0 580 2 0 0 3 2045 2 552 6 0 0 8 0 2 0 0 594 2 24 1 0 193 2 7 1 0 596 2 556 24 1 0 193 2 24 1 0 751 2 24 1 0 568 2 24 1 0 751 2 560 26 0 0 3901 2 26 0 0 4872 2 6 0 0 585 2 2 0 0 557 2 564 6 1 0 586 2 2 1 0 2 0 6 1 0 580 2 24 1 0 3796 2 568 6 0 0 156 0 5 0 0 595 2 27 0 3 751 2 26 1 1 586 2 572 26 0 1 592 2 24 1 1 579 2 6 1 0 586 2 2 1 0 2 0 576 0 1 1 580 2 26 0 3 594 2 26 0 3 594 2 0 0 0 0 0 PROCEDURE 120 580 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 584 0 0 0 0 0 24 1 0 573 2 0 0 0 550 2 0 0 0 0 0 588 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 592 0 0 0 3885 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 596 0 0 0 0 0 0 0 0 0 0 PROCEDURE 121 598 0 1 0 628 2 0 0 3 2045 2 600 6 0 0 8 0 2 0 0 642 2 24 1 0 193 2 7 1 0 644 2 604 24 1 0 193 2 24 1 0 751 2 24 1 0 616 2 24 1 0 751 2 608 26 0 0 3901 2 26 0 0 4872 2 6 0 0 633 2 2 0 0 605 2 612 6 1 0 634 2 2 1 0 2 0 6 1 0 628 2 24 1 0 3796 2 616 6 0 0 156 0 5 0 0 643 2 27 0 3 751 2 26 1 1 634 2 620 26 0 1 640 2 24 1 1 627 2 6 1 0 634 2 2 1 0 2 0 624 0 1 1 628 2 26 0 3 642 2 26 0 3 642 2 0 0 0 0 0 PROCEDURE 122 628 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 632 0 0 0 0 0 24 1 0 621 2 0 0 0 598 2 0 0 0 0 0 636 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 640 0 0 0 3885 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 644 0 0 0 0 0 0 0 0 0 0 PROCEDURE 123 646 0 1 0 676 2 0 0 3 2045 2 648 6 0 0 8 0 2 0 0 690 2 24 1 0 193 2 7 1 0 692 2 652 24 1 0 193 2 24 1 0 751 2 24 1 0 664 2 24 1 0 751 2 656 26 0 0 3901 2 26 0 0 4872 2 6 0 0 681 2 2 0 0 653 2 660 6 1 0 682 2 2 1 0 2 0 6 1 0 676 2 24 1 0 3796 2 664 6 0 0 156 0 5 0 0 691 2 27 0 3 751 2 26 1 1 682 2 668 26 0 1 688 2 24 1 1 675 2 6 1 0 682 2 2 1 0 2 0 672 0 1 1 676 2 26 0 3 690 2 26 0 3 690 2 0 0 0 0 0 PROCEDURE 124 676 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 680 0 0 0 0 0 24 1 0 669 2 0 0 0 646 2 0 0 0 0 0 684 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 688 0 0 0 3885 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 692 0 0 0 0 0 0 0 0 0 0 PROCEDURE 125 694 0 1 0 724 2 0 0 3 2045 2 696 6 0 0 8 0 2 0 0 738 2 24 1 0 193 2 7 1 0 740 2 700 24 1 0 193 2 24 1 0 751 2 24 1 0 712 2 24 1 0 751 2 704 26 0 0 3901 2 26 0 0 4872 2 6 0 0 729 2 2 0 0 701 2 708 6 1 0 730 2 2 1 0 2 0 6 1 0 724 2 24 1 0 3796 2 712 6 0 0 156 0 5 0 0 739 2 27 0 3 751 2 26 1 1 730 2 716 26 0 1 736 2 24 1 1 723 2 6 1 0 730 2 2 1 0 2 0 720 0 1 1 724 2 26 0 3 738 2 26 0 3 738 2 0 0 0 0 0 PROCEDURE 126 724 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 728 0 0 0 0 0 24 1 0 717 2 0 0 0 694 2 0 0 0 0 0 732 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 736 0 0 0 3885 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 740 0 0 0 0 0 0 0 0 0 0 PROCEDURE 127 742 0 0 0 0 0 0 0 0 0 0 744 0 0 0 0 0 0 0 0 1 0 27 0 3 760 2 27 0 3 761 2 748 2 0 0 1093 2 24 0 2 956 2 27 0 3 762 2 1 1 3 193 2 752 2 0 0 2 0 5 0 0 2437 2 27 0 3 6167 2 25 1 0 4096 0 756 6 1 0 228 2 4 1 0 744 2 2 1 0 742 2 1 1 3 178 0 760 1 1 3 218 0 1 1 3 24 0 1 1 3 60 0 7 1 0 228 2 764 6 1 0 228 2 5 1 0 742 2 27 0 3 759 2 25 1 1 4096 0 768 24 1 0 193 2 6 0 0 775 2 24 1 0 773 2 0 0 3 2096 2 772 1 1 3 1 0 7 0 0 156 0 24 1 0 194 2 0 0 0 102 0 SECTION 128 PROCEDURE 129 776 28 1 1 26 0 0 1 1 381 2 26 0 3 395 2 28 1 1 782 2 780 0 0 0 782 2 0 0 0 6 0 0 0 0 0 0 0 0 0 0 0 784 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 788 28 1 1 26 0 0 1 1 429 2 26 0 3 443 2 28 1 1 794 2 792 0 0 0 794 2 0 0 0 6 0 0 0 0 0 0 0 0 0 0 0 796 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 800 28 1 1 26 0 0 1 1 477 2 26 0 3 491 2 28 1 1 806 2 804 0 0 0 806 2 0 0 0 6 0 0 0 0 0 0 0 0 0 0 0 808 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 812 28 1 1 26 0 0 1 1 525 2 26 0 3 539 2 28 1 1 818 2 816 0 0 0 818 2 0 0 0 6 0 0 0 0 0 0 0 0 0 0 0 820 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 824 28 1 1 26 0 0 1 1 580 2 26 0 3 594 2 28 1 1 830 2 828 0 0 0 830 2 0 0 0 6 0 0 0 0 0 0 0 0 0 0 0 832 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 836 28 1 1 26 0 0 1 1 628 2 26 0 3 642 2 28 1 1 842 2 840 0 0 0 842 2 0 0 0 6 0 0 0 0 0 0 0 0 0 0 0 844 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 848 28 1 1 26 0 0 1 1 676 2 26 0 3 690 2 28 1 1 854 2 852 0 0 0 854 2 0 0 0 6 0 0 0 0 0 0 0 0 0 0 0 856 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 860 28 1 1 26 0 0 1 1 724 2 26 0 3 738 2 28 1 1 866 2 864 0 0 0 866 2 0 0 0 6 0 0 0 0 0 0 0 0 0 0 0 868 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 SECTION 130 872 0 0 0 0 0 0 0 0 876 0 0 0 0 0 0 0 0 880 0 0 0 0 0 0 0 0 884 0 0 0 0 0 0 0 0 888 0 0 0 0 0 0 0 0 892 0 0 0 0 0 0 0 0 896 0 0 0 0 0 0 0 0 900 0 0 0 0 0 0 0 0 904 0 0 0 0 0 0 0 0 908 0 0 0 0 0 0 0 0 912 0 0 0 0 0 0 0 0 916 0 0 0 0 0 0 0 0 920 0 0 0 0 PROCEDURE 131 PROCEDURE 132 922 0 0 0 0 0 PROCEDURE 133 923 0 0 0 0 0 PROCEDURE 134 924 0 0 0 0 0 PROCEDURE 135 925 0 0 0 0 0 PROCEDURE 136 926 0 0 0 0 0 PROCEDURE 137 927 0 0 0 0 0 PROCEDURE 138 928 0 0 0 0 0 PROCEDURE 139 929 0 0 0 0 0 PROCEDURE 140 930 0 0 0 0 0 PROCEDURE 141 931 0 0 0 0 0 PROCEDURE 142 932 0 0 0 0 0 PROCEDURE 143 933 0 0 0 0 0 PROCEDURE 144 934 0 0 0 0 0 PROCEDURE 145 935 0 0 0 0 0 PROCEDURE 146 936 0 0 0 0 0 PROCEDURE 147 937 0 0 0 0 0 PROCEDURE 148 938 0 0 0 0 0 PROCEDURE 149 939 0 0 0 0 0 PROCEDURE 150 940 0 0 0 0 0 PROCEDURE 151 941 0 0 0 0 0 PROCEDURE 152 942 0 0 0 0 0 PROCEDURE 153 943 0 0 0 0 0 PROCEDURE 154 944 0 0 0 0 0 PROCEDURE 155 945 0 0 0 0 0 PROCEDURE 156 946 0 0 0 0 0 PROCEDURE 157 947 0 0 0 0 0 PROCEDURE 158 948 0 0 0 0 0 PROCEDURE 159 949 0 0 0 0 0 PROCEDURE 160 950 0 0 0 0 0 PROCEDURE 161 951 0 0 0 0 0 PROCEDURE 162 952 0 0 0 0 0 PROCEDURE 163 953 0 0 0 0 0 PROCEDURE 164 954 0 0 0 0 0 PROCEDURE 165 955 0 0 0 0 0 PROCEDURE 166 956 0 0 0 0 0 PROCEDURE 167 957 0 0 0 0 0 PROCEDURE 168 958 0 0 0 0 0 PROCEDURE 169 959 0 0 0 0 0 PROCEDURE 170 960 0 0 0 0 0 PROCEDURE 171 961 0 0 0 0 0 PROCEDURE 172 962 0 0 0 0 0 PROCEDURE 173 963 0 0 0 0 0 SECTION 174 964 0 0 1020 0 0 0 8 0 968 1016 0 0 0 PROCEDURE 175 970 0 0 0 0 0 0 0 0 0 0 972 0 0 0 0 0 0 0 0 236 2 0 0 0 0 0 0 0 0 351 2 976 0 0 0 0 0 0 0 0 399 2 0 0 0 0 0 0 0 0 447 2 980 0 0 0 0 0 0 0 0 495 2 0 0 0 0 0 0 0 0 550 2 984 0 0 0 0 0 0 0 0 598 2 0 0 0 0 0 0 0 0 646 2 988 0 0 0 0 0 0 0 0 694 2 PROCEDURE 176 990 0 0 0 0 0 6 0 0 990 2 992 24 0 1 3 0 2 0 0 169 0 6 0 0 971 2 27 0 1 1007 2 996 26 0 0 5800 2 6 0 0 2045 2 2 0 0 971 2 26 0 0 1012 2 1000 24 1 3 222 2 25 1 1 8191 0 25 1 0 128 0 6 0 0 2045 2 1004 2 0 0 188 2 24 0 1 3 0 26 0 1 169 0 24 0 2 994 2 1008 2 0 1 42 0 26 0 0 5806 2 24 0 1 2 0 24 1 0 9 0 PROCEDURE 177 1012 0 0 0 0 0 26 0 0 1031 2 6 0 0 1012 2 2 0 3 972 2 1016 6 0 1 9 0 2 0 1 7 0 6 0 0 221 2 2 0 0 213 2 1020 24 1 0 193 2 PROCEDURE 178 1021 6 0 3 970 2 2 0 0 205 2 2 0 3 970 2 1024 6 0 0 6 0 27 0 0 1042 2 25 1 2 0 0 24 0 1 6 0 1028 24 0 1 971 2 26 1 1 36 0 26 0 1 205 2 PROCEDURE 179 1031 0 0 0 0 0 1032 1 1 3 0 0 2 0 0 243 2 26 1 3 243 2 6 0 0 2 0 1036 5 0 3 973 2 27 0 0 1041 2 25 0 3 2 0 24 1 0 1035 2 1040 24 1 0 2020 2 26 0 1 1031 2 PROCEDURE 180 1042 26 0 0 2796 2 1 1 3 1752 2 1044 28 1 2 108 2 PROCEDURE 181 1045 6 0 0 314 2 2 0 0 196 2 6 0 0 206 2 1048 2 0 0 1115 2 1 1 3 106 2 3 0 0 224 2 2 0 0 225 2 1052 1 1 3 4118 0 3 0 0 964 2 2 1 0 968 2 1 1 3 8 0 1056 2 0 0 967 2 1 1 3 3 0 26 0 0 5569 2 27 0 0 1062 2 1060 6 0 0 1154 2 24 1 0 1063 2 6 0 0 1153 2 2 0 0 1117 2 1064 2 1 0 154 0 6 1 0 2108 2 2 1 0 1762 2 1 1 3 3 0 1068 26 0 0 5569 2 27 0 0 1072 2 6 0 0 1105 2 24 1 0 1073 2 1072 6 0 0 1085 2 2 0 0 1096 2 0 1 2 1756 2 24 0 1 225 2 1076 15 1 0 0 0 2 1 0 1764 2 24 0 2 154 0 24 0 1 53 2 1080 2 0 0 64 0 6 0 0 2026 2 5 0 0 53 2 2 0 0 195 2 1084 24 1 0 195 2 24 1 0 1105 2 24 1 0 1169 2 2 0 0 1093 2 1088 24 1 0 1093 2 6 0 0 1093 2 3 1 0 956 2 6 1 0 956 2 1092 2 1 0 956 2 PROCEDURE 182 1093 6 1 0 1764 2 24 0 1 1762 2 18 0 0 4120 0 1096 18 0 0 8 0 18 0 0 4120 0 3 1 0 154 0 27 0 0 1179 2 1100 1 1 2 61 0 27 0 0 1179 2 1 1 3 1 0 2 0 0 1178 2 1104 6 1 0 154 0 18 0 0 8 0 2 1 0 154 0 24 0 1 53 2 1108 19 0 0 0 0 2 0 0 1186 2 23 0 0 2 0 0 0 0 1762 1 1112 24 1 0 1211 2 1 0 1 15 0 15 1 0 1764 2 24 0 1 225 2 1116 6 1 0 0 0 24 0 1 964 2 18 1 0 0 0 18 1 3 2 0 1120 1 1 3 0 0 18 1 3 6 0 27 0 0 1187 2 1 1 2 30 0 1124 27 0 0 1194 2 1 1 2 31 0 27 0 0 1187 2 1 1 2 1 0 1128 27 0 0 1192 2 1 1 1 62 0 3 1 0 968 2 1 0 1 3 0 1132 24 0 1 967 2 18 1 0 0 0 14 1 0 154 0 6 0 0 1155 2 1136 7 0 0 967 2 23 0 0 2 0 0 0 0 964 1 24 1 0 1144 2 1140 1 1 3 2 0 7 0 0 225 2 1 1 3 4118 0 2 0 0 964 2 1144 6 0 0 967 2 27 0 2 1115 2 24 0 1 53 2 19 0 0 0 0 1148 1 1 3 8 0 2 0 0 967 2 6 0 0 969 2 27 0 3 1209 2 1152 24 1 0 1211 2 24 1 0 1156 2 24 0 1 964 2 16 0 0 2 0 1156 2 1 0 154 0 26 0 0 6485 2 24 1 0 1175 2 24 0 1 53 2 1160 19 0 0 0 0 25 1 2 0 0 0 0 2 339 2 15 1 0 154 0 1164 1 1 2 7710 0 27 0 0 1209 2 6 0 0 2100 2 7 0 0 225 2 1168 25 1 2 0 0 2 0 0 1762 2 0 1 2 1756 2 24 0 1 225 2 1172 15 1 0 0 0 2 1 0 1764 2 24 1 0 1211 2 15 1 0 1760 2 1176 14 1 0 154 0 24 1 0 6494 2 0 0 0 0 0 6 0 0 1178 2 1180 27 0 0 1184 2 1 1 3 0 0 2 0 0 1178 2 24 1 0 1105 2 1184 1 1 3 1 0 24 1 0 1109 2 0 0 0 0 0 PROCEDURE 183 1187 6 0 0 968 2 1188 27 0 0 1137 2 1 1 3 0 0 2 0 0 968 2 24 1 0 1131 2 1192 1 1 3 29 0 24 1 0 1130 2 6 0 0 969 2 27 0 1 1200 2 1196 1 1 3 1 0 2 0 0 969 2 1 1 3 30 0 24 1 0 1131 2 1200 6 0 0 967 2 27 0 0 1205 2 6 0 0 1155 2 7 0 0 964 2 1204 24 1 0 1189 2 1 1 2 1 0 3 0 0 969 2 1 1 3 30 0 1208 24 1 0 1131 2 PROCEDURE 184 1209 6 0 0 207 2 2 0 0 1115 2 0 0 2 2052 2 1212 15 0 0 53 2 2 1 0 6 0 6 0 0 1186 2 27 0 1 195 2 1216 6 1 0 53 2 2 1 3 3352 2 24 1 0 195 2 PROCEDURE 185 1219 6 0 0 189 2 1220 27 0 0 209 2 25 1 2 0 0 2 0 0 189 2 1 1 3 232 2 1224 3 0 0 224 2 2 0 0 225 2 6 0 0 206 2 2 0 0 1115 2 1228 2 0 0 1186 2 24 1 0 1211 2 PROCEDURE 186 1230 24 1 3 223 2 6 0 0 1115 2 1232 2 0 0 205 2 5 0 0 2099 2 7 0 0 196 2 6 0 0 208 2 1236 2 0 0 1115 2 24 1 0 1242 2 25 1 2 4095 0 1 1 2 3840 0 1240 27 0 0 195 2 2 0 0 189 2 25 1 1 8191 0 25 1 0 3840 0 1244 24 1 0 195 2 6 0 0 314 2 2 0 0 196 2 6 0 0 205 2 1248 2 0 0 1115 2 25 1 1 8191 0 24 0 1 223 2 25 1 0 0 0 1252 24 1 0 1115 2 PROCEDURE 187 1253 25 1 2 2048 0 27 0 0 1258 2 25 1 1 8191 0 1256 24 0 1 223 2 25 1 0 0 0 6 0 0 204 2 2 0 0 200 2 1260 6 1 0 1758 2 2 1 0 154 0 24 0 1 53 2 19 0 0 0 0 1264 6 0 0 224 2 5 0 0 2100 2 2 0 0 225 2 6 0 0 314 2 1268 2 0 0 196 2 24 1 0 1226 2 0 0 0 216 2 0 0 0 216 2 1272 27 0 1 1783 2 24 1 1 216 2 26 0 0 6325 2 27 0 0 1903 2 1276 5 0 0 2432 2 0 0 0 0 0 SECTION 188 1278 0 0 0 0 PROCEDURE 189 SECTION 190 1280 0 0 0 0 0 0 0 0 1284 0 0 0 0 0 0 0 0 1288 0 0 0 0 0 0 0 0 1292 0 0 0 0 0 0 0 0 1296 0 0 0 0 0 0 0 0 1300 0 0 0 0 0 0 0 0 1304 0 0 0 0 0 0 0 0 1308 0 0 0 0 0 0 0 0 1312 0 0 0 0 0 0 0 0 1316 0 0 0 0 0 0 0 0 1320 0 0 0 0 0 0 0 0 1324 0 0 0 0 0 0 0 0 1328 0 0 0 0 0 0 0 0 1332 0 0 0 0 0 0 0 0 1336 0 0 0 0 0 0 0 0 1340 0 0 0 0 0 0 0 0 1344 0 0 0 0 0 0 0 0 1348 0 0 0 0 0 0 0 0 1352 0 0 0 0 0 0 0 0 1356 0 0 0 0 0 0 0 0 1360 0 0 0 0 0 0 0 0 1364 0 0 0 0 0 0 0 0 1368 0 0 0 0 0 0 0 0 1372 0 0 0 0 0 0 0 0 1376 0 0 0 0 SECTION 191 1378 0 0 0 0 1380 0 0 0 0 0 0 0 0 1384 0 0 0 0 0 0 0 0 1388 0 0 0 0 0 0 0 0 1392 0 0 0 0 0 0 0 0 1396 0 0 0 0 0 0 0 0 1400 0 0 0 0 0 0 0 0 1404 0 0 0 0 0 0 0 0 1408 0 0 0 0 0 0 0 0 1412 0 0 0 0 0 0 0 0 1416 0 0 0 0 0 0 0 0 1420 0 0 0 0 0 0 0 0 1424 0 0 0 0 0 0 0 0 1428 0 0 0 0 0 0 0 0 1432 0 0 0 0 0 0 0 0 1436 0 0 0 0 0 0 0 0 1440 0 0 0 0 0 0 0 0 1444 0 0 0 0 0 0 0 0 1448 0 0 0 0 0 0 0 0 1452 0 0 0 0 0 0 0 0 1456 0 0 0 0 0 0 0 0 1460 0 0 0 0 0 0 0 0 1464 0 0 0 0 0 0 0 0 1468 0 0 0 0 0 0 0 0 SECTION 192 1472 0 0 0 0 0 0 0 0 1476 0 0 0 0 0 0 0 0 1480 0 0 0 0 0 0 0 0 1484 0 0 0 0 0 0 0 0 1488 0 0 0 0 0 0 0 0 1492 0 0 0 0 0 0 0 0 1496 0 0 0 0 0 0 0 0 1500 0 0 0 0 0 0 0 0 SECTION 193 1504 0 0 0 0 0 0 0 0 1508 0 0 0 0 0 0 0 0 1512 0 0 0 0 0 0 0 0 1516 0 0 0 0 0 0 0 0 1520 0 0 0 0 0 0 0 0 1524 0 0 0 0 0 0 0 0 1528 0 0 0 0 0 0 0 0 1532 0 0 0 0 0 0 0 0 1536 0 0 0 0 0 0 0 0 1540 0 0 0 0 0 0 0 0 1544 0 0 0 0 0 0 0 0 1548 0 0 0 0 0 0 0 0 1552 0 0 0 0 0 0 0 0 1556 0 0 0 0 0 0 0 0 1560 0 0 0 0 0 0 0 0 1564 0 0 0 0 0 0 0 0 1568 0 0 0 0 0 0 0 0 1572 0 0 0 0 0 0 0 0 SECTION 194 1576 0 0 0 0 0 0 0 0 1580 0 0 0 0 0 0 0 0 1584 0 0 0 0 0 0 0 0 1588 0 0 0 0 0 0 0 0 1592 0 0 0 0 0 0 0 0 1596 0 0 0 0 0 0 0 0 1600 0 0 0 0 0 0 0 0 1604 0 0 0 0 0 0 0 0 1608 0 0 0 0 0 0 0 0 1612 0 0 0 0 0 0 0 0 1616 0 0 0 0 0 0 0 0 1620 0 0 0 0 0 0 0 0 1624 0 0 0 0 0 0 0 0 1628 0 0 0 0 0 0 0 0 1632 0 0 0 0 0 0 0 0 1636 0 0 0 0 0 0 0 0 SECTION 195 1640 0 0 0 0 0 0 0 0 1644 0 0 0 0 0 0 0 0 1648 0 0 0 0 0 0 0 0 1652 0 0 0 0 0 0 0 0 1656 0 0 0 0 0 0 0 0 1660 0 0 0 0 0 0 0 0 1664 0 0 0 0 0 0 0 0 1668 0 0 0 0 0 0 0 0 1672 0 0 0 0 0 0 0 0 1676 0 0 0 0 0 0 0 0 1680 0 0 0 0 0 0 0 0 1684 0 0 0 0 0 0 0 0 1688 0 0 0 0 0 0 0 0 1692 0 0 0 0 0 0 0 0 1696 0 0 0 0 0 0 0 0 1700 0 0 0 0 0 0 0 0 SECTION 196 1704 0 0 0 0 0 0 0 0 1708 0 0 0 0 0 0 0 0 1712 0 0 0 0 0 0 0 0 1716 0 0 0 0 0 0 0 0 1720 0 0 0 0 0 0 0 0 1724 0 0 0 0 0 0 0 0 1728 0 0 0 0 0 0 0 0 1732 0 0 0 0 0 0 0 0 1736 0 0 0 0 0 0 0 0 1740 0 0 0 0 0 0 0 0 1744 0 0 0 0 0 0 0 0 1748 0 0 0 0 0 0 0 0 SECTION 197 1752 0 2154 1 5 3 0 0 0 5 0 0 2080 1 50 3 0 0 3 2 1 SECTION 198 1756 £3£3£ 0 3£3£3 0 1. 0 0 0 1760 :5:5: 0 5:5:5 0 0 0 0 0 1764 0 0 0 0 PROCEDURE 199 1766 1 1 2 127 0 27 0 0 213 2 1768 1 1 1 127 0 2 0 0 2446 2 24 1 3 185 0 26 1 1 278 2 1772 6 0 0 188 2 27 0 1 1778 2 6 1 0 970 2 27 0 0 1786 2 1776 25 1 1 6143 0 24 1 0 1784 2 25 1 2 1792 0 25 1 1 6143 0 1780 27 0 0 1855 2 5 0 0 2437 2 27 0 2 1855 2 25 1 0 128 0 1784 2 0 0 189 2 24 1 0 193 2 6 0 0 392 2 27 0 0 1805 2 1788 6 0 0 2446 2 1 1 2 1281 0 27 0 1 1802 2 6 0 0 300 2 1792 2 0 0 247 2 25 1 1 6143 0 25 1 0 127 0 6 0 0 8127 2 1796 27 0 0 1801 2 6 0 0 2462 2 24 0 1 2464 2 2 0 0 64 0 1800 2 0 0 8127 2 24 1 0 4672 2 25 1 1 6143 0 25 1 0 127 0 1804 24 1 0 1784 2 25 1 2 1792 0 27 0 0 1813 2 6 0 0 300 2 1808 2 0 0 247 2 25 1 2 1792 0 18 0 0 4126 0 3 0 0 1842 2 1812 1 1 2 8 0 25 1 1 6143 0 25 1 0 127 0 27 0 3 216 2 1816 6 0 0 2446 2 3 0 0 2745 2 2 0 0 392 2 1 0 1 5 0 1820 15 0 0 2446 2 1 1 2 514 0 27 0 0 1831 2 1 1 2 2 0 1824 27 0 0 1831 2 1 1 2 512 0 27 0 0 1831 2 1 1 1 2 0 1828 27 0 0 1831 2 25 1 2 0 0 24 1 0 1840 2 6 0 0 2428 2 1832 27 0 0 1840 2 6 0 0 299 2 2 0 0 247 2 26 0 0 6111 2 1836 27 0 3 193 2 26 0 0 6174 2 6 0 0 300 2 2 0 0 247 2 1840 24 0 1 1842 2 26 0 1 1842 2 0 0 0 0 0 0 0 0 779 2 1844 0 0 0 1164 2 0 0 0 1335 2 0 0 0 1339 2 0 0 0 216 2 1848 0 0 0 1662 2 0 0 0 1662 2 25 1 2 3855 0 1 1 2 769 0 1852 27 0 0 8154 2 25 1 1 6143 0 24 1 0 1784 2 PROCEDURE 200 1855 6 0 0 2448 2 1856 2 1 0 2 0 1 1 3 2126 2 12 0 0 2446 2 3 0 0 2447 2 1860 1 1 2 16 0 27 0 2 1924 2 1 1 1 15 0 2 0 0 2450 2 1864 6 0 0 2050 2 24 0 1 2450 2 18 0 3 0 0 18 1 0 4118 0 1868 15 0 1 41 0 27 0 0 1924 2 24 0 0 222 2 25 1 0 0 0 1872 1 1 2 512 0 27 0 0 1908 2 6 0 0 2447 2 4 0 1 43 0 1876 2 0 0 2447 2 1 0 1 16 0 15 0 1 38 0 27 0 0 1889 2 1880 24 0 1 2447 2 6 0 0 0 0 1 1 2 3801 2 4 0 0 2034 2 1884 2 0 1 31 0 2 0 1 45 0 6 0 0 2026 2 5 0 1 30 0 1888 24 1 0 1894 2 PROCEDURE 201 1889 24 0 1 2447 2 6 0 0 0 0 15 0 1 43 0 1892 2 0 1 44 0 6 0 1 35 0 2 0 1 7 0 6 0 0 2446 2 1896 3 1 0 2447 2 6 1 0 2446 2 1 0 1 15 0 14 1 0 2154 2 1900 2 1 0 970 2 2 0 0 188 2 24 1 0 1018 2 PROCEDURE 202 1903 6 0 0 2437 2 1904 27 0 2 1908 2 6 0 0 2 0 26 0 0 6338 2 27 0 0 1924 2 1908 6 0 1 8 0 2 0 1 7 0 26 0 0 5680 2 1 1 3 1915 2 1912 2 0 1 42 0 1 1 3 84 0 24 1 0 1898 2 24 0 2 3885 2 1916 2 0 1 42 0 2 0 1 45 0 1 0 1 16 0 15 0 1 38 0 1920 27 0 0 1966 2 24 0 1 2 0 26 1 1 36 0 24 1 0 4478 2 PROCEDURE 203 1924 25 1 0 128 0 26 0 0 1012 2 1 1 3 4 0 26 0 0 2796 2 1928 24 0 2 2306 2 28 1 2 108 2 24 1 0 1045 2 PROCEDURE 204 1931 24 1 1 2096 2 1932 0 0 3 2096 2 26 0 0 6325 2 1 1 2 1 0 6 0 0 2028 2 1936 2 0 0 9 0 24 1 1 2096 2 26 0 0 3344 2 26 0 0 2855 2 1940 24 0 1 3 0 6 0 0 11 0 24 0 1 2783 2 27 0 1 0 0 1944 26 0 0 8136 2 6 0 0 179 0 24 1 0 4687 2 PROCEDURE 205 1947 24 1 1 2096 2 1948 2 0 1 38 0 18 1 0 10 0 2 0 1 41 0 24 0 1 2 0 1952 0 1 0 30 0 0 0 3 2096 2 26 0 0 3344 2 6 0 0 2028 2 1956 2 0 0 9 0 6 0 0 2050 2 24 0 1 2 0 24 0 1 41 0 1960 18 0 3 0 0 1 1 1 511 0 2 0 1 41 0 6 0 0 20 2 1964 2 0 1 43 0 26 0 0 2855 2 26 0 0 990 2 PROCEDURE 206 1967 6 0 0 2 0 1968 2 0 0 2448 2 6 1 1 38 0 2 1 0 2452 2 26 0 0 2796 2 1972 24 0 2 2314 2 28 1 2 108 2 24 1 0 1045 2 PROCEDURE 207 1975 24 1 1 2096 2 1976 24 0 1 3 0 2 0 0 169 0 26 0 0 3344 2 6 0 0 26 2 1980 2 0 1 44 0 6 0 0 2028 2 2 0 0 9 0 26 0 0 2855 2 1984 26 0 0 1012 2 26 0 0 2796 2 26 1 3 2096 2 0 1 2 1756 2 1988 18 1 0 4122 0 24 0 1 3 0 24 0 1 169 0 6 1 3 0 0 1992 2 1 3 108 2 15 1 3 108 2 1 1 2 7710 0 27 0 0 2000 2 1996 25 0 3 2 0 24 1 0 1989 2 6 1 0 2080 2 2 1 0 130 2 2000 6 0 1 35 0 2 0 1 7 0 24 1 0 1045 2 PROCEDURE 208 2003 1 1 3 121 0 2004 2 0 0 2398 2 26 1 1 278 2 0 0 3 2096 2 26 0 0 1012 2 2008 6 0 0 1013 2 2 0 0 209 2 1 1 3 4 0 26 0 0 2796 2 2012 6 1 0 2176 2 2 1 0 108 2 6 0 0 2398 2 18 0 0 8 0 2016 1 0 1 15 0 15 1 0 2080 2 2 1 0 110 2 24 1 0 1045 2 2020 0 0 0 4095 0 24 1 0 141 0 0 0 0 2522 2 24 1 0 7873 2 PROCEDURE 209 2024 6 0 0 157 0 24 1 0 3795 2 26 1 0 0 0 26 0 3 8 0 2028 26 0 1 2 0 24 1 0 7956 2 24 1 0 2893 2 24 1 0 3796 2 2032 13 0 0 2582 2 13 0 0 2524 2 1 0 0 0 0 26 0 1 8 0 2036 6 0 0 8 0 6 1 0 2114 2 4 0 1 6 0 24 1 0 190 2 2040 2 0 0 44 0 24 1 0 193 2 26 0 3 44 0 6 1 0 780 2 SECTION 210 2044 1£££ 0 66666 0 8000 0 4000 0 2048 £0000 0 .1000 0 1 0 66t66 0 2052 £8 0 65536 0 66668 0 50000 0 2056 .0080 0 0 0 0 0 7008 0 SECTION 211 2060 £££££ 0 £££££ 0 0 0 10000 0 2064 £4£41 0 4£4£4 0 £6£6£ 0 6£6£6 0 2068 e6e6e 0 6e6e6 0 17171 0 71717 0 2072 21212 0 12121 0 £5£5£ 0 5£5£5 0 2076 £1£1£ 0 1£1£1 0 0 0 1.000 0 2080 .5.5. 0 5.5.5 0 0 0 90 0 2084 0 0 60 0 0 0 30 0 2088 0 0 +0 0 0 0 120 0 2092 0 0 150 0 0 0 £0 0 SECTION 212 2096 0 0 18 0 0 0 8 0 2100 2 0 14 0 0 0 180 0 2104 0 0 30 0 0 0 + 0 2108 0 0 t 0 80 0 e0 0 2112 0 0 0 0 1t 0 6 0 SECTION 213 2116 1 0 0 0 16 0 0 0 2120 256 0 0 0 4096 0 0 0 2124 65536 0 0 0 1 0 0 0 2128 t 0 0 0 64 0 0 0 2132 3.8 0 0 0 1 0 0 0 2136 16 0 0 0 416 0 0 0 2140 6816 0 0 0 1 0 0 0 2144 20 0 0 0 320 0 0 0 SECTION 214 2148 4t 0 0 0 5e 0 0 0 2152 55656 0 59655 0 30000 0 66677 0 2156 7. 0 7.000 0 87:7: 0 67006 0 2160 8000 0 5148 0 95561 0 53006 0 2164 95561 0 66006 0 5665 0 57670 0 2168 :5.7: 0 5.7:7 0 :7:6£ 0 5.7 0 2172 27300 0 63667 0 0 0 69530 0 2176 7007: 0 77777 0 5354 0 65660 0 2180 36676 0 66566 0 67473 0 636e6 0 2184 67473 0 635+6 0 90000 0 69735 0 2188 0 0 54520 0 0 0 76550 0 2192 55362 0 53585 0 90000 0 79797 0 2196 70000 0 63666 0 70000 0 63596 0 2200 46665 0 51525 0 56554 0 5 0 2204 30059 0 69007 0 46700 0 54746 0 2208 45.5. 0 55655 0 95758 0 585 0 2212 45577 0 59655 0 16773 0 53585 0 2216 35178 0 666e6 0 35178 0 665+6 0 2220 46700 0 54746 0 16554 0 51525 0 2224 55400 0 66655 0 5.5. 0 0 0 2228 90000 0 72556 0 10000 0 74005 0 2232 30000 0 63557 0 15553 0 69556 0 2236 40000 0 53585 0 40000 0 5e004 0 SECTION 215 2240 47255 0 67517 0 5358 0 67690 0 2244 95176 0 76546 0 15963 0 51755 0 2248 66755 0 69556 0 55358 0 69746 0 2252 45358 0 69667 0 60000 0 65557 0 2256 45273 0 54667 0 95400 0 53516 0 2260 66955 0 72736 0 7: 0 53580 0 2264 74000 0 69406 0 75500 0 73516 0 2268 36651 0 74656 0 45.5. 0 54555 0 2272 66674 0 69557 0 5.5. 0 65540 0 2276 55655 0 67695 0 76700 0 69005 0 2280 26700 0 69007 0 66973 0 72586 0 2284 66557 0 636 0 20000 0 73647 0 SECTION 216 2288 0 2180 1 5 3 0 0 0 5 0 0 2168 1 257 3 0 1 0 1 0 2292 0 2396 1 5 0 0 0 0 5 0 0 2168 1 257 3 0 1 0 1 0 2296 0 2456 1 10 6 0 0 0 10 0 0 2458 1 42 6 0 0 2 10 0 2300 0 2397 1 33 0 0 0 2 1 0 0 2397 1 12564 0 3 1 1 4 0 2304 0 2080 1 66 3 0 0 4 2 1 0 2164 1 5 3 0 0 0 5 0 2308 0 2158 1 770 3 0 3 0 2 0 0 2446 1 4866 0 1 3 0 2 0 2312 0 2080 1 66 3 0 0 4 2 1 0 2150 1 1025 3 0 4 0 1 0 2316 0 2452 1 4627 0 1 2 1 3 0 0 2158 1 1025 3 0 4 0 1 0 2320 0 2453 1 5 0 0 0 0 5 0 0 2080 1 34 3 0 0 2 2 1 SECTION 217 2324 0 0 0 32 3 0 0 2 0 0 0 180 0 770 3 0 3 0 2 0 2328 0 2184 1 5 3 0 0 0 5 0 0 2168 1 257 3 0 1 0 1 0 2332 0 2396 1 5 0 0 0 0 5 0 0 2168 1 257 3 0 1 0 1 0 2336 0 2456 1 33 0 0 0 2 1 0 0 2456 1 12564 0 3 1 1 4 0 2340 0 2457 1 33 0 0 0 2 1 0 0 2457 1 12564 0 3 1 1 4 0 2344 0 2458 1 33 0 0 0 2 1 0 0 2458 1 12564 0 3 1 1 4 0 2348 0 2080 1 34 3 0 0 2 2 1 0 2172 1 5 3 0 0 0 5 0 2352 0 2168 1 257 3 0 1 0 1 0 0 2402 1 5 0 0 0 0 5 0 2356 0 2080 1 34 3 0 0 2 2 1 0 156 0 514 0 0 2 0 2 0 2360 0 2158 1 1057 3 0 4 2 1 1 0 232 1 1 3 0 0 0 1 0 2364 0 156 0 514 0 0 2 0 2 0 0 2158 1 1041 3 0 4 1 1 1 2368 0 156 0 4 0 0 0 0 4 0 0 2158 1 1025 3 0 4 0 1 1 SECTION 218 2372 0 26 0 6 0 0 0 0 6 0 0 2063 1 2 0 0 0 0 2 0 2376 0 2456 1 6 0 0 0 0 6 0 0 2080 1 18 3 0 0 1 2 1 2380 0 2524 1 16 0 0 0 1 0 0 SECTION 219 2382 0 2512 1 2512 11 0 9 13 0 1 SECTION 220 2384 0 0 7 0 3+ 0 0 0 2388 0 0 666t6 0 0 0 26 0 2392 £££££ 0 4 0 0 0 800 0 SECTION 221 2396 0 0 0 0 0 0 0 0 2400 0 0 0 0 0 0 0 0 2404 0 0 0 0 0 0 0 0 2408 0 0 0 0 0 0 0 0 2412 0 0 0 0 54321 0 76 0 2416 54321 0 6 0 54321 0 0 0 2420 4321 0 0 0 321 0 0 0 2424 21 0 0 0 1 0 0 0 2428 0 0 0 0 0 0 0 0 2432 0 0 0 0 0 0 0 0 2436 0 0 0 0 0 0 0 0 2440 0 0 0 0 0 0 0 0 2444 0 0 0 0 SECTION 222 2446 0 0 0 0 2448 0 0 0 0 0 0 0 0 2452 0 0 0 0 0 0 0 0 2456 0 0 0 0 0 0 0 0 2460 0 0 0 0 0 0 0 0 2464 0 0 0 0 0 0 0 0 2468 0 0 0 0 SECTION 223 2470 0 0 0 0 SECTION 224 2472 0 0 0 0 0 0 0 0 2476 0 0 0 0 0 0 0 0 2480 0 0 0 0 0 0 0 0 2484 0 0 0 0 0 0 0 0 2488 0 0 0 0 0 0 0 0 2492 0 0 0 0 0 0 0 0 2496 0 0 0 0 0 0 0 0 2500 0 0 0 0 0 0 0 0 2504 0 0 0 0 0 0 0 0 SECTION 225 2508 0 0 0 0 0 0 0 0 2512 0 0 0 0 0 0 0 0 2516 0 0 0 0 0 0 0 0 2520 0 0 0 0 0 0 0 0 SECTION 226 2524 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2528 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2532 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2536 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2540 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2544 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2548 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2552 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2556 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2560 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2564 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2568 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2572 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2576 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2580 0 2529 1 48 0 0 0 3 0 0 SECTION 227 2582 0 0 0 0 0 0 0 0 0 0 2584 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2588 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2592 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2596 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2600 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2604 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2608 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2612 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2616 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2620 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2624 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2628 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2632 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2636 0 0 0 0 0 0 0 0 0 0 0 2587 1 48 0 0 0 3 0 0 SECTION 228 2640 0 0 0 0 0 0 0 0 2644 0 0 0 0 0 0 0 0 2648 0 0 0 0 0 0 0 0 2652 0 0 0 0 0 0 0 0 2656 0 0 0 0 0 0 0 0 2660 0 0 0 0 0 0 0 0 SECTION 229 2664 54321 0 876 0 0 0 0 0 PROCEDURE 230 2668 0 1 0 4097 0 1 0 0 290 2 15 1 3 8191 0 15 1 3 8191 0 2672 15 1 3 8191 0 15 1 3 8191 0 15 1 3 8191 0 15 1 3 8191 0 2676 15 1 3 8191 0 15 1 3 8191 0 15 1 3 8191 0 15 1 3 8191 0 2680 15 1 3 8191 0 15 1 3 8191 0 15 1 3 8191 0 15 1 3 8191 0 2684 15 1 3 8191 0 15 1 3 8191 0 15 1 3 8191 0 15 1 3 8191 0 2688 0 0 0 0 0 0 0 0 0 0 0 0 0 2350 2 0 0 0 7952 2 2692 0 0 0 1 0 0 0 0 9 0 0 0 0 4 0 0 0 0 0 0 SECTION 231 2696 0 0 0 0 2000 0 2000 0 2700 4000 0 2000 0 6000 0 2000 0 2704 8000 0 2000 0 t000 0 2000 0 2708 +000 0 2000 0 .000 0 2000 0 2712 10000 0 0 0 £££££ 0 £££££ 0 SECTION 232 2716 8000 0 2000 0 t000 0 2000 0 2720 +000 0 2000 0 .000 0 2000 0 2724 10000 0 0 0 £££££ 0 £££££ 0 2728 £££££ 0 £££££ 0 £££££ 0 £££££ 0 2732 £££££ 0 £££££ 0 £££££ 0 £££££ 0 2736 0 0 0 0 0 0 0 0 PROCEDURE 233 2740 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2740 2 2744 0 0 0 2664 2 0 0 0 0 0 0 0 0 3265 2 0 0 0 2825 2 2748 0 0 0 2813 2 0 0 0 3036 2 0 0 0 2456 2 0 0 0 60 0 2752 0 0 0 3352 2 0 0 0 2004 2 0 0 0 363 2 0 0 0 3885 2 2756 0 0 0 1312 2 0 0 0 1012 2 0 0 0 108 2 0 0 0 2796 2 2760 0 0 0 1045 2 0 0 0 729 2 0 0 0 1440 2 17 0 0 748 2 2764 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 8 0 0 9 0 2768 0 0 0 1 0 0 0 0 2668 2 0 0 0 2696 2 0 0 0 2716 2 2772 16 0 0 64 0 0 0 0 1 0 0 0 0 4687 2 0 0 0 1280 2 2776 0 0 0 1376 2 0 0 0 8185 2 0 0 0 3248 2 0 0 0 2288 2 2780 0 0 0 3242 2 0 0 0 7891 2 0 0 0 171 2 0 0 0 0 0 2784 0 0 0 0 0 0 0 0 3256 2 0 0 0 0 0 0 0 0 1 0 2788 0 0 0 0 0 0 0 0 872 2 0 0 0 8136 2 0 0 0 4763 2 2792 0 0 0 93 2 0 0 0 971 2 0 0 0 1000 2 0 0 0 0 0 PROCEDURE 234 2796 0 0 0 0 0 27 0 0 2801 2 1 1 1 2358 2 28 1 2 106 2 2800 26 0 1 2796 2 6 0 0 2812 2 1 1 2 1 0 3 0 0 2812 2 2804 27 0 0 2807 2 25 1 2 0 0 24 1 0 2798 2 1 1 3 2368 2 2808 28 1 2 106 2 1 1 3 15 0 2 0 0 2812 2 26 0 1 2796 2 2812 0 0 0 15 0 PROCEDURE 235 2813 0 0 0 0 0 1 0 1 0 0 6 0 3 7 0 2816 5 0 3 9 0 27 0 1 2820 2 6 0 2 9 0 2 0 3 7 0 2820 6 0 2 9 0 2 0 3 9 0 6 0 2 20 0 2 0 3 20 0 2824 26 0 1 2813 2 PROCEDURE 236 2825 0 0 0 0 0 6 1 0 2104 2 2 1 0 2112 2 2828 0 1 1 2384 2 4 0 0 2764 2 26 0 0 18 2 26 0 0 5716 2 2832 26 0 0 5258 2 27 0 0 2844 2 1 1 3 0 0 26 0 0 5564 2 2836 23 0 0 1 0 0 0 0 2112 1 24 1 0 2840 2 24 1 0 2828 2 2840 24 0 1 1278 2 6 0 0 1280 2 2 1 3 1 0 24 1 0 2828 2 2844 24 0 1 124 0 6 1 0 56 0 28 1 0 2640 2 24 1 1 2045 2 2848 26 0 1 2825 2 PROCEDURE 237 2849 0 0 0 0 0 18 0 0 5 0 4 0 0 2764 2 2852 25 1 1 4096 0 26 0 0 18 2 26 0 1 2849 2 PROCEDURE 238 2855 0 0 0 0 0 2856 0 0 3 2045 2 6 0 0 157 0 7 1 1 46 0 0 0 3 2096 2 2860 26 0 1 2855 2 15 0 0 2641 2 24 1 0 3035 2 24 1 1 216 2 PROCEDURE 239 2864 0 0 0 0 0 24 1 1 2096 2 6 0 0 2640 2 5 0 0 2060 2 2868 27 0 1 2874 2 1 0 1 1 0 6 0 0 2641 2 1 1 2 5 0 2872 27 0 0 2967 2 1 1 2 80 0 26 0 1 2864 2 PROCEDURE 240 2875 1 1 3 27 0 2876 26 0 0 2849 2 26 0 0 1012 2 1 1 3 4 0 26 0 0 2796 2 2880 24 0 2 2172 2 2 0 0 2350 2 24 0 2 2350 2 28 1 2 108 2 2884 6 0 0 2026 2 5 0 0 2764 2 2 0 0 248 2 6 0 0 2030 2 2888 2 0 0 258 2 26 0 0 5680 2 6 0 0 2764 2 2 0 1 30 0 2892 24 1 0 1045 2 6 0 0 2031 2 2 0 0 258 2 24 0 1 2522 2 2896 2 1 0 2474 2 24 1 0 3165 2 PROCEDURE 241 2898 0 0 0 0 0 1 1 3 0 0 2900 24 0 3 3 0 2 0 0 164 0 24 0 2 2906 2 1 1 2 3801 2 2904 4 0 0 2034 2 26 0 0 2849 2 0 0 3 2045 2 24 0 1 2764 2 2908 6 0 0 1280 2 27 0 0 2913 2 1 1 3 1 0 24 0 1 2764 2 2912 7 0 0 1280 2 0 0 3 2096 2 24 0 1 2764 2 19 1 3 0 0 2916 26 0 0 5719 2 24 0 1 2764 2 24 0 1 64 0 6 1 0 1 0 2920 27 0 3 2914 2 24 0 1 2764 2 5 0 0 1280 2 27 0 1 2926 2 2924 24 0 1 2898 2 24 1 0 1 0 24 0 1 2764 2 4 0 0 1280 2 2928 1 1 2 7 0 27 0 3 2934 2 1 1 3 3841 0 24 0 1 2764 2 2932 2 0 0 1312 2 26 0 1 2898 2 25 1 2 0 0 24 0 1 2764 2 2936 2 0 0 1312 2 0 1 2 2160 2 1 1 3 17 0 26 0 0 2849 2 2940 18 0 0 4119 0 1 1 2 1 0 27 0 0 2953 2 1 1 2 1 0 2944 27 0 0 2953 2 1 1 2 1 0 27 0 0 2953 2 1 1 2 3 0 2948 27 0 0 2953 2 24 0 2 3181 2 5 0 0 2898 2 27 0 0 2875 2 2952 24 1 1 573 2 26 0 1 2898 2 PROCEDURE 242 2954 0 0 0 0 0 0 1 1 2390 2 2956 4 0 0 2764 2 26 0 0 18 2 26 0 0 2825 2 24 1 1 2096 2 2960 24 0 1 124 0 6 1 0 6 0 5 1 0 2212 2 27 0 0 2968 2 2964 4 1 0 2212 2 5 1 0 2256 2 27 0 0 2955 2 24 1 0 3034 2 2968 24 0 1 124 0 6 1 0 11 0 24 0 1 2522 2 2 0 0 2477 2 2972 26 0 0 2825 2 24 1 1 2096 2 26 1 3 2096 2 1 0 1 0 0 2976 6 0 3 2640 2 5 0 0 2060 2 27 0 0 2967 2 6 1 3 2640 2 2980 24 0 1 2522 2 3 1 0 2474 2 5 1 0 2402 2 27 0 0 2993 2 2984 18 1 0 4123 0 5 0 3 2641 2 27 1 0 2993 2 6 0 0 2402 2 2988 5 0 0 2116 2 27 0 0 2993 2 25 0 3 4 0 24 1 0 2975 2 2992 24 1 0 2972 2 6 0 3 2642 2 5 0 0 2393 2 27 0 1 3003 2 2996 0 0 2 2385 2 15 0 0 2764 2 1 1 2 7 0 27 0 1 3009 2 3000 6 0 3 2643 2 2 0 0 2795 2 24 1 0 3009 2 4 0 0 2100 2 3004 27 0 1 2990 2 0 0 2 2385 2 15 0 0 2764 2 1 1 2 7 0 3008 27 0 0 2967 2 24 0 2 10 0 18 0 0 5 0 4 0 3 2643 2 3012 2 1 0 2398 2 6 0 3 2643 2 24 0 1 2522 2 5 0 0 2477 2 3016 24 0 1 2522 2 7 0 0 2477 2 27 0 0 3026 2 27 0 3 3022 2 3020 24 0 2 38 0 24 1 0 3023 2 24 0 2 36 0 0 1 2 2398 2 3024 26 0 0 2849 2 24 1 0 3027 2 26 0 0 2825 2 26 0 0 2864 2 3028 27 0 1 3026 2 6 0 0 2640 2 5 0 0 2392 2 27 0 1 3026 2 3032 24 0 1 2954 2 24 1 0 1 0 1 1 3 81 0 26 0 1 2954 2 PROCEDURE 243 3036 24 0 1 27 0 6 0 0 4 0 24 0 1 2522 2 2 0 0 2476 2 3040 24 0 1 2522 2 6 0 0 2472 2 24 0 1 27 0 2 0 0 159 0 3044 26 1 2 26 0 23 0 3 28 0 1 1 2 14 0 27 0 0 3077 2 3048 6 0 0 2037 2 2 0 2 2 0 6 0 0 4 0 1 1 2 351 2 3052 18 1 0 4127 0 18 1 3 2 0 2 0 0 6 0 6 0 0 2043 2 3056 4 0 0 6 0 2 0 2 26 0 6 0 3 779 2 3 0 2 3 0 3060 4 0 0 2038 2 2 0 2 28 0 6 0 2 4 0 27 0 2 3068 2 3064 6 0 2 28 0 2 0 2 27 0 6 0 0 2039 2 2 0 2 4 0 3068 6 0 0 2039 2 2 0 2 6 0 6 0 2 3 0 27 0 2 3076 2 3072 2 0 0 3075 2 6 0 0 3110 2 18 0 0 5 0 0 0 0 0 0 3076 1 1 3 0 0 23 1 0 26 0 23 1 0 30 0 23 1 0 28 0 3080 6 0 0 1011 2 24 0 1 26 0 1 1 2 14 0 3 0 2 35 0 3084 2 0 2 7 0 24 0 1 27 0 6 0 0 11 0 27 0 0 3246 2 3088 6 0 0 26 0 2 0 0 2784 2 26 0 0 238 2 6 1 0 2376 2 3092 28 0 0 26 0 6 0 0 250 2 2 0 0 248 2 24 0 2 24 0 3096 24 0 1 2522 2 2 0 0 2476 2 6 0 0 2451 2 24 0 1 2783 2 3100 24 1 0 4 0 24 0 1 2783 2 24 0 1 2 0 0 1 0 30 0 3104 6 0 0 2028 2 2 0 0 9 0 24 0 1 2 0 0 1 1 30 0 3108 24 0 1 2783 2 24 1 0 5 0 2 0 0 6 0 27 0 0 3136 2 3112 24 1 0 3138 2 27 0 0 3175 2 27 0 0 3138 2 PROCEDURE 244 3115 24 1 1 2096 2 3116 24 0 1 2 0 0 1 0 30 0 26 0 0 3344 2 6 0 0 2028 2 3120 2 0 0 9 0 6 0 0 24 2 2 0 1 44 0 26 0 0 2855 2 3124 26 0 0 8136 2 6 0 0 2428 2 27 0 0 3130 2 26 0 0 6111 2 3128 27 0 3 193 2 26 0 0 6174 2 24 0 1 3 0 6 0 0 159 0 3132 3 0 0 2764 2 26 0 0 3329 2 24 1 0 3136 2 24 1 0 2875 2 3136 6 0 0 2100 2 2 0 0 4763 2 25 1 0 127 0 6 0 1 37 0 3140 2 1 0 4 0 6 0 1 30 0 5 0 2 4 0 27 0 3 3146 2 3144 6 0 0 2050 2 7 0 1 30 0 6 1 2 12 0 2 1 0 2402 2 3148 6 0 1 30 0 2 0 0 2407 2 24 0 2 3885 2 2 0 1 42 0 3152 6 0 1 9 0 2 0 1 7 0 6 1 0 2 0 2 1 0 2400 2 3156 26 1 1 278 2 24 0 2 2218 2 2 0 0 2350 2 24 0 2 2350 2 3160 24 0 1 3 0 28 1 2 130 0 24 0 1 3 0 24 0 2 130 0 3164 23 0 2 168 0 PROCEDURE 245 3165 0 0 2 2385 2 24 0 1 2401 2 6 0 0 11 0 3168 27 0 0 3174 2 6 0 0 2385 2 14 0 0 2764 2 24 0 1 2783 2 3172 24 1 0 0 0 25 1 2 0 0 14 0 0 2764 2 6 0 0 2032 2 3176 24 0 1 2764 2 2 0 0 64 0 6 0 0 2033 2 2 0 0 124 0 3180 26 0 0 2898 2 24 1 0 3186 2 6 1 0 2402 2 24 0 1 2522 2 3184 5 1 0 2474 2 27 0 0 3189 2 26 0 0 2954 2 24 1 0 2875 2 3188 24 1 0 3207 2 6 0 0 2407 2 24 0 1 2522 2 5 0 0 2476 2 3192 1 1 2 1 0 27 0 0 3204 2 27 0 2 3207 2 24 0 1 2522 2 3196 6 0 0 2477 2 18 1 0 4123 0 24 0 2 10 0 18 1 0 5 0 3200 2 1 0 2398 2 24 0 2 3187 2 2 0 0 2954 2 24 1 0 3022 2 3204 0 0 2 2050 2 24 0 2 40 0 26 0 0 2849 2 26 0 0 2825 2 3208 24 0 1 124 0 6 1 0 12 0 5 1 0 2214 2 27 0 1 3207 2 3212 6 1 0 2642 2 5 1 0 2402 2 27 0 1 3207 2 6 0 0 2640 2 3216 5 0 0 2407 2 27 0 1 3207 2 6 0 0 300 2 2 0 0 247 2 3220 6 1 0 2372 2 28 0 0 2456 2 24 1 1 2096 2 26 1 2 2400 2 3224 6 0 2 32 0 4 0 2 32 0 4 0 2 37 0 2 1 0 28 0 3228 24 1 1 2045 2 24 0 2 3 0 2 0 0 4763 2 6 0 2 18 0 3232 3 1 0 28 0 26 0 0 3265 2 PROCEDURE 246 3234 6 0 0 2407 2 24 0 1 2522 2 3236 2 0 0 2476 2 24 0 1 2401 2 6 0 0 11 0 27 0 0 3242 2 3240 24 0 1 2783 2 24 1 0 7 0 24 1 1 2096 2 26 1 2 2400 2 3244 6 0 2 35 0 2 0 2 7 0 6 1 0 2376 2 28 0 0 26 0 3248 26 1 1 278 2 6 0 0 250 2 2 0 0 248 2 0 0 2 2385 2 3252 6 0 0 2385 2 14 0 0 2764 2 26 0 0 238 2 24 1 0 193 2 3256 2 0 0 2396 2 6 0 0 2032 2 24 0 1 2764 2 2 0 0 64 0 3260 6 0 0 2033 2 2 0 0 124 0 6 0 0 2396 2 27 0 0 3189 2 3264 24 1 0 3207 2 PROCEDURE 247 3265 0 0 0 0 0 2 0 0 2399 2 1 0 1 16 0 3268 15 0 0 3265 2 27 0 0 3272 2 6 0 0 4 0 24 1 0 3273 2 3272 6 0 0 28 0 2 1 0 2410 2 26 0 0 2825 2 6 1 0 2096 2 3276 2 1 0 2412 2 24 0 1 2412 2 6 1 0 2640 2 3 1 0 2396 2 3280 5 0 0 2048 2 27 0 0 3305 2 4 0 0 2049 2 27 0 0 3306 2 3284 25 1 2 0 0 1 0 1 4 0 15 0 0 2396 2 27 0 1 3310 2 3288 6 0 0 2399 2 7 0 0 2396 2 6 0 0 2397 2 27 0 3 3295 2 3292 24 0 1 2396 2 4 0 0 0 0 24 1 0 3297 2 24 0 1 2396 2 3296 5 0 0 0 0 24 0 1 2410 2 2 0 0 0 0 23 0 0 1 0 3300 0 0 0 2410 1 23 0 0 2 0 0 0 0 2412 1 24 1 0 3277 2 3304 24 1 0 3274 2 26 0 1 3265 2 PROCEDURE 248 3306 6 1 0 2374 2 24 0 1 2410 2 3308 28 1 0 0 0 24 1 0 3299 2 1 1 2 3840 0 27 0 0 3323 2 3312 6 0 0 2397 2 24 0 1 2410 2 2 0 0 0 0 0 0 2 2100 2 3316 10 0 0 2396 2 18 0 0 4126 0 1 1 1 158 0 0 0 2 2044 2 3320 24 0 1 2410 2 14 0 0 0 0 24 1 0 3299 2 6 0 0 2397 2 3324 7 0 0 2410 2 24 1 0 3301 2 0 0 0 0 0 27 0 1 3781 2 3328 0 0 0 4265 2 PROCEDURE 249 3329 0 0 0 0 0 2 0 0 315 2 1 1 3 36 0 3332 2 0 0 2523 2 2 0 0 2522 2 6 0 0 315 2 24 0 1 2522 2 3336 5 0 0 2472 2 27 0 0 3343 2 23 0 0 6 0 0 0 0 2522 1 3340 24 1 0 3334 2 24 0 1 3329 2 24 1 0 1 0 26 0 1 3329 2 PROCEDURE 250 3344 0 0 0 0 0 0 0 3 2096 2 6 0 1 3 0 27 0 2 3351 2 3348 2 0 0 3350 2 6 1 0 2114 2 28 1 1 782 2 26 0 1 3344 2 PROCEDURE 251 SECTION 252 3352 0 0 £££££ 0 0 0 0 0 3356 0 0 0 0 0 0 0 0 3360 0 0 £££££ 0 0 0 0 0 3364 0 0 0 0 0 0 0 0 3368 0 0 £££££ 0 0 0 0 0 3372 0 0 0 0 0 0 0 0 3376 0 0 £££££ 0 0 0 0 0 3380 0 0 0 0 0 0 0 0 3384 0 0 £££££ 0 0 0 0 0 3388 0 0 0 0 0 0 0 0 3392 0 0 £££££ 0 0 0 0 0 3396 0 0 0 0 0 0 0 0 3400 0 0 £££££ 0 0 0 0 0 3404 0 0 0 0 0 0 0 0 3408 0 0 £££££ 0 0 0 0 0 3412 0 0 0 0 0 0 0 0 3416 0 0 0 0 0 0 0 0 3420 0 0 0 0 0 0 0 0 3424 0 0 0 0 0 0 0 0 3428 0 0 0 0 0 0 0 0 3432 0 0 0 0 0 0 0 0 3436 0 0 0 0 0 0 0 0 3440 0 0 0 0 0 0 0 0 SECTION 253 3444 0 0 0 0 0 0 0 0 3448 0 0 0 0 0 0 0 0 3452 0 0 0 0 0 0 0 0 3456 0 0 0 0 0 0 0 0 SECTION 254 3460 0 0 0 0 0 0 0 0 3464 0 0 0 0 0 0 0 0 3468 0 0 0 0 0 0 0 0 3472 0 0 0 0 0 0 0 0 SECTION 255 SECTION 256 3476 0 0 0 0 0 0 0 0 SECTION 257 3480 0 0 £££££ 0 0 0 0 0 3484 0 0 0 0 0 0 0 0 3488 0 0 £££££ 0 0 0 0 0 3492 0 0 0 0 0 0 0 0 3496 0 0 £££££ 0 0 0 0 0 3500 0 0 0 0 0 0 0 0 3504 0 0 £££££ 0 0 0 0 0 3508 0 0 0 0 0 0 0 0 3512 0 0 £££££ 0 0 0 0 0 3516 0 0 0 0 0 0 0 0 3520 0 0 £££££ 0 0 0 0 0 3524 0 0 0 0 0 0 0 0 SECTION 258 3528 10000 0 5e004 0 0 0 0 0 3532 0 0 0 0 0 0 0 0 3536 0 0 0 0 0 0 0 0 3540 80 0 1+ 0 0 0 2001+ 0 3544 0 0 0 0 0 0 80000 0 3548 0 0 0 0 35:00 0 72657 0 3552 70000 0 58545 0 55972 0 56596 0 3556 5547e 0 7t556 0 0 0 0 0 SECTION 259 3560 0 0 0 0 0 0 0 0 3564 0 0 0 0 0 0 0 0 3568 0 0 0 0 0 0 0 0 3572 0 0 0 0 0 0 0 0 3576 0 0 0 0 0 0 0 0 3580 0 0 0 0 0 0 0 0 3584 0 0 0 0 0 0 0 0 3588 0 0 0 0 0 0 0 0 3592 0 0 0 0 0 0 0 0 3596 0 0 0 0 0 0 0 0 3600 0 0 0 0 0 0 0 0 3604 0 0 0 0 0 0 0 0 3608 0 0 0 0 0 0 0 0 SECTION 260 3612 0 0 0 0 0 0 0 0 3616 0 0 0 0 0 0 0 0 3620 24 0 10 0 0 0 0 0 3624 0 0 0 0 0 0 3£000 0 3628 0 0 7.000 0 0 0 0 0 3632 0 0 0 0 .7.7. 0 7.7.7 0 3636 0 0 3.000 0 SECTION 261 3638 0 3530 1 3 3 0 0 0 3 0 3640 0 3533 1 4611 0 1 2 0 3 0 0 104 1 17 3 0 0 1 1 0 3644 0 3532 1 5 0 0 0 0 5 0 0 2080 1 2 3 0 0 0 2 1 3648 0 3530 1 3 3 0 0 0 3 0 0 3533 1 4611 0 1 2 0 3 0 3652 0 104 1 17 3 0 0 1 1 0 0 3532 1 5 0 0 0 0 5 0 3656 0 104 1 17 3 0 0 1 1 0 0 3534 1 12293 0 3 0 0 5 0 3660 0 104 1 17 3 0 0 1 1 0 0 3536 1 5 3 0 0 0 5 0 3664 0 2080 1 18 3 0 0 1 2 1 0 3530 1 3 3 0 0 0 3 0 3668 0 3533 1 4611 0 1 2 0 3 0 0 104 1 17 3 0 0 1 1 0 3672 0 3532 1 5 0 0 0 0 5 0 0 104 1 17 3 0 0 1 1 0 3676 0 3534 1 5 3 0 0 0 5 0 0 104 1 17 3 0 0 1 1 0 3680 0 3536 1 5 3 0 0 0 5 0 0 104 1 1 3 0 0 0 1 0 3684 0 3538 1 20485 0 5 0 0 5 0 0 2080 1 2 3 0 0 0 2 1 3688 0 176 1 16389 0 4 0 0 5 1 0 3538 1 5 0 0 0 0 5 1 SECTION 262 3692 0 3530 1 3 3 0 0 0 3 0 0 3533 1 4611 0 1 2 0 3 0 3696 0 104 1 1 3 0 0 0 1 0 0 3532 1 5 0 0 0 0 5 0 3700 0 104 1 1 3 0 0 0 1 0 0 3534 1 5 0 0 0 0 5 0 3704 0 104 1 17 3 0 0 1 1 0 0 3536 1 5 0 0 0 0 5 0 3708 0 104 1 33 3 0 0 2 1 0 0 3538 1 5 3 0 0 0 5 0 3712 0 2080 1 2 3 0 0 0 2 1 0 2080 1 2 3 0 0 0 2 1 3716 0 3549 1 4643 0 1 2 2 3 0 0 3549 1 4643 0 1 2 2 3 0 3720 0 2080 1 2 3 0 0 0 2 1 0 3630 1 85 0 0 0 5 5 0 3724 0 3549 1 4643 0 1 2 2 3 0 0 2170 1 308 3 0 1 3 4 1 PROCEDURE 263 3728 1 0 3 0 0 0 0 0 4672 2 0 0 0 6675 2 0 0 0 6887 2 3732 0 0 0 4457 2 0 0 0 4455 2 0 0 0 4453 2 0 0 0 4451 2 3736 0 0 0 245 2 0 0 0 4172 2 0 0 0 4478 2 0 0 0 4333 2 3740 0 0 0 4225 2 0 0 0 4481 2 0 0 0 3751 2 0 0 0 7543 2 3744 26 0 0 5224 2 26 0 0 5224 2 26 0 0 5224 2 26 0 0 5224 2 3748 26 0 0 5224 2 26 0 0 5224 2 26 0 0 5224 2 26 0 0 5224 2 3752 26 0 0 5224 2 26 0 0 5224 2 0 0 3 2045 2 6 0 0 157 0 PROCEDURE 264 3756 1 1 2 3801 2 2 0 1 31 0 24 0 2 3352 2 2 0 1 32 0 3760 6 0 0 2028 2 2 0 0 9 0 6 0 1 3 0 27 0 2 3785 2 3764 26 0 0 3344 2 24 1 0 3785 2 24 1 1 2096 2 24 0 1 2 0 3768 0 1 0 30 0 6 0 1 3 0 27 0 2 3774 2 2 0 0 3773 2 3772 6 1 0 2114 2 28 1 1 782 2 6 0 0 18 2 2 1 1 44 0 3776 6 0 0 2028 2 2 0 0 9 0 6 0 1 31 0 1 1 2 48 0 3780 27 0 0 7773 2 1 1 2 1 0 24 0 1 2 0 27 0 0 12 0 3784 26 0 0 5613 2 24 0 1 2 0 24 1 0 7 0 7 1 1 46 0 3788 0 0 3 2096 2 24 0 1 2 0 24 1 0 7 0 24 1 0 3744 2 3792 24 1 0 3744 2 24 1 0 7387 2 24 1 0 3862 2 PROCEDURE 265 3795 19 0 1 56 0 3796 3 1 0 1278 2 18 0 3 6 0 PROCEDURE 266 3798 4 0 1 32 0 4 0 0 3728 2 3800 24 0 1 1279 2 PROCEDURE 267 3801 24 1 0 3801 2 24 1 0 6581 2 24 1 0 3744 2 3804 24 1 0 6349 2 24 1 0 6357 2 24 1 0 6002 2 24 1 0 6037 2 3808 24 1 0 6917 2 24 1 0 7348 2 24 1 0 6357 2 24 1 0 6407 2 3812 24 1 0 6470 2 24 1 0 3744 2 24 1 0 6344 2 24 1 0 3881 2 3816 24 1 0 5840 2 24 1 0 5924 2 24 1 0 6656 2 24 1 0 7035 2 3820 24 1 0 3881 2 24 1 0 6404 2 24 1 0 6643 2 24 1 0 3744 2 3824 24 1 0 6367 2 24 1 0 3862 2 24 1 0 6261 2 24 1 0 6261 2 3828 24 1 0 7008 2 24 1 0 7378 2 24 1 0 3862 2 24 1 0 3862 2 3832 24 1 0 7035 2 24 1 0 6656 2 24 1 0 7395 2 24 1 0 7397 2 3836 24 1 0 7419 2 24 1 0 7426 2 24 1 0 7417 2 24 1 0 7417 2 3840 24 1 0 7556 2 24 1 0 7549 2 24 1 0 7675 2 24 1 0 7673 2 3844 24 1 0 7554 2 24 1 0 7551 2 24 1 0 7366 2 24 1 0 6999 2 3848 24 1 0 7759 2 24 1 0 3744 2 24 1 0 6075 2 24 1 0 6419 2 3852 24 1 0 6435 2 24 1 0 6413 2 24 1 0 6464 2 24 1 0 6439 2 3856 24 1 0 3881 2 24 1 0 3862 2 24 1 0 6357 2 24 1 0 6352 2 3860 24 1 0 3881 2 24 1 0 6372 2 PROCEDURE 268 3862 24 0 1 1278 2 19 1 2 0 0 3864 6 0 0 2060 2 2 0 0 1279 2 6 0 0 1278 2 26 0 0 4859 2 3868 26 0 0 5708 2 24 0 1 2 0 24 1 1 29 0 24 0 1 2 0 3872 0 1 0 30 0 24 0 1 2 0 6 0 0 26 0 2 0 0 3876 2 3876 0 0 0 0 0 24 0 1 2 0 24 1 0 28 0 PROCEDURE 269 3879 2 0 0 1279 2 3880 26 0 0 5708 2 6 0 1 40 0 18 0 0 4127 0 0 0 2 2096 2 3884 24 1 0 3869 2 PROCEDURE 270 3885 6 0 0 2026 2 2 0 1 45 0 26 0 0 5680 2 3888 6 0 0 3900 2 24 0 1 3 0 2 0 0 176 0 6 0 1 30 0 3892 1 1 2 175 0 27 0 0 3752 2 6 1 0 2174 2 2 1 0 3530 2 3896 26 0 0 5756 2 1 1 3 4 0 26 0 0 5661 2 24 1 0 4207 2 3900 26 0 0 5613 2 PROCEDURE 271 3901 0 0 0 0 0 24 0 1 3901 2 6 1 0 25 0 3904 2 1 0 2 0 0 0 2 2052 2 15 0 1 30 0 26 0 0 3910 2 3908 24 0 1 3901 2 24 1 0 1 0 PROCEDURE 272 3910 0 0 0 0 0 2 1 0 6 0 3912 0 0 2 2385 2 15 0 3 3352 2 2 0 0 321 2 1 0 1 1 0 3916 6 0 3 3353 2 1 1 2 49 0 27 0 0 3958 2 6 0 3 3353 2 3920 1 1 2 50 0 27 0 0 4212 2 1 1 2 1 0 27 0 0 4212 2 3924 6 0 1 31 0 1 1 2 54 0 24 0 3 2 0 27 0 0 12 0 3928 6 0 1 31 0 1 1 1 3801 2 1 1 2 6461 2 18 0 0 6 0 3932 27 0 0 4212 2 6 0 3 3353 2 1 1 2 58 0 27 0 0 4212 2 3936 6 0 1 31 0 1 1 2 57 0 27 0 0 4212 2 6 0 3 3353 2 3940 1 1 2 5 0 27 0 1 3945 2 6 0 1 33 0 1 1 2 1 0 3944 27 0 0 3958 2 6 0 3 3353 2 5 0 0 2060 2 27 0 0 3960 2 3948 6 0 3 3353 2 27 0 1 3951 2 24 0 2 11 0 24 0 1 321 2 3952 18 1 0 0 0 14 1 3 3354 2 6 0 0 201 2 2 0 0 3797 2 3956 6 0 0 313 2 2 0 0 200 2 6 0 0 2060 2 2 0 3 3353 2 3960 26 0 1 3910 2 0 0 0 0 0 24 1 0 3744 2 27 0 0 4140 2 3964 27 0 0 4281 2 1 1 3 4148 2 26 0 0 5719 2 27 0 1 4265 2 3968 27 0 2 4140 2 24 1 0 4203 2 PROCEDURE 273 3970 0 0 0 0 0 0 0 2 2052 2 3972 2 0 0 321 2 15 0 0 321 2 2 1 0 6 0 0 0 2 2385 2 3976 15 0 0 321 2 2 0 0 321 2 1 0 1 1 0 24 0 1 321 2 3980 18 1 0 0 0 15 1 3 3354 2 27 0 0 4029 2 PROCEDURE 274 3983 18 0 0 1 0 3984 14 1 3 3354 2 18 1 2 321 2 18 0 0 4120 0 3 0 0 338 2 3988 1 1 2 2 0 27 0 0 3995 2 1 1 2 9 0 27 0 0 3995 2 3992 6 0 0 1279 2 24 0 1 3 0 2 0 0 174 0 2 0 0 321 2 3996 24 0 1 321 2 4 1 0 3354 2 23 0 0 8 0 0 0 0 321 1 4000 24 1 0 3996 2 27 0 1 4012 2 1 1 3 128 0 2 0 0 2110 2 4004 24 0 1 2110 2 4 1 0 3354 2 23 0 0 8 0 0 0 0 2110 1 4008 24 1 0 4004 2 27 0 1 4012 2 6 0 0 312 2 2 0 0 3797 2 4012 24 0 1 338 2 PROCEDURE 275 4013 24 1 0 4013 2 24 1 0 4032 2 24 1 0 1253 2 4016 24 1 0 4203 2 24 1 0 4198 2 24 1 0 4110 2 24 1 0 4115 2 4020 24 1 0 4113 2 24 1 0 4108 2 24 1 0 4222 2 24 1 0 4298 2 4024 24 1 0 4203 2 24 1 0 4212 2 PROCEDURE 276 4026 6 0 0 2045 2 24 0 1 3 0 4028 2 0 0 160 0 6 1 0 1278 2 18 0 3 6 0 26 0 1 3970 2 PROCEDURE 277 4032 6 0 1 31 0 1 1 1 3801 2 1 1 2 6578 2 5 0 0 2034 2 4036 27 0 1 4444 2 26 0 0 5618 2 6 0 3 188 0 27 0 0 4052 2 4040 6 0 3 194 0 2 0 3 192 0 6 0 1 33 0 27 0 0 3746 2 4044 1 0 1 15 0 14 0 1 44 0 6 1 0 2188 2 2 1 0 3530 2 4048 26 0 0 5811 2 6 0 0 4483 2 2 0 3 176 0 24 1 0 4207 2 4052 1 1 3 0 0 0 0 2 2052 2 15 0 0 1278 2 1 1 2 48 0 4056 27 0 0 4077 2 24 0 3 3 0 24 0 2 190 0 24 0 3 1278 2 4060 2 0 0 64 0 6 1 0 3636 2 26 0 0 4100 2 27 0 1 4057 2 4064 1 1 3 10 0 2 0 3 192 0 1 1 3 31 0 18 0 0 8 0 4068 26 0 0 4100 2 27 0 1 4057 2 6 0 3 192 0 1 1 2 2 0 4072 27 0 1 4065 2 6 1 0 3636 2 26 0 0 4100 2 27 0 1 4073 2 4076 24 1 0 4089 2 6 1 0 3628 2 2 1 0 154 0 26 0 0 4100 2 4080 27 0 1 4077 2 6 1 0 2074 2 2 1 0 154 0 26 0 0 4100 2 4084 27 0 1 4077 2 6 1 0 3628 2 2 1 0 154 0 26 0 0 4100 2 4088 27 0 1 4085 2 6 1 0 2188 2 2 1 0 3530 2 24 0 2 4093 2 4092 24 1 0 4206 2 26 0 0 5618 2 6 0 3 194 0 2 0 3 192 0 4096 6 0 3 174 0 2 0 1 31 0 2 0 3 174 0 24 1 0 6508 2 PROCEDURE 278 4100 0 0 0 0 0 2 1 3 190 0 24 0 1 1278 2 19 0 0 0 0 4104 26 0 0 5728 2 26 0 0 5618 2 6 0 3 160 0 26 0 1 4100 2 PROCEDURE 279 4108 1 1 3 4146 2 24 1 0 4111 2 1 1 3 4142 2 24 0 1 3 0 4112 2 0 0 158 0 1 1 3 6 0 24 1 0 4116 2 1 1 3 5 0 4116 2 0 0 4184 2 24 0 1 3 0 6 0 0 174 0 1 1 2 7 0 4120 27 0 2 4132 2 6 0 1 33 0 27 0 0 4132 2 1 0 1 15 0 4124 14 0 1 44 0 6 1 0 2188 2 2 1 0 3530 2 26 0 0 5811 2 4128 6 0 0 3900 2 24 0 1 3 0 2 0 0 176 0 24 1 0 4207 2 4132 6 1 0 3528 2 2 1 0 3530 2 26 0 0 5818 2 26 0 0 5661 2 4136 24 0 2 897 0 2 0 1 41 0 1 1 3 3638 2 24 1 0 5589 2 4140 1 1 3 4142 2 24 1 0 4206 2 PROCEDURE 280 4142 26 0 0 5556 2 26 0 0 5728 2 4144 25 1 2 0 0 24 1 0 4147 2 6 0 0 2057 2 2 0 0 2058 2 4148 26 0 0 5626 2 2 1 3 2 0 26 0 0 5556 2 26 0 0 5728 2 4152 26 0 0 5626 2 26 0 0 5643 2 24 0 1 2058 2 6 1 3 0 0 4156 24 0 1 321 2 5 1 0 3356 2 27 0 1 4185 2 24 0 1 2058 2 4160 6 1 3 2 0 24 0 1 321 2 5 1 0 3358 2 27 0 1 4185 2 4164 6 0 0 1278 2 5 0 0 49 2 27 0 2 4172 2 26 0 0 6085 2 4168 24 1 0 4172 2 6 0 1 32 0 27 0 1 4185 2 26 0 0 6079 2 4172 26 0 0 5626 2 2 1 3 2 0 26 0 0 5556 2 24 0 1 3 0 4176 6 0 0 158 0 1 1 2 4142 2 27 0 0 4180 2 6 0 0 2050 2 4180 1 1 1 5 0 24 1 0 4441 2 6 0 0 4184 2 24 1 0 4441 2 4184 0 0 0 0 0 PROCEDURE 281 4185 26 0 0 5618 2 26 0 0 5643 2 24 0 1 321 2 4188 6 1 0 3356 2 2 1 0 3534 2 24 0 1 321 2 6 1 0 3358 2 4192 2 1 0 3536 2 6 1 0 2188 2 2 1 0 3530 2 6 0 3 158 0 4196 26 0 0 5818 2 24 1 0 5994 2 PROCEDURE 282 4198 6 0 1 33 0 5 0 1 30 0 4200 27 0 0 4203 2 6 0 1 33 0 27 0 1 4123 2 6 1 0 2188 2 4204 2 1 0 3530 2 1 1 3 4209 2 26 0 0 5818 2 24 0 2 3638 2 4208 24 1 0 5602 2 PROCEDURE 283 4209 26 0 0 5560 2 1 1 3 4 0 24 1 0 4441 2 PROCEDURE 284 4212 6 0 1 33 0 27 0 0 3746 2 1 0 1 15 0 14 0 1 44 0 4216 6 0 1 35 0 2 0 1 7 0 6 0 1 33 0 5 0 1 39 0 4220 27 0 0 3746 2 24 1 0 6432 2 PROCEDURE 285 4222 26 0 0 5258 2 27 0 1 4444 2 4224 24 1 0 4265 2 6 0 0 2100 2 26 0 0 5053 2 26 0 0 5631 2 4228 26 0 0 5556 2 26 0 0 5637 2 26 0 0 5728 2 24 0 1 3 0 4232 6 0 0 160 0 27 0 0 4249 2 26 0 0 5792 2 27 0 1 4225 2 4236 24 0 1 3 0 6 0 0 174 0 1 1 2 7 0 27 0 1 4243 2 4240 6 0 1 33 0 27 0 0 4243 2 27 0 2 4285 2 25 1 2 0 0 4244 24 0 1 3 0 2 0 0 175 0 1 1 3 6145 0 2 0 1 41 0 4248 24 1 0 4651 2 6 1 0 2188 2 2 1 0 3530 2 26 0 0 5811 2 4252 6 1 0 327 2 2 1 0 3536 2 1 1 3 4283 2 26 0 0 5834 2 4256 24 0 1 3 0 6 0 0 167 0 0 0 3 2045 2 7 1 0 3536 2 4260 0 0 3 2096 2 25 1 2 0 0 24 0 1 3 0 2 0 0 167 0 4264 24 1 0 7346 2 24 0 1 1278 2 6 0 0 1280 2 1 1 2 82 0 4268 27 0 3 4225 2 1 1 3 50 0 26 0 0 5053 2 26 0 0 5618 2 4272 1 1 3 48 0 2 0 3 177 0 26 0 0 5752 2 26 0 0 5728 2 4276 26 0 0 5618 2 6 0 3 177 0 5 0 0 2050 2 27 0 0 4227 2 4280 24 1 0 4273 2 24 0 1 3 0 2 0 0 167 0 1 1 3 7 0 4284 24 1 0 4441 2 1 1 3 7 0 2 0 1 31 0 24 0 1 3 0 4288 2 0 0 167 0 6 0 1 33 0 24 1 0 4123 2 27 0 0 4422 2 4292 27 0 0 4344 2 27 0 0 4630 2 27 0 1 4419 2 26 0 0 5719 2 4296 27 0 0 7062 2 24 1 0 4228 2 PROCEDURE 286 4298 26 0 0 5626 2 24 0 1 1278 2 4300 6 0 0 1280 2 1 1 2 7 0 27 0 1 4307 2 6 0 0 6 0 4304 18 0 0 4124 0 1 1 2 14 0 27 0 1 4444 2 6 1 3 0 0 4308 24 0 1 3 0 2 1 0 178 0 26 0 0 5564 2 1 1 3 3 0 4312 26 0 0 5053 2 26 0 0 5752 2 26 0 0 5728 2 24 0 1 3 0 4316 6 0 0 160 0 27 0 0 4320 2 1 1 3 2 0 24 1 0 4312 2 4320 26 0 0 5258 2 27 0 1 4365 2 26 0 0 5618 2 2 0 3 171 0 4324 2 0 3 186 0 26 0 0 5392 2 26 0 0 5626 2 6 1 0 2074 2 4328 2 1 3 0 0 24 0 3 3 0 6 1 0 178 0 1 0 1 15 0 4332 14 1 3 0 0 26 0 0 5626 2 24 0 1 3 0 6 1 0 179 0 4336 5 0 0 2385 2 27 0 0 4344 2 6 1 3 2 0 5 1 0 2066 2 4340 27 0 0 4343 2 24 0 2 1 0 7 1 3 3 0 26 0 0 5631 2 4344 26 0 0 5560 2 26 0 0 5637 2 26 0 0 5728 2 0 0 3 2045 2 4348 1 1 3 1 0 24 0 1 1278 2 7 0 0 1504 2 0 0 3 2096 2 4352 24 0 1 3 0 6 0 0 160 0 27 0 0 4391 2 1 1 3 1 0 4356 24 0 3 1278 2 7 0 0 1472 2 26 0 0 5792 2 27 0 1 4333 2 4360 6 0 0 2100 2 24 0 1 3 0 2 0 0 175 0 1 1 3 5121 0 4364 24 1 0 4247 2 26 0 0 5264 2 24 1 0 4378 2 26 0 0 5618 2 4368 1 1 3 4320 2 2 0 3 162 0 26 0 0 5443 2 26 0 0 5276 2 4372 24 1 0 4320 2 26 0 0 5345 2 24 1 0 4506 2 26 0 0 5331 2 4376 26 0 0 5371 2 24 1 0 4320 2 1 0 1 3 0 26 0 0 5618 2 4380 15 1 3 179 0 2 0 0 2396 2 26 0 0 5626 2 15 1 3 1 0 4384 5 0 0 2396 2 27 0 0 4325 2 1 1 3 3 0 26 0 0 5053 2 4388 26 0 0 5752 2 26 0 0 5728 2 24 1 0 4320 2 PROCEDURE 287 4391 6 1 0 2188 2 4392 2 1 0 3530 2 26 0 0 5661 2 26 0 0 5756 2 24 0 1 3 0 4396 6 1 0 179 0 2 0 0 3534 2 26 1 3 1278 2 1 1 3 1 0 4400 26 0 0 5569 2 27 0 0 4405 2 6 0 3 1472 2 1 1 2 11 0 4404 27 0 3 4419 2 0 0 3 2045 2 1 1 3 2116 2 12 0 3 1472 2 4408 2 1 0 3537 2 6 1 0 3536 2 1 1 2 64 0 0 0 3 2096 2 4412 24 0 3 3 0 2 0 0 167 0 2 0 3 1472 2 6 1 0 329 2 4416 2 1 0 3536 2 24 0 2 4419 2 24 1 0 4255 2 6 1 1 30 0 4420 2 1 0 1278 2 26 0 0 5800 2 24 0 1 3 0 2 0 0 167 0 4424 26 0 0 5626 2 24 0 1 3 0 6 1 0 178 0 2 1 3 0 0 4428 6 0 0 2050 2 26 0 0 5576 2 26 0 0 5728 2 26 1 2 1278 2 4432 0 0 2 2050 2 24 0 1 3 0 6 1 0 179 0 5 0 0 2385 2 4436 27 0 0 4438 2 26 0 0 5631 2 26 0 0 5560 2 26 0 0 5637 2 4440 6 0 0 2099 2 3 0 0 1279 2 26 0 0 5708 2 26 0 0 5800 2 PROCEDURE 288 4444 26 0 0 5618 2 6 0 3 174 0 27 0 1 4448 2 6 0 0 1279 2 4448 2 0 1 31 0 2 0 3 174 0 24 1 0 3784 2 PROCEDURE 289 4451 24 0 2 4 0 4452 24 1 0 4456 2 1 1 3 3 0 24 1 0 4456 2 6 0 0 2100 2 4456 26 0 0 5053 2 26 0 0 5618 2 6 0 3 171 0 1 1 2 4320 2 4460 27 0 0 4475 2 0 0 2 2050 2 26 1 2 1278 2 6 0 2 1280 2 4464 1 1 2 8 0 27 0 3 4467 2 26 0 0 5631 2 26 0 0 5556 2 4468 26 0 0 5637 2 6 0 3 164 0 27 0 1 4476 2 1 1 3 7 0 4472 2 0 0 1279 2 6 0 3 171 0 24 1 0 5722 2 26 0 0 5752 2 4476 25 1 2 0 0 24 1 0 4472 2 PROCEDURE 290 4478 25 1 2 0 0 26 0 0 5669 2 4480 24 1 0 5591 2 PROCEDURE 291 4481 24 0 2 4485 2 26 0 0 5818 2 26 0 0 5613 2 4484 24 1 0 8145 2 26 0 0 5618 2 6 0 3 164 0 27 0 1 4528 2 4488 6 0 3 187 0 27 0 0 4499 2 26 0 0 5422 2 24 1 0 4497 2 4492 6 0 0 2100 2 2 0 3 175 0 6 0 3 183 0 2 0 3 172 0 4496 24 1 0 4521 2 25 1 2 0 0 24 1 0 4493 2 26 0 0 5622 2 4500 24 0 1 3 0 6 0 0 175 0 27 0 1 4512 2 6 0 3 1280 2 4504 1 1 2 9 0 27 0 2 4515 2 26 0 0 5618 2 1 1 3 4510 2 4508 1 1 2 3801 2 24 1 0 4448 2 26 0 0 5618 2 24 1 0 5083 2 4512 6 0 3 1280 2 1 1 2 6 0 27 0 3 4506 2 PROCEDURE 292 4515 26 0 0 5618 2 4516 6 0 3 175 0 27 0 0 4521 2 24 0 1 1278 2 6 0 0 1280 2 4520 24 1 0 4526 2 24 0 1 1278 2 6 0 0 1280 2 0 0 3 2045 2 4524 5 0 0 2050 2 0 0 3 2096 2 3 0 3 170 0 2 0 3 164 0 4528 6 0 3 175 0 27 0 1 4541 2 6 0 3 170 0 1 1 2 8 0 4532 27 0 2 4539 2 24 0 1 1278 2 19 0 3 0 0 26 0 0 5728 2 4536 26 0 0 5752 2 26 0 0 5728 2 24 1 0 4555 2 26 0 0 6668 2 4540 24 1 0 4555 2 6 0 3 170 0 1 1 2 6 0 27 0 1 4549 2 4544 24 0 1 1278 2 6 0 0 64 0 18 0 0 4124 0 1 1 2 14 0 4548 27 0 0 7059 2 26 0 0 7039 2 6 0 3 170 0 1 1 2 7 0 4552 27 0 1 4555 2 1 1 3 2 0 26 0 0 5053 2 26 0 0 5618 2 4556 6 0 3 170 0 24 0 1 1278 2 3 0 0 1280 2 0 0 3 2045 2 4560 1 1 2 9 0 0 0 3 2096 2 27 0 0 4576 2 27 0 3 4576 2 4564 2 0 3 177 0 26 0 0 5631 2 26 0 0 5752 2 26 0 0 5637 2 4568 26 0 0 5728 2 26 0 0 5264 2 24 1 0 4565 2 26 0 0 5618 2 4572 6 0 3 177 0 0 0 3 2045 2 1 1 2 1 0 24 1 0 4561 2 4576 26 0 0 5258 2 27 0 0 4606 2 27 0 3 4596 2 26 0 0 5264 2 4580 24 1 0 4645 2 26 0 0 5752 2 26 0 0 5728 2 26 0 0 5258 2 4584 27 0 0 4606 2 27 0 3 4596 2 1 1 3 2 0 26 0 0 5053 2 4588 1 1 3 4576 2 24 0 1 3 0 2 0 0 162 0 26 0 0 5276 2 4592 24 1 0 4576 2 26 0 0 5331 2 26 0 0 5371 2 24 1 0 4576 2 PROCEDURE 293 4596 26 0 0 5618 2 2 0 3 185 0 6 0 3 170 0 1 1 2 8 0 4600 27 0 3 4602 2 26 0 0 5631 2 26 0 0 5752 2 26 0 0 5637 2 4604 26 0 0 5728 2 24 1 0 4576 2 26 0 0 5618 2 2 0 3 171 0 4608 2 0 3 186 0 6 0 3 187 0 27 0 0 4633 2 6 0 3 175 0 4612 27 0 0 4629 2 26 0 0 5752 2 6 0 0 2050 2 26 0 0 5576 2 4616 26 0 0 5618 2 2 0 3 173 0 2 0 3 164 0 6 0 3 175 0 4620 27 0 1 4626 2 6 0 3 170 0 1 1 2 8 0 27 0 3 4626 2 4624 6 0 3 181 0 27 0 0 6970 2 26 0 0 5728 2 24 0 1 3 0 4628 26 0 1 172 0 26 0 0 5631 2 26 0 0 5556 2 26 0 0 5637 2 4632 24 1 0 4614 2 26 0 0 5392 2 26 0 0 5618 2 2 0 3 167 0 4636 2 0 3 164 0 6 0 3 175 0 27 0 0 4642 2 26 0 0 5626 2 4640 2 1 3 2 0 24 1 0 4391 2 6 0 0 2050 2 26 0 0 5576 2 4644 24 1 0 4227 2 24 0 1 3 0 6 0 0 186 0 27 0 0 4596 2 4648 1 1 3 2 0 26 0 0 5053 2 24 1 0 4604 2 PROCEDURE 294 4651 26 0 0 5618 2 4652 6 0 3 164 0 27 0 1 5388 2 6 1 0 3528 2 2 1 0 3530 2 4656 2 0 3 187 0 2 0 3 167 0 26 0 0 5811 2 6 0 3 175 0 4660 27 0 0 4664 2 24 0 1 3 0 6 1 0 179 0 2 0 0 3534 2 4664 24 0 1 3 0 24 0 1 175 0 6 1 0 327 2 2 1 0 3536 2 4668 1 1 3 69 0 7 1 0 3536 2 1 1 3 3648 2 24 1 0 5589 2 PROCEDURE 295 4672 6 0 1 30 0 2 0 0 1278 2 6 0 1 39 0 5 0 0 281 2 4676 27 0 0 4759 2 24 0 1 3 0 6 0 0 11 0 27 0 0 4686 2 4680 26 0 0 151 2 6 0 0 298 2 24 0 1 2764 2 2 0 0 64 0 4684 24 0 1 2783 2 24 1 0 6 0 26 0 0 8136 2 2 0 0 236 2 4688 1 1 3 2 0 2 0 0 179 0 24 0 1 2 0 24 0 1 37 0 4692 2 0 0 16 0 6 0 1 39 0 2 0 0 2406 2 26 0 0 4822 2 4696 6 0 0 2428 2 27 0 0 4711 2 6 0 0 2432 2 5 0 0 2 0 4700 27 0 1 4711 2 27 0 1 4704 2 2 1 0 2432 2 24 1 0 4708 2 4704 6 0 0 2434 2 5 0 0 2 0 27 0 1 4711 2 2 1 0 2434 2 4708 6 0 0 2428 2 1 1 2 2 0 2 0 0 2428 2 6 0 1 3 0 4712 27 0 2 4733 2 6 0 0 2036 2 2 0 1 2 0 6 0 1 0 0 4716 1 1 1 8191 0 1 1 1 1 0 2 0 1 26 0 6 0 0 2040 2 4720 4 0 0 2 0 2 0 1 3 0 6 0 0 2041 2 2 0 1 6 0 4724 6 0 0 2042 2 5 0 0 2 0 2 0 1 28 0 6 0 1 4 0 4728 27 0 2 4733 2 6 0 1 6 0 2 0 1 4 0 6 0 1 28 0 4732 2 0 1 27 0 6 0 1 9 0 2 0 1 7 0 24 0 1 236 2 4736 24 0 2 2200 2 2 0 0 322 2 24 0 1 236 2 24 1 0 4740 2 4740 6 0 1 9 0 2 0 1 35 0 26 0 0 1031 2 24 0 2 1000 2 4744 5 0 3 972 2 27 0 1 4747 2 2 0 0 971 2 2 0 3 972 2 4748 2 0 3 972 2 24 1 0 180 2 24 1 0 2003 2 27 0 3 4926 2 4752 27 0 3 4933 2 27 0 2 4926 2 27 0 0 4790 2 24 1 0 1924 2 4756 24 1 1 216 2 26 0 0 5719 2 27 0 2 4933 2 PROCEDURE 296 4759 24 0 1 3 0 4760 2 0 0 164 0 24 0 1 4763 2 24 1 0 4764 2 0 0 0 0 0 4764 24 1 0 4782 2 24 1 0 4772 2 24 1 0 4803 2 24 1 0 4801 2 4768 24 1 0 4807 2 24 1 0 4809 2 24 1 0 2003 2 24 1 0 4677 2 4772 6 1 0 2376 2 28 0 0 26 0 23 1 0 26 0 23 1 0 30 0 4776 23 1 0 28 0 6 0 0 2745 2 27 0 0 4784 2 25 1 2 0 0 4780 26 0 0 224 2 24 1 0 362 2 1 1 3 86 0 24 1 1 572 2 4784 6 0 0 2764 2 26 0 0 3329 2 24 1 0 4788 2 24 1 0 4798 2 4788 1 1 3 0 0 24 0 1 2522 2 2 1 0 2474 2 6 0 0 2402 2 4792 26 0 0 224 2 24 1 0 4799 2 24 0 1 4 0 24 0 1 2669 2 4796 26 1 1 36 0 24 1 0 4687 2 1 1 3 2 0 1 1 1 98 0 4800 24 1 0 2004 2 PROCEDURE 297 4801 6 1 0 2376 2 28 0 0 26 0 6 0 0 2031 2 4804 2 0 0 258 2 26 1 1 2400 2 24 1 0 4687 2 24 0 2 2220 2 4808 24 1 1 87 2 6 0 0 2462 2 24 0 1 2464 2 2 0 0 64 0 4812 6 0 0 2463 2 27 0 0 4816 2 1 1 3 84 0 24 1 1 719 2 4816 6 0 0 729 2 1 1 2 1686 2 27 0 3 4821 2 24 0 2 4782 2 4820 2 0 0 729 2 26 0 1 8035 2 PROCEDURE 298 4822 0 0 0 0 0 26 0 0 5745 2 4824 6 1 3 34 0 27 0 3 4856 2 18 1 0 4118 0 18 1 0 1 0 4828 27 0 0 4838 2 2 0 0 2396 2 18 1 0 2 0 25 1 2 0 0 4832 18 1 0 2 0 2 0 0 2397 2 6 0 0 2396 2 24 0 1 2397 2 4836 2 0 0 64 0 24 1 0 4827 2 18 1 0 4 0 25 1 2 0 0 4840 27 1 1 4827 2 5 1 3 34 0 2 1 3 34 0 1 0 1 3 0 4844 25 1 2 0 0 15 0 3 34 0 26 0 0 4859 2 25 1 2 0 0 4848 1 0 1 3 0 15 0 3 34 0 24 0 1 3558 2 5 0 0 3352 2 4852 27 0 1 4856 2 6 0 0 2060 2 24 0 1 3558 2 2 0 0 3353 2 4856 25 0 3 2 0 24 1 0 4824 2 26 0 1 4822 2 PROCEDURE 299 4859 0 0 0 0 0 4860 18 1 0 4127 0 18 1 3 1 0 18 0 3 3 0 2 0 0 3558 2 4864 18 1 3 3 0 2 0 0 3559 2 1 0 1 1 0 24 0 1 3559 2 4868 18 1 0 0 0 24 0 1 3558 2 14 1 0 3354 2 26 0 1 4859 2 PROCEDURE 300 4872 0 0 0 0 0 24 0 1 4872 2 26 1 1 24 0 6 0 1 31 0 4876 1 1 2 54 0 24 0 3 2 0 27 0 0 9 0 6 0 1 31 0 4880 1 1 2 6 0 27 0 0 6226 2 1 1 2 10 0 24 0 1 2 0 4884 27 0 0 18 0 6 1 1 30 0 2 1 0 1278 2 6 0 0 1279 2 4888 1 1 1 3801 2 1 1 2 6461 2 18 0 0 6 0 27 0 1 4908 2 4892 24 1 0 4922 2 6 0 0 1279 2 1 1 2 57 0 27 0 1 4908 2 4896 6 0 0 1279 2 1 1 2 50 0 27 0 0 4922 2 6 0 0 1279 2 4900 1 1 1 3801 2 1 1 2 6430 2 18 0 0 6 0 27 0 1 4908 2 4904 6 0 1 33 0 27 0 0 3746 2 4 0 0 2050 2 24 1 0 4214 2 4908 6 0 0 1278 2 1 1 2 128 0 27 0 3 4923 2 1 1 2 24 0 4912 27 0 2 4923 2 6 0 0 1279 2 1 1 2 8 0 27 0 0 5026 2 4916 1 1 2 40 0 27 0 0 4922 2 25 1 2 0 0 1 0 1 16 0 4920 24 0 1 1278 2 14 0 0 1312 2 26 0 1 4872 2 PROCEDURE 301 4923 25 1 2 0 0 4924 1 0 1 1 0 15 0 0 1279 2 6 0 0 1279 2 5 0 0 2050 2 4928 27 0 1 4933 2 5 0 0 2044 2 24 0 1 3 0 2 0 0 157 0 4932 26 0 1 4872 2 PROCEDURE 302 4933 6 0 0 1279 2 1 1 2 4 0 27 0 0 4951 2 4936 1 1 2 10 0 27 0 0 5023 2 1 1 2 10 0 27 0 0 4951 2 4940 1 1 1 5 0 27 0 0 4951 2 1 1 1 10 0 27 0 0 5023 2 4944 1 1 1 10 0 27 0 0 4951 2 6 0 0 1279 2 1 1 1 3801 2 4948 1 1 2 6365 2 5 0 0 2034 2 27 0 1 4922 2 6 0 0 1279 2 4952 24 0 1 3 0 2 0 0 157 0 24 0 1 3 0 2 0 0 156 0 4956 24 0 2 4993 2 26 0 0 5818 2 26 0 0 5626 2 24 0 1 3 0 4960 6 0 0 157 0 1 1 2 4 0 27 0 0 4989 2 1 1 2 20 0 4964 27 0 0 4989 2 25 0 3 2 0 24 0 1 6 0 23 0 3 0 0 4968 1 1 2 15 0 27 0 0 3745 2 24 0 1 6 0 0 1 2 0 0 4972 18 1 3 2 0 25 1 2 0 0 27 1 0 4965 2 18 1 3 6 0 4976 1 1 2 62 0 27 0 0 4989 2 1 1 1 32 0 27 0 1 4972 2 4980 25 0 3 2 0 0 0 2 2395 2 15 0 3 0 0 27 0 0 4965 2 4984 24 0 1 1278 2 6 0 0 64 0 24 0 1 3 0 2 0 0 156 0 4988 6 1 0 2192 2 2 1 0 3534 2 6 1 0 2190 2 2 1 0 3530 2 4992 24 1 0 5993 2 PROCEDURE 303 4993 26 0 0 5618 2 6 0 3 156 0 27 0 0 5018 2 4996 6 1 0 3542 2 24 0 1 3 0 28 1 1 128 0 6 1 0 2190 2 5000 2 1 3 132 0 6 1 0 2192 2 3 1 3 136 0 3 1 3 144 0 5004 2 1 3 152 0 6 1 0 2156 2 2 1 3 154 0 6 0 0 2056 2 5008 4 0 0 3 0 24 0 1 1278 2 2 0 0 64 0 26 0 0 5560 2 5012 26 0 0 5728 2 26 0 0 5618 2 6 0 3 156 0 24 0 1 1278 2 5016 2 0 0 64 0 2 0 3 156 0 26 0 0 5560 2 1 1 3 4 0 5020 2 0 0 1279 2 6 0 3 157 0 24 1 0 5724 2 PROCEDURE 304 5023 24 0 2 3820 2 5024 26 0 0 5818 2 24 1 0 4989 2 PROCEDURE 305 5026 26 0 0 5622 2 1 0 1 16 0 5028 15 0 3 1312 2 27 0 1 5037 2 6 0 0 2048 2 14 0 3 1312 2 5032 6 0 1 33 0 27 0 0 7283 2 1 0 1 15 0 14 0 1 44 0 5036 24 1 0 7283 2 5 0 0 2048 2 27 0 1 5042 2 5 0 0 2034 2 5040 7 0 3 1312 2 24 1 0 7283 2 26 0 0 5716 2 26 0 0 7369 2 5044 26 0 0 5183 2 26 0 0 5582 2 26 0 0 5760 2 26 0 0 7842 2 5048 26 0 0 5451 2 26 0 0 7039 2 26 0 0 5719 2 26 0 0 6325 2 5052 2 0 3 185 0 PROCEDURE 306 5053 0 0 0 0 0 24 0 1 3 0 2 0 0 177 0 5056 6 0 0 5053 2 24 0 1 3 0 2 0 0 161 0 26 0 0 5760 2 5060 24 0 1 1278 2 19 1 0 0 0 26 0 0 5728 2 26 0 0 5618 2 5064 6 0 3 177 0 5 0 0 2050 2 3 0 3 177 0 27 0 1 5060 2 5068 26 0 0 5760 2 26 0 0 5752 2 26 0 0 5728 2 24 0 1 3 0 5072 26 0 1 161 0 PROCEDURE 307 5073 0 0 0 0 0 26 0 0 5618 2 6 0 3 164 0 5076 27 0 1 5081 2 24 0 1 1278 2 2 0 0 1504 2 24 0 1 1278 2 5080 2 0 0 1528 2 6 0 0 5073 2 2 0 3 165 0 25 1 2 0 0 5084 2 0 3 157 0 2 0 3 158 0 26 0 0 5622 2 0 0 2 2048 2 5088 15 0 3 1376 2 27 0 0 5093 2 25 1 2 0 0 14 0 3 1376 2 5092 26 0 0 5760 2 24 0 1 1278 2 19 0 3 0 0 26 0 0 5637 2 5096 26 0 0 5719 2 26 0 0 5752 2 26 0 0 5719 2 1 1 3 5 0 5100 24 0 1 1278 2 2 0 0 1280 2 26 0 0 5111 2 26 0 0 5626 2 5104 6 1 3 7 0 24 0 1 1278 2 3 0 0 1552 2 24 0 1 3 0 5108 2 0 0 182 0 24 0 1 3 0 26 0 1 165 0 PROCEDURE 308 5111 0 0 0 0 0 5112 6 0 0 2050 2 26 0 0 5576 2 26 0 0 5618 2 6 0 0 5111 2 5116 2 0 3 166 0 26 0 0 5556 2 26 0 0 5637 2 6 0 3 164 0 5120 27 0 1 5147 2 1 1 3 7 0 2 0 0 1279 2 26 0 0 5716 2 5124 26 0 0 5258 2 27 0 1 5134 2 26 0 0 5618 2 2 0 3 171 0 5128 2 0 3 186 0 6 0 3 187 0 27 0 1 5132 2 26 0 0 5392 2 5132 24 0 1 3 0 26 0 1 166 0 26 0 0 5264 2 24 1 0 5149 2 5136 1 1 3 5124 2 24 0 1 3 0 2 0 0 162 0 26 0 0 5443 2 5140 26 0 0 5276 2 24 1 0 5124 2 26 0 0 5345 2 24 1 0 4506 2 5144 26 0 0 5331 2 26 0 0 5371 2 24 1 0 5124 2 26 0 0 5728 2 5148 24 1 0 5124 2 26 0 0 5618 2 6 0 3 186 0 27 0 0 5117 2 5152 1 1 3 3 0 26 0 0 5053 2 26 0 0 5556 2 24 1 0 5147 2 PROCEDURE 309 5156 0 0 0 0 0 26 0 0 5626 2 6 0 0 2050 2 26 0 0 5576 2 5160 24 0 1 1278 2 6 0 0 1280 2 2 1 3 1 0 6 1 0 2066 2 5164 2 1 3 2 0 6 1 0 3554 2 2 1 3 4 0 6 1 0 2156 2 5168 2 1 3 6 0 26 0 0 5631 2 26 0 0 5560 2 26 0 0 5637 2 5172 6 0 0 5156 2 24 0 1 3 0 2 0 0 197 0 6 0 0 2099 2 5176 2 0 0 1279 2 26 0 0 5716 2 26 0 0 5626 2 6 1 0 2064 2 5180 4 0 0 2100 2 24 0 1 3 0 26 0 1 197 0 PROCEDURE 310 5183 0 0 0 0 0 5184 2 1 3 0 0 6 0 0 2050 2 26 0 0 5576 2 24 0 1 1278 2 5188 6 0 0 1280 2 2 1 3 5 0 26 0 0 5631 2 26 0 0 5560 2 5192 26 0 0 5637 2 6 0 0 5183 2 24 0 1 3 0 2 0 0 197 0 5196 6 0 0 2099 2 2 0 0 1279 2 26 0 0 5716 2 26 0 0 5626 2 5200 6 1 0 3556 2 3 1 3 0 0 2 1 3 2 0 26 0 0 5631 2 5204 26 0 0 5560 2 26 0 0 5637 2 26 0 0 5719 2 25 1 2 0 0 5208 26 0 0 5564 2 24 0 1 3 0 26 0 1 197 0 PROCEDURE 311 5211 0 0 0 0 0 5212 26 0 0 5622 2 6 0 3 1376 2 18 0 0 2 0 1 1 1 113 0 5216 18 0 0 4 0 2 1 0 3538 2 1 0 1 3 0 15 0 3 1312 2 5220 18 1 0 4127 0 18 0 0 1 0 18 1 0 1 0 26 0 1 5211 2 PROCEDURE 312 5224 0 0 0 0 0 1 1 3 4 0 26 0 0 5811 2 6 0 0 3533 2 5228 2 0 0 3534 2 6 1 0 2194 2 2 1 0 3530 2 6 0 0 5224 2 5232 1 1 2 3744 2 2 0 0 3533 2 3 0 0 3533 2 1 1 2 9 0 5236 27 0 1 5238 2 2 0 0 3534 2 25 1 2 0 0 2 0 0 1279 2 5240 26 0 0 5708 2 6 0 0 7417 2 24 0 1 3 0 2 0 0 176 0 5244 24 1 0 7345 2 PROCEDURE 313 5245 6 0 3 162 0 2 0 3 171 0 26 0 0 5626 2 5248 6 1 3 1 0 2 0 0 3536 2 6 1 0 319 2 2 1 0 3530 2 5252 26 0 0 5811 2 24 0 2 4217 0 2 0 1 41 0 2 1 0 3538 2 5256 1 1 3 3692 2 24 1 0 5589 2 PROCEDURE 314 5258 0 0 0 0 0 26 0 0 5626 2 5260 6 1 3 1 0 24 0 1 1278 2 5 0 0 1280 2 26 0 1 5258 2 PROCEDURE 315 5264 0 0 0 0 0 26 0 0 5626 2 6 1 3 0 0 18 1 0 4118 0 5268 18 1 0 2 0 1 1 2 95 0 27 0 1 5272 2 26 0 1 5264 2 5272 25 1 2 0 0 27 1 1 5268 2 24 0 1 5264 2 24 1 0 1 0 PROCEDURE 316 5276 0 0 0 0 0 6 0 0 5276 2 24 0 1 3 0 2 0 0 183 0 5280 26 0 0 5626 2 24 0 1 3 0 6 0 0 185 0 27 0 1 5287 2 5284 6 1 3 1 0 24 0 1 3 0 2 0 0 184 0 24 0 1 1278 2 5288 6 0 0 1280 2 0 0 3 2045 2 5 1 3 1 0 27 0 0 5325 2 5292 27 0 3 5310 2 1 1 2 8 0 27 0 2 5328 2 1 1 1 7 0 5296 0 0 3 2096 2 27 0 0 5306 2 24 0 1 3 0 2 0 0 177 0 5300 26 0 0 5752 2 26 0 0 5728 2 24 0 1 3 0 6 0 0 177 0 5304 5 0 0 2050 2 27 0 1 5298 2 26 0 0 5422 2 24 1 0 5322 2 5308 26 0 0 5752 2 24 1 0 5323 2 6 1 3 1 0 24 0 1 1278 2 5312 5 0 0 1280 2 1 1 2 8 0 27 0 2 5328 2 1 1 1 10 0 5316 0 0 3 2096 2 27 0 3 5328 2 24 0 1 3 0 3 0 0 186 0 5320 26 0 0 5053 2 24 1 0 5306 2 26 0 0 5556 2 26 0 0 5728 2 5324 26 0 0 5371 2 0 0 3 2096 2 24 0 1 3 0 26 0 1 183 0 5328 0 0 3 2096 2 24 0 1 5276 2 24 1 0 1 0 PROCEDURE 317 5331 0 0 0 0 0 5332 6 0 0 5331 2 24 0 1 3 0 2 0 0 173 0 6 0 0 2100 2 5336 26 0 0 5053 2 26 0 0 5422 2 24 1 0 5343 2 26 0 0 5752 2 5340 26 0 0 5728 2 24 0 1 3 0 26 0 1 173 0 26 0 0 5556 2 5344 24 1 0 5340 2 PROCEDURE 318 5345 0 0 0 0 0 6 0 0 5345 2 24 0 1 3 0 5348 2 0 0 173 0 24 0 1 1278 2 6 0 0 1280 2 1 1 2 6 0 5352 27 0 1 5369 2 26 0 0 5371 2 6 0 3 185 0 5 0 0 2100 2 5356 27 0 1 5360 2 26 0 0 5556 2 26 0 0 5728 2 24 1 0 5322 2 5360 26 0 0 5760 2 26 0 0 5728 2 24 0 1 1278 2 19 1 1 0 0 5364 6 0 0 2048 2 24 0 1 1278 2 7 0 0 1376 2 24 0 1 3 0 5368 26 0 1 173 0 24 0 1 5345 2 24 1 0 1 0 PROCEDURE 319 5371 0 0 0 0 0 5372 26 0 0 5618 2 6 0 3 185 0 4 0 0 2050 2 3 0 3 185 0 5376 1 1 2 6 0 27 0 0 5379 2 26 0 1 5371 2 26 0 0 5383 2 5380 6 0 0 2050 2 2 0 3 187 0 24 1 0 5245 2 PROCEDURE 320 5383 0 0 0 0 0 5384 2 0 3 185 0 6 0 3 164 0 27 0 1 5388 2 26 0 1 5383 2 5388 6 1 0 2236 2 2 1 0 3530 2 1 1 3 4485 2 24 1 0 4206 2 PROCEDURE 321 5392 0 0 0 0 0 1 1 3 2 0 26 0 0 5569 2 27 0 1 5418 2 5396 6 0 0 5392 2 24 0 1 3 0 2 0 0 173 0 24 0 1 3 0 5400 6 0 0 185 0 27 0 0 5414 2 6 1 0 2228 2 2 1 0 3530 2 5404 26 0 0 5811 2 2 1 0 3538 2 24 0 1 3 0 6 0 0 184 0 5408 2 0 0 3536 2 24 0 1 3 0 2 0 0 185 0 24 0 2 5413 2 5412 24 1 0 7163 2 26 0 0 5800 2 6 1 1 30 0 2 1 0 1278 2 5416 24 0 1 3 0 26 0 1 173 0 25 1 2 0 0 24 0 1 3 0 5420 2 0 0 185 0 26 0 1 5392 2 PROCEDURE 322 5422 0 0 0 0 0 26 0 0 5618 2 5424 6 0 3 162 0 1 1 2 4320 2 27 0 0 5441 2 1 1 1 4320 2 5428 1 1 2 4576 2 27 0 1 5433 2 6 0 3 175 0 27 0 1 5441 2 5432 26 0 1 5422 2 6 0 3 162 0 1 1 2 7679 2 27 0 0 5439 2 5436 1 1 1 7679 2 1 1 2 7597 2 27 0 1 5432 2 6 0 3 181 0 5440 27 0 1 5432 2 24 0 1 5422 2 24 1 0 1 0 PROCEDURE 323 5443 0 0 0 0 0 5444 24 0 1 3 0 6 0 0 171 0 27 0 0 5450 2 26 0 0 5618 2 5448 26 0 0 5383 2 24 1 0 5245 2 26 0 1 5443 2 PROCEDURE 324 5451 0 0 0 0 0 5452 6 0 0 5451 2 26 0 0 5818 2 26 0 0 5483 2 6 1 0 2254 2 5456 2 1 0 3530 2 1 1 3 4 0 26 0 0 5661 2 26 0 0 5211 2 5460 2 0 0 3534 2 24 1 0 7345 2 PROCEDURE 325 5462 0 0 0 0 0 26 0 0 5495 2 5464 24 1 0 5466 2 26 0 1 5462 2 26 1 3 2106 2 24 0 1 2397 2 5468 6 0 3 3400 2 24 0 1 1278 2 2 0 3 3400 2 24 0 1 2397 2 5472 6 0 0 3404 2 24 0 1 1278 2 2 0 0 3404 2 24 0 1 2397 2 5476 6 0 0 3416 2 24 0 1 1278 2 2 0 0 3416 2 26 0 1 5462 2 5480 25 0 3 4 0 24 1 0 5467 2 26 0 1 5462 2 PROCEDURE 326 5483 0 0 0 0 0 5484 26 0 0 5495 2 24 1 0 5487 2 26 0 1 5483 2 26 1 3 306 2 5488 24 0 1 2397 2 6 0 3 1280 2 24 0 1 1278 2 2 0 3 1280 2 5492 25 0 3 32 0 24 1 0 5488 2 26 0 1 5483 2 PROCEDURE 327 5495 0 0 0 0 0 5496 6 0 1 39 0 5 0 0 2668 2 27 0 0 5526 2 26 0 0 5738 2 5500 27 0 0 5505 2 25 0 3 2 0 24 1 0 5740 2 1 1 3 87 0 5504 24 1 0 2004 2 1 0 1 12 0 15 0 3 34 0 5 0 0 2047 2 5508 27 0 0 5526 2 6 0 3 34 0 18 0 0 5 0 4 0 3 35 0 5512 2 1 3 34 0 1 0 1 3 0 15 0 3 34 0 26 0 0 5528 2 5516 24 0 1 1278 2 6 0 0 64 0 24 0 1 2396 2 2 0 0 64 0 5520 6 0 0 1278 2 2 0 0 2397 2 6 0 0 2396 2 3 0 1 30 0 5524 2 0 0 1278 2 26 0 1 5495 2 24 0 1 5495 2 24 1 0 1 0 PROCEDURE 328 5528 0 0 0 0 0 2 0 0 2396 2 6 0 0 6 0 5 0 0 3 0 5532 18 1 0 4119 0 13 0 0 2100 2 2 1 0 6 0 6 0 0 3 0 5536 3 0 0 4 0 5 0 0 2100 2 2 0 0 5 0 6 0 2 4 0 5540 4 0 2 4 0 7 0 0 5 0 4 0 0 2050 2 4 0 2 20 0 5544 7 0 0 6 0 6 0 3 0 0 5 0 0 1278 2 27 0 0 5550 2 5548 1 1 3 86 0 24 1 0 2004 2 6 0 0 2396 2 2 0 3 0 0 5552 5 0 2 20 0 25 0 2 2 0 24 1 0 5543 2 26 0 1 5528 2 PROCEDURE 329 5556 0 0 0 0 0 24 0 1 1278 2 19 0 1 0 0 26 0 1 5556 2 PROCEDURE 330 5560 0 0 0 0 0 24 0 1 1278 2 19 0 0 0 0 26 0 1 5560 2 PROCEDURE 331 5564 0 0 0 0 0 0 0 3 2045 2 1 1 2 1 0 26 0 0 5576 2 5568 26 0 1 5564 2 PROCEDURE 332 5569 0 0 0 0 0 2 0 0 2396 2 0 0 2 2050 2 5572 24 0 1 2396 2 18 1 3 0 0 15 0 0 908 2 26 0 1 5569 2 PROCEDURE 333 5576 0 0 0 0 0 0 0 3 2045 2 24 0 1 1278 2 7 0 0 1280 2 5580 0 0 3 2096 2 26 0 1 5576 2 PROCEDURE 334 5582 0 0 0 0 0 6 0 0 2050 2 5584 0 0 3 2045 2 24 0 1 1278 2 7 0 0 1312 2 0 0 3 2096 2 5588 26 0 1 5582 2 PROCEDURE 335 5589 24 0 1 3 0 28 1 2 130 0 26 0 0 990 2 5592 6 1 0 3540 2 4 0 0 3 0 28 1 1 106 2 1 1 3 3728 2 5596 2 0 1 43 0 6 0 0 2 0 2 0 0 2448 2 6 0 0 2048 2 5600 2 0 1 38 0 24 1 0 1045 2 PROCEDURE 336 5602 24 0 1 3 0 28 1 2 130 0 5604 26 0 0 1012 2 6 1 0 3540 2 4 0 0 3 0 28 1 1 106 2 5608 24 0 1 3 0 6 0 0 176 0 2 0 0 5611 2 0 0 0 0 0 5612 24 1 0 1045 2 PROCEDURE 337 PROCEDURE 338 5613 0 0 0 0 0 6 0 0 2026 2 5 0 1 30 0 5616 2 0 1 7 0 26 0 1 5613 2 PROCEDURE 339 5618 0 0 0 0 0 6 0 0 3 0 5620 2 1 0 6 0 26 0 1 5618 2 PROCEDURE 340 5622 0 0 0 0 0 6 0 0 1278 2 5624 2 1 0 6 0 26 0 1 5622 2 PROCEDURE 341 5626 0 0 0 0 0 24 0 1 1278 2 5628 6 0 0 64 0 2 1 0 6 0 26 0 1 5626 2 PROCEDURE 342 5631 0 0 0 0 0 5632 26 1 2 1278 2 0 0 2 2050 2 6 0 2 1440 2 14 0 2 64 0 5636 26 0 1 5631 2 PROCEDURE 343 5637 0 0 0 0 0 25 1 2 0 0 0 0 2 2050 2 5640 24 0 1 1278 2 14 0 0 64 0 26 0 1 5637 2 PROCEDURE 344 5643 0 0 0 0 0 5644 25 1 2 0 0 0 0 2 2385 2 15 0 0 1278 2 2 0 0 321 2 5648 6 0 0 1278 2 18 0 3 1 0 18 0 0 4127 0 1 1 2 3 0 5652 27 0 0 5657 2 6 0 0 321 2 18 0 3 2 0 1 1 1 88 0 5656 24 1 0 5659 2 6 0 0 321 2 18 0 3 3 0 2 0 0 321 2 5660 26 0 1 5643 2 PROCEDURE 345 5661 0 0 0 0 0 26 0 0 5669 2 0 0 3 2054 2 5664 1 1 3 2142 2 12 0 1 30 0 0 0 3 2096 2 2 0 0 3533 2 5668 26 0 1 5661 2 PROCEDURE 346 5669 0 0 0 0 0 1 1 1 2358 2 24 0 1 3 0 5672 28 1 2 128 0 26 0 1 5669 2 3 0 0 0 0 26 1 3 2096 2 5676 26 0 0 6325 2 26 0 0 5719 2 25 1 2 0 0 27 0 0 5960 2 PROCEDURE 347 5680 0 0 0 0 0 0 0 3 2051 2 6 0 0 5680 2 1 1 2 3888 2 5684 27 0 1 5687 2 6 0 1 45 0 27 0 0 5692 2 6 0 0 156 0 5688 4 0 0 2105 2 2 0 1 45 0 0 0 3 2096 2 26 0 1 5680 2 5692 6 0 0 156 0 1 1 1 2 0 2 0 1 45 0 0 0 3 2096 2 5696 24 1 0 751 2 6 0 0 156 0 4 0 0 5701 2 2 0 1 45 0 5700 26 0 1 5680 2 0 0 1 3808 0 PROCEDURE 348 5702 0 0 0 0 0 25 1 2 0 0 5704 2 0 0 1279 2 24 0 1 3 0 2 0 0 160 0 26 0 1 5702 2 PROCEDURE 349 5708 0 0 0 0 0 25 1 2 0 0 0 0 2 2052 2 15 0 0 1278 2 5712 2 0 0 6 0 6 1 0 1278 2 2 1 3 3352 2 26 0 1 5708 2 PROCEDURE 350 5716 0 0 0 0 0 6 0 0 5716 2 24 1 0 5722 2 PROCEDURE 351 5719 0 0 0 0 0 5720 26 0 0 5702 2 6 0 0 5719 2 1 1 2 3801 2 4 0 0 2034 2 5724 2 0 1 31 0 26 0 0 5708 2 2 0 1 45 0 24 1 0 3784 2 PROCEDURE 352 5728 0 0 0 0 0 26 0 0 5702 2 6 0 0 5728 2 1 1 2 3801 2 5732 4 0 0 2034 2 2 0 1 31 0 26 0 0 5708 2 2 0 1 45 0 5736 26 0 0 5613 2 24 1 0 3789 2 PROCEDURE 353 5738 0 0 0 0 0 26 0 0 5745 2 5740 25 1 2 0 0 1 0 1 3 0 15 0 3 34 0 5 0 0 1278 2 5744 26 0 1 5738 2 PROCEDURE 354 5745 0 0 0 0 0 6 0 0 3 0 3 0 0 6 0 5748 4 0 3 5 0 4 0 3 5 0 2 0 0 7 0 26 0 1 5745 2 PROCEDURE 355 5752 0 0 0 0 0 24 0 1 1278 2 19 1 3 0 0 26 0 1 5752 2 PROCEDURE 356 5756 0 0 0 0 0 6 0 1 39 0 2 0 0 3532 2 26 0 1 5756 2 PROCEDURE 357 5760 0 0 0 0 0 6 0 0 392 2 27 0 1 5786 2 27 0 1 5787 2 5764 26 0 0 5618 2 6 0 0 5760 2 2 0 3 190 0 6 0 0 157 0 5768 2 0 3 191 0 24 0 2 5771 2 24 1 0 8143 2 0 0 3 2045 2 5772 6 0 0 157 0 24 0 1 3 0 5 0 0 191 0 27 0 2 5777 2 5776 4 0 0 2034 2 1 1 2 384 0 0 0 3 2096 2 27 0 3 5769 2 5780 26 0 0 5800 2 6 1 1 30 0 2 1 0 1278 2 26 0 0 5719 2 5784 24 0 1 3 0 26 0 1 190 0 6 0 0 5791 2 1 1 3 2143 0 5788 1 1 2 1 0 27 0 1 5788 2 26 0 1 5760 2 0 0 3 6192 0 PROCEDURE 358 5792 0 0 0 0 0 24 0 1 3 0 6 0 0 167 0 4 0 0 2050 2 5796 24 0 1 3 0 3 0 0 167 0 1 1 2 6 0 26 0 1 5792 2 PROCEDURE 359 5800 0 0 0 0 0 24 0 2 3885 2 2 0 1 42 0 6 0 1 35 0 5804 2 0 1 7 0 26 0 1 5800 2 PROCEDURE 360 5806 0 0 0 0 0 6 0 1 35 0 5808 4 0 0 2100 2 2 0 1 7 0 26 0 1 5806 2 PROCEDURE 361 5811 0 0 0 0 0 5812 26 0 0 5661 2 26 0 0 5756 2 24 0 1 1278 2 6 0 0 1280 2 5816 2 0 0 3534 2 26 0 1 5811 2 PROCEDURE 362 5818 0 0 0 0 0 1 1 2 3801 2 5820 2 0 1 31 0 6 0 0 2061 2 2 0 0 1279 2 26 0 0 5708 2 5824 24 0 1 1278 2 19 1 2 0 0 26 0 0 5680 2 6 0 0 3900 2 5828 24 0 1 3 0 2 0 0 176 0 1 1 3 4 0 26 0 0 5661 2 5832 26 0 0 5756 2 26 0 1 5818 2 PROCEDURE 363 5834 0 0 0 0 0 2 0 1 42 0 5836 6 0 0 1009 2 24 0 1 3 0 2 0 0 176 0 26 0 1 5834 2 PROCEDURE 364 5840 6 0 0 2050 2 24 0 1 1278 2 2 0 0 3416 2 26 0 0 5931 2 5844 26 0 0 5962 2 27 0 1 5988 2 26 0 0 5977 2 27 0 1 5988 2 5848 6 1 3 3 0 24 0 1 1278 2 2 0 0 3400 2 6 0 3 5 0 5852 24 0 1 1278 2 2 0 0 3404 2 1 0 1 3 0 15 1 3 5 0 5856 24 0 1 1278 2 2 0 0 3416 2 26 0 0 6061 2 1 1 3 5 0 5860 2 0 0 1279 2 24 0 1 3 0 2 0 0 168 0 26 0 0 5556 2 5864 24 1 0 3880 2 PROCEDURE 365 5865 1 1 3 5898 2 26 0 0 5818 2 26 0 0 5462 2 5868 6 1 0 2254 2 2 1 0 3530 2 1 1 3 4 0 26 0 0 5661 2 5872 26 0 0 5622 2 6 0 3 3404 2 18 0 0 1 0 1 1 1 49 0 5876 18 0 0 4 0 2 1 0 3536 2 6 0 3 3416 2 1 1 2 10 0 5880 27 0 0 5896 2 6 0 3 3416 2 0 0 3 2045 2 1 1 2 153 0 5884 27 0 0 5894 2 1 1 1 154 0 0 0 3 2096 2 3 0 3 3416 2 5888 2 1 0 3545 2 6 1 0 3544 2 7 1 0 3536 2 6 0 3 3400 2 5892 2 0 0 3534 2 24 1 0 7346 2 6 0 0 2050 2 24 1 0 5886 2 5896 1 1 3 4112 0 24 1 0 5890 2 26 0 0 5931 2 26 0 0 5962 2 5900 27 0 1 5997 2 15 1 3 5 0 24 0 1 1278 2 2 0 0 3416 2 5904 6 1 3 3 0 24 0 1 1278 2 5 0 0 3400 2 27 0 1 5997 2 5908 6 0 3 5 0 24 0 1 1278 2 5 0 0 3404 2 27 0 1 5997 2 5912 24 0 1 3 0 2 0 0 168 0 6 0 0 5923 2 18 0 0 5 0 5916 24 0 1 1278 2 24 1 2 64 0 28 0 0 0 0 26 0 0 5556 2 5920 1 1 3 5 0 3 0 0 1279 2 24 1 0 5724 2 2 0 0 8 0 PROCEDURE 366 5924 26 0 0 5931 2 26 0 0 5977 2 27 0 1 5988 2 6 0 0 2057 2 5928 26 0 0 6061 2 1 1 3 6 0 24 1 0 5860 2 PROCEDURE 367 5931 0 0 0 0 0 5932 6 0 0 5931 2 24 0 1 3 0 2 0 0 168 0 26 0 0 5556 2 5936 24 0 1 3 0 6 0 0 168 0 1 1 2 5925 2 27 0 0 5959 2 5940 1 1 3 5 0 2 0 0 1279 2 26 0 0 5719 2 24 0 1 3 0 5944 6 0 0 160 0 27 0 0 5949 2 26 0 0 6911 2 6 0 0 2188 2 5948 24 1 0 5992 2 26 0 0 5626 2 6 1 3 0 0 5 1 0 2070 2 5952 27 0 1 5999 2 1 0 1 4 0 15 1 3 5 0 1 1 2 256 0 5956 27 0 1 5999 2 24 0 1 3 0 26 0 1 168 0 26 0 0 6282 2 5960 1 1 3 6 0 24 1 0 5941 2 PROCEDURE 368 5962 0 0 0 0 0 1 0 1 3 0 5964 15 1 3 5 0 5 0 0 2128 2 27 0 0 5971 2 4 0 0 2128 2 5968 24 0 1 1278 2 5 0 0 3416 2 27 0 1 5973 2 24 0 1 5962 2 5972 24 1 0 1 0 24 0 1 1278 2 6 0 0 3416 2 5 0 0 2128 2 5976 26 0 1 5962 2 PROCEDURE 369 5977 0 0 0 0 0 1 0 1 768 0 15 1 3 4 0 5980 1 0 1 28 0 15 1 3 3 0 2 1 0 3530 2 15 0 1 33 0 5984 18 0 0 6 0 15 0 1 32 0 5 1 0 3530 2 26 0 1 5977 2 PROCEDURE 370 5988 26 0 0 6911 2 1 0 1 12 0 15 0 1 33 0 18 0 0 6 0 5992 2 1 0 3534 2 2 1 0 3537 2 2 1 0 3538 2 24 0 2 3666 2 5996 24 1 0 5602 2 PROCEDURE 371 5997 26 0 0 6911 2 24 1 0 4207 2 PROCEDURE 372 5999 26 0 0 6911 2 6000 6 1 0 3550 2 24 1 0 5992 2 PROCEDURE 373 6002 2 0 0 6012 2 25 1 2 0 0 6004 26 0 0 6061 2 26 0 0 5626 2 6 1 3 0 0 5 1 0 2074 2 6008 27 0 0 3746 2 5 1 0 2072 2 27 0 0 6026 2 26 0 0 7301 2 6012 0 0 0 0 0 25 1 2 0 0 24 0 1 1278 2 24 0 1 64 0 6016 2 1 0 2 0 6 0 1 33 0 1 1 2 1 0 27 0 1 6023 2 6020 24 0 1 1278 2 19 1 1 0 0 24 1 0 3868 2 24 0 1 1278 2 6024 19 0 1 0 0 24 1 0 3868 2 1 0 1 4 0 15 1 3 5 0 6028 1 1 2 512 0 27 0 0 5865 2 PROCEDURE 374 6030 6 0 0 1279 2 24 0 1 3 0 6032 2 0 0 157 0 6 1 0 3550 2 2 1 0 3530 2 1 1 3 6056 2 6036 24 1 0 4206 2 PROCEDURE 375 6037 2 0 0 6050 2 26 0 0 6254 2 27 0 0 6236 2 6040 27 0 0 6242 2 6 0 0 2057 2 26 0 0 6061 2 26 0 0 5626 2 6044 6 1 3 0 0 27 0 3 6048 2 5 1 0 2070 2 27 0 0 6030 2 6048 25 1 0 0 0 26 0 0 7301 2 0 0 0 0 0 26 0 0 6254 2 6052 27 0 0 3869 2 24 0 1 1278 2 19 0 1 0 0 24 1 0 3868 2 PROCEDURE 376 6056 26 0 0 5556 2 24 0 1 3 0 6 0 0 157 0 3 0 0 1279 2 6060 24 1 0 5724 2 PROCEDURE 377 6061 0 0 0 0 0 2 0 0 5977 2 26 0 0 5626 2 6064 26 0 0 5643 2 24 0 1 5977 2 6 1 3 2 0 24 0 1 321 2 6068 2 1 0 3358 2 24 0 1 5977 2 6 1 3 0 0 24 0 1 321 2 6072 3 1 0 3356 2 6 1 3 0 0 26 0 1 6061 2 PROCEDURE 378 6075 26 0 0 6085 2 6076 24 1 0 3869 2 26 0 0 6079 2 24 1 0 3869 2 0 0 0 0 0 6080 6 0 1 33 0 27 0 0 3745 2 1 0 1 15 0 14 0 1 44 0 6084 26 0 1 6079 2 0 0 0 0 0 6 0 1 32 0 27 0 0 6090 2 6088 6 0 0 7466 2 24 1 0 6091 2 6 0 0 5562 2 2 0 0 6096 2 6092 6 0 0 1278 2 1 0 1 7 0 14 0 0 6096 2 14 0 0 6097 2 6096 19 0 0 0 0 26 1 0 0 0 0 0 0 1 0 0 0 0 2 0 6100 0 0 0 3 0 24 1 0 6103 2 26 0 1 6085 2 24 0 1 6085 2 6104 24 1 0 1 0 24 1 0 6143 2 24 1 0 6197 2 24 1 0 6043 2 6108 24 1 0 6042 2 24 1 0 6359 2 5 0 0 2432 2 PROCEDURE 379 6111 0 0 0 0 0 6112 24 0 1 2432 2 6 0 0 45 0 27 0 2 6117 2 24 0 1 6111 2 6116 24 1 0 2 0 6 1 0 2 0 2 1 0 2430 2 24 0 1 2429 2 6120 6 0 0 2432 2 27 0 0 6140 2 5 0 0 2430 2 27 0 0 6136 2 6124 27 0 0 3126 2 24 0 1 2429 2 24 0 1 2433 2 26 1 0 0 0 6128 24 1 0 6136 2 24 1 0 6125 2 24 1 0 6126 2 24 1 0 6133 2 6132 24 1 0 6136 2 24 0 1 2429 2 24 0 1 2433 2 19 1 3 0 0 6136 1 1 3 2 0 4 0 0 2429 2 5 0 0 2428 2 27 0 2 6143 2 6140 1 1 3 2 0 7 0 0 2429 2 24 1 0 6119 2 6 0 0 2437 2 6144 27 0 1 6161 2 26 1 3 2102 2 6 0 0 6 0 1 1 1 351 2 6148 26 0 0 6338 2 27 0 0 6155 2 6 0 3 358 2 24 0 1 2436 2 6152 2 0 0 2438 2 6 0 3 360 2 2 0 3 358 2 1 1 3 1 0 6156 7 0 0 2436 2 25 0 3 48 0 24 1 0 6146 2 6 0 0 6195 2 6160 2 0 0 6227 2 6 0 0 6189 2 2 0 0 3785 2 6 0 0 1020 2 6164 2 0 0 1019 2 2 0 0 2429 2 2 0 0 2436 2 6 0 0 220 2 6168 2 0 0 213 2 6 0 0 2437 2 1 1 1 1 0 3 0 0 2437 2 6172 1 1 2 3 0 26 0 1 6111 2 PROCEDURE 380 6174 0 0 0 0 0 6 0 0 2470 2 6176 27 0 0 6179 2 6 0 0 5577 2 24 1 0 6180 2 6 0 0 3782 2 6180 2 0 0 3785 2 6 0 0 6199 2 2 0 0 6227 2 6 1 0 2430 2 6184 2 1 0 2 0 6 0 0 6168 2 2 0 0 1019 2 2 0 0 2437 2 6188 24 1 0 6200 2 24 1 0 6190 2 6 0 0 2 0 26 0 0 6338 2 6192 27 0 1 751 2 24 0 1 2 0 24 1 0 7 0 24 1 0 6196 2 6196 27 0 1 6228 2 27 0 1 6233 2 24 1 0 751 2 27 0 0 4883 2 6200 26 1 3 2102 2 24 0 1 2436 2 6 0 0 2438 2 27 0 1 6214 2 6204 1 1 2 1 0 2 0 0 2437 2 6 0 3 396 2 27 0 2 6211 2 6208 25 1 2 0 0 5 0 3 396 2 24 1 0 6212 2 6 0 3 358 2 6212 2 0 3 396 2 6 0 3 360 2 2 0 3 358 2 1 1 3 1 0 6216 7 0 0 2436 2 25 0 3 48 0 24 1 0 6201 2 25 1 2 0 0 6220 2 0 0 2436 2 2 1 0 2438 2 2 1 0 2440 2 2 1 0 2442 2 6224 2 1 0 2444 2 26 0 1 6174 2 PROCEDURE 381 6226 26 0 0 6254 2 27 0 0 4883 2 6228 6 0 0 6247 2 27 0 0 6233 2 6 0 1 30 0 2 0 0 6248 2 6232 24 1 0 6249 2 6 0 1 30 0 2 0 0 6247 2 24 1 0 6249 2 6236 6 0 1 30 0 5 0 0 6247 2 27 0 0 6242 2 25 1 2 0 0 6240 2 0 0 6248 2 24 1 0 6243 2 2 0 0 6247 2 26 0 0 5613 2 6244 26 0 0 5556 2 26 0 0 5708 2 24 1 0 751 2 0 0 0 0 0 6248 0 0 0 0 0 6 1 1 30 0 2 1 0 1278 2 6 0 1 35 0 6252 2 0 1 7 0 24 1 0 6041 2 PROCEDURE 382 6254 0 0 0 0 0 6 0 1 30 0 6256 5 0 0 6247 2 27 0 0 6260 2 6 0 1 30 0 5 0 0 6248 2 6260 26 0 1 6254 2 PROCEDURE 383 6261 6 1 0 325 2 2 1 0 3530 2 26 0 0 6282 2 6264 26 0 0 5818 2 24 0 2 6280 2 26 0 0 5834 2 26 0 0 5626 2 6268 6 1 3 0 0 5 1 0 2070 2 27 0 1 4207 2 27 0 1 6277 2 6272 1 0 1 4 0 15 1 3 5 0 1 1 2 768 0 27 0 1 4207 2 6276 27 0 0 6280 2 1 1 3 4 0 26 0 0 5569 2 27 0 0 4207 2 6280 26 0 0 5800 2 24 1 0 3869 2 PROCEDURE 384 6282 0 0 0 0 0 6 0 0 1278 2 6284 5 0 0 49 2 27 0 2 6322 2 6 0 0 1279 2 1 1 2 16 0 6288 27 0 0 6293 2 24 0 1 3 0 6 0 0 174 0 1 1 2 16 0 6292 27 0 1 6309 2 6 0 0 2 0 26 0 0 6338 2 27 0 0 6309 2 6296 1 1 3 2 0 7 0 0 2428 2 6 0 0 2432 2 27 0 0 6301 2 6300 1 1 3 2 0 2 0 0 6085 2 6 0 0 2 0 24 0 1 6085 2 6304 2 0 0 2432 2 6 0 0 1278 2 24 0 1 6085 2 2 0 0 2433 2 6308 2 0 0 6085 2 6 0 0 1278 2 1 0 1 7 0 14 0 0 6318 2 6312 14 0 0 6313 2 26 1 0 0 0 24 1 0 6313 2 24 1 0 6313 2 6316 24 1 0 6318 2 24 1 0 6323 2 19 0 0 0 0 25 1 2 0 0 6320 2 0 0 6247 2 2 0 0 6248 2 26 0 1 6282 2 24 0 1 2 0 6324 24 1 0 18 0 PROCEDURE 385 6325 0 0 0 0 0 2 0 0 2396 2 6 0 0 2437 2 6328 27 0 2 6332 2 6 0 0 2 0 26 0 0 6338 2 27 0 0 6335 2 6332 6 0 0 2396 2 2 0 1 7 0 26 0 1 6325 2 6 0 0 2396 2 6336 2 0 1 45 0 26 0 1 6325 2 PROCEDURE 386 6338 0 0 0 0 0 5 0 0 2432 2 6340 27 0 0 6343 2 4 0 0 2432 2 5 0 0 2434 2 26 0 1 6338 2 PROCEDURE 387 6344 25 1 2 0 0 26 0 0 6374 2 24 0 2 256 0 26 0 0 6385 2 6348 24 1 0 3879 2 PROCEDURE 388 6349 2 0 0 6359 2 26 0 0 6374 2 24 1 0 6358 2 PROCEDURE 389 6352 2 0 0 6353 2 0 0 0 0 0 26 0 0 7301 2 26 0 0 5560 2 6356 24 1 0 6441 2 PROCEDURE 390 6357 2 0 0 6359 2 26 0 0 7301 2 0 0 0 0 0 6360 26 0 0 5560 2 6 0 1 30 0 5 0 1 33 0 27 0 1 3868 2 6364 26 0 0 5716 2 24 1 0 3869 2 24 1 0 3868 2 PROCEDURE 391 6367 25 1 2 0 0 6368 26 0 0 6374 2 24 0 2 768 0 26 0 0 6385 2 2 0 0 1279 2 6372 26 0 0 5716 2 24 1 0 3862 2 PROCEDURE 392 6374 0 0 0 0 0 24 0 1 1278 2 6376 6 0 0 64 0 18 0 0 4124 0 1 1 2 13 0 27 0 0 6381 2 6380 26 0 1 6374 2 26 0 0 5613 2 24 1 0 1010 2 24 1 0 7272 2 6384 24 0 1 2 0 PROCEDURE 393 6385 0 0 0 0 0 4 0 0 2156 2 18 0 0 2 0 6388 2 1 0 3618 2 6 0 1 33 0 18 0 0 1 0 7 0 0 3619 2 6392 6 1 0 2070 2 2 1 0 3614 2 6 0 1 32 0 2 1 0 3617 2 6396 2 1 0 3612 2 24 0 2 3612 2 24 0 1 1278 2 24 0 1 64 0 6400 29 0 0 0 0 26 0 0 5560 2 24 0 2 3 0 26 0 1 6385 2 PROCEDURE 394 6404 26 0 0 5556 2 1 1 3 10 0 24 1 0 3879 2 PROCEDURE 395 6407 2 0 0 6409 2 6408 26 0 0 7301 2 0 0 0 0 0 24 0 1 1278 2 19 0 1 0 0 6412 24 1 0 3868 2 PROCEDURE 396 6413 6 0 1 33 0 1 0 1 15 0 24 0 1 1278 2 6416 14 0 0 64 0 6 0 0 2061 2 24 1 0 3879 2 PROCEDURE 397 6419 6 0 1 32 0 6420 24 0 1 2 0 0 0 2 32 0 24 0 1 1278 2 14 0 0 64 0 6424 24 0 1 1278 2 19 0 1 0 0 25 1 2 0 0 24 0 1 1278 2 6428 14 0 0 64 0 26 0 0 5716 2 6 0 0 2035 2 2 0 0 9 0 6432 6 0 0 2061 2 2 0 0 1279 2 24 1 0 3868 2 PROCEDURE 398 6435 24 0 1 1278 2 6436 19 0 0 0 0 26 0 0 5716 2 24 1 0 6432 2 PROCEDURE 399 6439 24 0 1 1278 2 6440 19 0 1 0 0 6 0 0 2061 2 2 0 0 1279 2 26 0 0 5708 2 6444 24 0 1 1278 2 26 1 0 0 0 24 1 0 6450 2 24 1 0 6444 2 6448 24 1 0 6456 2 24 1 0 6450 2 26 0 0 5760 2 6 0 0 6459 2 6452 27 0 0 6461 2 1 1 3 0 0 2 0 0 6459 2 24 1 0 4212 2 6456 1 1 3 1 0 2 0 0 6459 2 24 1 0 6450 2 0 0 0 0 0 6460 26 0 0 5716 2 6 0 0 2061 2 2 0 0 1279 2 24 1 0 3869 2 PROCEDURE 400 6464 6 0 1 33 0 1 0 1 15 0 24 0 1 1278 2 14 0 0 64 0 6468 6 0 0 2061 2 24 1 0 3879 2 PROCEDURE 401 6470 26 0 0 5618 2 6 0 0 1279 2 6472 18 0 0 4124 0 27 0 1 3881 2 6 0 1 33 0 2 0 3 195 0 6476 24 0 2 65 0 2 0 3 196 0 26 0 0 6627 2 24 0 1 1278 2 6480 6 0 0 64 0 3 0 3 192 0 2 0 3 194 0 26 0 0 6504 2 6484 24 1 0 3881 2 PROCEDURE 402 6485 0 0 0 0 0 6 1 0 2108 2 2 1 0 3624 2 6488 0 1 2 3626 2 15 1 0 154 0 2 1 0 3632 2 15 1 0 3634 2 6492 5 1 0 3632 2 27 0 0 6503 2 23 0 0 2 0 0 0 0 3624 1 6496 24 1 0 6498 2 24 1 0 6501 2 25 1 2 0 0 18 1 0 4126 0 6500 24 1 0 6489 2 23 0 0 1 0 0 0 0 6485 1 26 0 1 6485 2 PROCEDURE 403 6504 0 0 0 0 0 6 0 0 6504 2 24 0 1 3 0 2 0 0 156 0 6508 26 0 0 5618 2 0 0 2 2052 2 15 0 0 1278 2 1 1 2 48 0 6512 27 0 0 6548 2 24 0 3 3 0 24 0 2 190 0 24 0 1 1278 2 6516 2 0 0 64 0 1 1 3 8 0 2 0 3 193 0 1 1 3 63 0 6520 24 0 3 3 0 24 0 3 193 0 18 0 0 0 0 18 1 0 4118 0 6524 24 0 3 3 0 24 0 3 192 0 15 1 0 0 0 18 1 0 4126 0 6528 27 0 1 6527 2 18 1 0 2 0 18 0 0 8 0 3 1 3 190 0 6532 5 1 0 3636 2 27 0 0 6541 2 26 0 0 6570 2 6 0 3 193 0 6536 1 1 2 2 0 27 0 2 6518 2 1 1 3 2 0 7 0 3 192 0 6540 24 1 0 6517 2 6 0 3 188 0 27 0 1 6544 2 26 0 0 6570 2 6544 6 0 3 194 0 24 0 3 1278 2 2 0 0 64 0 24 1 0 6568 2 6548 24 0 3 3 0 24 0 3 192 0 6 1 0 0 0 2 1 0 154 0 6552 26 0 0 6485 2 24 1 0 6558 2 26 0 0 6570 2 1 1 3 2 0 6556 7 0 3 192 0 24 1 0 6548 2 1 1 3 8 0 5 0 0 3624 2 6560 2 0 0 3623 2 6 1 0 154 0 24 0 1 3624 2 18 0 0 4120 0 6564 24 0 1 3623 2 18 0 0 0 0 2 1 0 154 0 26 0 0 6570 2 6568 24 0 1 3 0 26 0 1 156 0 PROCEDURE 404 6570 0 0 0 0 0 6 0 0 6570 2 6572 2 0 3 183 0 24 0 1 1278 2 19 0 0 0 0 1 1 3 1 0 6576 2 0 0 1279 2 26 0 0 5716 2 26 0 0 5618 2 24 0 3 3 0 6580 26 0 1 183 0 PROCEDURE 405 6581 2 0 0 6583 2 26 0 0 7301 2 0 0 0 0 0 6584 26 0 0 5618 2 24 0 1 1278 2 6 0 0 64 0 3 0 3 192 0 6588 2 0 3 194 0 6 0 0 1279 2 18 0 0 4124 0 27 0 0 6593 2 6592 2 0 3 188 0 26 0 0 6504 2 6 0 3 157 0 27 0 2 3869 2 PROCEDURE 406 6596 26 0 0 5618 2 6 0 3 194 0 2 0 3 192 0 6 0 3 188 0 6600 27 0 0 6607 2 6 0 1 33 0 27 0 0 3746 2 4 0 0 2050 2 6604 1 0 1 15 0 14 0 1 44 0 24 1 0 6624 2 26 0 0 6627 2 6608 6 0 0 2034 2 7 1 2 4 0 26 0 0 6504 2 6 1 0 2254 2 6612 2 1 0 3530 2 1 1 3 6615 2 24 1 0 4206 2 26 0 0 5618 2 6616 0 0 3 2045 2 1 1 3 1 0 7 1 3 197 0 0 0 3 2096 2 6620 6 0 3 194 0 2 0 3 192 0 26 0 0 6627 2 26 0 0 6504 2 6624 25 1 2 0 0 2 0 3 157 0 24 1 0 3869 2 PROCEDURE 407 6627 0 0 0 0 0 6628 24 0 3 1278 2 26 1 2 64 0 6 1 0 2070 2 2 1 2 0 0 6632 6 0 1 39 0 2 1 2 3 0 6 0 3 195 0 18 0 0 2 0 6636 1 1 1 65 0 18 0 0 4 0 4 0 3 196 0 2 1 2 4 0 6640 6 1 0 3628 2 2 1 2 6 0 26 0 1 6627 2 PROCEDURE 408 6643 26 0 0 5618 2 6644 6 0 3 188 0 27 0 1 3862 2 26 0 0 6627 2 6 0 0 2034 2 6648 4 0 0 2034 2 7 1 2 4 0 24 0 1 1278 2 6 0 0 64 0 6652 3 0 3 192 0 2 0 3 194 0 26 0 0 6504 2 24 1 0 3862 2 PROCEDURE 409 6656 26 0 0 6668 2 26 0 0 5622 2 1 0 1 990 0 15 0 1 40 0 6660 18 1 0 4123 0 15 0 3 1408 2 18 1 0 4123 0 6 0 3 1376 2 6664 18 1 0 9 0 24 0 1 3 0 0 0 2 182 0 24 1 0 3869 2 PROCEDURE 410 6668 0 0 0 0 0 26 0 0 5618 2 6 0 0 6668 2 2 0 3 168 0 6672 24 0 1 1278 2 6 0 0 1312 2 2 0 3 156 0 26 0 0 5073 2 6676 26 0 0 5111 2 26 0 0 5618 2 6 0 3 156 0 27 0 0 6692 2 6680 18 1 0 4126 0 1 1 2 15 0 27 0 1 6783 2 18 1 0 4 0 6684 1 0 1 12 0 24 0 1 1278 2 14 0 0 1312 2 6 0 0 1278 2 6688 5 0 0 2764 2 27 0 1 6695 2 26 0 0 5626 2 24 1 0 6709 2 6692 24 0 2 257 0 24 0 1 1278 2 3 0 0 1312 2 2 0 3 158 0 6696 26 0 0 5626 2 1 0 1 28 0 15 1 3 15 0 2 0 0 3538 2 6700 15 0 1 32 0 5 0 0 3538 2 27 0 1 6821 2 1 0 1 12 0 6704 15 0 3 6 0 2 0 0 3538 2 15 0 1 33 0 5 0 0 3538 2 6708 27 0 1 6821 2 6 1 3 15 0 3 0 0 3630 2 24 0 1 1278 2 6712 2 0 0 1344 2 6 0 3 6 0 24 0 1 1278 2 2 0 0 1376 2 6716 6 1 3 9 0 24 0 1 1278 2 2 0 0 1408 2 1 0 1 3 0 6720 24 0 1 1278 2 15 0 0 1312 2 5 1 3 11 0 27 0 1 6865 2 6724 27 0 0 6862 2 26 1 3 2096 2 26 0 0 5719 2 27 0 0 7162 2 6728 27 0 0 7160 2 27 0 0 6776 2 24 1 0 7135 2 24 1 0 5455 2 6732 27 0 0 7530 2 PROCEDURE 411 6733 6 1 3 17 0 5 0 0 2050 2 27 0 1 6743 2 6736 25 1 2 0 0 1 0 1 7 0 15 0 1 30 0 1 1 2 32 0 6740 27 0 1 6743 2 6 0 0 2064 2 24 1 0 6744 2 25 1 2 0 0 6744 24 0 1 1278 2 2 0 0 1440 2 24 0 1 3 0 6 0 0 165 0 6748 1 1 2 6676 2 27 0 1 7277 2 26 0 0 5618 2 6 0 3 158 0 6752 27 0 0 6775 2 25 1 2 0 0 2 0 3 158 0 26 0 0 5626 2 6756 26 0 0 7315 2 6 1 3 17 0 27 0 0 6761 2 6 1 0 594 2 6760 24 1 0 6762 2 6 1 0 2198 2 2 1 0 3530 2 26 0 0 5618 2 6764 6 0 3 182 0 2 0 0 3536 2 6 1 0 3722 2 2 1 0 3712 2 6768 6 1 0 3720 2 2 1 0 3718 2 24 0 2 6772 2 24 1 0 7163 2 6772 26 0 0 5800 2 6 0 1 30 0 2 0 0 1278 2 26 0 0 5631 2 6776 26 0 0 5111 2 26 0 0 5637 2 26 0 0 5618 2 6 0 3 168 0 6780 2 0 0 6668 2 2 0 3 168 0 26 0 1 6668 2 26 0 0 5626 2 6784 26 0 0 6803 2 26 0 0 6794 2 27 0 2 6792 2 6 0 3 1312 2 6788 18 0 0 2 0 14 0 3 1312 2 24 0 1 3 0 2 0 0 158 0 6792 26 0 0 5626 2 24 1 0 6716 2 PROCEDURE 412 6794 0 0 0 0 0 26 0 0 5622 2 6796 1 0 1 3 0 15 0 3 1312 2 18 1 0 2 0 2 0 0 3538 2 6800 15 0 3 1312 2 5 0 0 3538 2 26 0 1 6794 2 PROCEDURE 413 6803 0 0 0 0 0 6804 6 1 3 15 0 3 0 0 3630 2 24 0 1 1278 2 5 0 0 1344 2 6808 27 0 1 6894 2 6 0 3 6 0 24 0 1 1278 2 5 0 0 1376 2 6812 27 0 1 6894 2 1 0 1 30 0 15 1 3 9 0 2 0 0 2396 2 6816 24 0 1 1278 2 15 0 0 1408 2 5 0 0 2396 2 27 0 1 6894 2 6820 26 0 1 6803 2 PROCEDURE 414 6821 25 1 2 0 0 1 0 1 28 0 15 0 1 39 0 6824 5 0 0 295 2 27 0 0 6709 2 26 0 0 6902 2 1 0 1 28 0 6828 15 0 1 32 0 2 0 0 3534 2 1 0 1 12 0 15 0 1 33 0 6832 18 0 0 2 0 1 1 1 4209 0 18 0 0 4 0 1 1 1 65 0 6836 2 1 0 3538 2 2 0 0 3536 2 6 1 0 3726 2 2 1 0 3712 2 6840 24 0 2 3692 2 24 0 1 3 0 28 1 2 130 0 26 0 0 5626 2 6844 6 1 3 15 0 2 0 0 3534 2 6 1 3 6 0 18 0 0 2 0 6848 1 1 1 113 0 18 0 0 4 0 4 1 3 10 0 2 1 0 3538 2 6852 6 1 3 9 0 2 0 0 3536 2 6 1 0 2322 2 2 1 0 3712 2 6856 24 0 2 3700 2 24 0 1 3 0 28 1 2 146 0 6 1 0 3646 2 6860 2 1 0 3712 2 24 1 0 5604 2 26 0 0 6902 2 6 1 0 2210 2 6864 24 1 0 5992 2 PROCEDURE 415 6865 26 0 0 6902 2 6 1 0 323 2 2 1 0 3530 2 6868 26 0 0 5669 2 26 0 0 5211 2 4 1 0 3538 2 2 1 0 3534 2 6872 26 0 0 5626 2 1 0 1 15 0 15 0 3 10 0 4 1 0 3538 2 6876 2 1 0 3536 2 1 0 1 12 0 24 0 1 1278 2 14 0 0 1312 2 6880 24 0 1 3 0 6 0 0 182 0 2 1 0 3538 2 24 0 2 519 0 6884 2 0 1 41 0 1 1 3 3666 2 24 1 0 5589 2 PROCEDURE 416 6887 26 0 0 5626 2 6888 6 1 3 11 0 1 0 1 3 0 24 0 1 1278 2 14 0 0 1312 2 6892 26 0 0 5618 2 24 1 0 6672 2 PROCEDURE 417 6894 26 0 0 6902 2 26 0 0 5622 2 6896 6 0 3 1344 2 2 0 0 3534 2 26 0 0 5211 2 7 1 0 3538 2 6900 6 0 3 1408 2 24 1 0 6837 2 PROCEDURE 418 6902 0 0 0 0 0 26 0 0 5760 2 6904 6 1 0 3552 2 2 1 0 3530 2 24 0 1 3 0 6 0 0 165 0 6908 1 1 2 1 0 26 0 0 5818 2 26 0 1 6902 2 PROCEDURE 419 6911 0 0 0 0 0 6912 6 1 0 3552 2 2 1 0 3530 2 24 0 2 5935 2 26 0 0 5818 2 6916 26 0 1 6911 2 PROCEDURE 420 6917 2 0 0 6926 2 26 0 0 5258 2 27 0 1 6937 2 6920 26 0 0 5618 2 2 0 3 171 0 2 0 3 186 0 6 0 3 185 0 6924 27 0 1 6933 2 26 0 0 7301 2 0 0 0 0 0 26 0 0 5631 2 6928 26 0 0 5556 2 26 0 0 5637 2 6 0 0 2050 2 26 0 0 5576 2 6932 24 1 0 3868 2 PROCEDURE 421 6933 26 0 0 5392 2 1 1 3 7 0 2 0 1 31 0 6936 24 1 0 3784 2 26 0 0 5264 2 24 1 0 6964 2 6 1 3 1 0 6940 5 1 0 2065 2 5 0 0 2050 2 27 0 0 6973 2 5 0 0 2050 2 6944 27 0 1 6949 2 6 1 3 5 0 24 0 1 1278 2 5 0 0 1280 2 6948 27 0 0 3747 2 1 1 3 6993 2 24 0 1 3 0 2 0 0 162 0 6952 26 0 0 5443 2 26 0 0 5276 2 24 1 0 6957 2 26 0 0 5331 2 6956 26 0 0 5371 2 24 0 1 3 0 6 0 0 160 0 27 0 0 6918 2 6960 1 1 3 7 0 24 0 1 3 0 2 0 0 174 0 24 1 0 4222 2 6964 24 0 1 3 0 6 0 0 186 0 27 0 0 6969 2 1 1 3 3 0 6968 26 0 0 5053 2 26 0 0 5556 2 1 1 3 7 0 3 0 0 1279 2 6972 24 1 0 5724 2 6 1 3 5 0 24 0 1 1278 2 5 0 0 1280 2 6976 27 0 1 6949 2 6 0 1 39 0 5 0 0 2059 2 27 0 1 6987 2 6980 6 1 0 3554 2 2 1 3 4 0 26 0 0 7301 2 6 0 0 6926 2 6984 2 0 0 6985 2 0 0 0 0 0 24 1 0 3869 2 6 0 1 33 0 6988 27 0 3 3869 2 26 0 0 5582 2 26 0 0 5760 2 26 0 0 5451 2 6992 26 0 0 6668 2 1 1 3 7 0 3 0 0 1279 2 2 0 1 31 0 6996 6 0 0 1278 2 18 0 3 6 0 24 1 0 3798 2 PROCEDURE 422 6999 26 0 0 5582 2 7000 26 0 0 5760 2 26 0 0 5818 2 24 0 2 7005 2 26 0 0 5834 2 7004 24 1 0 5454 2 26 0 0 5800 2 26 0 0 7842 2 24 1 0 3869 2 PROCEDURE 423 7008 26 0 0 5626 2 6 1 3 4 0 5 1 0 3554 2 27 0 0 7388 2 7012 6 1 3 1 0 5 1 0 2065 2 5 0 0 2100 2 27 0 0 7388 2 7016 1 1 3 4 0 26 0 0 5569 2 27 0 1 7384 2 26 0 0 7842 2 7020 6 1 0 325 2 2 1 0 3530 2 26 0 0 5760 2 26 0 0 5818 2 7024 24 0 1 1278 2 6 0 0 1280 2 2 0 0 3534 2 24 0 3 1278 2 7028 2 0 0 1280 2 24 0 1 1278 2 2 0 0 1312 2 26 0 0 5483 2 7032 24 0 2 6280 2 26 0 0 5834 2 24 1 0 7345 2 PROCEDURE 424 7035 26 0 0 7039 2 7036 6 0 1 40 0 18 0 0 4127 0 24 1 0 6665 2 PROCEDURE 425 7039 0 0 0 0 0 7040 26 0 0 5618 2 6 0 0 7039 2 2 0 3 168 0 26 1 2 1278 2 7044 6 0 2 64 0 2 0 0 2396 2 2 0 3 163 0 1 1 3 14 0 7048 18 0 0 4 0 4 0 0 3 0 1 1 1 106 0 5 0 0 2396 2 7052 27 0 0 7057 2 4 0 0 2396 2 2 0 2 64 0 6 0 0 2396 2 7056 2 0 3 163 0 1 1 3 15 0 23 1 3 126 0 1 1 3 0 0 7060 24 0 3 1278 2 2 0 0 1472 2 26 0 0 5073 2 24 0 1 3 0 7064 6 0 0 164 0 27 0 0 7070 2 24 0 1 3 0 6 0 0 189 0 7068 27 0 0 7250 2 24 1 0 7075 2 26 0 0 7285 2 24 1 0 7250 2 7072 1 1 3 1 0 24 0 1 3 0 2 0 0 189 0 26 0 0 5622 2 7076 6 0 3 1312 2 3 0 0 2396 2 27 0 0 7093 2 18 1 0 4126 0 7080 1 1 2 15 0 27 0 1 7087 2 18 1 0 4 0 1 0 1 12 0 7084 24 0 1 1278 2 14 0 0 1312 2 24 1 0 7095 2 26 0 0 6794 2 7088 27 0 2 7101 2 6 0 3 1312 2 18 0 0 2 0 14 0 3 1312 2 7092 24 1 0 7101 2 24 0 2 257 0 2 0 3 1312 2 6 0 1 32 0 7096 2 0 3 1344 2 6 0 1 33 0 2 0 3 1376 2 6 0 1 40 0 7100 2 0 3 1408 2 26 0 0 5626 2 PROCEDURE 426 7102 24 0 2 7 0 24 0 1 1278 2 7104 3 0 0 1280 2 3 1 3 1 0 4 1 0 2078 2 2 1 3 4 0 7108 2 1 3 2 0 24 0 1 1278 2 6 0 0 1344 2 3 0 0 3630 2 7112 2 1 3 15 0 6 0 0 33 2 2 1 3 13 0 6 1 0 2156 2 7116 2 1 3 18 0 26 0 0 7315 2 24 0 1 1278 2 6 0 0 1440 2 7120 27 0 0 7122 2 6 0 0 2050 2 2 1 3 17 0 26 0 0 5560 2 7124 26 0 0 7285 2 24 1 0 7132 2 6 0 0 3536 2 5 0 3 1704 2 7128 27 0 1 7130 2 2 0 3 1704 2 25 0 3 1 0 24 1 0 7126 2 7132 24 0 1 3 0 6 0 0 164 0 27 0 1 7174 2 1 1 3 8 0 7136 2 0 0 1279 2 26 0 0 5716 2 26 0 0 5626 2 26 0 0 7315 2 7140 6 1 0 2196 2 2 1 0 3530 2 26 0 0 5618 2 6 0 3 182 0 7144 2 0 0 3536 2 2 0 3 189 0 24 0 1 1278 2 6 0 0 1440 2 7148 27 0 0 7153 2 1 0 1 24 0 24 0 2 88 0 18 0 0 3 0 7152 14 0 0 3531 2 0 0 3 2045 2 6 0 0 3549 2 4 0 0 2050 2 7156 0 0 3 2096 2 2 0 0 3549 2 6 1 0 3716 2 2 1 0 3712 2 7160 6 1 0 3722 2 2 1 0 3712 2 24 0 2 7176 2 26 0 0 5834 2 7164 24 0 2 3692 2 24 0 1 3 0 28 1 2 130 0 6 1 0 3714 2 7168 2 1 0 3712 2 6 1 0 3720 2 2 1 0 3712 2 6 1 0 3724 2 7172 2 1 0 3718 2 24 1 0 5604 2 26 0 0 5728 2 24 1 0 4555 2 7176 26 0 0 5800 2 PROCEDURE 427 7177 24 1 0 7272 2 24 0 1 2 0 24 0 1 30 0 7180 6 0 0 64 0 2 1 0 6 0 6 0 1 30 0 24 0 1 3 0 7184 2 0 0 158 0 24 0 2 7218 2 1 1 2 3801 2 18 0 0 5 0 7188 4 0 0 3620 2 2 1 1 30 0 6 0 0 3549 2 2 1 3 3 0 7192 24 0 1 3 0 6 0 0 182 0 2 1 3 5 0 24 0 1 3 0 7196 6 0 0 158 0 2 1 0 4 0 6 0 2 1344 2 2 1 3 7 0 7200 6 0 2 1408 2 2 1 3 9 0 6 0 2 1376 2 18 0 0 6 0 7204 2 1 3 10 0 1 0 1 3 0 15 0 2 1312 2 18 0 0 1 0 7208 4 0 0 139 0 2 1 0 3539 2 6 1 0 3538 2 7 1 3 10 0 7212 6 0 0 138 0 2 1 3 13 0 6 1 0 2156 2 2 1 3 14 0 7216 2 1 3 0 0 24 1 0 3784 2 24 0 1 3620 2 6 0 0 64 0 7220 18 0 0 4124 0 1 1 2 13 0 27 0 0 7217 2 24 0 1 3 0 7224 24 0 1 158 0 24 0 1 64 0 24 0 2 0 0 29 0 0 3560 2 7228 6 1 0 3546 2 7 1 0 3566 2 1 1 3 3 0 18 0 0 5 0 7232 4 0 0 3620 2 3 1 0 1278 2 24 0 1 3621 2 2 1 0 3352 2 7236 24 0 1 3620 2 1 0 3 3520 0 24 0 1 1278 2 19 0 0 0 0 7240 26 0 0 5716 2 24 0 1 3620 2 1 0 3 3520 0 6 0 0 4 0 7244 3 0 1 30 0 2 0 0 1278 2 24 0 1 1278 2 24 0 1 64 0 7248 2 1 0 2 0 24 1 0 7272 2 PROCEDURE 428 7250 24 0 1 1278 2 6 0 0 1312 2 7252 27 0 0 7337 2 18 0 0 4126 0 1 1 2 15 0 27 0 0 7337 2 7256 26 0 0 6794 2 27 0 3 7337 2 26 0 0 5111 2 26 0 0 5626 2 7260 26 0 0 6803 2 1 0 1 3 0 24 0 1 1278 2 15 0 0 1312 2 7264 5 1 3 11 0 27 0 1 6894 2 24 0 1 3 0 6 0 0 163 0 7268 24 0 1 2 0 24 0 1 30 0 2 0 0 64 0 24 1 0 6733 2 7272 24 0 1 3 0 6 0 0 163 0 24 0 1 2 0 24 0 1 30 0 7276 2 0 0 64 0 24 0 1 3 0 6 0 0 168 0 1 1 2 5053 2 7280 27 0 1 6778 2 6 0 0 2099 2 2 0 1 31 0 24 0 1 2 0 7284 24 1 0 12 0 PROCEDURE 429 7285 0 0 0 0 0 26 1 3 2104 2 24 0 1 3 0 7288 6 0 0 182 0 3 0 0 3536 2 18 1 1 4127 0 27 0 0 7293 2 7292 18 1 1 1 0 5 0 3 1704 2 27 0 0 7299 2 4 0 3 1704 2 7296 25 0 3 1 0 24 1 0 7293 2 26 0 1 7285 2 24 0 3 7285 2 7300 24 1 0 1 0 PROCEDURE 430 7301 0 0 0 0 0 6 0 1 32 0 2 0 0 7314 2 7304 24 0 1 7314 2 0 0 2 64 0 24 0 1 1278 2 6 0 0 64 0 7308 24 0 1 7314 2 2 0 0 64 0 18 1 1 10 0 24 0 1 1278 2 7312 2 0 0 64 0 26 0 1 7301 2 0 0 0 0 0 PROCEDURE 431 7315 0 0 0 0 0 7316 26 0 0 5661 2 26 0 0 5756 2 24 0 1 1278 2 6 0 0 1376 2 7320 3 1 3 6 0 18 0 0 2 0 1 1 1 113 0 18 0 0 4 0 7324 2 1 0 3538 2 1 0 1 3 0 24 0 1 1278 2 15 0 0 1312 2 7328 2 1 0 3535 2 6 0 0 3534 2 7 1 0 3538 2 2 1 3 10 0 7332 24 0 1 1278 2 6 0 0 1408 2 3 0 0 3534 2 2 1 3 9 0 7336 26 0 1 7315 2 PROCEDURE 432 7337 26 0 0 5760 2 6 1 0 2186 2 2 1 0 3530 2 7340 24 0 2 7062 2 26 0 0 5818 2 24 0 1 3 0 6 0 0 182 0 7344 2 0 0 3534 2 2 1 0 3536 2 24 0 2 3648 2 24 1 0 5602 2 PROCEDURE 433 7348 2 0 0 7350 2 26 0 0 7301 2 0 0 0 0 0 26 1 2 1278 2 7352 26 0 0 5626 2 2 1 3 2 0 6 0 2 1280 2 0 0 3 2045 2 7356 4 0 0 2050 2 3 1 3 1 0 2 0 2 1280 2 1 1 3 1 0 7360 7 0 2 1528 2 0 0 3 2096 2 26 0 0 5631 2 26 0 0 5560 2 7364 26 0 0 5637 2 24 1 0 3868 2 PROCEDURE 434 7366 26 0 0 7369 2 26 0 0 5183 2 7368 24 1 0 6999 2 PROCEDURE 435 7369 0 0 0 0 0 26 0 0 5626 2 6 1 0 2066 2 7372 2 1 3 2 0 6 1 0 2156 2 2 1 3 6 0 6 1 0 2064 2 7376 4 0 0 2050 2 26 0 1 7369 2 PROCEDURE 436 7378 24 0 3 1278 2 6 0 0 1280 2 7380 1 1 2 6 0 27 0 3 3753 2 26 0 0 5156 2 26 0 0 5183 2 7384 25 1 2 0 0 24 0 1 1278 2 2 0 0 1280 2 25 1 2 0 0 7388 24 0 1 1278 2 2 0 0 1312 2 26 0 0 5760 2 26 0 0 7842 2 7392 26 0 0 5818 2 26 0 0 5483 2 24 1 0 3866 2 PROCEDURE 437 7395 26 0 0 5156 2 7396 26 0 0 5183 2 26 0 0 5760 2 26 0 0 7842 2 26 0 0 5622 2 7400 1 0 1 3 0 15 0 3 1312 2 5 0 0 2050 2 27 0 0 7408 2 7404 6 0 0 2050 2 14 0 3 1312 2 26 0 0 5451 2 24 1 0 3869 2 7408 24 0 1 1278 2 19 1 1 0 0 6 0 0 2048 2 7 0 3 1376 2 7412 1 1 3 5 0 24 0 3 1278 2 2 0 0 1280 2 2 0 0 1279 2 7416 24 1 0 3868 2 PROCEDURE 438 7417 25 1 2 0 0 24 1 0 7427 2 26 0 0 5156 2 7420 26 0 0 5183 2 1 1 3 1 0 1 1 1 2 0 26 0 0 5053 2 7424 26 0 0 5264 2 24 1 0 7422 2 1 1 3 15 0 24 0 1 3 0 7428 2 1 0 180 0 26 0 0 5626 2 24 0 1 2 0 24 0 1 33 0 7432 2 1 3 0 0 PROCEDURE 439 7433 26 0 0 5264 2 24 1 0 7459 2 24 0 2 7 0 7436 5 1 3 1 0 27 0 2 7502 2 6 1 3 1 0 5 1 0 2065 2 7440 5 0 0 2050 2 27 0 0 7487 2 5 0 0 2050 2 27 0 0 7527 2 7444 24 0 1 3 0 6 0 0 160 0 27 0 1 7459 2 24 0 1 2 0 7448 24 0 1 33 0 6 1 3 1 0 27 0 0 7459 2 5 0 1 32 0 7452 27 0 1 7511 2 6 1 3 1 0 24 0 1 1278 2 2 0 0 1280 2 7456 24 0 1 3 0 2 0 0 181 0 24 1 0 3869 2 PROCEDURE 440 7459 24 0 1 3 0 7460 6 0 0 180 0 27 0 0 7475 2 6 0 0 2100 2 26 0 0 5053 2 7464 26 0 0 5760 2 24 0 1 1278 2 19 0 2 0 0 26 0 0 5719 2 7468 26 0 0 5631 2 6 0 0 2050 2 26 0 0 5053 2 26 0 0 5637 2 7472 26 0 0 5556 2 26 0 0 5719 2 24 1 0 7433 2 26 0 0 5626 2 7476 6 1 3 4 0 5 1 0 3554 2 27 0 0 7527 2 26 0 0 5264 2 7480 24 1 0 7472 2 24 0 1 1278 2 19 0 3 0 0 26 0 0 5719 2 7484 26 0 0 5631 2 6 0 0 2100 2 24 1 0 7470 2 PROCEDURE 441 7487 6 0 0 2050 2 7488 0 0 3 2045 2 24 0 1 1278 2 7 0 0 1312 2 0 0 3 2096 2 7492 26 0 0 5760 2 26 0 0 5451 2 26 0 0 6668 2 26 0 0 5626 2 7496 24 0 1 2 0 24 0 1 33 0 2 1 3 0 0 26 0 0 5618 2 7500 2 0 3 180 0 24 1 0 7475 2 26 0 0 5622 2 1 0 1 3 0 7504 15 0 3 1312 2 5 0 0 2050 2 27 0 0 7517 2 25 1 2 0 0 7508 0 0 3 2045 2 5 0 0 2050 2 24 1 0 7489 2 PROCEDURE 442 7511 2 0 0 3538 2 7512 26 0 0 5618 2 6 0 3 180 0 27 0 0 7525 2 6 0 0 3538 2 7516 27 0 2 7459 2 26 0 0 5618 2 2 0 3 180 0 6 0 3 181 0 7520 4 0 0 2050 2 3 0 3 181 0 1 1 2 6 0 27 0 0 3751 2 7524 24 1 0 7459 2 6 0 0 3538 2 27 0 3 7459 2 26 0 0 5618 2 7528 24 0 2 15 0 24 1 0 7518 2 6 1 0 2238 2 2 1 0 3530 2 7532 26 0 0 5811 2 6 0 1 33 0 2 0 0 3534 2 6 0 1 32 0 7536 2 0 0 3536 2 2 1 0 3538 2 1 1 3 3 0 18 0 3 13 0 7540 2 0 1 41 0 1 1 3 3692 2 24 1 0 5589 2 26 0 0 5818 2 7544 1 1 3 1 0 24 0 1 1278 2 2 0 0 1312 2 26 0 0 6668 2 7548 24 1 0 7426 2 PROCEDURE 443 7549 24 0 1 3 0 2 0 0 181 0 1 1 3 3 0 7552 24 1 0 7559 2 0 0 3 4102 0 PROCEDURE 444 7554 24 0 1 3 0 2 0 0 181 0 7556 26 0 0 5156 2 26 0 0 5183 2 1 1 3 5 0 0 0 3 2045 2 7560 4 0 1 32 0 0 0 3 2096 2 24 0 1 3 0 2 0 0 180 0 7564 6 0 1 32 0 27 0 3 3748 2 27 0 1 7581 2 6 0 1 31 0 7568 1 1 2 44 0 27 0 1 3748 2 24 0 1 1278 2 6 0 0 1280 2 7572 1 1 2 8 0 27 0 0 7696 2 27 0 1 7581 2 1 1 3 3 0 7576 26 0 0 5053 2 1 1 3 6 0 24 0 1 1278 2 2 0 0 1280 2 7580 24 1 0 7702 2 25 1 2 0 0 0 0 3 2045 2 5 0 1 32 0 7584 26 0 0 5564 2 26 0 0 5622 2 0 0 3 2045 2 6 0 3 1280 2 7588 1 1 2 6 0 27 0 3 7623 2 0 0 3 2096 2 1 1 3 2126 2 7592 24 0 1 3 0 12 0 0 180 0 26 0 0 5053 2 26 0 0 5556 2 7596 26 0 0 5719 2 26 0 0 5264 2 24 1 0 7612 2 0 0 3 2045 2 7600 26 0 0 5258 2 0 0 3 2096 2 27 0 0 7681 2 27 0 3 7614 2 7604 0 0 3 2045 2 1 1 2 256 0 27 0 2 7612 2 1 1 1 258 0 7608 24 0 1 3 0 2 0 0 180 0 0 0 3 2096 2 24 1 0 7590 2 7612 1 1 3 3 0 24 1 0 7608 2 1 1 3 7597 2 24 0 1 3 0 7616 2 0 0 162 0 26 0 0 5443 2 26 0 0 5276 2 24 1 0 7597 2 7620 26 0 0 5331 2 26 0 0 5371 2 24 1 0 7597 2 PROCEDURE 445 7623 24 0 1 3 0 7624 2 0 0 169 0 24 0 1 3 0 2 0 0 180 0 1 0 1 3 0 7628 15 0 3 1312 2 5 0 0 2050 2 0 0 3 2096 2 27 0 0 3749 2 7632 14 0 3 1312 2 26 0 0 5760 2 26 0 0 5451 2 26 0 0 6668 2 7636 24 0 1 1278 2 19 0 3 0 0 26 0 0 5719 2 26 0 0 5631 2 7640 26 0 0 5556 2 26 0 0 5637 2 26 0 0 5719 2 26 0 0 5626 2 7644 6 1 3 1 0 5 1 0 2065 2 5 0 0 2050 2 27 0 0 7657 2 7648 6 1 3 0 0 5 0 0 3556 2 27 0 0 7653 2 6 1 3 2 0 7652 5 0 0 3556 2 27 0 1 7636 2 6 0 0 2050 2 24 0 1 3 0 7656 2 0 0 180 0 24 0 1 3 0 6 0 0 160 0 27 0 1 3750 2 7660 0 0 3 2045 2 1 1 3 3 0 24 0 1 3 0 5 0 0 169 0 7664 24 0 1 3 0 7 0 0 180 0 24 0 1 3 0 6 0 0 169 0 7668 4 1 3 5 0 5 0 0 2050 2 24 0 1 1278 2 2 0 0 1280 2 7672 24 1 0 7585 2 PROCEDURE 446 7673 24 0 1 3 0 2 0 0 181 0 6 0 1 32 0 7676 27 0 3 3748 2 27 0 0 3748 2 26 0 0 5564 2 26 0 0 5258 2 7680 27 0 1 7704 2 24 0 1 3 0 2 0 0 171 0 26 0 0 5392 2 7684 24 0 1 3 0 6 0 0 181 0 27 0 0 3869 2 25 1 2 0 0 7688 24 0 1 3 0 2 0 0 181 0 26 0 0 5556 2 6 0 0 2050 2 7692 26 0 0 5576 2 1 1 3 7 0 2 0 0 1279 2 24 1 0 3868 2 7696 26 0 0 5760 2 24 0 1 1278 2 19 1 1 0 0 26 0 0 5719 2 7700 26 0 0 5760 2 26 0 0 5073 2 26 0 0 5111 2 24 1 0 3869 2 PROCEDURE 447 7704 6 1 3 1 0 5 1 0 2065 2 5 0 0 2050 2 27 0 0 7715 2 7708 5 0 0 2050 2 27 0 0 3749 2 26 0 0 5258 2 27 0 2 7746 2 7712 26 0 0 5556 2 26 0 0 5719 2 24 1 0 7679 2 24 0 1 3 0 7716 6 0 0 160 0 27 0 0 7723 2 26 0 0 5556 2 26 0 0 5719 2 7720 24 0 1 3 0 6 0 0 160 0 27 0 1 3750 2 6 0 0 2050 2 7724 0 0 3 2045 2 24 0 1 1278 2 7 0 0 1312 2 26 0 0 5626 2 7728 6 0 0 2050 2 5 1 3 5 0 24 0 1 1278 2 4 0 0 1280 2 7732 24 0 1 3 0 2 0 0 169 0 0 0 3 2096 2 26 0 0 5760 2 7736 26 0 0 5451 2 26 0 0 6668 2 0 0 3 2045 2 24 0 1 3 0 7740 6 0 0 169 0 1 1 1 7 0 24 0 1 1278 2 2 0 0 1280 2 7744 0 0 3 2096 2 24 1 0 7679 2 1 1 3 7679 2 24 0 1 3 0 7748 2 0 0 162 0 26 0 0 5443 2 26 0 0 5276 2 24 1 0 7679 2 7752 26 0 0 5331 2 26 0 0 5371 2 24 1 0 7679 2 27 0 2 3744 2 7756 27 0 2 3744 2 27 0 3 3744 2 27 0 3 7786 2 PROCEDURE 448 7759 6 0 0 1278 2 7760 3 1 0 6 0 1 1 2 16 0 27 0 3 7765 2 1 1 2 111 0 7764 27 0 3 3744 2 6 0 3 1312 2 27 0 1 7769 2 24 0 2 3840 0 7768 2 0 3 1312 2 1 0 1 3 0 6 0 1 32 0 14 0 3 1312 2 7772 24 1 0 3883 2 PROCEDURE 449 7773 6 0 1 30 0 3 1 0 6 0 1 1 2 24 0 7776 27 0 3 7781 2 1 1 2 5 0 27 0 2 7781 2 6 0 3 3416 2 7780 24 1 0 3883 2 6 0 0 6 0 1 1 2 128 0 27 0 3 3744 2 7784 1 1 2 24 0 27 0 2 3744 2 1 0 1 3 0 25 1 2 0 0 7788 15 0 3 1312 2 24 1 0 3883 2 PROCEDURE 450 7790 24 1 1 2096 2 3 0 0 1278 2 7792 2 0 1 30 0 26 0 0 2855 2 26 0 0 3344 2 6 0 0 34 2 7796 2 1 1 44 0 26 0 0 5738 2 27 0 0 7802 2 25 0 3 2 0 7800 24 1 0 5740 2 24 1 0 5503 2 1 0 1 16 0 15 0 3 34 0 7804 18 0 0 4124 0 2 0 0 1279 2 5 1 3 34 0 27 0 2 3752 2 7808 2 1 3 34 0 1 0 1 12 0 15 0 3 34 0 5 0 0 2047 2 7812 27 0 0 7815 2 4 0 0 2047 2 18 0 0 4126 0 2 0 0 1677 2 7816 1 1 3 175 0 26 0 0 5528 2 6 0 0 1279 2 24 0 1 1278 2 7820 2 0 0 64 0 0 0 2 2052 2 15 0 0 1278 2 2 1 0 4 0 7824 1 0 1 1 0 24 0 1 1278 2 18 1 0 0 0 14 1 2 3354 2 7828 6 0 0 1677 2 27 0 0 7833 2 2 0 0 1278 2 2 0 0 1677 2 7832 24 1 0 7818 2 6 1 0 2232 2 2 1 0 3530 2 26 0 0 5661 2 7836 26 0 0 5756 2 24 0 2 7840 2 26 0 0 5834 2 24 1 0 4207 2 7840 26 0 0 5800 2 24 1 0 3869 2 PROCEDURE 451 7842 0 0 0 0 0 6 0 0 7842 2 7844 24 0 1 3 0 2 0 0 197 0 6 1 1 30 0 3 1 0 1278 2 7848 2 1 0 6 0 6 0 3 1504 2 27 0 0 7871 2 2 0 0 3534 2 7852 2 0 3 1504 2 6 1 0 2286 2 2 1 0 3530 2 26 0 0 5661 2 7856 26 0 0 5756 2 6 0 3 1528 2 2 0 0 3536 2 2 0 3 1528 2 7860 6 0 3 1552 2 2 0 0 3538 2 1 1 3 3690 2 28 1 2 3538 2 7864 1 1 3 7868 2 26 0 0 5834 2 1 1 3 3692 2 24 1 0 5602 2 7868 26 0 0 5800 2 6 1 1 30 0 2 1 0 1278 2 24 0 1 3 0 7872 26 0 1 197 0 PROCEDURE 452 7873 24 1 1 2096 2 0 0 3 2096 2 6 0 0 24 0 7876 2 0 1 38 0 24 0 2 2180 2 2 0 0 2350 2 6 0 0 1 0 7880 2 0 1 40 0 6 0 1 44 0 2 0 1 41 0 6 0 1 39 0 7884 3 0 0 2402 2 5 0 0 281 2 27 0 0 7899 2 26 0 0 1012 2 7888 24 0 2 2350 2 28 1 2 108 2 24 0 2 4 0 26 0 0 2796 2 7892 24 1 0 1045 2 24 1 1 2096 2 0 0 3 2096 2 6 0 0 16 0 7896 2 0 1 38 0 24 0 2 2184 2 24 1 0 7878 2 6 0 0 2350 2 7900 5 0 0 2180 2 27 0 0 7903 2 1 1 3 1 0 1 1 1 83 0 7904 24 1 0 2004 2 PROCEDURE 453 7905 0 0 0 0 0 18 1 0 4124 0 18 1 3 3 0 7908 18 0 0 4 0 2 0 0 2396 2 18 1 3 13 0 2 0 0 2456 2 7912 0 0 3 2045 2 1 1 3 2116 2 12 0 0 2456 2 7 0 0 2396 2 7916 0 0 3 2096 2 6 0 0 2396 2 26 0 1 7905 2 PROCEDURE 454 7919 24 0 1 2 0 7920 0 1 0 30 0 0 0 3 2096 2 26 0 0 171 2 24 1 1 2096 2 7924 6 0 0 2 0 5 0 0 278 2 27 0 0 7954 2 25 1 2 0 0 7928 1 0 1 15 0 15 0 0 16 0 5 0 0 2050 2 26 0 0 7905 2 7932 2 0 1 38 0 1 0 1 15 0 15 0 1 44 0 26 0 0 7905 2 7936 2 0 1 43 0 6 0 0 32 0 26 0 0 7905 2 2 0 1 45 0 PROCEDURE 455 7940 23 0 2 1012 2 6 0 1 39 0 2 0 0 2396 2 6 0 1 38 0 7944 2 0 0 2456 2 6 0 1 43 0 2 0 0 2457 2 6 0 1 45 0 7948 2 0 0 2458 2 24 0 2 2328 2 28 1 2 108 2 24 0 2 4 0 7952 26 0 0 2796 2 24 1 0 1045 2 1 1 3 84 0 24 1 0 2004 2 PROCEDURE 456 7956 24 0 1 2 0 0 1 0 30 0 0 0 3 2096 2 6 0 0 301 2 7960 2 0 0 25 0 24 1 1 2096 2 6 0 0 2 0 5 0 0 278 2 7964 27 0 0 7994 2 6 0 0 24 0 3 0 1 38 0 18 0 0 6 0 7968 18 0 0 4122 0 5 0 0 2050 2 26 0 0 7905 2 2 0 1 45 0 7972 6 0 0 2029 2 2 0 0 25 0 26 0 0 1012 2 6 0 1 39 0 7976 2 0 0 2396 2 PROCEDURE 457 7977 24 0 1 2 0 0 1 1 30 0 0 1 0 2456 2 7980 0 0 3 2096 2 6 0 1 45 0 2 0 0 2397 2 24 0 1 3 0 7984 6 0 0 11 0 27 0 0 7992 2 6 0 1 38 0 18 0 0 6 0 7988 18 0 0 4122 0 1 1 2 1686 2 24 0 1 2783 2 27 0 2 3 0 7992 24 0 2 2288 2 24 1 0 7950 2 1 1 3 83 0 24 1 0 2004 2 PROCEDURE 458 7996 24 0 1 2 0 0 1 0 30 0 24 1 1 2096 2 0 0 3 2096 2 8000 6 0 0 2 0 5 0 0 278 2 27 0 0 8030 2 25 1 2 0 0 8004 1 0 1 15 0 15 0 0 0 0 26 0 0 7905 2 2 0 1 45 0 8008 2 0 0 2124 2 0 0 3 2045 2 1 1 3 2116 2 12 0 0 0 0 8012 2 0 1 45 0 0 0 3 2096 2 6 0 0 2053 2 2 0 0 2124 2 8016 26 0 0 1012 2 6 0 1 39 0 2 0 0 3532 2 6 0 1 45 0 8020 2 0 0 3534 2 2 1 0 3536 2 2 0 0 3533 2 1 1 3 3648 2 8024 28 1 2 108 2 6 1 0 2230 2 2 1 0 108 2 1 1 3 4 0 8028 26 0 0 2796 2 24 1 0 1045 2 1 1 3 99 0 24 1 0 2004 2 8032 2 0 0 2524 2 27 0 0 8120 2 27 0 1 8120 2 PROCEDURE 459 8035 0 0 0 0 0 8036 2 0 0 2463 2 6 0 0 4 0 5 0 0 49 2 27 0 3 8125 2 8040 6 0 0 50 2 5 0 0 4 0 27 0 3 8125 2 6 0 2 64 0 8044 2 0 0 2462 2 6 0 0 2032 2 3 0 0 8127 2 2 0 2 64 0 8048 26 1 1 278 2 6 0 0 2033 2 3 0 0 127 0 2 0 0 2582 2 8052 1 1 3 5 0 2 0 0 4763 2 1 1 3 63 0 6 0 0 4 0 8056 18 1 0 4118 0 6 0 0 4 0 5 0 0 52 2 27 0 2 8121 2 8060 1 1 3 5 0 18 0 0 5 0 4 0 0 4 0 0 1 0 2464 2 8064 26 0 0 18 2 0 1 1 2464 2 26 0 0 18 2 26 0 0 5716 2 8068 6 0 0 2462 2 24 0 1 2464 2 2 0 0 64 0 2 0 0 8127 2 8072 6 0 0 2060 2 24 0 1 51 2 2 0 0 3353 2 2 0 0 4763 2 8076 6 0 0 2463 2 27 0 0 8118 2 PROCEDURE 460 8078 6 1 0 2524 2 5 1 0 2068 2 8080 27 0 1 716 2 6 1 0 2527 2 3 0 0 2454 2 27 0 1 8092 2 8084 1 0 1 5 0 15 0 0 2745 2 1 1 2 1025 0 27 0 0 8092 2 8088 1 1 2 2 0 27 0 0 8092 2 1 1 2 5 0 27 0 3 8123 2 8092 6 1 0 2529 2 2 0 0 2455 2 6 0 0 2745 2 2 0 0 185 0 8096 6 1 0 2531 2 2 0 0 2667 2 6 0 0 2463 2 1 1 2 2 0 8100 27 0 0 8105 2 1 1 2 2 0 27 0 0 8105 2 1 1 2 5 0 8104 27 0 1 8118 2 6 1 0 2156 2 2 1 0 2540 2 6 0 0 3543 2 8108 1 1 2 18 0 18 0 0 5 0 28 0 0 2512 2 24 0 2 2382 2 8112 28 0 3 2532 2 6 0 0 2761 2 27 0 0 8118 2 6 0 0 2464 2 8116 2 1 0 4 0 24 1 0 8036 2 24 0 1 2464 2 19 1 3 0 0 8120 26 0 1 8035 2 1 1 3 6 0 24 1 0 8061 2 24 0 2 81 0 8124 24 1 1 717 2 24 0 2 83 0 24 1 1 719 2 0 0 0 0 0 PROCEDURE 461 8128 0 0 0 0 0 1 0 1 2 0 25 1 2 0 0 15 0 0 2446 2 8132 18 1 0 4127 0 4 0 0 51 2 2 0 0 4 0 26 0 1 8128 2 PROCEDURE 462 8136 0 0 0 0 0 6 0 0 8136 2 24 0 1 3 0 2 0 0 169 0 8140 6 0 0 392 2 27 0 0 8147 2 24 0 2 8140 2 2 0 1 42 0 8144 26 0 0 5806 2 24 0 1 2 0 24 1 0 9 0 6 0 1 9 0 8148 3 0 1 7 0 2 0 0 392 2 25 1 0 127 0 24 0 1 3 0 8152 26 0 1 169 0 0 0 0 2522 2 PROCEDURE 463 8154 6 0 0 2393 2 3 0 0 392 2 8156 2 0 0 4763 2 6 0 0 1 0 2 1 0 2589 2 6 0 0 18 2 8160 2 1 0 2623 2 26 0 0 171 2 6 0 0 153 0 2 1 0 2627 2 8164 6 0 0 32 0 2 1 0 2591 2 2 1 0 2586 2 PROCEDURE 464 8167 6 1 0 278 2 8168 2 1 0 2 0 6 0 0 300 2 2 0 0 247 2 2 0 0 341 2 8172 6 1 0 2508 2 2 0 0 2764 2 26 0 0 123 2 6 0 0 2033 2 8176 24 0 1 2764 2 2 0 0 64 0 6 0 0 2032 2 2 0 0 126 0 8180 6 0 0 6383 2 2 0 0 7178 2 6 0 0 2784 2 24 0 1 2783 2 8184 27 0 1 1 0 0 1 2 2160 2 1 1 3 18 0 26 0 0 2849 2 8188 6 0 0 6384 2 2 0 0 7178 2 6 1 0 2156 2 3 1 0 2634 2 8192 2 1 0 2576 2 26 0 0 107 2 PROCEDURE 465 8194 6 0 0 2668 2 2 1 0 2529 2 8196 6 0 0 33 2 2 1 0 2531 2 6 0 0 156 0 2 1 0 2533 2 8200 24 0 2 872 2 2 1 0 2541 2 26 0 0 107 2 24 0 1 341 2 8204 6 0 0 2671 2 24 0 3 126 0 3 1 0 5 0 5 0 0 2060 2 8208 27 0 0 38 2 24 0 3 341 2 24 0 3 2671 2 6 0 0 39 0 8212 24 0 3 126 0 2 1 0 5 0 24 0 3 341 2 24 0 3 2671 2 8216 24 0 3 37 0 6 0 0 4 0 24 0 3 126 0 2 1 0 7 0 8220 24 0 3 341 2 24 0 3 2671 2 24 0 3 37 0 24 0 2 20 0 8224 4 1 0 304 2 24 0 3 126 0 28 0 1 9 0 1 1 3 2 0 8228 7 0 0 341 2 24 1 0 10 2 PROCEDURE 466 8230 1 1 3 4 0 2 0 0 341 2 8232 2 0 0 340 2 2 0 0 342 2 1 0 1 8 0 15 0 0 153 0 8236 27 0 2 46 2 6 0 0 3528 2 3 0 0 343 2 2 0 0 317 2 8240 26 0 0 97 2 PROCEDURE 467 8241 24 0 3 342 2 23 0 3 0 0 5 0 0 317 2 8244 27 0 1 58 2 7 0 0 317 2 6 1 0 317 2 24 0 3 340 2 8248 2 1 0 4 0 26 0 0 97 2 1 1 3 2 0 18 0 0 5 0 8252 4 0 0 342 2 24 0 3 340 2 28 0 1 5 0 26 0 0 97 2 8256 23 0 0 2 0 0 0 0 342 1 24 1 0 49 2 1 0 1 8 0 8260 15 0 0 153 0 5 0 0 343 2 27 0 2 82 2 6 0 0 81 2 8264 2 0 0 342 2 1 0 1 4 0 15 0 0 153 0 27 0 1 82 2 8268 18 0 0 1 0 4 0 0 81 2 3 0 0 343 2 2 0 0 317 2 8272 24 1 0 49 2 0 1 0 0 0 26 0 0 107 2 PROCEDURE 468 8275 1 1 3 28 0 8276 26 0 0 2849 2 26 0 0 151 2 24 0 2 2206 2 23 0 2 168 0 8280 25 1 2 0 0 2 0 0 4763 2 6 0 0 2784 2 24 0 1 2783 2 8284 27 0 1 2 0 6 0 0 298 2 24 0 1 2764 2 2 0 0 64 0 8288 24 1 0 3248 2 PROCEDURE 469 8289 0 0 0 0 0 23 0 0 4 0 0 0 0 340 1 8292 26 0 1 97 2 26 0 0 107 2 6 0 0 126 0 3 0 0 340 2 8296 1 1 1 48 0 2 0 0 341 2 26 0 1 97 2 PROCEDURE 470 8299 0 0 0 0 0 8300 0 0 2 302 2 1 1 3 8 0 26 0 0 2849 2 26 0 0 5716 2 8304 6 1 0 302 2 24 0 1 126 0 28 0 0 0 0 26 0 0 171 2 8308 26 0 1 107 2 PROCEDURE 471 8309 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 8312 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 PROCEDURE 472 8315 0 0 0 0 0 8316 0 0 2 2385 2 6 0 0 2385 2 14 0 0 2764 2 24 0 1 2764 2 8320 6 0 0 64 0 2 0 0 298 2 24 0 1 2764 2 6 0 0 1280 2 8324 2 0 0 117 2 24 0 1 2764 2 6 0 0 1312 2 2 0 0 118 2 8328 24 0 1 2764 2 6 0 0 1344 2 2 0 0 119 2 24 0 1 2764 2 8332 6 0 0 1376 2 2 0 0 120 2 24 0 1 2764 2 6 0 0 1408 2 8336 2 0 0 121 2 24 0 1 2764 2 6 0 0 1440 2 2 0 0 122 2 8340 24 0 1 2764 2 2 0 0 1312 2 26 0 1 123 2 PROCEDURE 473 8343 0 0 0 0 0 8344 6 0 0 117 2 24 0 1 2764 2 2 0 0 1280 2 6 0 0 118 2 8348 24 0 1 2764 2 2 0 0 1312 2 6 0 0 119 2 24 0 1 2764 2 8352 2 0 0 1344 2 6 0 0 120 2 24 0 1 2764 2 2 0 0 1376 2 8356 6 0 0 121 2 24 0 1 2764 2 2 0 0 1408 2 6 0 0 122 2 8360 24 0 1 2764 2 2 0 0 1440 2 26 0 1 151 2 PROCEDURE 474 8363 0 0 0 0 0 8364 6 0 0 2027 2 2 0 0 9 0 26 0 3 175 2 15 0 0 176 2 8368 25 1 1 4096 0 6 0 0 2028 2 2 0 0 9 0 26 0 1 171 2 PROCEDURE 475 8372 26 1 1 278 2 6 0 0 2406 2 26 0 0 224 2 24 1 1 208 2 8376 2 0 2 2668 2 6 0 2 2669 2 2 0 0 6 0 24 0 2 3885 2 8380 2 0 3 42 0 PROCEDURE 476 8381 6 1 3 46 0 18 1 1 4125 0 1 0 2 5 0 8384 2 1 0 2452 2 1 1 3 2126 2 12 1 0 2452 2 2 1 0 2452 2 8388 0 0 3 2389 2 1 1 3 2134 2 12 1 0 2452 2 2 1 0 2452 2 8392 0 0 3 2389 2 1 1 3 2134 2 12 0 0 229 2 2 0 0 2398 2 8396 0 0 3 2096 2 2 1 0 228 2 1 1 3 322 2 24 1 0 217 2 8400 1 1 3 97 0 24 1 0 2004 2 PROCEDURE 477 8402 1 1 3 81 0 24 1 1 213 2 8404 1 1 3 82 0 2 0 0 2398 2 24 0 2 280 2 24 1 0 217 2 8408 24 0 2 300 2 PROCEDURE 478 8409 2 0 0 2407 2 26 0 0 1012 2 6 0 0 2407 2 8412 28 1 2 108 2 26 0 0 2796 2 26 0 0 238 2 24 1 0 1045 2 PROCEDURE 479 8416 0 0 0 0 0 2 0 0 2396 2 2 1 0 4 0 6 0 2 2668 2 8420 5 0 0 2396 2 27 0 1 235 2 6 0 2 2668 2 5 0 0 2060 2 8424 27 0 1 237 2 25 0 2 2 0 24 1 0 227 2 24 0 1 224 2 8428 24 1 0 1 0 26 0 1 224 2 PROCEDURE 480 8430 0 0 0 0 0 6 0 0 2437 2 8432 27 0 3 267 2 6 0 0 2432 2 27 0 1 251 2 26 1 3 2432 2 8436 6 0 3 45 0 27 1 0 249 2 25 1 2 0 0 5 0 3 45 0 8440 24 1 1 250 2 2 0 3 7 0 2 0 3 45 0 6 0 0 2434 2 8444 27 0 1 261 2 26 1 3 2434 2 6 0 3 45 0 27 1 0 259 2 8448 25 1 2 0 0 5 0 3 45 0 24 1 1 260 2 2 0 3 7 0 8452 2 0 3 45 0 2 0 0 2437 2 6 0 0 238 2 1 1 2 3255 2 8456 27 0 2 267 2 6 0 2 35 0 2 0 2 7 0 25 1 2 1919 0 8460 1 1 2 127 0 2 0 0 189 2 25 1 1 6143 0 6 0 0 299 2 8464 2 0 0 247 2 2 0 0 392 2 2 0 0 4763 2 6 0 0 188 2 8468 27 0 1 278 2 25 1 0 128 0 26 0 1 238 2 0 0 0 0 0 SECTION 481 8472 0 2162 1 5 3 0 0 0 5 0 0 2398 1 1041 3 0 4 1 1 0 8476 0 2158 1 769 3 0 3 0 1 0 0 2454 1 5 0 0 0 0 5 0 8480 0 2158 1 769 3 0 3 0 1 0 0 2166 1 18 3 0 0 1 2 0 8484 0 185 0 513 0 0 2 0 1 0 0 2166 1 786 3 0 3 1 2 0 8488 0 185 0 1025 0 0 4 0 1 0 0 2080 1 18 3 0 0 1 2 1 8492 0 2162 1 5 3 0 0 0 5 0 0 2158 1 802 3 0 3 2 2 0 8496 0 2166 1 18 3 0 0 1 2 0 0 2446 1 513 0 0 2 0 1 0 8500 0 2166 1 786 3 0 3 1 2 0 0 2446 1 1025 0 0 4 0 1 0 8504 0 2080 1 18 3 0 0 1 2 1 0 2080 1 18 3 0 0 1 2 1 8508 0 2080 1 50 3 0 0 3 2 1 0 2452 1 13651 2 3 5 5 3 0 8512 0 2452 1 2066 2 0 8 1 2 0 SECTION 482 8514 0 2200 1 5 3 0 0 0 5 0 8516 0 2158 1 769 3 0 3 0 1 0 0 2406 1 5 0 0 0 0 5 0 8520 0 2178 1 81 3 0 0 5 1 0 0 2184 1 1044 3 0 4 1 4 0 8524 0 2152 1 117 3 0 0 7 5 0 0 2398 1 4386 0 1 1 2 2 0 8528 0 2398 1 4882 0 1 3 1 2 0 0 2080 1 34 3 0 0 2 2 1 PROCEDURE 483 8532 25 1 1 4096 0 1 1 3 2048 0 2 0 0 0 0 25 1 2 0 0 8536 19 0 1 0 0 26 1 0 0 0 0 0 0 291 0 24 1 0 345 2 8540 0 0 0 2049 0 0 0 0 32 0 6 1 0 348 2 28 1 0 2081 0 8544 24 1 0 2081 0 24 1 1 472 2 24 1 0 216 2 27 0 1 216 2 8548 27 0 2 477 2 24 1 1 481 2 24 1 1 483 2 24 1 1 571 2 8552 24 1 1 572 2 24 1 0 1779 2 PROCEDURE 484 8554 1 1 3 86 0 2 0 0 2398 2 8556 24 1 1 2096 2 6 1 0 2376 2 28 0 0 26 0 23 1 0 26 0 8560 23 1 0 30 0 23 1 0 28 0 24 0 2 372 2 24 1 0 217 2 SECTION 485 8564 0 2234 1 5 3 0 0 0 5 0 0 2184 1 1025 3 0 4 0 1 0 8568 0 2398 1 1089 3 0 4 4 1 0 0 2158 1 769 3 0 3 0 1 0 8572 0 2402 1 5 0 0 0 0 5 0 0 2080 1 18 3 0 0 1 2 1 8576 0 2452 1 13651 2 3 5 5 3 0 0 2452 1 2066 2 0 8 1 2 0 8580 0 2178 1 81 3 0 0 5 1 0 0 2184 1 1044 3 0 4 1 4 0 SECTION 486 PROCEDURE 487 8584 0 0 0 0 0 6 1 0 2670 2 5 1 0 2060 2 27 0 1 216 2 8588 1 1 3 1026 0 2 0 0 2745 2 25 1 2 0 0 6 1 0 2513 2 8592 27 0 1 404 2 6 0 0 2508 2 1 1 1 7 0 24 1 1 414 2 8596 0 0 2 2385 2 15 1 0 2519 2 1 1 2 7 0 27 0 1 432 2 8600 1 1 1 7 0 4 1 0 2519 2 18 0 3 3 0 18 0 0 4127 0 8604 27 0 1 458 2 1 1 2 48 0 3 1 0 2518 2 1 1 2 128 0 8608 27 1 0 432 2 1 1 2 24 0 27 0 3 432 2 1 1 1 24 0 8612 1 1 1 152 0 26 0 0 3329 2 24 1 1 434 2 24 0 1 2518 2 8616 6 0 0 64 0 3 1 0 2520 2 1 1 2 4087 0 27 0 1 441 2 8620 1 1 2 1 0 27 0 1 441 2 1 1 2 3 0 27 0 1 441 2 8624 1 1 3 84 0 24 1 0 213 2 6 1 0 2518 2 3 0 0 2764 2 8628 6 1 0 2514 2 2 1 0 2736 2 6 1 0 2516 2 2 1 0 2738 2 8632 24 1 1 460 2 1 1 3 36 0 2 0 0 2523 2 2 0 0 2522 2 8636 24 0 1 2522 2 6 0 0 2473 2 27 0 1 451 2 23 0 0 6 0 8640 0 0 0 2522 1 24 1 0 444 2 24 1 0 432 2 6 1 0 2518 2 8644 24 0 1 2522 2 2 0 0 2472 2 6 1 0 2520 2 24 0 1 2522 2 8648 2 0 0 2473 2 24 1 0 434 2 6 0 0 2508 2 24 1 0 414 2 8652 6 1 0 2513 2 27 0 1 472 2 6 0 0 2784 2 27 0 2 477 2 8656 26 0 0 123 2 6 0 0 2050 2 7 0 0 2745 2 1 1 3 1 0 8660 2 0 0 2766 2 6 1 0 2513 2 2 0 0 2451 2 2 1 0 2512 2 8664 6 1 0 2454 2 3 1 0 2402 2 26 0 0 224 2 24 1 0 480 2 8668 24 1 1 478 2 1 1 3 1 0 1 1 1 82 0 24 1 1 572 2 PROCEDURE 488 8672 2 0 0 242 2 6 1 0 2380 2 28 1 1 684 2 6 1 0 2060 2 8676 1 1 0 2696 2 5 1 0 2696 2 27 0 1 496 2 18 1 0 10 0 8680 1 1 2 2 0 2 1 0 4 0 6 0 2 1 0 1 1 2 360 0 8684 27 1 0 495 2 4 0 2 0 0 24 1 1 502 2 25 1 2 0 0 8688 26 0 0 224 2 24 1 0 563 2 24 0 1 4 0 24 0 1 2669 2 8692 24 0 1 37 0 24 0 2 140 0 2 0 0 2742 2 24 0 1 2742 2 8696 1 1 3 0 0 2 0 0 2741 2 PROCEDURE 489 8698 6 0 0 299 2 2 0 0 247 2 8700 0 0 2 2050 2 15 0 0 2745 2 27 0 1 512 2 6 0 0 2385 2 8704 0 0 2 2385 2 14 0 0 2764 2 6 0 0 2032 2 24 0 1 2764 2 8708 2 0 0 64 0 6 0 0 2033 2 2 0 0 124 0 26 0 0 2898 2 8712 24 1 1 521 2 26 0 0 2954 2 24 1 1 573 2 6 0 0 185 0 8716 1 1 2 1033 0 27 0 2 540 2 6 1 0 2698 2 2 1 0 2696 2 8720 24 0 2 394 2 2 0 0 2698 2 1 1 2 394 2 7 0 0 2699 2 8724 6 0 0 539 2 2 0 0 1807 2 5 0 0 2050 2 7 0 0 4136 2 8728 7 0 0 5253 2 7 0 0 6883 2 24 1 1 540 2 24 1 0 1850 2 8732 6 0 0 300 2 2 0 0 247 2 PROCEDURE 490 8734 1 1 3 1 0 2 0 0 4763 2 8736 6 1 0 2372 2 28 0 0 2456 2 6 0 0 2742 2 3 1 0 28 0 8740 3 0 0 4 0 1 1 1 360 0 2 0 0 5 0 26 0 0 171 2 8744 24 0 2 14 0 23 1 2 0 0 25 0 2 2 0 24 1 0 553 2 8748 1 1 3 14 0 23 1 0 26 0 23 1 0 30 0 23 1 0 28 0 8752 24 0 2 2740 2 26 0 0 3265 2 26 0 1 2742 2 PROCEDURE 491 8755 6 0 0 242 2 8756 27 0 2 571 2 1 1 3 1 0 2 0 0 242 2 6 1 0 2060 2 8760 1 1 0 2716 2 5 1 0 2716 2 24 1 0 486 2 1 1 3 85 0 8764 24 1 0 213 2 1 1 3 81 0 2 0 0 2398 2 24 0 1 2522 2 8768 6 1 0 2474 2 2 1 0 2454 2 24 0 1 2522 2 2 1 0 2474 2 8772 24 0 2 610 2 24 1 0 217 2 SECTION 492 8774 45965 0 73596 0 8776 5.5. 0 57000 0 45565 0 73596 0 8780 5.5. 0 54000 0 16755 0 67735 0 8784 16954 0 67535 0 70000 0 58596 0 8788 45973 0 666 0 25573 0 7 0 8792 47152 0 5 0 25569 0 7 0 8796 7267 0 0 0 55457 0 5 0 8800 70010 0 726 0 SECTION 493 8802 0 2162 1 5 3 0 0 0 5 0 8804 0 2398 1 1041 3 0 4 1 1 0 0 2158 1 769 3 0 3 0 1 0 8808 0 2402 1 5 0 0 0 0 5 0 0 2158 1 769 3 0 3 0 1 0 8812 0 2454 1 5 0 0 0 0 5 0 0 2158 1 769 3 0 3 0 1 0 8816 0 2166 1 18 3 0 0 1 2 0 0 185 0 513 0 0 2 0 1 0 8820 0 2166 1 786 3 0 3 1 2 0 0 185 0 1025 0 0 4 0 1 0 8824 0 2080 1 2 3 0 0 0 2 1 0 2397 1 49 0 0 0 3 1 0 8828 0 2252 1 5 3 0 0 0 5 0 0 2665 1 5 0 0 0 0 5 0 SECTION 494 8832 0 47 1 1073 0 0 4 3 1 0 0 2396 1 21 0 0 0 1 5 1 SECTION 495 8836 0 2242 1 5 3 0 0 0 5 0 0 2168 1 257 3 0 1 0 1 0 8840 0 2454 1 5 0 0 0 0 5 0 0 2080 1 34 3 0 0 2 2 1 8844 0 2248 1 5 3 0 0 0 5 0 0 2166 1 1025 3 0 4 0 1 0 8848 0 2168 1 257 3 0 1 0 1 0 0 2454 1 5 0 0 0 0 5 0 8852 0 2080 1 18 3 0 0 1 2 1 0 2250 1 5 3 0 0 0 5 0 8856 0 2168 1 257 3 0 1 0 1 0 0 2454 1 5 0 0 0 0 5 0 8860 0 2168 1 257 3 0 1 0 1 0 0 2667 1 5 0 0 0 0 5 0 8864 0 2080 1 18 3 0 0 1 2 1 0 2246 1 5 3 0 0 0 5 0 8868 0 2168 1 258 3 0 1 0 2 0 0 2454 1 4611 0 1 2 0 3 0 8872 0 2455 1 12819 0 3 2 1 3 0 0 2080 1 66 3 0 0 4 2 1 SECTION 496 SECTION 497 8876 0 0 0 0 0 0 0 0 8880 0 0 0 0 0 0 0 0 8884 0 0 0 0 0 0 0 0 8888 0 0 0 0 0 0 0 0 8892 0 0 0 0 0 0 0 0 8896 0 0 0 0 0 0 0 0 8900 0 0 0 0 0 0 0 0 8904 0 0 0 0 0 0 0 0 PROCEDURE 498 8908 24 0 2 82 0 24 0 1 2464 2 19 1 3 0 0 2 0 0 2398 2 8912 26 0 0 1012 2 6 1 0 2178 2 2 1 0 108 2 6 0 0 2398 2 8916 2 1 0 110 2 24 0 2 1754 2 28 1 2 112 2 24 0 2 4 0 8920 24 1 0 221 2 PROCEDURE 499 8921 0 0 0 0 0 26 0 1 729 2 PROCEDURE 500 8923 0 0 0 0 0 8924 2 0 0 2396 2 15 0 0 2446 2 27 0 0 216 2 5 0 0 2396 2 8928 27 0 2 216 2 4 0 0 2396 2 26 0 1 731 2 PROCEDURE 501 8931 0 0 0 0 0 8932 1 0 1 2 0 15 0 0 185 0 27 0 2 216 2 1 1 3 0 0 8936 15 0 0 2446 2 18 0 0 4127 0 3 0 0 316 2 26 0 0 1012 2 8940 6 0 0 316 2 3 0 0 4 0 26 0 1 739 2 PROCEDURE 502 8943 0 0 0 0 0 8944 1 1 3 2 0 18 0 0 5 0 2 1 0 6 0 6 0 3 2454 2 8948 18 1 0 4127 0 2 0 3 1672 2 18 1 0 1 0 2 0 3 1674 2 8952 1 1 3 2126 2 12 0 3 1672 2 3 0 3 1672 2 18 0 3 3 0 8956 4 0 3 1674 2 3 0 3 1678 2 3 1 0 4 0 27 0 3 210 2 8960 1 1 2 176 0 27 0 2 210 2 6 0 2 64 0 18 1 0 4127 0 8964 26 0 1 751 2 0 0 0 216 2 0 0 0 216 2 24 1 1 958 2 8968 27 0 2 216 2 27 0 2 1006 2 27 0 1 216 2 PROCEDURE 503 8971 1 0 1 1 0 8972 1 1 3 12 0 26 0 0 731 2 2 0 0 785 2 24 0 1 785 2 8976 26 0 1 785 2 0 0 0 216 2 0 0 0 797 2 0 0 0 827 2 8980 0 0 0 850 2 0 0 0 882 2 0 0 0 890 2 0 0 0 909 2 8984 0 0 0 937 2 0 0 0 1051 2 0 0 0 1099 2 0 0 0 1115 2 8988 0 0 0 1136 2 PROCEDURE 504 8989 6 0 0 2470 2 27 0 2 824 2 26 0 0 1012 2 8992 26 1 2 2102 2 6 0 0 2024 2 2 0 2 355 2 6 0 0 3795 2 8996 2 0 2 378 2 2 1 2 397 2 6 0 0 2025 2 2 0 2 368 2 9000 25 0 2 48 0 24 1 0 801 2 6 0 0 5577 2 2 0 0 3785 2 9004 6 0 0 2024 2 3 0 0 3786 2 3 0 0 2470 2 6 1 0 384 2 9008 2 1 0 328 2 6 1 0 386 2 2 1 0 330 2 6 1 0 582 2 9012 2 1 0 108 2 6 1 0 584 2 2 1 0 110 2 24 1 0 221 2 9016 25 1 2 0 0 2 0 0 2454 2 24 1 0 210 2 PROCEDURE 505 9019 26 0 0 1012 2 9020 26 1 2 2102 2 6 0 2 357 2 2 0 2 355 2 6 0 2 379 2 9024 2 0 2 378 2 6 0 0 2031 2 2 0 2 368 2 25 0 2 48 0 9028 24 1 0 829 2 2 0 0 2470 2 6 0 0 3789 2 2 0 0 3785 2 9032 6 0 0 3790 2 2 0 0 3786 2 6 1 0 388 2 2 1 0 328 2 9036 6 1 0 390 2 2 1 0 330 2 6 1 0 586 2 2 1 0 108 2 9040 6 1 0 588 2 24 1 0 822 2 PROCEDURE 506 9042 26 0 0 1012 2 1 0 1 1008 0 9044 15 1 0 2158 2 2 1 0 108 2 2 1 0 4 0 2 1 0 6 0 9048 6 0 2 2670 2 27 0 1 877 2 6 1 2 2670 2 3 1 0 2396 2 9052 5 1 0 2060 2 27 0 1 879 2 24 0 1 2397 2 24 0 1 37 0 9056 6 0 0 10 0 2 0 0 47 2 24 0 2 640 2 24 0 1 6 0 9060 28 1 2 110 2 6 0 0 6 0 1 1 2 12 0 27 0 2 876 2 9064 1 0 1 12 0 15 0 0 2080 2 2 1 3 114 2 25 0 3 2 0 9068 25 0 3 4 0 25 0 2 2 0 24 1 0 856 2 6 0 0 234 2 9072 2 1 3 110 2 24 1 0 221 2 PROCEDURE 507 9074 1 1 2 32 0 26 0 0 739 2 9076 2 0 0 2773 2 24 0 1 4 0 6 1 2 590 2 2 1 0 108 2 9080 6 1 0 2226 2 24 1 1 904 2 PROCEDURE 508 9082 1 1 2 80 0 26 0 0 739 2 9084 27 0 0 216 2 26 0 0 5569 2 1 1 1 8191 0 14 0 0 908 2 9088 1 1 2 8191 0 27 0 1 899 2 1 1 3 2 0 2 0 0 6 0 9092 6 1 3 596 2 2 1 0 108 2 24 0 1 4 0 6 1 2 598 2 9096 2 1 0 110 2 6 1 0 2226 2 2 1 0 112 2 24 1 0 221 2 9100 0 0 0 0 0 PROCEDURE 509 9101 1 1 2 32 0 1 0 1 2 0 15 0 0 185 0 9104 27 0 2 216 2 18 0 1 4127 0 1 1 1 2 0 18 0 3 2 0 9108 3 0 0 7285 2 27 0 1 920 2 1 1 3 34 0 24 1 1 921 2 9112 1 1 3 27 0 18 1 0 4118 0 6 1 0 3554 2 24 0 1 192 0 9116 2 1 0 4 0 18 1 0 15 0 1 1 1 128 0 26 0 0 18 2 9120 26 0 0 1012 2 6 1 0 2266 2 2 1 0 108 2 24 0 1 7285 2 9124 0 1 1 2268 2 0 1 0 110 2 0 0 3 2117 2 25 1 2 0 0 9128 24 1 0 221 2 PROCEDURE 510 9129 26 0 0 1012 2 1 0 1 2 0 15 0 0 185 0 9132 1 1 2 128 0 27 0 3 960 2 1 1 1 128 0 26 0 0 946 2 9136 1 0 1 12 0 24 1 1 966 2 0 0 0 0 0 27 0 2 952 2 9140 1 1 3 3 0 18 0 0 3 0 2 1 0 2396 2 24 1 1 954 2 9144 3 1 0 2397 2 18 0 0 4127 0 3 0 0 731 2 24 0 2 2126 2 9148 12 0 0 731 2 18 0 3 3 0 2 0 0 731 2 26 0 1 946 2 9152 0 0 3 2045 2 1 1 1 352 0 0 0 3 2127 2 26 0 0 946 2 9156 1 0 1 60 0 1 0 1 12 0 6 1 0 2262 2 15 1 0 2396 2 9160 2 1 0 108 2 6 0 0 731 2 3 0 0 1672 2 1 1 1 8 0 9164 2 0 0 1673 2 2 1 0 1674 2 24 0 1 1672 2 6 0 0 64 0 9168 18 1 0 4127 0 27 0 1 988 2 1 1 2 255 0 27 0 1 996 2 9172 6 0 0 1672 2 5 0 0 731 2 27 0 2 984 2 1 1 1 48 0 9176 18 0 0 3 0 18 1 0 3 0 1 0 1 955 0 24 1 1 1014 2 9180 6 0 0 1672 2 5 0 0 731 2 27 0 2 992 2 1 1 1 48 0 9184 18 0 0 3 0 18 1 0 3 0 1 0 1 907 0 24 1 1 1014 2 PROCEDURE 511 9188 25 1 2 0 0 2 1 0 1676 2 24 0 1 1676 2 6 0 0 2670 2 9192 27 0 1 1027 2 5 0 0 2060 2 27 0 1 1006 2 23 0 0 2 0 9196 0 0 0 1676 1 24 1 0 998 2 6 0 0 1672 2 5 0 0 731 2 9200 27 0 2 1010 2 1 1 1 48 0 18 0 0 3 0 1 1 1 208 0 9204 18 0 0 3 0 1 0 1 947 0 15 1 0 2264 2 24 0 1 1674 2 9208 2 1 0 110 2 1 0 1 0 0 23 0 0 2 0 0 0 0 1674 1 9212 23 0 0 1 0 0 0 0 1672 1 24 1 0 974 2 6 0 0 2226 2 9216 2 1 0 126 2 26 1 1 278 2 24 1 0 221 2 24 0 1 1676 2 9220 24 0 1 2671 2 26 1 1 36 0 26 0 0 5745 2 25 1 2 0 0 9224 1 0 1 3 0 15 0 3 34 0 5 0 0 1672 2 27 0 1 1039 2 9228 25 0 3 1 0 24 1 0 1031 2 24 1 0 1003 2 1 0 1 16 0 9232 15 0 3 34 0 2 0 0 1678 2 0 0 2 2050 2 14 0 0 6 0 9236 6 1 3 34 0 27 0 3 1003 2 6 0 0 1678 2 18 1 0 4123 0 9240 24 1 0 988 2 24 1 1 1093 2 0 0 0 0 0 PROCEDURE 512 9243 26 0 0 1012 2 9244 6 1 0 2260 2 2 1 0 108 2 1 1 3 20 0 2 1 0 4 0 9248 26 1 3 2108 2 6 0 2 2687 2 5 0 0 2060 2 27 0 2 1063 2 9252 25 0 2 4098 0 24 1 0 1057 2 24 1 1 1076 2 0 0 3 2045 2 9256 24 0 2 2116 2 12 0 2 2695 2 2 0 0 176 2 24 0 2 3688 2 9260 24 0 1 6 0 28 1 2 110 2 0 0 3 2117 2 1 0 1 768 0 9264 14 1 3 110 2 25 0 3 2 0 25 0 2 4098 0 24 1 1 1096 2 9268 6 0 0 731 2 27 1 0 1093 2 1 1 3 18 0 2 0 0 5 0 9272 1 1 1 38 0 2 0 0 4 0 1 0 1 1008 0 15 1 0 2168 2 9276 2 1 3 110 2 6 0 0 6 0 1 1 1 2 0 3 0 0 6 0 9280 1 1 1 10 0 2 0 0 7 0 1 1 2 1111 0 2 0 0 731 2 9284 24 1 0 1057 2 6 1 0 2226 2 2 1 3 110 2 24 1 0 221 2 9288 25 0 3 0 0 24 1 0 1057 2 24 1 0 1074 2 PROCEDURE 513 9291 18 1 0 1 0 9292 25 1 2 0 0 15 0 0 185 0 15 0 0 185 0 18 0 0 4127 0 9296 2 0 0 2057 2 26 0 0 1012 2 6 1 0 2258 2 2 1 0 108 2 9300 6 1 0 2192 2 2 1 0 110 2 6 0 0 2057 2 18 0 3 15 0 9304 4 0 0 2226 2 2 1 0 112 2 24 1 0 221 2 PROCEDURE 514 9307 1 1 3 64 0 9308 26 0 0 739 2 27 0 1 1121 2 1 1 2 1 0 27 0 0 216 2 9312 1 1 1 1 0 18 0 3 3 0 3 0 0 49 2 3 0 0 50 2 9316 3 0 0 51 2 1 1 1 4 0 2 0 0 52 2 6 1 0 2242 2 9320 2 1 0 108 2 1 1 3 64 0 4 0 0 4 0 18 0 1 8 0 9324 1 0 1 15 0 15 0 0 2080 2 2 1 0 110 2 24 1 0 221 2 PROCEDURE 515 9328 26 0 0 1012 2 25 1 2 0 0 1 0 1 1 0 15 0 0 2767 2 9332 1 1 2 9 0 27 0 2 1146 2 6 1 0 2278 2 2 1 0 110 2 9336 1 1 3 4 0 24 1 1 1149 2 6 1 0 2280 2 2 1 0 110 2 9340 1 1 3 9 0 14 0 0 2767 2 6 1 0 2276 2 2 1 0 108 2 9344 6 0 0 2226 2 2 1 0 112 2 24 1 0 221 2 0 0 0 216 2 9348 0 0 0 216 2 27 0 1 216 2 0 0 0 216 2 15 0 0 2446 2 9352 27 0 0 216 2 1 1 3 10 0 1 1 3 7 0 1 1 3 9 0 PROCEDURE 516 9356 26 0 0 8128 2 1 1 3 14 0 26 0 0 731 2 3 0 0 1174 2 9360 1 1 2 11 0 27 0 3 1190 2 1 1 1 11 0 26 0 0 8035 2 9364 24 0 1 1174 2 26 0 1 1174 2 0 0 0 0 0 0 0 0 1205 2 9368 0 0 0 398 2 0 0 0 216 2 0 0 0 398 2 0 0 0 216 2 9372 0 0 0 1219 2 0 0 0 1256 2 0 0 0 1270 2 0 0 0 1315 2 9376 0 0 0 216 2 0 0 0 1219 2 0 0 0 1256 2 0 0 0 1315 2 9380 0 0 0 216 2 0 0 0 1205 2 1 0 1 2 0 1 1 3 0 0 9384 15 0 0 185 0 27 0 0 210 2 9 0 0 2105 2 18 1 0 9 0 9388 1 1 1 290 2 3 0 0 315 2 1 1 2 751 2 27 0 3 1207 2 9392 24 0 1 315 2 6 0 0 39 0 3 1 0 2454 2 27 0 0 210 2 9396 24 1 0 1172 2 PROCEDURE 517 9397 6 1 0 2454 2 26 0 0 224 2 24 1 0 210 2 9400 6 0 0 4 0 27 0 0 210 2 24 0 1 4 0 24 0 1 2669 2 9404 26 1 1 36 0 24 0 1 3 0 6 0 0 11 0 24 0 1 2783 2 9408 27 0 1 9 0 25 1 2 0 0 24 1 0 4687 2 PROCEDURE 518 9411 6 0 0 2454 2 9412 26 0 0 224 2 24 1 0 210 2 6 0 0 4 0 3 0 0 5 0 9416 1 1 2 4 0 27 0 3 212 2 6 1 2 2668 2 2 1 0 2396 2 9420 6 1 2 2666 2 2 1 2 2668 2 6 1 0 2396 2 2 1 2 2666 2 9424 6 0 2 2667 2 2 0 0 4 0 1 1 3 2387 2 2 0 0 6 0 9428 26 0 0 2813 2 PROCEDURE 519 9429 6 0 0 4 0 2 0 0 6 0 24 0 1 5 0 9432 6 0 0 2665 2 2 0 0 4 0 26 0 0 2813 2 6 0 0 4 0 9436 2 0 0 6 0 24 0 1 5 0 6 0 0 2669 2 2 0 0 4 0 9440 26 0 0 2813 2 6 0 0 4 0 2 0 0 6 0 1 1 3 2387 2 9444 2 0 0 4 0 26 0 0 2813 2 24 0 2 644 2 24 1 0 217 2 PROCEDURE 520 9448 6 0 0 2454 2 26 0 0 224 2 24 1 0 210 2 6 0 2 2669 2 9452 2 1 0 4 0 6 0 2 45 0 5 0 0 2026 2 27 0 0 212 2 9456 6 0 2 45 0 27 0 2 212 2 2 0 2 7 0 2 0 2 45 0 9460 1 1 3 652 2 24 1 0 217 2 PROCEDURE 521 9462 6 0 0 2454 2 26 0 0 224 2 9464 24 1 1 1274 2 24 1 0 212 2 26 0 0 224 2 24 1 0 210 2 9468 6 0 2 2669 2 2 0 0 6 0 6 0 3 39 0 5 0 0 2454 2 9472 27 0 1 233 2 24 0 1 6 0 24 0 1 37 0 6 0 0 11 0 9476 27 0 2 1313 2 6 0 0 2454 2 2 0 2 2668 2 6 0 3 37 0 9480 2 0 0 4 0 6 0 0 2667 2 3 0 3 40 0 2 0 2 15 0 9484 6 0 0 2533 2 5 0 0 2157 2 27 0 1 1299 2 6 1 0 2534 2 9488 2 1 3 30 0 6 1 0 2536 2 24 1 1 1300 2 2 1 3 30 0 9492 2 1 3 32 0 6 0 0 2045 2 2 0 3 34 0 2 1 1 46 0 9496 1 0 1 15 0 6 0 2 10 0 18 0 0 4 0 15 0 2 8 0 9500 2 0 3 44 0 6 0 3 35 0 2 0 3 7 0 24 0 2 662 2 9504 24 1 0 217 2 24 0 2 83 0 24 1 0 213 2 PROCEDURE 522 9507 6 0 0 2454 2 9508 26 0 0 224 2 24 1 0 210 2 6 0 2 2669 2 2 1 0 4 0 9512 6 0 2 7 0 5 0 2 9 0 27 0 0 212 2 6 0 2 7 0 9516 2 0 2 45 0 6 0 2 9 0 2 0 2 7 0 26 0 0 1012 2 9520 1 1 3 654 2 28 1 2 110 2 6 1 0 2240 2 2 1 0 108 2 9524 1 0 1 768 0 14 1 0 110 2 24 1 0 221 2 PROCEDURE 523 9527 1 0 1 1 0 9528 1 1 3 2 0 26 0 0 731 2 24 1 0 8154 2 PROCEDURE 524 9531 26 0 0 8128 2 9532 1 1 3 10 0 26 0 0 731 2 3 0 0 1346 2 26 0 0 8035 2 9536 24 0 1 1346 2 26 0 1 1346 2 0 0 0 0 0 0 0 0 1356 2 9540 0 0 0 398 2 0 0 0 1387 2 0 0 0 398 2 0 0 0 216 2 9544 0 0 0 1399 2 0 0 0 1422 2 0 0 0 1436 2 0 0 0 393 2 PROCEDURE 525 9548 6 1 0 2527 2 27 0 2 1382 2 24 0 2 24 0 5 0 0 1384 2 9552 2 0 0 1384 2 6 1 0 1682 2 24 0 1 1384 2 28 1 0 1704 2 9556 25 1 2 0 0 24 0 1 1384 2 2 0 0 1704 2 6 1 0 1684 2 9560 24 0 1 1384 2 28 1 0 1716 2 26 0 0 1012 2 6 1 0 2284 2 9564 2 1 0 112 2 6 1 0 2204 2 2 1 0 108 2 2 1 0 110 2 9568 6 1 0 2528 2 2 1 0 112 2 6 1 0 2226 2 2 1 0 114 2 9572 2 1 0 114 2 24 1 0 221 2 24 0 2 81 0 24 1 0 719 2 9576 0 0 0 0 0 27 0 1 212 2 27 0 1 216 2 PROCEDURE 526 9579 6 1 0 2527 2 9580 27 0 1 1382 2 1 1 3 12 0 5 0 0 1398 2 2 0 0 1398 2 9584 6 1 0 1682 2 24 0 1 1398 2 28 1 0 1728 2 26 0 0 1012 2 9588 6 1 0 2282 2 24 1 0 1372 2 0 0 0 0 0 PROCEDURE 527 9591 26 0 0 751 2 9592 1 1 2 255 0 27 0 2 1409 2 18 1 0 1 0 2 0 2 64 0 9596 2 0 0 2455 2 24 0 2 2246 2 2 0 0 674 2 24 0 2 674 2 9600 24 1 0 217 2 6 0 0 4 0 26 0 0 3329 2 24 1 1 1413 2 9604 24 1 0 212 2 24 0 1 2522 2 6 0 0 2473 2 2 0 2 64 0 9608 6 0 0 3543 2 1 1 2 22 0 18 0 0 5 0 24 0 1 2522 2 9612 28 0 0 2472 2 24 1 0 1404 2 PROCEDURE 528 9614 26 0 0 751 2 27 0 1 212 2 9616 1 1 1 255 0 18 1 0 1 0 2 0 2 64 0 2 0 0 2455 2 9620 24 0 2 2244 2 24 1 0 1406 2 27 0 1 1654 2 27 0 3 1654 2 9624 27 1 0 1654 2 27 0 2 1654 2 27 0 1 1592 2 27 0 1 1635 2 PROCEDURE 529 9628 26 0 0 751 2 25 1 2 0 0 18 1 0 1 0 3 0 0 1658 2 9632 3 0 3 1676 2 25 0 3 1 0 24 1 0 755 2 6 0 2 64 0 9636 18 0 0 4124 0 27 0 1 1654 2 3 0 0 1677 2 1 1 2 13 0 9640 27 0 3 1654 2 6 0 0 1676 2 1 1 2 5 0 27 0 1 1463 2 9644 6 0 0 1673 2 1 1 2 16 0 27 1 0 1492 2 1 1 2 1 0 9648 27 0 3 1492 2 6 0 0 1672 2 1 1 2 16 0 27 1 0 1654 2 9652 1 1 2 1 0 27 0 3 1654 2 1 1 3 15 0 2 0 0 1658 2 9656 26 1 3 2102 2 6 0 3 381 2 5 0 0 1679 2 27 0 1 1471 2 9660 25 0 3 48 0 24 1 0 1465 2 24 1 1 1654 2 24 0 1 6 0 9664 26 1 1 387 2 6 0 1 31 0 1 1 2 15 0 27 1 0 1478 2 9668 1 1 2 4 0 27 1 0 1501 2 6 0 1 31 0 1 1 1 3801 2 9672 1 1 2 5049 2 27 0 1 1501 2 1 1 1 5049 2 1 1 2 6992 2 9676 27 0 1 1501 2 1 1 1 6992 2 1 1 2 4485 2 27 0 1 1501 2 9680 1 1 1 4485 2 1 1 2 5898 2 27 0 1 1501 2 24 1 1 1654 2 9684 26 1 3 2102 2 6 0 0 1677 2 1 1 2 1 0 27 0 1 1499 2 9688 25 0 3 48 0 24 1 0 1494 2 24 1 1 1654 2 24 0 1 6 0 9692 26 1 1 387 2 6 0 0 1679 2 2 0 0 1278 2 26 0 0 5738 2 9696 27 0 1 1508 2 25 0 3 2 0 24 1 0 5740 2 24 1 1 1654 2 9700 1 0 1 16 0 15 0 3 34 0 18 0 0 4124 0 3 0 0 1677 2 9704 5 0 0 1676 2 27 0 1 1516 2 6 0 0 1658 2 27 0 3 1654 2 9708 24 0 1 1678 2 6 0 0 64 0 18 0 0 4127 0 27 0 2 1654 2 9712 6 0 2 64 0 24 0 0 1678 2 2 0 0 64 0 6 0 0 1677 2 9716 1 1 1 4080 0 3 0 2 64 0 PROCEDURE 530 9718 1 1 2 4086 0 27 0 2 1553 2 9720 1 1 2 7 0 27 0 2 1553 2 6 0 0 1679 2 5 0 0 2433 2 9724 27 0 2 1536 2 6 0 0 1678 2 2 0 0 2433 2 24 1 1 1538 2 9728 6 0 0 1678 2 2 0 0 2435 2 6 0 0 1679 2 5 0 0 6248 2 9732 27 0 2 1543 2 6 0 0 1678 2 2 0 0 6248 2 6 0 0 1679 2 9736 5 0 0 6247 2 27 0 2 1548 2 6 0 0 1678 2 2 0 0 6247 2 9740 6 0 2 65 0 24 0 1 1678 2 2 0 0 65 0 1 1 3 1 0 9744 24 1 1 1554 2 25 1 2 0 0 2 0 0 1659 2 6 0 0 1678 2 9748 18 0 0 3 0 4 0 0 1676 2 18 0 0 4 0 4 0 0 1678 2 9752 1 0 1 403 0 14 1 3 34 0 6 0 0 1678 2 26 0 0 5528 2 9756 27 0 1 1578 2 27 0 1 1588 2 27 0 2 1608 2 24 1 0 1407 2 9760 26 0 0 5719 2 24 1 0 216 2 PROCEDURE 531 9762 25 1 2 0 0 1 0 1 3 0 9764 15 0 1 7 0 5 0 0 1577 2 27 0 2 1582 2 5 0 0 1659 2 9768 27 0 2 1582 2 1 1 1 1 0 4 0 0 1678 2 14 0 1 7 0 9772 25 1 2 0 0 2 0 1 45 0 6 0 1 30 0 5 0 0 1679 2 9776 27 0 2 1590 2 5 0 0 1659 2 27 0 2 1590 2 4 0 0 1659 2 9780 4 0 0 1678 2 2 0 1 30 0 6 0 0 1658 2 27 0 1 1601 2 9784 27 0 3 1608 2 26 1 3 306 2 24 0 1 1679 2 6 0 3 1280 2 9788 24 0 1 1678 2 2 0 3 1280 2 25 0 3 24 0 24 1 0 1594 2 9792 24 1 2 1642 2 24 0 2 1642 2 2 0 0 5462 2 6 0 0 1679 2 9796 2 0 0 2397 2 6 0 0 1678 2 2 0 0 1278 2 24 1 0 5466 2 9800 6 0 0 1673 2 18 0 3 3 0 2 0 0 6 0 6 0 3 3352 2 9804 5 0 0 1679 2 27 0 2 1628 2 6 0 3 3353 2 3 0 0 1677 2 9808 5 0 0 2060 2 27 0 1 1628 2 26 1 1 278 2 6 0 0 1679 2 9812 2 0 1 30 0 26 0 0 5728 2 24 0 1 1679 2 19 1 2 0 0 9816 24 0 1 3 0 6 0 0 160 0 27 0 1 1642 2 24 1 1 1639 2 9820 6 0 0 1673 2 18 0 3 3 0 2 0 0 6 0 1 0 1 1 0 9824 24 0 1 1675 2 18 1 0 0 0 15 1 3 3354 2 25 0 0 1642 2 9828 18 1 2 1677 2 18 0 0 4120 0 2 0 0 1677 2 6 0 0 201 2 9832 2 0 0 3797 2 24 1 1 1643 2 2 0 0 1677 2 6 0 0 1672 2 9836 18 0 3 3 0 2 0 0 6 0 1 0 1 1 0 6 0 0 1677 2 9840 24 0 1 1674 2 18 1 0 0 0 14 0 3 3354 2 26 1 1 278 2 9844 24 0 2 2252 2 24 1 0 1406 2 26 1 1 278 2 6 0 0 2405 2 9848 2 0 0 2404 2 24 1 0 210 2 0 0 0 0 0 0 0 0 0 0 9852 27 0 2 216 2 27 0 2 210 2 PROCEDURE 532 9854 1 0 1 3 0 15 0 0 185 0 9856 1 1 2 128 0 27 1 0 1667 2 1 1 1 224 0 1 1 1 128 0 9860 2 0 0 2454 2 24 0 1 1842 2 26 0 1 1346 2 0 0 0 0 0 SECTION 533 9864 0 0 0 0 0 0 0 0 9868 0 0 0 0 0 0 0 0 SECTION 534 9872 0 2529 1 24 0 0 0 1 8 0 0 2529 1 48 0 0 0 3 0 0 9876 0 2587 1 24 0 0 0 1 8 0 PROCEDURE 535 9878 24 0 3 1688 2 24 1 0 1045 2 9880 0 0 0 0 0 0 0 0 0 0 SECTION 1004 9882 0 0 0 0 9884 0 0 0 0 0 0 0 0 9888 0 0 0 0 0 0 0 0 9892 0 0 0 0 0 0 0 0 9896 0 0 0 0 SECTION 1005 SECTION 1006 PROCEDURE 1002 CHAPT 2 PROCEDURE 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 2 0 0 0 0 3 4 0 0 0 0 4 0 0 0 0 5 0 0 0 0 6 0 0 0 0 7 8 0 0 0 0 8 0 0 0 0 9 0 0 0 0 10 0 0 0 0 0 12 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 1792 0 0 0 0 0 16 0 0 0 0 0 26 0 1 11 4 PROCEDURE 536 18 2 0 1 189 2 1 1 3 60 0 20 1 1 2 60 0 27 0 0 24 4 1 1 3 1 0 2 0 0 578 4 24 1 1 3 1686 2 2 0 1 2696 2 24 1 0 426 4 PROCEDURE 537 27 25 1 1 4096 0 28 24 1 3 295 4 6 0 0 188 4 24 0 3 0 0 2 0 0 25 0 32 25 1 1 8191 0 6 1 0 308 4 2 1 0 286 4 2 0 0 286 4 36 24 0 2 396 4 26 0 0 237 4 PROCEDURE 538 38 25 1 2 1792 0 27 0 0 41 4 40 18 0 1 4126 0 2 0 0 312 4 25 1 1 1792 0 6 1 0 300 4 44 4 0 0 286 4 28 0 1 319 4 24 0 3 286 4 23 0 3 0 0 48 3 0 0 288 4 5 0 0 289 4 27 0 0 52 4 2 0 0 285 4 52 24 0 3 286 4 23 0 3 2 0 3 0 0 289 4 5 0 0 288 4 56 27 0 0 58 4 2 0 0 285 4 PROCEDURE 539 58 24 0 1 290 4 6 1 0 318 4 60 27 0 0 64 4 26 0 0 189 4 24 0 1 290 4 2 1 0 318 4 64 23 0 0 2 0 0 0 0 290 3 24 1 0 58 4 2 0 0 290 4 68 6 0 0 285 4 27 0 1 103 4 25 1 2 2 0 27 0 1 159 4 72 6 0 0 286 4 24 0 3 0 4 1 1 2 872 2 27 0 3 93 4 76 25 1 2 32 0 27 0 0 93 4 6 0 0 286 4 1 1 2 8191 0 80 27 0 2 87 4 1 1 1 8191 0 1 1 2 1688 2 27 0 2 93 4 84 1 1 3 1688 2 2 0 0 286 4 24 1 0 93 4 24 0 2 396 4 88 2 0 0 286 4 0 0 2 313 4 18 1 0 4124 0 14 0 0 286 4 92 25 1 1 32 0 23 0 0 4 0 0 0 0 286 3 24 1 0 38 4 96 24 1 0 159 4 6 0 0 287 4 5 0 0 311 4 27 0 0 159 4 100 6 1 0 310 4 2 1 0 286 4 24 1 0 38 4 6 0 0 312 4 104 27 0 0 116 4 5 0 0 288 4 27 0 0 116 4 6 0 0 288 4 108 1 1 2 13 0 27 0 2 116 4 6 0 0 312 4 5 0 0 289 4 112 27 0 0 116 4 6 0 0 289 4 1 1 2 13 0 27 0 3 38 4 PROCEDURE 540 116 0 1 2 314 4 25 1 2 0 0 24 0 3 286 4 15 1 0 0 0 120 26 0 0 221 4 6 1 0 298 4 2 1 0 326 4 0 1 2 314 4 124 24 0 3 286 4 15 1 0 2 0 26 0 0 221 4 6 1 0 298 4 128 2 1 0 328 4 24 0 3 0 0 0 0 3 2045 2 24 0 1 286 4 132 1 1 3 0 0 2 0 0 294 4 24 0 3 0 0 24 0 2 2116 2 136 12 0 0 294 4 2 0 0 294 4 24 0 3 0 0 0 0 3 2096 2 140 24 0 3 286 4 24 0 2 0 0 24 0 1 286 4 1 1 2 0 0 144 18 0 3 3 0 7 0 0 294 4 PROCEDURE 541 146 6 0 0 286 4 3 0 0 372 4 148 1 1 1 1 0 3 0 0 374 4 1 1 1 1 0 3 0 0 376 4 152 1 1 1 1 0 2 0 0 378 4 24 0 2 334 4 26 0 0 237 4 156 2 0 0 332 4 2 0 0 285 4 24 1 0 70 4 PROCEDURE 542 159 24 0 3 0 0 160 6 0 0 140 0 27 0 0 175 4 25 1 2 0 0 2 0 0 286 4 164 24 0 1 286 4 24 0 1 0 0 1 1 3 0 0 24 0 3 0 0 168 5 0 0 140 0 27 0 1 172 4 24 0 2 392 4 26 0 0 237 4 172 23 0 0 1 0 0 0 0 286 3 24 1 0 164 4 25 1 1 8191 0 176 24 0 1 0 0 25 1 0 0 0 24 0 3 0 0 6 0 0 2029 2 180 24 0 3 0 0 2 0 0 25 0 2 0 0 312 4 23 0 2 184 4 184 0 0 0 0 0 24 0 3 0 0 24 1 0 193 2 24 0 3 0 0 188 26 0 3 24 0 PROCEDURE 543 189 0 0 0 0 0 2 1 0 292 4 0 0 2 296 4 192 15 0 0 293 4 18 0 0 4125 0 2 0 0 330 4 24 0 3 0 0 196 0 0 3 2045 2 24 0 3 0 0 24 0 2 2116 2 3 0 0 285 4 200 12 0 0 330 4 2 0 0 330 4 0 1 2 293 4 18 1 0 6 0 204 6 0 0 330 4 18 0 3 3 0 18 1 3 1 0 18 0 3 2 0 208 18 1 3 2 0 2 0 0 331 4 18 1 3 1 0 18 1 0 3 0 212 2 0 0 330 4 24 0 3 0 0 24 0 2 2116 2 12 0 0 330 4 216 24 0 3 0 0 0 0 3 2096 2 2 0 0 330 4 6 1 0 330 4 220 26 0 1 189 4 PROCEDURE 544 221 0 0 0 0 0 2 1 0 298 4 0 1 2 306 4 224 15 1 0 298 4 15 1 0 302 4 27 0 0 233 4 15 1 0 304 4 228 27 0 0 233 4 18 1 0 2 0 1 1 3 0 0 27 1 1 224 4 232 26 0 1 221 4 14 1 0 298 4 1 1 3 91 0 2 0 0 332 4 236 24 1 0 229 4 PROCEDURE 545 237 0 0 0 0 0 24 0 1 284 4 26 1 0 0 0 240 24 1 0 245 4 24 1 0 238 4 24 1 0 247 4 0 0 0 3845 0 244 24 1 0 248 4 0 0 0 3841 0 24 1 0 238 4 0 0 0 3843 0 248 28 1 2 428 4 24 0 3 0 0 6 1 0 3546 2 2 1 0 426 4 252 24 0 3 284 4 6 0 0 64 0 2 0 0 333 4 25 1 0 0 0 256 6 0 0 272 4 24 0 3 284 4 2 0 0 64 0 6 0 0 273 4 260 24 0 3 272 4 29 0 1 0 0 24 1 0 266 4 6 0 0 273 4 264 24 0 3 284 4 2 0 0 64 0 24 0 1 284 4 19 0 0 0 0 268 6 0 0 333 4 24 0 3 284 4 2 0 0 64 0 26 0 1 237 4 272 14 0 1 426 4 14 0 1 426 4 SECTION 546 274 66955 0 72736 0 276 96573 0 67695 0 0 0 66560 0 280 25565 0 73516 0 5173 0 66650 0 SECTION 547 284 0 0 0 0 0 0 0 0 288 0 0 0 0 0 0 8 0 292 0 0 0 0 0 0 0 0 296 1£000 0 0 0 0 0 0 0 300 0 0 4 0 .1.1. 0 1.1.1- 0 304 2020 0 20202- 0 3£ 0 0 £000 308 0 0 0 0 8000 0 8000 0 312 0 0 3£000 0 £££££ 0 £££££ 0 316 7. 0 7.000 0 SECTION 548 318 0 0 0 0 320 0 0 0 0 0 0 0 0 324 0 0 0 0 0 0 0 0 328 0 0 0 0 0 0 0 0 332 0 0 0 0 SECTION 549 334 0 294 3 17 0 0 0 1 1 0 336 0 294 3 12564 0 3 1 1 4 0 0 286 3 276 0 0 1 1 4 0 340 0 319 3 4402 0 1 1 3 2 0 0 319 3 785 0 0 3 1 1 0 344 0 319 3 1041 0 0 4 1 1 0 0 318 3 12564 0 3 1 1 4 0 348 0 321 3 4402 0 1 1 3 2 0 0 321 3 785 0 0 3 1 1 0 352 0 321 3 1041 0 0 4 1 1 0 0 320 3 12564 0 3 1 1 4 0 356 0 323 3 4402 0 1 1 3 2 0 0 323 3 785 0 0 3 1 1 0 360 0 323 3 1041 0 0 4 1 1 0 0 322 3 12564 0 3 1 1 4 0 364 0 325 3 4402 0 1 1 3 2 0 0 325 3 785 0 0 3 1 1 0 368 0 325 3 1041 0 0 4 1 1 0 0 324 3 12564 0 3 1 1 4 0 372 0 0 0 16437 4 4 0 3 5 0 0 0 0 16405 4 4 0 1 5 0 376 0 0 0 16405 4 4 0 1 5 0 0 0 0 16405 4 4 0 1 5 0 380 0 326 3 37 3 0 0 2 5 0 0 328 3 37 3 0 0 2 5 0 384 0 288 3 1057 0 0 4 2 1 0 0 289 3 1041 0 0 4 1 1 0 388 0 332 3 1041 3 0 4 1 1 0 0 316 3 1 3 0 0 0 1 1 392 0 286 3 388 0 0 1 8 4 0 0 316 3 33 3 0 0 2 1 1 SECTION 550 396 0 274 3 229 3 0 0 14 5 0 0 276 3 21 3 0 0 1 5 0 400 0 278 3 18 3 0 0 1 2 0 0 181 0 21 0 0 0 1 5 0 404 0 182 0 4914 0 1 3 3 2 0 0 280 3 37 3 0 0 2 5 0 408 0 282 3 18 3 0 0 1 2 0 0 138 0 5154 2 1 4 2 2 0 412 0 138 0 5650 2 1 6 1 2 0 0 138 0 6162 2 1 8 1 2 0 416 0 282 3 515 3 0 2 0 3 0 0 156 0 34 0 0 0 2 2 0 420 0 156 0 530 0 0 2 1 2 0 0 316 3 1 3 0 0 0 1 1 424 0 0 0 384 2 0 1 8 0 0 PROCEDURE 551 426 6 0 0 570 4 2 0 1 17 0 428 6 1 0 562 4 2 1 1 134 0 6 0 0 573 4 2 0 1 1 0 432 1 1 2 64 0 2 0 1 2772 2 6 0 1 2029 2 24 1 0 437 4 436 27 0 2 462 4 2 0 1 25 0 1 1 3 894 2 1 1 2 128 0 440 2 0 1 279 2 6 0 0 571 4 5 0 1 2696 2 2 0 1 2697 2 444 1 1 3 1686 2 1 1 2 18 4 27 0 2 454 4 6 0 0 571 4 448 7 0 0 2696 2 6 1 0 566 4 24 0 3 0 4 28 0 0 2698 2 452 6 0 0 553 4 2 0 0 552 4 PROCEDURE 552 454 6 0 1 2764 2 24 0 3 0 4 456 3 0 0 2508 2 24 0 3 0 4 2 0 0 2472 2 1 1 3 7 0 460 24 0 3 0 4 2 0 0 2473 2 6 0 1 2032 2 24 0 3 0 4 464 24 0 3 2764 2 2 0 0 64 0 6 0 0 564 4 24 0 3 0 4 468 24 0 3 2764 2 2 0 0 71 0 6 0 1 2033 2 2 0 1 124 0 472 1 1 3 2640 2 18 0 0 5 0 1 1 1 2524 2 2 1 1 4 0 476 1 1 3 13 0 26 0 0 554 4 1 1 3 15 0 23 1 1 186 2 480 23 1 1 2578 2 23 1 1 2636 2 6 1 1 121 2 18 1 0 4123 0 484 1 1 1 7 0 18 1 0 4 0 2 0 1 181 0 6 1 1 123 2 488 18 1 0 4125 0 2 0 1 182 0 PROCEDURE 553 490 1 1 3 3612 2 18 0 0 5 0 492 1 1 1 3560 2 2 1 1 4 0 1 1 3 13 0 26 0 0 554 4 496 6 0 0 572 4 2 0 1 119 0 6 0 1 143 0 2 0 1 342 2 500 6 0 1 144 0 2 0 1 344 2 6 0 1 145 0 2 0 1 345 2 504 6 0 0 574 4 2 0 1 140 0 PROCEDURE 554 506 6 0 0 578 4 27 0 0 547 4 508 6 0 1 2027 2 2 0 1 9 0 26 0 3 511 4 15 0 1 512 4 512 25 1 1 4096 0 6 0 1 2028 2 2 0 1 9 0 6 0 1 153 0 516 23 0 2 517 4 0 0 0 0 0 18 1 0 4124 0 1 1 2 9 0 520 27 0 1 525 4 6 0 0 255 4 2 0 0 538 4 6 0 0 577 4 524 2 0 0 255 4 25 1 2 0 0 18 1 0 1 0 18 0 0 8 0 528 2 1 0 286 4 2 1 0 308 4 18 1 0 1 0 18 0 0 8 0 532 7 1 0 310 4 25 1 2 0 0 18 1 0 2 0 2 0 0 284 4 536 1 1 3 426 4 1 1 1 50 0 1 1 1 384 0 4 0 0 571 4 540 2 0 1 2698 2 6 0 0 571 4 4 0 0 571 4 5 0 1 2698 2 544 2 0 1 2699 2 1 1 3 50 0 7 0 0 272 4 PROCEDURE 555 547 6 0 1 2696 2 548 2 0 0 568 4 26 1 2 568 4 24 0 3 0 4 26 1 1 278 2 552 24 0 3 0 4 24 1 0 1686 2 PROCEDURE 556 554 0 0 0 0 0 24 0 3 0 4 556 23 1 2 0 0 25 0 2 2 0 24 1 0 555 4 26 0 1 554 4 560 24 1 0 7893 2 0 0 0 0 0 SECTION 557 562 +0+0 0 +0+0+ 0 564 ££7 0 0 0 PROCEDURE 558 566 0 0 0 2700 2 0 0 0 12 0 568 0 0 0 0 0 0 0 1 8184 0 24 1 0 7919 2 0 0 1 0 0 572 13 0 0 3560 2 24 1 0 7996 2 24 1 0 340 2 6 0 0 3117 2 576 1 1 3 38 0 24 1 0 263 4 0 0 0 0 0 0 0 0 1 0 SECTION 559 580 :0000 0 7 0 7 0 7 0 584 ££7 0 ££7 0 ££7 0 ££ 0 588 ££8 0 ££8 0 ££8 0 8 0 592 8 0 8 0 8 0 ££8 0 596 ££££ 0 ££££ 0 ££££ 0 ££££ 0 600 3 0 3 0 ££££ 0 ££££ 0 604 ££5 0 5 0 5 0 5 0 608 6 0 ££ 0 6 0 ££ 0 612 ££9 0 9 0 9 0 ££££ 0 616 ££££ 0 ££££ 0 ££££ 0 ££££ 0 620 ££££ 0 ££££ 0 ££££ 0 ££££ 0 624 ££££ 0 ££££ 0 ££££ 0 ££££ 0 628 ££££ 0 ££££ 0 ££££ 0 ££££ 0 632 ££££ 0 ££££ 0 ££££ 0 ££££ 0 636 1 0 1 0 ££ 0 ££ 0 640 ££ 0 ££ 0 ££ 0 ££ 0 SECTION 560 644 ££££ 0 ££££ 0 ££££ 0 ££££ 0 648 ££££ 0 ££££ 0 ££££ 0 ££££ 0 652 ££££ 0 ££££ 0 ££££ 0 ££££ 0 656 ££££ 0 ££££ 0 ££££ 0 ££££ 0 660 ££££ 0 ££££ 0 ££££ 0 ££££ 0 664 ££££ 0 ££££ 0 ££££ 0 ££££ 0 668 ££££ 0 ££££ 0 ££££ 0 ££££ 0 672 ££££ 0 ££££ 0 ££££ 0 ££££ 0 676 ££££ 0 ££££ 0 ££££ 0 ££££ 0 680 ££££ 0 ££££ 0 ££££ 0 ££££ 0 684 ££££ 0 ££££ 0 ££££ 0 ££££ 0 688 ££££ 0 ££££ 0 ££££ 0 ££££ 0 SECTION 1007 692 0 0 0 0 0 0 0 0 696 0 0 0 0 0 0 0 0 700 0 0 0 0 0 0 0 0 704 0 0 0 0 0 0 0 0 SECTION 1008 SECTION 1009 PROCEDURE 1003 CHAPT 3 EXTRA CHAPTER 202 0 0 0 0 INTERCODE TRIAL DATA SERIAL NUMBERS OF INTERCODE REPORTS PT OMITTED NO NO DISASTROUS 1 0 OTHERS 29 0 21702 21704 21736 21742 21746 21748 21810 22702 26224 26230 MADE BY 08000 ISSUE 8 SERIAL 801 ON 15/ 4/ 1 SPOOL 90012