PROGM 080 0 801 INTERCODE TRANSLATOR ENTRY 102 3 D1 14 0 195 0 PRINTER(OR CLEO-SIZEDANNEX) B1 15 4 27 0 PT/CARDS MODS A1 7 4 75 0 A2 8 4 75 0 A6 7 4 75 0 CHAPS 10 100 101 152 327 553 680 776 918 994 995 INDEX 3 1 2 2 2 2 2 2 2 2 2 *1001 3 24 0 2 PROCR 'LENGTH' INDEX B/FWD *1002 4 50 0 2 PASS 0 INPUT UNPACKED *1003 6 450 0 2 PASS 0 OLD/NEW PROCR INDEX *1004 17 50 0 2 WL'S IN PASS 0 *1005 22 225 0 2 PASS 0 PROCR INDEX *1006 19 230 0 2 PASS 0 ADJUST DETAILS *1007 21 50 0 2 PASS 0 UNIQUE REFS *1008 2 5 0 1 EXTENSION BACKWARDS OF SECTION 18 *1009 18 1250 0 1 SEQUENCE CHANGES FORWARD AND BACK *1010 1 23 0 3 PASS 1 INPUT UNPACKED *1011 28 23 0 3 PASS 1 NEXT RECORD *1012 29 22 0 3 PASS 1 NEXT OUTPUT REC *1013 66 12 0 4 PASS 2 INPUT UNPACKED *1014 67 2 0 4 PASS 2 O/P UNPACKED *1015 61 60 0 4 PASS 2 WL'S *1016 72 16 0 4 SWITCH PROCR LENGTHS+CHAP LENGTHS *1017 71 10 0 4 17 'MR>3' DETAILS+COUNTER *1018 94 50 0 4 MISC EACH PASS *1019 53 0 0 4 PASS 1 PROCR INDEX EX ISSUE 5(LENGTH 127 *1020 77 22 0 4 PASS 2 NEXT INPUT REC *1021 70 0 0 4 PASS 1 SECTION DETAILS(LENGTH 50) *1022 30 9 0 4 UNPACKED PT FOR 08005 *1023 31 11 0 4 FOR MT BLOCK FOR 08005 *1024 32 85 0 4 TD WL'S FOR 08005 *1025 54 80 0 4 PASS 1 ADJUST DETAILS *1026 55 25 0 4 PASS 1 UNIQUE REFS *1027 92 19 0 4 GENERAL ALL PASSES *1028 91 18 0 4 TWO OTRS.FILES LIST-TX AREAS LIST *1029 98 6 0 4 10 'ITEM+'DETAILS AND COUNTER *1030 95 25 0 4 48 SWITCH DETAILS AND COUNTER *1031 99 25 0 4 25 RADIX PAIRS PER PROGRAMME *1032 23 24 0 4 'PRINT PROCEDURES' INDICATORS *1033 25 21 0 4 'TRACE'DETAILS *1034 40 10 0 4 FRILL FOR PRINTING REPORT SERIALS *1035 27 10 0 4 PERMANENT WL'S *1036 10 195 1 0 PRINTER/CLEO I/P TX AREA *1037 14 0 0 4 DUMMY *1038 5 27 1 4 PT IN+PRINT *1039 7 75 1 4 MTIN,OUT+PRINT *1040 8 75 1 4 *1041 9 75 1 4 *1042 26 540 0 6 PROCR START ADDRESSES *1043 11 10 0 7 *1044 13 16 0 7 *1045 16 20 0 7 *1046 15 50 0 7 *1047 24 18 0 7 *1048 12 60 0 9 PASS 1 WL'S *1049 93 225 0 9 PASS 1 OLD/NEW PROCR INDEX *1050 97 230 0 9 PASS 1 ADJUST DETAILS *1051 52 50 0 9 PASS 1 UNIQUE REFS *1052 63 30 0 10 PASS 2 60 SHORT CONSTS PER CHAPTER *1053 62 110 0 10 PASS 2 90 LONG+20 TSL PER CHAPTER *1054 20 150 0 10 PASS 2 100 ACTIVE SEQ CHANGES FWD 10000 PROCR 100 100 CHAPTER ONE 10001 NOTES MAIN OVERLAY ORDER TO RECALL PASS 0 10715> 16271> 68039> 88512> 88523>10002 152 101 2 0 0 0 101 10003 C 101 2 0 0 0 101 10004 76 102 2 0 0 0 102 10100 PROCR 101 101 CALL PASS 1-THIS IS THE FIRST PROCR IN PASS 0 12541> 12546>10102 152 101 2 0 0 0 101 10103 C 152 2 0 0 0 152 10200 PROCR 102 102 STORE PRINTER AND I/P TYPE,ALLOCATE NEW DEVICE 10408> 10004>10202 62 0 0 0 0 10203 125 4096 1 1 0 10204 123 102 5 0 2 0 102 10205 100 0 0 0 0 10206 5 148 42 1 0 0 148 ORIGINAL(A) 10207 5 27 0 1 0 0 CLEAR WL'S 10208 5 27 2 1 0 0 10209 5 27 4 1 0 0 10210 5 27 6 1 0 0 10211 5 27 11 0 0 0 10212 5 27 13 0 0 0 10213 84 786 2 0 0 0 786 CLEAR SWITCH 772 10214 123 128 2 0 3 0 128 PROG TAG 10215 30 0 0 0 4 10216 35 0 0 0 10000 10217 37 125 4 0 0 0 125 FORM LINKS 10218 37 125 5 0 0 0 125 10219 37 125 6 0 0 0 125 10220 94 102 87 0 3 0 102 ///// *REENTRY 10221 124 999 5 0 3 0 10222 106 34 0 0 0 D1 10223 30 0 0 0 4- 10224 5 27 8 1 0 0 INITIAL PRINTER TYPE+CLEAR 'OFFLINE' 10225 124 999 5 0 3 0 10226 106 36 0 0 0 B1 10227 30 0 0 0 4- 10228 12 0 0 0 4 10229 5 27 10 0 0 0 INPUT TYPE 10230 0 126 15 0 0 0 126 23/0/2 10231 5 126 7 0 0 0 126 10232 148 42 2 0 0 148 10233 70 102 98 0 0 0 102 gTHINGS OK.EXIT 10291>10234 0 148 42 0 0 0 148 10235 5 999 31 0 0 0 10236 10 0 0 0 7 RT7 10237 80 103 2 0 0 0 103 10238 70 102 45 0 0 0 102 gOK 10239 10 0 0 0 8 RT8 10240 80 103 2 0 0 0 103 10241 70 102 45 0 0 0 102 10242 10 0 0 0 e RT11 10243 80 103 2 0 0 0 103 10244 71 104 2 0 0 0 104 gALARM*10 10241> 10238>10245 84 787 2 0 0 0 787 CLEAR SWITCH 10246 C 999 0 0 0 0 TO OPEN A9 10247 10 0 0 0 1 10297>10248 5 27 9 0 0 0 10249 96 0 0 2 0 ALLOC ROUTE 10250 12 0 0 0 40 64 10251 3 999 7 0 0 0 10252 31 0 0 0 1 10253 32 0 0 0 1- 10254 5 126 2 0 0 0 126 CHANNEL 10255 33 0 0 0 3 10256 5 129 2 0 0 0 129 ROUTE 10257 126 2 0 0 0 126 CHANNEL 10258 80 143 2 0 0 0 143 *DEC 10259 5 148 42 0 0 0 148 10260 62 0 0 0 0 10261 27 9 0 0 0 10262 70 104 9 0 0 0 104 10263 124 999 5 0 3 0 SP CHAP START 10264 124 32 0 3 0 10265 124 16 0 3 0 10266 10 0 0 0 0 START OF REEL CTRS 10267 1 999 7 0 0 0 10268 5 142 2 0 0 0 142 WL 10269 124 142 2 0 3 0 142 10270 102 0 0 0 0 CLEAR REEL CTR FOR ROUTE 10271 124 999 5 0 3 0 FORM MODIFIER FOR HIGH LOW 10272 124 32 0 3 0 10273 106 22 0 0 0 10274 1 999 7 0 0 0 10275 5 103 2 0 0 0 103 10276 124 999 5 0 3 0 TEST MACHINE IS HIGH DENSITY 10277 124 32 0 3 0 10278 106 21 0 0 0 10279 70 104 9 0 0 0 104 gNO 10280 999 31 0 0 0 10281 12 0 0 0 58 'H'(=HIGH DENSITY WANTED) 10282 71 103 22 0 0 0 103 gNO 10283 10 0 0 0 1 10323>10284 124 103 2 0 3 0 103 10285 102 0 0 0 0 10286 76 104 9 0 0 0 104 10220>10287 96 0 0 3 0 10288 70 102 92 0 0 0 102 gPRINTER WANTED REENTRY 10289 27 9 0 0 0 10290 71 102 98 0 0 0 102 gMT WANTED AND GOT,EXIT 10291 76 102 34 0 0 0 102 gGET MT 10288>10292 27 9 0 0 0 10293 70 102 98 0 0 0 102 gPRINTER WANTED AND GOT,EXIT 10294 27 8 0 0 0 INITIAL PRINTER TYPE 10295 80 103 2 0 0 0 103 10296 71 104 2 0 0 0 104 gALARM*10 10297 76 102 48 0 0 0 102 10293> 10290> 10233>10298 126 125 4 0 3 0 125 gTO MAIN PATH 10300 PROCR 103 103 ALLOCATE ANOTHER DEVICE 10302 81 103 2 0 0 0 103 10303 5 140 2 0 0 0 140 10304 90 0 0 2 64 10305 C 0 0 0 128 10310>10306 140 2 0 0 0 140 10307 124 999 0 0 3 0 10308 105 0 0 2 0 10309 70 103 21 0 0 0 103 gMATCH END 10310 94 103 6 0 2 1 103 10311 999 9 0 0 0 KNOWN MT ROUTE 10312 12 0 0 0 18 CH3/0 10313 73 103 21 0 0 0 103 gSLOW CHANNEL END WITHOUT MATCH 10314 90 0 0 2 192 10315 C 0 0 0 240 10320>10316 124 999 0 0 3 0 TRY FAST CHANNEL 10317 106 0 0 2 0 10318 2 140 2 0 0 0 140 10319 70 103 21 0 0 0 103 10320 94 103 16 0 2 1 103 THE ALLOCATED ROUTE 10319> 10313> 10309>10321 82 103 2 0 0 0 103 (A) NONZERO IF NO MATCH 10282>10322 10 0 0 0 0 10323 76 102 84 0 0 0 102 10400 PROCR 104 104 ALARM IF CANT FIND REQUIRED ??? 10296> 10244>10402 126 125 5 0 3 0 125 12504>10403 150 0 0 0 10 10404 C 136 61 0 0 0 136 gUNLOAD 10405 C 104 7 0 0 0 104 gTRY AGAIN 10406 C 105 38 0 0 0 105 gAS YOU ARE 10405>10407 148 42 1 0 0 148 ORIGINAL (A) 10408 76 102 2 0 0 0 102 10286> 10279> 10262>10409 124 999 5 0 3 0 10410 106 34 0 0 0 10411 32 0 0 0 4- 10412 5 142 2 0 0 0 142 ROUTE TYPE 10413 32 0 0 0 2 10414 10 0 0 0 0 (ALT ROUTE) 10415 32 0 0 0 2 10416 5 143 2 0 0 0 143 ROUTE 10417 124 999 5 0 3 0 10418 124 32 0 3 0 10419 124 12 0 3 0 START OF ASSEMBLER TABLE 10420 101 0 1 3 0 10421 34 143 2 0 0 0 143 BITS 4-8 10422 36 148 96 0 0 0 148 8XCHANNEL 10423 5 126 2 0 0 0 126 10500 PROCR 105 105 START PASS 0-DEAL WITH INITIAL TRANSLATION 10502 11 0 0 0 80 * 10503 106 105 2 0 0 0 105 ** 10504 124 999 5 0 3 0 ADJUST ORDERS 10505 124 32 0 3 0 FOR FCC MACHINES 10506 104 32 0 0 0 ***** 10507 103 105 24 0 0 0 105 **** 10508 102 105 31 0 0 0 105 *** 10509 124 126 2 0 3 0 126 10510 106 0 0 0 0 LAST ROUTE ON CHANNEL 10511 2 143 2 0 0 0 143 10512 71 105 15 0 0 0 105 NOT THIS ONE 10513 124 126 2 0 3 0 126 10514 102 0 1 0 0 CLEAR DETAILS 10512>10515 124 143 2 0 3 0 143 10516 106 64 0 0 0 OLD ASL 10517 124 999 7 0 3 0 NEW ROUTE 10518 102 64 0 0 0 10519 142 2 0 0 0 142 OLD ROUTE TYPE LOAD NEW ROUTE 10520 124 143 2 0 3 0 143 10521 102 64 0 0 0 10522 140 2 0 0 0 140 NEW ROUTE TYPE 10523 30 0 0 0 2 10524 11 0 0 0 80 ***** DON'T MOVE ***** 10525 30 0 0 0 2 10526 1 999 7 0 0 0 NEW ROUTE 10527 124 999 5 0 3 0 10528 102 34 0 0 0 10529 999 7 0 0 0 10530 30 0 0 0 2 10531 11 0 0 0 80 ***** DON'T MOVE ***** 10532 124 999 5 0 3 0 10533 102 35 0 0 0 10534 126 125 6 0 3 0 125 12505>10535 52 3 0 0 0 0 10536 C 149 16 0 0 0 149 10537 154 3 0 0 0 0 12503> 10406>10538 62 0 0 0 0 10539 80 134 2 0 0 0 134 gINTERCHANGE A1 D1 ASL'S 10540 27 10 0 0 0 INPUT TYPE 10541 11 0 0 0 . 10542 34 148 70 1 0 0 148 10543 80 126 2 0 0 0 126 gOPEN B1 10544 54 3 0 1 0 2158 ALL SECTIONS PASS 0 10545 54 72 0 1 0 838 ALL SECTIONS PASS 2 10546 80 141 2 0 0 0 141 READ PT 10547 5 0 1 0 0 10548 2 148 44 1 0 0 148 PROGM' 10549 3 148 44 1 0 0 148 IND'INITIAL TRANSLATION' 10550 71 107 2 0 0 0 107 gAMENDMENT 10551 40 A6 0 0 0 0 10552 80 131 2 0 0 0 131 gWRITE 10553 10 0 0 0 63 99 10554 5 94 45 0 0 0 TRANSLATORS PROCR 10639>10555 80 141 2 0 0 0 141 READ PT 10556 70 125 19 0 0 0 125 gPT AT END SIGN 10557 0 5 0 1 0 0 10558 2 148 72 1 0 0 148 TRAMD' 10559 71 105 66 0 0 0 105 10560 10 0 0 0 1 10561 5 27 11 0 0 0 IND'INITIAL TRANSLATION' 10565>10562 80 131 2 0 0 0 131 gWRITE 10563 80 141 2 0 0 0 141 READ 10564 70 125 19 0 0 0 125 gPT AT END 10565 76 105 62 0 0 0 105 10559>10566 54 4 0 1 0 18 10567 27 10 0 0 0 10568 12 0 0 0 1 10569 70 105 73 0 0 0 105 gPT 10570 50 5 4 0 0 0 10571 C 150 4 0 0 0 150 10572 76 105 76 0 0 0 105 10569>10573 124 150 4 0 2 0 150 10574 124 999 15 1 2 0 SEC 5 10575 128 0 0 3 0 10572>10576 4 6 1 0 0 10577 2 148 46 1 0 0 148 PROCR' 10578 71 105 81 0 0 0 105 gNO 10579 3 148 90 0 0 0 148 SET IND FOR 'PROCR' 10580 76 105 91 0 0 0 105 10578>10581 4 6 1 0 0 10582 2 148 48 1 0 0 148 TABLE' 10583 70 105 90 0 0 0 105 10584 4 6 1 0 0 10585 2 148 50 1 0 0 148 CONST' 10586 71 106 37 0 0 0 106 gNOT A DIRECTIVE 10587 34 4 16 0 0 0 CONSTANT TYPE 10588 36 148 2 0 0 0 148 BIT 1 10589 70 105 91 0 0 0 105 gSHORT 10583>10590 10 0 0 0 1 10589> 10580>10591 5 17 0 0 0 0 10592 62 0 0 0 0 10593 10 0 0 0 1 10594 4 94 45 0 0 0 TRANSLATOR PROCR 10595 60 0 0 0 0 10600 PROCR 106 106 DEAL WITH CODERS PROCR NUMBER-INITIAL TRANSLATION 10602 4 8 1 0 0 CODERS PROCR 10603 12 0 0 0 100 10604 73 106 40 0 0 0 106 gLESS THAN 100 10605 12 0 0 0 899 10606 72 106 40 0 0 0 106 10607 4 8 1 0 0 gGREATER THAN 998 10608 80 142 2 0 0 0 142 CONVERT TO BIN 10609 12 0 0 0 64 -100 10610 33 0 0 0 1- 10611 5 17 8 1 0 0 10612 74 106 15 0 0 0 106 gC-100 EVEN 10613 10 0 0 0 t 10614 5 17 9 0 0 0 NO OF BITS TO BE SHIFTED 10612>10615 94 45 0 0 0 TRANSLATORS PROCR 10616 34 148 68 0 0 0 148 BITS 1-10 10617 124 17 9 0 1 0 LS HALF EVEN PROCR NUMBER 10618 33 0 0 0 0 ///// 10619 5 142 2 0 0 0 142 WL 10620 124 17 8 0 1 0 10621 36 22 0 0 0 0 10622 71 106 40 0 0 0 106 gPROCR ALREADY USED 10623 142 2 0 0 0 142 10624 124 17 8 0 1 0 10625 37 22 0 0 0 0 10642>10626 62 0 0 0 0 SET BIN 10627 94 45 0 0 0 TRANSLATORS PROCR 10628 19 0 0 0 14 DIVIDE BY 20 10629 5 17 10 0 0 0 10630 32 0 0 0 9 10631 5 17 9 0 0 0 10632 17 0 0 0 0 SHORT/LONG IND 10633 124 17 9 0 1 0 10634 31 0 0 0 0 ///// 10635 124 17 10 0 1 0 10636 4 94 5- 0 0 0 AUGMENT TABLE 10586>10637 80 131 2 0 0 0 131 WRITE A6 10638 60 0 0 0 0 10639 76 105 55 0 0 0 105 gREAD PT, TEST NEXT BLOCK 10622> 10606> 10604>10640 10 0 0 0 1 10641 5 17 16 2 0 0 SET 'PASS 0 DOESN'T LIKE IT' 10642 76 106 26 0 0 0 106 gO/P, UPDATE 'LENGTH' IND 10700 PROCR 107 107 START OF AMENDMENT RUN 10550>10702 0 5 0 1 0 0 10703 2 148 52 1 0 0 148 'AMEND' 10704 70 107 16 0 0 0 107 10705 5 0 1 0 0 10706 2 148 72 1 0 0 148 'TRAMD' 10707 70 144 2 0 0 0 144 g 10708 150 0 0 0 3 ALARM*3 10709 C 136 61 0 0 0 136 >UNLOAD 10710 C 107 11 0 0 0 107 >REENTER 10965> 12524> 13658> 10710>10711 27 9 0 0 0 10712 11 0 0 0 900000 10713 91 0 0 3 0 (END VALUE NON ZERO) 10714 80 134 2 0 0 0 134 gINTERCHANGE A1,D1 ASL'S 10715 76 100 2 0 0 0 100 10704>10716 80 145 2 0 0 0 145 UNPACK AND CHECK AMEND BLOCK 10717 40 A6 0 0 0 0 10718 54 9 4 1 0 50 10719 91 0 0 3 0 CLEAR R3 10720 80 131 2 0 0 0 131 gWRITE 'AMEND' 10721 0 10 14 1 0 0 10722 12 0 0 0 7.0000007. 10723 71 107 27 0 0 0 107 gNOT ISSUE 2.3 OUTPUT 10724 5 10 12 1 0 0 10725 5 10 14 1 0 0 10726 5 10 16 1 0 0 10723>10727 0 10 16 2 0 0 'MULTI-RECORD'IND 10728 5 27 1 0 0 0 10729 0 10 14 2 0 0 'PSEUDO-ISSUE 5'IND 10730 5 27 2 0 0 0 10731 0 10 12 2 0 0 'ISSUE 6 OR LATER'IND 10732 3 27 0 0 0 0 10733 71 111 2 0 0 0 111 gYES 10747>10734 80 137 2 0 0 0 137 gREAD MT 10735 27 1 0 0 0 10736 70 107 39 0 0 0 107 g1-RECORD BLOX 10737 0 10 12 1 0 0 10738 76 107 40 0 0 0 107 10736>10739 0 10 10 1 0 0 10738>10740 2 148 46 1 0 0 148 'PROCR' 10741 70 107 48 0 0 0 107 10742 1 148 46 1 0 0 148 10743 2 148 48 1 0 0 148 'TABLE' 10744 70 107 48 0 0 0 107 10745 1 148 48 1 0 0 148 10746 2 148 50 1 0 0 148 'CONST' 10747 71 107 34 0 0 0 107 gGET TO FIRST PROCR START 10744> 10741>10748 27 1 0 0 0 10749 70 107 52 0 0 0 107 g1-RECORD BLOX 10750 59 10 6 0 8 0 10751 C 10 4 2 0 0 10866> 10870> 10872> 10749>10752 27 1 0 0 0 10753 70 107 56 0 0 0 107 10754 6 1 8 0 10755 76 107 57 0 0 0 107 10753>10756 0 10 10 1 0 0 10755>10757 2 148 60 1 0 0 148 'END ' 10758 70 109 9 0 0 0 109 gEND OF INTERCODE 10759 1 148 60 1 0 0 148 10760 2 148 46 1 0 0 148 'PROCR' 10761 70 108 12 0 0 0 108 gYES 10762 1 148 46 1 0 0 148 10763 2 148 48 1 0 0 148 'TABLE' 10764 70 108 11 0 0 0 108 gYES 10765 1 148 48 1 0 0 148 10766 2 148 50 1 0 0 148 'CONST' 10767 70 108 2 0 0 0 108 gYES 10768 1 148 50 1 0 0 148 10769 2 148 56 1 0 0 148 'DUMPS' 10770 70 109 2 0 0 0 109 gYES 10771 1 148 56 1 0 0 148 10772 2 148 58 1 0 0 148 'FILES' 10773 70 109 2 0 0 0 109 gYES 10774 1 148 58 1 0 0 148 10775 12 0 0 0 7551637455 'VALUE' 10776 71 108 61 0 0 0 108 gNOT A DIRECTIVE 10777 27 1 0 0 0 10778 70 107 81 0 0 0 107 10779 4 2 8 0 10780 76 107 82 0 0 0 107 10778>10781 0 10 6 2 0 0 LINE SERIAL 10780>10782 70 108 61 0 0 0 108 gDON'T COUNT 10783 94 108 61 0 3 1 108 g(NEVER RUNS OUT) 10800 PROCR 108 108 STORE PROCR LENGTH AT DIRECTIVE BLOCK-ISSUE 5 TRANSLATOR O/P 10767>10802 27 1 0 0 0 10803 70 108 6 0 0 0 108 10804 34 14 2 8 0 CONST TYPE 05 10805 76 108 7 0 0 0 108 10803>10806 34 10 20 2 0 0 10805>10807 10 0 0 0 0 10808 32 0 0 0 4- 10809 36 148 2 0 0 0 148 BIT 1 10810 70 108 12 0 0 0 108 gSHORT 10764>10811 10 0 0 0 1 TABLE 10810> 10761>10812 5 3 45 0 0 0 WL PROCR 10813 60 0 0 0 0 10814 10 0 0 0 1 10815 4 17 10 0 0 0 COUNT DIRECTIVE BLOX 10816 17 10 0 0 0 10817 11 0 0 0 99 10818 80 142 2 0 0 0 142 gBIN 10819 3 6 0 0 3 0 10820 94 0 0 3 1 10821 19 0 0 0 14 DIVIDE BY 20 10822 5 148 42 1 0 0 148 10823 91 148 42 0 1 0 148 10824 32 0 0 0 9 REMAINDERgA 10825 5 3 46 0 0 0 WL PROCR 10826 0 3 45 0 0 0 BIT IND 10827 124 3 46 0 1 0 10828 31 0 0 0 0 ///// 10829 4 3 5- 0 1 0 LIST IN 3/0-44 10830 27 2 0 0 0 10831 71 108 61 0 0 0 108 gPSEUDO-ISSUE 5 10832 4 2 0 0 0 PROG ID TEST DUMMY CLEO MOD 10833 34 4 4 0 0 0 PROG SERIAL 10834 74 108 61 0 0 0 108 gSKIP BUILDING UP SEC 53 FROM LINE SERIA 10835 27 1 0 0 0 10836 70 108 39 0 0 0 108 10837 4 2 8 0 10838 76 108 40 0 0 0 108 10836>10839 0 10 6 2 0 0 LINE SERIAL 10838>10840 30 0 0 0 2- 10841 80 142 2 0 0 0 142 gBIN(NEW PROG) 10842 5 143 2 0 0 0 143 WL 10843 27 1 0 0 0 10844 70 108 47 0 0 0 108 10845 10 2 8 0 10846 76 108 48 0 0 0 108 10844>10847 0 10 16 2 0 0 OLD PROG 10846>10848 30 0 0 0 2- 10849 70 108 61 0 0 0 108 gDON'T COUNT 10850 80 142 2 0 0 0 142 gBIN(NEW PROG) 10851 33 0 0 0 1- HALVE 10852 92 0 0 2 0 (CLEARS A) 10853 74 108 58 0 0 0 108 gEVEN 10854 34 148 68 0 0 0 148 BITS 1-10 10855 143 2 0 0 0 143 10856 33 0 0 0 10 10857 76 108 60 0 0 0 108 10853>10858 34 148 68 0 0 0 148 10859 143 2 0 0 0 143 10857>10860 37 53 50- 0 2 0 10849> 10834> 10831> 10783> 10782> 10776>10861 27 1 0 0 0 10862 70 108 71 0 0 0 108 g1-RECORD BLOCKS 10863 0 2 8 0 CURRENT RECORD LENGTH 10864 5 137 2 0 0 0 137 10865 97 137 2 0 8 0 137 10866 C 107 52 0 0 0 107 gNOT EMPTY 10867 80 137 2 0 0 0 137 gREAD A1 10868 59 10 6 0 8 0 10869 C 10 4 2 0 0 10870 76 107 52 0 0 0 107 10862>10871 80 137 2 0 0 0 137 gREAD A1 10872 76 107 52 0 0 0 107 10900 PROCR 109 109 DEAL WITH DUMPS/FILES/END-STORE B/FWD OLD/NEW PROCR INDEX-ISSUE 5 10773> 10770>10902 0 10 6 2 0 0 10903 5 3 45 0 0 0 STORE 5-DIGIT SERIAL FIRST LINE 10907>10904 80 137 2 0 0 0 137 gREAD MT 10905 0 10 10 1 0 0 10906 2 148 60 1 0 0 148 'END ' 10907 71 109 4 0 0 0 109 10908 76 109 15 0 0 0 109 END 10758>10909 27 1 0 0 0 10910 70 109 13 0 0 0 109 gSINGLE-RECORD BLOX 10911 4 2 8 0 LINE SERIAL 10912 76 109 14 0 0 0 109 10910>10913 0 10 6 2 0 0 10912>10914 5 3 45 0 0 0 STORE HIGHEST LINE SERIAL 10908>10915 3 45 0 0 0 10916 71 109 22 0 0 0 109 10917 60 0 0 0 0 10918 0 17 10 0 0 0 DIRECTIVE CTR 10919 11 0 0 0 100 10920 30 0 0 0 2 10921 3 3 45 0 0 0 10916>10922 5 17 21 0 0 0 10923 60 0 0 0 0 HIGHEST EFFECTIVE LINE SERIAL 10924 35 0 0 0 11 10925 36 3 45 0 0 0 LINE SERIAL OF DUMPS/FILES/END 10926 70 109 28 0 0 0 109 gA PROCR-SHAPED LINE 10927 10 0 0 0 100 STEP PROCR 10926>10928 1 3 45 0 0 0 10929 30 0 0 0 2- 10930 80 142 2 0 0 0 142 gTO BIN 10931 5 3 45 0 0 0 (HIGHEST B/FWD PROCR+1) IN BINARY 10932 17 10 0 0 0 DIRECTIVE CTR 10933 11 0 0 0 100 10934 80 142 2 0 0 0 142 gBIN 10935 5 94 45 0 0 0 PROVIS(MAX C/FWD PROCR)+1 10936 27 2 0 0 0 10937 71 110 27 0 0 0 110 gPEUDO-ISSUE 5 O/P 10938 90 0 0 3 0 10939 C 0 0 0 900 10940 90 0 0 2 0 10941 C 0 0 0 2 TRICK SETTING 10951>10942 80 139 2 0 0 0 139 gGET NEXT LOCN 10943 4 2 0 0 0 PROG ID 10944 34 4 4 0 0 0 PROG SERIAL 10945 75 109 51 0 0 0 109 gBY PASS,EXCEPT PROG'00000' 10946 0 10 4 2 2 0 10947 33 0 0 0 10- 10948 5 6 1 0 3 0 10949 33 0 0 0 10 10950 5 6 0 0 3 0 10945>10951 94 109 42 0 3 2 109 10952 4 2 0 0 0 10953 34 4 4 0 0 0 10954 75 109 58 0 0 0 109 gNOT PROGM'00000' 10955 10 0 0 0 1 10956 5 27 2 0 0 0 SET PSEUDO ISSUE 5 10957 76 110 27 0 0 0 110 10954>10958 17 10 0 0 0 COUNTER OF DIRECTIVE BLOX 10959 12 0 0 0 500 10960 73 110 2 0 0 0 110 gOK 11013> 11026> 14410>10961 41 A1 0 0 0 1 10962 45 A6 0 0 0 1 10963 150 0 0 0 9 10964 C 136 61 0 0 0 136 gUNLOAD 10965 C 107 11 0 0 0 107 gREENTER 11000 PROCR 110 110 STORE B/FWD ADJUST DETAILS+UNIQUE REFS I/P TAPE-ISSUE 5 10960>11002 90 0 0 1 0 11003 C 0 0 0 460 (FOR ADJUST DETAILS) 11004 90 0 0 3 0 11005 C 0 0 0 160 FOR STORING 11010>11006 80 139 2 0 0 0 139 gGET ITEM 11007 0 10 4 2 2 0 11008 5 54 0 0 1 0 11009 94 0 0 1 1 11010 94 110 6 0 3 1 110 11014>11011 80 139 2 0 0 0 139 gGET 11012 10 4 2 2 0 11013 71 109 61 0 0 0 109 gALARM 7, TOO MANY ADJUST DETAILS 11014 94 110 11 0 1 1 110 11015 90 0 0 3 0 11016 C 0 0 0 50 11017 90 0 0 1 0 11018 C 0 0 0 100 (FOR UNIQUE REFS) 11023>11019 80 139 2 0 0 0 139 gGET 11020 0 10 4 2 2 0 11021 5 55 0 0 1 0 11022 94 0 0 1 1 11023 94 110 19 0 3 1 110 11024 80 139 2 0 0 0 139 gGET 11025 0 10 4 2 2 0 11026 71 109 61 0 0 0 109 gALARM 7, TOO MANY UNIQUE REFS 10957> 10937>11027 46 A1 8 0 0 1 11028 C 0 0 0 £££££ 11029 80 137 2 0 0 0 137 gREAD 11030 0 10 6 1 0 0 11031 2 148 62 1 0 0 148 INDEX' 11032 70 110 41 0 0 0 110 gREAD FWD TO 'PASS 1' 11033 0 10 4 2 0 0 11034 2 4 2 0 0 0 PROG IDENTITY 11035 71 110 39 0 0 0 110 gMISALIGNED 11036 0 10 6 2 0 0 11037 2 4 4 0 0 0 SERIAL 11038 70 111 23 0 0 0 111 gOK 11035>11039 45 A1 0 0 0 1 11040 80 138 2 0 0 0 138 gOPEN A1 11032>11041 80 136 2 0 0 0 136 gAPPROACH FROM START OF TAPE 11042 76 111 23 0 0 0 111 11100 PROCR 111 111 DEAL WITH I/P TAPE EX ISSUE 6-AMEND RUN 10733>11102 90 0 0 1 0 11103 C 0 0 0 46 11107>11104 80 137 2 0 0 0 137 READ MT 11105 55 10 4 2 0 46 11106 C 3 0 0 1 0 INDEX 3/0-45 11107 94 111 4 0 1 23 111 11108 3 45 0 0 0 11109 80 143 2 0 0 0 143 gDEC 11110 30 0 0 0 2 11111 5 17 21 0 0 0 HIGHEST EFFECTIVE LINE SERIAL 11112 62 0 0 0 0 11113 3 45 0 0 0 (HIGHEST B/FWD PROCR+1) IN BINARY 11114 30 0 0 0 5 11115 101 100 1 1 0 CREATE B/FWD OLD-NEW PROCR INDEX 11116 91 0 0 1 0 11117 101 100 1 3 0 11120>11118 3 6 100- 0 1 0 STORE ONE-FOR-ONE 11119 11 0 0 0 1 11120 94 111 18 0 1 1 111 MAX B/FWD PROCR 11121 3 45 0 0 0 =PROVIS MAX C/FWD PROCR 11122 5 94 45 0 0 0 11042> 11038>11123 52 18 0 0 0 0 11124 C 149 2 0 0 0 149 11125 154 18 0 0 0 0 TYPE 'AMEND' COMMENT 11200 PROCR 112 112 READ/WRITE MODS UP TO FIRST DIRECTIVE 11205>11202 80 127 2 0 0 0 127 gREAD/TEST PT 11203 70 112 6 0 0 0 112 gYES 11212>11204 80 131 2 0 0 0 131 gWRITE 11205 76 112 2 0 0 0 112 11203>11206 10 0 0 0 9999 11207 3 17 10 0 0 0 SET FOR SEQUENCE CHECKS 11208 5 17 14 0 0 0 11209 0 4 3 0 0 0 LINE SERIAL 11210 30 0 0 0 3- 11211 12 0 0 0 5e * 11212 70 112 4 0 0 0 112 gMOD TO SECTIONS 11213 17 28 1 0 0 PROG + SERIAL 11214 71 113 16 0 0 0 113 gNORMAL 11218>11215 10 0 0 0 1 PROGM 00000 11216 5 17 16 1 0 0 SET PASS 0 DOESN'T LIKE IT 11217 80 133 2 0 0 0 133 gCOPY 11218 76 112 15 0 0 0 112 gIGNORE ALL MODS 11300 PROCR 113 113 MAIN LOOP 11651>11302 80 141 2 0 0 0 141 gREAD 11303 70 124 2 0 0 0 124 gPT END 11304 0 5 0 1 0 0 11305 2 148 72 1 0 0 148 TRAMD' 11306 71 113 13 0 0 0 113 gNO 11533> 12382> 12707>11307 10 0 0 0 1 11308 5 27 11 0 0 0 SET IND THAT TRAMDING 11311>11309 80 131 2 0 0 0 131 gWRITE 11310 80 141 2 0 0 0 141 gREAD 11311 71 113 9 0 0 0 113 gNOT PT END 11312 76 124 2 0 0 0 124 11306>11313 80 132 2 0 0 0 132 gUNPACK 11314 80 129 2 0 0 0 129 gSTORE SWITCH, TEST DIRECTIVE 11315 71 120 2 0 0 0 120 11534> 11932> 12147> 12383> 11214>11316 60 0 0 0 0 11317 17 10 0 0 0 CHECK SEQUENCE AT NEW DIRECTIVE 11318 2 4 2 2 0 0 11319 73 113 24 0 0 0 113 gOK 11320 71 121 44 0 0 0 121 gREJECT, READ/COPY TO NEXT DIRECTIVE 11321 0 17 12 0 0 0 11322 12 0 0 0 3 11323 71 121 44 0 0 0 121 gPREVIOUS NOT 'T' H53, IGNORE THIS 11319>11324 17 21 0 0 0 MAX B/FWD LINE SERIAL 11325 2 4 2 2 0 0 THIS LINE SERIAL 11326 72 113 31 0 0 0 113 gNORMAL 11330> 11334>11327 10 0 0 0 1 11328 5 17 16 1 0 0 SET 'PASS 0 DOESNT LIKE IT' 11329 80 133 2 0 0 0 133 gWRITE A6 11330 76 113 27 0 0 0 113 11326>11331 71 113 36 0 0 0 113 gOK 11332 86 129 2 0 0 0 129 11333 12 0 0 0 3 11334 71 113 27 0 0 0 113 gMOD AT END IS NOT 'INSERT' 11335 76 119 7 0 0 0 119 gINSERTING AT END SIGN 11331>11336 4 2 2 0 0 11337 30 0 0 0 2- 11338 80 142 2 0 0 0 142 BIN TEST IF VALUE 11339 5 143 2 0 0 0 143 DIRECTIVE? 11340 124 143 2 0 1 0 143 EQUIV OF CURRENT PROCR 11341 6 100- 0 0 0 11342 70 121 44 0 0 0 121 gREJECT.READ/COPY TO NEXT DIRECTIVE 11343 85 129 2 0 0 0 129 11344 C 118 2 0 0 0 118 R 11345 C 114 2 0 0 0 114 D 11346 C 119 2 0 0 0 119 T 11347 C 118 30 0 0 0 118 A 11400 PROCR 114 114 11345>11402 80 130 2 0 0 0 130 gFIND 'PROCR 'LENGTH' 11403 5 17 0 0 0 0 0=SHORT, 1=LONG 11404 35 0 0 0 11 11405 36 4 2 2 0 0 11406 12 0 0 0 1 11407 70 114 12 0 0 0 114 gDELETION BEGINS AT'NOTES' 11408 10 0 0 0 0 11409 34 17 0 0 0 0 11410 36 4 2 2 0 0 LINE SERIAL 11411 71 121 44 0 0 0 121 gUNACCEPTABLE MOD 11407>11412 0 4 2 2 0 0 11413 3 17 14 0 0 0 11414 30 0 0 0 8 11415 70 114 19 0 0 0 114 gDELETING PROCR 11416 17 3 0 0 0 CTR OF ADJUST DETAILS 11417 101 460 1 2 0 11418 70 121 44 0 0 0 121 gLIST FULL.COPY TO NEXT DIRECTIVE 11415>11419 80 131 2 0 0 0 131 gWRITE A6 11420 80 141 2 0 0 0 141 gREAD 11421 70 115 2 0 0 0 115 gPT AT END. SINGLE LINE DELETE 11422 5 0 1 0 0 11423 2 148 72 1 0 0 148 'TRAMD' 11424 70 115 2 0 0 0 115 11425 80 132 2 0 0 0 132 gUNPACK 11426 80 129 2 0 0 0 129 gTEST DIRECTIVE 11427 71 116 2 0 0 0 116 gNO, HENCE MULTIPLE DELETE 11500 PROCR 115 115 DEAL WITH SINGLE LINE DELETION 11424> 11421>11502 0 17 14 0 0 0 11503 3 17 10 0 0 0 FOR SEQUENCE CHECKS 11504 30 0 0 0 8 11505 71 115 8 0 0 0 115 gNOT DELETING 'PROCR' 11506 17 14 0 0 0 11507 76 116 19 0 0 0 116 gJOIN UP WITH MULTIPLE DELETION 11505>11508 30 0 0 0 8- 11509 12 0 0 0 1 11510 70 115 26 0 0 0 115 gDELETING 'NOTES'ONLY 11511 10 0 0 0 0 11512 2 17 0 0 0 0 11513 12 0 0 0 1 11514 5 17 15 0 0 0 11515 17 14 0 0 0 11516 32 0 0 0 2- 11517 5 17 19 0 0 0 PROCR 11518 17 14 0 0 0 11519 2 17 15 0 0 0 -(NEGATIVE ADJUST DETAILS) 11520 5 17 14 0 0 0 11521 17 14 0 0 0 LINE SERIAL+ADJUST DETAIL 11522 32 0 0 0 2- 11523 2 17 19 0 0 0 11524 71 115 26 0 0 0 115 CARRY INTO NEXT PROCR.DON'T STORE 11525 80 140 2 0 0 0 140 gSTORE ADJUSTMENT 11755> 11524> 11510>11526 0 5 0 1 0 0 11527 30 0 0 0 4- 11528 30 0 0 0 4 11529 2 148 60 1 0 0 148 'END' 11530 70 124 2 0 0 0 124 gPT AT END 11531 5 0 1 0 0 11532 2 148 72 1 0 0 148 'TRAMD' 11533 70 113 7 0 0 0 113 11534 76 113 16 0 0 0 113 gTEST NEW DIRECTIVE IN SEQUENCE 11600 PROCR 116 116 DEAL WITH MULTIPLE DELETION 11427>11602 4 2 2 0 0 11603 30 0 0 0 2- TEST IF DIRECTIVE 11604 80 142 2 0 0 0 142 gBIN IS VALUE SERIAL? 11605 5 143 2 0 0 0 143 11606 124 143 2 0 1 0 143 11607 6 100- 0 0 0 11608 70 121 44 0 0 0 121 gATTEMPTING TO DELETE 'VALUE' REJECT 11609 80 130 2 0 0 0 130 gFIND PROCR 'LENGTH' 11610 5 17 0 0 0 0 11611 34 17 0 0 0 0 11612 36 4 2 2 0 0 LINE SERIAL 'TO' 11613 71 121 44 0 0 0 121 gREJECT AMENDMENT 11614 0 17 14 0 0 0 'FROM' 11615 2 4 2 2 0 0 'TO' 11616 72 121 44 0 0 0 121 gREJECT.OUT OF SEQUENCE 11617 4 2 2 0 0 'TO'PROCR 11618 3 17 10 0 0 0 FOR SEQUENCE CHECKS 11507>11619 32 0 0 0 2- 11620 5 17 15 0 0 0 3-DIGIT'TO' 11621 17 14 0 0 0 'FROM'PROCR 11622 32 0 0 0 2- 'TO'PROCR 11623 3 17 19 0 0 0 '3-DIGIT'FROM' 11624 2 17 15 0 0 0 11625 70 116 30 0 0 0 116 gDELETIONS IN SAME PROCR 11626 17 14 0 0 0 'FROM'SERIAL 11627 30 0 0 0 8 11628 70 117 2 0 0 0 117 gOK.ALLOW DELETION 11629 76 121 44 0 0 0 121 gREJECT 11625>11630 32 0 0 0 2 11631 70 117 2 0 0 0 117 g'FROM' PROCR DELETED ONLY 11632 0 17 14 0 0 0 11633 30 0 0 0 8 11634 30 0 0 0 8- 11635 12 0 0 0 1 11636 70 121 44 0 0 0 121 gMULTIPLE DELETION BEGINS AT'NOTES.REJE 11637 17 14 0 0 0 'FROM'SERIAL 11638 2 4 2 2 0 0 'TO'SERIAL 11639 2 17 0 0 0 0 LENGTH 11640 12 0 0 0 1 11641 5 17 15 0 0 0 (NEGATIVE ADJUST DETAIL) 11642 17 14 0 0 0 11643 2 17 15 0 0 0 -(NEGATIVE ADJUST DETAIL) 11644 5 17 14 0 0 0 11645 17 14 0 0 0 LINE SERIAL+ADJUSTMENT 11646 30 0 0 0 2- 11647 2 17 19 0 0 0 PREVIOUS PROCR 11648 71 116 50 0 0 0 116 gCARRY INTO PROCR.DON'T STORE 11649 80 140 2 0 0 0 140 gSTORE ADJUSTMENT 11756> 12024> 12309> 11648>11650 80 131 2 0 0 0 131 gWRITE 11651 76 113 2 0 0 0 113 gREAD NEXT BLOCK 11700 PROCR 117 117 DELETE MANY PROCEDURES 11631> 11628>11702 17 15 0 0 0 'TO'PROCR 11703 80 142 2 0 0 0 142 gBIN 11704 11 0 0 0 1 11705 2 3 45 0 0 0 (HIGHEST PROCR+1) 11706 73 117 8 0 0 0 117 11707 10 0 0 0 0 11706>11708 1 3 45 0 0 0 11709 5 17 15 0 0 0 EFFECTIVE'TO'PROCR 11710 17 19 0 0 0 'FROM'PROCR 11711 80 142 2 0 0 0 142 gBIN 11712 5 17 19 0 0 0 11713 17 14 0 0 0 'FROM' SERIAL 11714 30 0 0 0 8 11715 70 117 18 0 0 0 117 11716 10 0 0 0 1 NOT DELETING ALL 'FROM' PROCR 11717 4 17 19 0 0 0 11715>11718 17 15 0 0 0 'TO' PROCR+1 11719 30 0 0 0 5 11720 1 17 19 0 0 0 'FROM' PROCR 11721 91 0 0 1 0 11722 10 0 0 0 0 11723 5 17 22 0 0 0 CTR OF VALUE BLOCKS 11728>11724 6 100- 0 1 0 11725 71 117 28 0 0 0 117 g 11726 10 0 0 0 1 11727 4 17 22 0 0 0 AUGMENT CTR OF VALUES 11725>11728 94 117 24 0 1 1 117 11729 17 15 0 0 0 11730 2 17 19 0 0 0 11731 3 142 2 0 0 0 142 WL-DELETED QTTY 11732 11 0 0 0 20000 B t 18 11733 30 0 0 0 5 11734 124 17 19 0 1 0 'FROM'PROCR 11735 128 6 100- 0 0 0 DELETE ALL PROCEDURES 11736 3 45 0 0 0 HIGHEST PROCR+1 11737 30 0 0 0 5 11738 1 17 15 0 0 0 'TO'PROCR+1 11739 5 148 42 1 0 0 148 11740 2 142 2 0 0 0 142 11741 1 17 22 0 0 0 gNUMBER OF VALUES 11742 3 143 2 0 0 0 143 (-DELETED QTTY) 11743 4 94 45 0 0 0 REDUCE MAX C/FWD PROCR 11744 91 148 42 0 1 0 148 11745 94 117 47 0 1 0 117 ///// 11746 76 117 52 0 0 0 117 gNONE TO UPDATE 11751> 11745>11747 6 100- 0 1 0 11748 70 117 51 0 0 0 117 gVALUE DON'T UPDATE 11749 143 2 0 0 0 143 NON-ZERO LOCNS DELETED 11750 4 6 100- 0 1 0 UPDATE PROCR 11748>11751 94 117 47 0 1 1 117 11746>11752 60 0 0 0 0 DEC 11753 17 10 0 0 0 'TO' SERIAL 11754 2 17 14 0 0 0 'FROM' SERIAL 11755 70 115 26 0 0 0 115 gSINGLE LINE DELETE 11756 76 116 50 0 0 0 116 11800 PROCR 118 118 'R'DIRECTIVES AND 'A' DIRECTIVES 11344>11802 35 0 0 0 11 DIRECTIVE LINE 'R' 11803 10 0 0 0 0 11804 36 4 2 2 0 0 11805 71 118 30 0 0 0 118 gNOT REPLACING ***00 11806 4 2 2 0 0 11807 32 0 0 0 2- 11808 80 142 2 0 0 0 142 BIN 11809 2 3 45 0 0 0 HIGHEST B/FWD PROCR+1 11810 72 118 40 0 0 0 118 gREPLACING DUMPS OR FILES 11811 4 6 1 0 0 11812 2 148 46 1 0 0 148 'PROCR' 11813 70 118 24 0 0 0 118 11814 4 6 1 0 0 11815 2 148 48 1 0 0 148 'TABLE' 11816 70 118 23 0 0 0 118 11817 4 6 1 0 0 11818 2 148 50 1 0 0 148 'CONST' 11819 71 121 44 0 0 0 121 gNOT REPLACING BY ANREJE DIRECTIVE 11820 34 4 16 0 0 0 11821 36 148 2 0 0 0 148 BIT 1 11822 70 118 24 0 0 0 118 gSHORT CONST 11816>11823 10 0 0 0 1 11822> 11813>11824 5 143 2 0 0 0 143 WL=LENGTH OF REPLADEMENT 11825 80 130 2 0 0 0 130 FIND 'LENGTH'OF REPLACED BLOCK 11826 3 17 0 0 0 0 11827 2 143 2 0 0 0 143 11828 71 121 44 0 0 0 121 gTRYING TO CHANGE'LENGHT',REJECT 11829 76 119 30 0 0 0 119 gOK 11805> 11347>11830 80 130 2 0 0 0 130 11831 5 17 0 0 0 0 gFIND'LENGTH' 11832 35 0 0 0 11 11833 36 4 2 2 0 0 LINE SERIAL 11834 12 0 0 0 1 11835 70 118 40 0 0 0 118 gNOTES 11836 10 0 0 0 0 11837 34 17 0 0 0 0 11838 36 4 2 2 0 0 11839 71 121 44 0 0 0 121 gUNACCEPTABLE 11835> 11810>11840 4 2 2 0 0 11841 3 17 14 0 0 0 11842 3 17 10 0 0 0 11843 32 0 0 0 2- 11844 5 17 19 0 0 0 11845 4 6 1 0 0 11846 2 148 46 1 0 0 148 PROCR' 11847 70 121 44 0 0 0 121 gNOT ALLOWED 11848 4 6 1 0 0 11849 2 148 48 1 0 0 148 TABLE' 11850 70 121 44 0 0 0 121 g 11851 4 6 1 0 0 11852 2 148 50 1 0 0 148 CONST' 11853 70 121 44 0 0 0 121 gTRYING TO REPLACE BY A DIRECTIVE 11854 76 119 30 0 0 0 119 gO/P 11900 PROCR 119 119 DEAL WITH INSERTIONS 11346>11902 80 130 2 0 0 0 130 FIND 'LENGTH' INSERTION FIRST LINE 11903 5 17 0 0 0 0 11904 34 17 0 0 0 0 11905 36 4 2 2 0 0 11906 71 121 44 0 0 0 121 gUNACCEPTABLE 11335>11907 4 2 2 0 0 LINE SERIAL 11908 3 17 10 0 0 0 11909 5 17 14 0 0 0 11910 17 10 0 0 0 11911 3 17 18 0 0 0 11912 32 0 0 0 2- 11913 80 142 2 0 0 0 142 gTO BIN 11914 5 17 7 0 0 0 3 DIGIT REF 'INSERT BEFORE' BIN 11915 17 21 0 0 0 HIGHEST LINR SERIAL 11916 2 17 18 0 0 0 INSERT BEFORE' SERIAL 11917 71 119 24 0 0 0 119 gNOT INSERTING BEFORE END SIGN 11918 60 0 0 0 0 11919 17 18 0 0 0 11920 11 0 0 0 99 ROUND UP INSERT SERIAL 11921 32 0 0 0 2- TO DEAL WITH ISSUE 5 END 11922 80 142 2 0 0 0 142 gBIN 11923 5 17 7 0 0 0 11917>11924 4 2 2 0 0 11925 30 0 0 0 8 11926 70 119 30 0 0 0 119 gINSERTING BEFORE PROCR START NO.ADJUST 11927 17 3 0 0 0 CTR OF ADJUST DETAILS 11928 101 460 1 2 0 11929 70 121 44 0 0 0 121 gLIST FULL COPY TO NEXR DIRECTIVE 12228> 11926> 11854> 11829>11930 80 131 2 0 0 0 131 WRITE 11931 80 127 2 0 0 0 127 gREAD/TEST PT 11932 70 113 16 0 0 0 113 gYES 12000 PROCR 120 120 DEAL WITH NON-DIRECTIVE LINE 12368> 11315>12002 85 129 2 0 0 0 129 12003 C 120 7 0 0 0 120 R 12004 C 121 44 0 0 0 121 D-NOT ACCEPTED, 2 LINES ALREADY 12005 C 121 2 0 0 0 121 T 12006 C 120 7 0 0 0 120 A 12006> 12003>12007 60 0 0 0 0 12008 17 0 0 0 0 CURRENT LENGTH 12009 11 0 0 0 1 12010 4 17 10 0 0 0 STEP SEQ CTR 12011 17 10 0 0 0 12012 32 0 0 0 2- 12013 2 17 19 0 0 0 PROCR OF R OR A-DIRECTIVE 12014 71 120 25 0 0 0 120 g NOT STILL IN SAME PROCR 12015 4 6 1 0 0 12016 2 148 46 1 0 0 148 'PROCR' 12017 70 121 44 0 0 0 121 12018 4 6 1 0 0 12019 2 148 48 1 0 0 148 TABLE' 12020 70 121 44 0 0 0 121 gUN ACCEPTABLE 12021 4 6 1 0 0 12022 2 148 50 1 0 0 148 CONST 12023 70 121 44 0 0 0 121 gUNACCEPTABLE 12024 76 116 50 0 0 0 116 12014>12025 10 0 0 0 1- 12026 2 17 0 0 0 0 12027 4 17 10 0 0 0 STEP BACK SEQ CTR SO NEVER ALTERS 12028 76 121 44 0 0 0 121 g READ/COPY TO NEXT DIRECTIVE 12100 PROCR 121 121 DEAL WITH INSERTIONS 12005>12102 4 6 1 0 0 INSERTIONS 12103 2 148 46 1 0 0 148 'PROCR' 12104 70 121 15 0 0 0 121 12105 4 6 1 0 0 12106 2 148 48 1 0 0 148 12107 70 121 14 0 0 0 121 12108 4 6 1 0 0 12109 2 148 50 1 0 0 148 'CONST' 12110 71 123 2 0 0 0 123 'NOT A DIRECTIVE' 12111 34 4 16 0 0 0 CONST TYPE 12112 36 148 2 0 0 0 148 BIT 1 12113 70 121 15 0 0 0 121 g SHORT CONST 12107>12114 10 0 0 0 1 12113> 12104>12115 5 17 0 0 0 0 'LENGTH' OF INSERTED PROCR 12116 35 0 0 0 0 12117 17 18 0 0 0 12118 32 0 0 0 2- 12119 10 0 0 0 0 12120 74 121 32 0 0 0 121 g INSERTING BEFORE PROCR START 12121 17 18 0 0 0 12122 2 17 21 0 0 0 12123 70 121 32 0 0 0 121 g INSERTING AT END OF PROGM 12124 17 10 0 0 0 12125 2 17 14 0 0 0 12126 70 121 44 0 0 0 121 g NOT IN THE MIDDLE OF AN INSERTION 12127 5 17 15 0 0 0 ADJUST DETAIL 12128 17 10 0 0 0 12129 5 17 14 0 0 0 12130 80 140 2 0 0 0 140 STORE ADJUST DETAIL 12131 76 121 44 0 0 0 121 g REJECT 'PROCR' 12123> 12120>12132 4 8 1 0 0 12133 80 142 2 0 0 0 142 CONVERT TO BIN 12134 73 121 44 0 0 0 121 g NEGATIVE, IGNORE 12135 3 17 4 0 0 0 NEW PROCR NUMBER (BIN) 12136 2 3 45 0 0 0 HIGHEST B/FWD PROCR (BIN) 12137 73 121 44 0 0 0 121 NOT UNIQUE 12138 17 4 0 0 0 12139 101 999 1 2 0 MAX PROCR 12140 72 121 44 0 0 0 121 gIGNORE 12141 124 17 4 0 1 0 12142 106 6 100- 0 0 0 12143 70 122 2 0 0 0 122 g OK, PROCR NOT ALREADY INSETED 12305> 13566> 12140> 12137> 12134> 12131> 12126> 12028> 12023> 12020> 12017> 12004> 11929> 11906> 11853> 11850> 11847> 11839> 11828> 11819> 11636> 11629> 11616> 11613> 11608> 11418> 11411> 11342> 11323> 11320>12144 10 0 0 0 1 SET IND 'PASS 0 DOESN'T LIKE IT' 12145 5 17 16 1 0 0 12146 80 133 2 0 0 0 133 READ/WRITE TO NEXT DIRECTIVE 12147 76 113 16 0 0 0 113 12200 PROCR 122 122 INSERT NEW PROCR INTO LIST IN SEC 6 12143>12202 62 0 0 0 0 STEP BACK SEQ CTR SO NEVER ALTERS 12203 3 45 0 0 0 > READ/COPY TO NEXT DIRECTIVE 12204 30 0 0 0 5 12205 1 17 7 0 0 0 12206 91 0 0 1 0 'PROCR' 12207 94 122 10 0 1 0 122 /////> NOT INSERTING BEFORE END SIGN 12208 94 45 0 0 0 CURRENT (HIGHEST C/FWD PROCR) +1 12209 76 122 12 0 0 0 122 12207>12210 124 17 7 0 1 0 12211 6 100- 0 0 0 UPDATED REF ''INSERT BEFORE'' 12209>12212 5 135 2 0 0 0 135 12213 10 0 0 0 1 12214 4 94 45 0 0 0 12215 0 17 0 0 0 0 LENGTH IND 12216 30 0 0 0 4 12217 1 135 2 0 0 0 135 UPDATED REF 12218 124 17 4 0 1 0 CODER'S PROCR 12219 5 6 100- 0 0 0 12220 94 122 22 0 1 0 122 ///// 12221 76 122 27 0 0 0 122 gINSERTING BEFORE END SIGN, SKIP 12226> 12220>12222 6 100- 0 1 0 12223 70 122 26 0 0 0 122 g'VALUE' DON'T UPDATE 12224 10 0 0 0 1 12225 4 6 100- 0 1 0 12223>12226 94 122 22 0 1 1 122 12221>12227 60 0 0 0 0 12228 76 119 30 0 0 0 119 gREAD PT 12300 PROCR 123 123 INSERTING INSTRUCTIONS 12110>12302 35 0 0 0 0 12303 17 18 0 0 0 12304 12 0 0 0 10002 12305 73 121 44 0 0 0 121 gUNACCEPTABLE 12306 17 18 0 0 0 12307 32 0 0 0 2- 12308 10 0 0 0 0 12309 74 116 50 0 0 0 116 gINSERTING AT END OF PROCR 12310 4 2 2 0 0 LINE SERIAL 12311 30 0 0 0 2- 12312 80 142 2 0 0 0 142 CONVERT TO BIN 12313 2 3 45 0 0 0 (HIGHEST B/FWD PROCR+1) 12314 73 123 56 0 0 0 123 gNOT A UNIQUE REF 12315 17 2 0 0 0 12316 12 0 0 0 64 12317 72 123 56 0 0 0 123 gTOO MANY UNIQUE REFS, DON'T STORE THIS 12318 4 2 2 0 0 UNIQUE REF 12319 124 17 2 0 1 0 12320 5 21 0 0 0 0 12321 35 0 0 0 11 12322 36 17 14 0 0 0 12323 5 136 2 0 0 0 136 ITEM DEC 12324 17 14 0 0 0 12325 30 0 0 0 2- 12326 80 142 2 0 0 0 142 12327 5 141 2 0 0 0 141 REF BIN 12328 124 141 2 0 1 0 141 12329 6 100- 0 0 0 12330 80 143 2 0 0 0 143 DEC 12331 3 17 19 0 0 0 UPDATED REF DEC 12332 30 0 0 0 2 12333 1 136 2 0 0 0 136 DEC ITEM NOT UPDATED 12334 5 17 6 0 0 0 12335 17 7 0 0 0 INSERT BEFORE REF 12336 2 141 2 0 0 0 141 12337 70 123 40 0 0 0 123 gHASN'T GONE OVER THE TOP 12338 10 0 0 0 1- 12339 4 17 19 0 0 0 TO GET THE RIGHT ADJUST DETAILS 12337>12340 90 0 0 1 0 12341 C 0 0 0 460 12349>12342 19 0 0 1 0 12343 70 123 50 0 0 0 123 gEND OF ADJUST DETAILS 12344 30 0 0 0 2- 12345 2 17 19 0 0 0 3 DIGIT PROCR 12346 71 123 49 0 0 0 123 12347 19 1 0 1 0 12348 4 17 6 0 0 0 ADJUST ADDRESS 12346>12349 94 123 42 0 1 2 123 12343>12350 62 0 0 0 0 BIN 12351 17 6 0 0 0 12352 124 17 2 0 1 0 12353 102 21 1 0 0 0 12354 10 0 0 0 2 12355 4 17 2 0 0 0 12317> 12314>12356 60 0 0 0 0 12357 17 0 0 0 0 LENGTH IND 12358 11 0 0 0 1 12359 4 17 14 0 0 0 AUGMENT'NEW'LINE SERIAL 12360 80 131 2 0 0 0 131 O/P 12361 80 141 2 0 0 0 141 READ 12362 70 123 69 0 0 0 123 gPT AT END 12363 5 0 1 0 0 12364 2 148 72 1 0 0 148 'TRAMS' 12365 70 123 69 0 0 0 123 12366 80 132 2 0 0 0 132 UNPACK 12367 80 129 2 0 0 0 129 DIRECTIVE? 12368 71 120 2 0 0 0 120 gNO 12365> 12362>12369 17 14 0 0 0 END OF MULTIPLE INSE 12370 2 17 10 0 0 0 DIFFERENCE 12371 5 17 15 0 0 0 QUANTITY ADJUST 12372 17 10 0 0 0 12373 5 17 14 0 0 0 12374 80 140 2 0 0 0 140 STORE ADJUST DETAIL 12375 0 5 0 1 0 0 g 12376 30 0 0 0 4- 12377 30 0 0 0 4 12378 2 148 60 1 0 0 148 'END ' 12379 70 124 2 0 0 0 124 12380 5 0 1 0 0 12381 2 148 72 1 0 0 148 'TRAMD' 12382 70 113 7 0 0 0 113 12383 71 113 16 0 0 0 113 g PT AT DIRECTIVE 12400 PROCR 124 124 CONSTRUCT C/FWD PROCR LENGTH INDEX 12704> 12379> 11530> 11312> 11303>12402 62 0 0 0 0 12403 54 94 0 0 0 45 12404 3 45 0 0 0 (HIGHEST B/FWD PROCR+1) 12405 30 0 0 0 5 12406 101 100 1 1 0 12407 91 0 0 1 0 12408 90 0 0 2 0 SCAN SEC 3 12409 C 0 0 0 45 12434>12410 90 0 0 3 0 SCAN WORD IN SEC 3 12411 C 0 0 0 20 12412 34 148 2 0 0 0 148 BIT 1 12433>12413 6 100- 0 1 0 12414 70 124 30 0 0 0 124 g PROCR DELETED 12415 10 0 0 0 0 12416 36 3 0 0 2 0 12417 70 124 30 0 0 0 124 g B/FWD PROCR WAS SHORT 12418 100 17 0 1 0 0 COPY B 12419 6 100- 0 1 0 C/FWD EQUIVALENT 12420 19 0 0 0 14 20 12421 5 148 42 0 0 0 148 12422 32 0 0 0 9 12423 5 148 43 0 0 0 148 REMAINDER 12424 10 0 0 0 1 12425 124 148 43 0 1 0 148 12426 31 0 0 0 0 ///// 12427 124 148 42 0 1 0 148 12428 4 94 5- 0 0 0 SET C/FWD LENGTH IND 12429 100 17 0 1 1 0 RESTORE B 12417> 12414>12430 33 0 0 0 1 SHIFT COLLATOR 12431 94 124 33 0 1 1 124 12432 76 124 35 0 0 0 124 g END 12431>12433 94 124 13 0 3 1 124 > THIS BIT NEXT WORD 12434 94 124 10 0 2 1 124 > NEXT WORD (SHOULD NEVER RUN OUT) 12432>12435 101 1000 1 3 0 DEAL WITH INSERTED PROCEDURES 12436 30 0 0 0 5 12437 1 3 45 0 0 0 12438 91 0 0 1 0 12454>12439 0 6 100- 0 1 0 12440 70 124 54 0 0 0 124 gNOT USED 12441 32 0 0 0 4- 12442 70 124 54 0 0 0 124 gSHORT PROCEDURE 12443 10 0 0 0 0 12444 32 0 0 0 4 12445 19 0 0 0 14 12446 5 148 42 1 0 0 148 12447 91 148 42 0 2 0 148 12448 32 0 0 0 9 12449 5 17 1 0 0 0 12450 10 0 0 0 1 12451 124 17 1 0 1 0 12452 31 0 0 0 0 ///// 12453 4 94 5- 0 2 0 12442> 12440>12454 94 124 39 0 1 1 124 12455 76 125 6 0 0 0 125 12500 PROCR 125 125 END OF PASS 0 12502 85 129 2 0 0 0 129 3 ORDER CONST 12503 C 105 38 0 0 0 105 12504 C 104 3 0 0 0 104 12505 C 105 35 0 0 0 105 12455>12506 90 0 0 1 0 12507 C 0 0 0 450 12508 90 0 0 2 0 12509 C 0 0 0 900 12510 10 0 0 0 0 12511 35 0 0 0 1111 12517>12512 36 6 1 0 2 0 12513 31 0 0 0 10 12514 36 6 0 0 2 0 12515 5 22 0 0 1 0 12516 94 0 0 1 1 12517 94 125 12 0 2 2 125 12518 76 125 27 0 0 0 125 10564> 10556>12519 62 0 0 0 0 SET BIN 12520 148 90 0 0 0 148 IND 12521 70 125 25 0 0 0 125 12522 150 0 0 0 11 12523 C 136 61 0 0 0 136 > END 12524 C 107 11 0 0 0 107 > REENTER 12521>12525 10 0 0 0 1 12526 4 94 45 0 0 0 12518>12527 80 131 2 0 0 0 131 g WRITE END 12528 62 0 0 0 0 12529 27 10 0 0 0 12530 11 0 0 0 18 24 12531 80 126 2 0 0 0 126 g CLOSE B1 12532 45 A6 0 0 0 0 12533 55 22 0 0 0 1010 OLD/NEW PROCRS + ADJUSTS + UNIQUE 12534 C 18 0 0 0 0 12535 55 94 0 0 0 46 12536 C 18 1010 0 0 0 12537 91 0 0 3 0 CLEAR R3 12538 91 0 0 1 0 & R1 12539 80 134 2 0 0 0 134 g INTERCHANGE A1. D1 ASL'S 14767> 14784>12540 148 44 1 0 0 148 12541 70 101 2 0 0 0 101 g INITIAL TRANSLATION 12542 48 A1 0 0 0 1 BACK 1 I/P > I/P 12543 C 0 0 0 1 12544 42 A1 0 0 0 0 12545 C 7 0 0 0 0 12546 76 101 2 0 0 0 101 g CANN PASS 1 12600 PROCR 126 126 OR B1 12602 81 126 2 0 0 0 126 12603 30 0 0 0 5 12604 1 999 8 0 0 0 12605 125 4096 1 1 0 12606 124 999 0 0 3 0 12607 123 160 0 2 0 12608 82 126 2 0 0 0 126 12609 41 A1 0 0 0 0 DUMMY FOR ENTRY TO MR 12610 126 126 5 0 3 0 126 12700 PROCR 127 127 READ, TEST NEXT P/T BLOCK 12702 81 127 2 0 0 0 127 3 ORDER CONST 12703 80 141 2 0 0 0 141 g READ PT 12704 70 124 2 0 0 0 124 g END 12705 5 0 1 0 0 12706 2 148 72 1 0 0 148 'TRAMD' 12707 70 113 7 0 0 0 113 g YES 12708 80 132 2 0 0 0 132 g UNPACK 12709 80 129 2 0 0 0 129 g TEST DIRECTIVE 12710 82 127 2 0 0 0 127 12800 PROCR 128 128 COPY INTERCODE BLOCKS 12802 81 128 2 0 0 0 128 12803 55 10 4 1 0 148 12804 C 8 4 1 0 0 12805 43 A2 0 0 0 0 12806 C 8 0 0 0 0 12807 80 137 2 0 0 0 137 gREAD 12808 82 128 2 0 0 0 128 12900 PROCR 129 129 TEST DIRECTIVE 12902 81 129 2 0 0 0 129 12903 60 0 0 0 0 12904 34 4 4 1 0 0 12905 10 0 0 0 0 12906 32 0 0 0 2 12907 12 0 0 0 69 12908 70 129 18 0 0 0 129 12909 11 0 0 0 15 12910 70 129 17 0 0 0 129 12911 12 0 0 0 19 12912 70 129 16 0 0 0 129 12913 11 0 0 0 22 12914 71 129 24 0 0 0 129 gNO DIRECTIVE 12915 10 0 0 0 1 12912>12916 11 0 0 0 1 12910>12917 11 0 0 0 1 12908>12918 11 0 0 0 1 12919 5 130 2 0 0 0 130 12920 86 129 2 0 0 0 129 12921 5 17 12 0 0 0 STORE PREVIOUS SETTING 12922 84 129 2 0 0 0 129 12923 C 130 2 0 0 0 130 (A)ZERO DIRECTIVE FOUND 12914>12924 82 129 2 0 0 0 129 (A) NON=-ZERO,NO DIRECTIVE FOUND 13000 PROCR 130 130 FIND 'LENGTH' 13002 81 130 2 0 0 0 130 13003 4 2 2 0 0 LINE SERIAL OF AMENDMENT 13004 30 0 0 0 2- 13005 80 142 2 0 0 0 142 CONVERT TO BIN 13006 101 100 1 2 0 13007 19 0 0 0 14 DIVIDE BY 20 13008 5 148 42 0 0 0 148 13009 32 0 0 0 9 13010 5 148 43 0 0 0 148 13011 34 148 2 0 0 0 148 13012 124 148 43 0 1 0 148 13013 33 0 0 0 0 ///// 13014 124 148 42 0 1 0 148 13015 36 3 0 0 0 0 13016 70 130 18 0 0 0 130 gSHORT 13017 10 0 0 0 1 13016>13018 60 0 0 0 0 13019 82 130 2 0 0 0 130 (A)=ZERO OR ONE 13100 PROCR 131 131 WRITE->A6 FROM SEC9 13102 81 131 2 0 0 0 131 13103 80 135 2 0 0 0 135 REPLACE 'BE' BY 'LE' 13104 10 0 0 0 7.0000007. 13105 5 9 52 1 0 0 13106 17 16 1 0 0 IND'PASS 0 DIDN'T LIKE IT' NON-ZERO 13107 5 9 50 1 0 0 13108 43 A6 0 0 0 0 13109 C 9 0 0 0 0 13110 54 9 4 1 0 50 13111 5 17 16 1 0 0 CLEAR IND 13112 82 131 2 0 0 0 131 13200 PROCR 132 132 UNPACK POSSIBLE DIRECTIVE BLOCK 13202 81 132 2 0 0 0 132 13203 10 0 0 0 0 13204 5 4 4 1 0 0 WL FOR AMEND DIRECTIVE 13205 5 4 16 1 0 0 13206 87 27 10 0 0 0 13207 C 132 12 0 0 0 132 gPT 13208 C 132 9 0 0 0 132 gCARDS 13208>13209 50 5 0 0 0 0 13210 C 150 18 0 0 0 150 13211 82 132 2 0 0 0 132 13207>13212 124 150 2 0 2 0 150 UNPACK PT 13213 124 999 15 1 2 0 13214 128 0 0 3 0 13215 82 132 2 0 0 0 132 13300 PROCR 133 133 O/P WHEN MOD NOT ACCEPTED 13302 81 133 2 0 0 0 133 13305>13303 80 131 2 0 0 0 131 gO/P TO A6 13304 80 127 2 0 0 0 127 gREAD/TEST PT 13305 71 133 3 0 0 0 133 gNOT YET 13306 82 133 2 0 0 0 133 NEXT DIRECTIVE FOUND-> 13400 PROCR 134 134 INTERCHANGE A1,D1 ASL'S SR 13402 81 134 2 0 0 0 134 13403 125 4096 1 1 0 13404 123 134 6 0 2 0 134 13405 82 134 2 0 0 0 134 13406 100 0 0 0 0 13407 124 999 9 0 3 0 13408 100 64 0 2 0 13409 124 999 7 0 3 0 13410 106 64 0 0 0 13411 124 999 9 0 3 0 D1->A1 13412 102 64 0 0 0 13413 32 0 0 0 10 13414 124 999 7 0 3 0 A1->D1 13415 102 64 0 0 0 13416 126 134 6 0 3 0 134 13500 PROCR 135 135 REPLACE BE CHAR BY LE CHAR IN SEC 5 13502 81 135 2 0 0 0 135 13503 87 27 10 0 0 0 13504 C 135 51 0 0 0 135 gPT 13505 C 135 6 0 0 0 135 gCARDS 13505>13506 10 0 0 0 0 13507 5 132 2 0 0 0 132 13508 90 0 0 1 0 13509 C 0 0 0 32 13520>13510 90 0 0 2 8 13511 C 0 0 0 2- 13512 34 5 0 1 1 0 13517>13513 10 0 0 0 0 13514 32 0 0 0 2 13515 12 0 0 0 7. 13516 70 135 22 0 0 0 135 gBE FOUND 13550>13517 94 135 13 0 2 2- 135 gNEXT CHAR 13518 5 0 1 1 0 13519 5 9 4 1 1 0 13520 94 135 10 0 1 2 135 gNEXT WORD 13521 82 135 2 0 0 0 135 13516>13522 100 17 22 1 0 0 COPY B 13523 62 0 0 0 0 13524 96 0 0 1 0 13525 16 0 0 0 5 13526 5 148 42 1 0 0 148 =10 TIMES WORD NUMBER+CLEAR WL 13527 96 0 0 2 0 13528 3 136 2 0 0 0 136 13529 35 0 0 0 1 13530 37 148 43 0 0 0 148 13531 10 0 0 0 t 13532 2 148 43 0 0 0 148 =SUBTRACT R2 MODIFIER 13533 4 148 42 0 0 0 148 AUG COL POSN 13534 60 0 0 0 0 13535 35 0 0 0 11 13536 10 0 0 0 5. 13537 124 136 2 0 1 0 136 13538 32 0 0 0 0 ///// 13539 37 5 0 1 1 0 REPLACE BE BY LE 13540 62 0 0 0 0 13541 132 2 0 0 0 132 CT OF BE'S X 2 13542 12 0 0 0 t 13543 70 135 49 0 0 0 135 g5 ALREADY STORED 13544 92 132 2 0 4 0 132 13545 148 42 0 0 0 148 13546 5 9 36 2 4 0 2XBE POSN CTR 13547 10 0 0 0 2 13548 4 132 2 0 0 0 132 STEP CTR 13543>13549 100 17 22 1 1 0 13550 76 135 17 0 0 0 135 g NEXT CHAR 13504>13551 90 0 0 1 0 13552 C 0 0 0 56 13563>13553 90 0 0 2 8 13554 C 0 0 0 2- 13555 34 5 0 1 1 0 13560>13556 10 0 0 0 0 13557 32 0 0 0 2 13558 12 0 0 0 7. 13559 70 135 67 0 0 0 135 g BE FOUND 13560 94 135 56 0 2 2- 135 g GET NEXT CHAR 13561 5 0 1 1 0 COPY TO O/P SECTION 13562 5 9 4 1 1 0 13563 94 135 53 0 1 2 135 gGET NEXT WORD 13564 10 0 0 0 7. MISREAD 13565 5 9 46 1 0 0 13566 76 121 44 0 0 0 121 13559>13567 96 0 0 2 0 13568 5 136 2 0 0 0 136 13569 35 0 0 0 11 13570 10 0 0 0 5. 13571 124 136 2 0 1 0 136 13572 32 0 0 0 0 ///// 13573 37 5 0 1 1 0 REPLACE BE BY LE 13574 5 0 1 1 0 COPY LAST WORD 13575 5 9 4 1 1 0 13576 100 17 22 1 0 0 13577 62 0 0 0 0 13578 96 0 0 1 0 13579 11 0 0 0 4 13580 30 0 0 0 3 >Q4,5 13581 5 9 48 2 0 0 13582 35 0 0 0 11 COLUMN POSITION 13583 36 136 2 0 0 0 136 13584 37 9 48 2 0 0 13585 100 17 26 0 3 0 13586 82 135 2 0 0 0 135 13600 PROCR 136 136 GET TO START OF AMENDED PROGRAM 13602 81 136 2 0 0 0 136 13610> 13616> 13624> 13646> 13649> 13660>13603 80 137 2 0 0 0 137 READ MT 13604 62 0 0 0 0 13605 0 10 4 1 0 0 13606 2 148 64 1 0 0 148 FINIS' 13607 70 136 51 0 0 0 136 gALARM*02 13608 0 10 8 2 0 0 13609 12 0 0 0 £££££ 13610 71 136 3 0 0 0 136 13611 0 10 10 1 0 0 13612 2 148 54 1 0 0 148 PASS I' 13613 70 136 43 0 0 0 136 13614 0 10 6 1 0 0 13615 2 148 62 1 0 0 148 INDEX' USE'INDEX'DATA TO 13616 71 136 3 0 0 0 136 gNO SEE IF PROGM ON TAPE 13642>13617 80 137 2 0 0 0 137 gREAD 13618 90 0 0 1 0 13619 C 0 0 0 48 13641>13620 0 10 4 2 1 0 PROG ID 13621 2 148 20 0 0 0 148 £££££ 13622 71 136 26 0 0 0 136 gNOT END SIGN 13623 148 92 0 0 0 148 13624 70 136 3 0 0 0 136 gINTERCODE FOUND.REATO 'PASS I' 13625 76 136 51 0 0 0 136 gALARM02 13622>13626 1 148 20 0 0 0 148 13627 2 4 2 0 0 0 PROG ID 13628 71 136 41 0 0 0 136 gNOT 13629 0 10 6 2 1 0 13630 2 4 4 0 0 0 SERIAL 13631 71 136 41 0 0 0 136 gNOT 13632 10 8 1 1 0 PASS IND 13633 12 0 0 0 20 13634 70 136 41 0 0 0 136 gCLEO SKIP 13635 10 8 2 1 0 13636 70 136 40 0 0 0 136 gINTERCODE 13637 10 10 2 1 0 IDENTIFIER 13638 84 786 2 0 0 0 786 13639 76 136 41 0 0 0 136 13636>13640 5 148 92 0 0 0 148 SET'PROGRAM TAPE' 13639> 13634> 13631> 13628>13641 94 136 20 0 1 8 136 13642 76 136 17 0 0 0 136 gNEXT BLOCK 13613>13643 60 0 0 0 0 SET DEC 13644 0 10 4 2 0 0 13645 2 4 2 0 0 0 PROG IDENTITY 13646 71 136 3 0 0 0 136 gNO 13647 0 10 6 2 0 0 13648 2 4 4 0 0 0 13649 71 136 3 0 0 0 136 gNO 13650 82 136 2 0 0 0 136 MATCH FOUND 13625> 13607>13651 41 A1 0 0 0 1 13652 10 0 0 0 1 13653 5 148 92 0 0 0 148 13654 84 786 2 0 0 0 786 CLEAR 13655 150 0 0 0 2 13656 C 136 61 0 0 0 136 gUNLOAD 13657 C 136 59 0 0 0 136 gTRY NEW INPUT TAPE 13658 C 107 11 0 0 0 107 gREENTER 13657>13659 80 138 2 0 0 0 138 gOPEN A1 13660 76 136 3 0 0 0 136 gTRY AGAIN 13656> 12523> 10964> 10709> 10404>13661 151 0 0 0 0 13700 PROCR 137 137 READ A1+SEC7 13702 81 137 2 0 0 0 137 13703 42 A1 0 0 0 0 13704 C 10 0 0 0 0 13705 82 137 2 0 0 0 137 13800 PROCR 138 138 OPEN A1 13802 81 138 2 0 0 0 138 13803 40 A1 0 0 0 1 13804 82 138 2 0 0 0 138 13900 PROCR 139 139 GET NEXT ITEM 13902 81 139 2 0 0 0 139 13903 94 139 7 0 2 2 139 13904 80 137 2 0 0 0 137 gREAD MT 13905 90 0 0 2 0 13906 C 0 0 0 46 13903>13907 82 139 2 0 0 0 139 14000 PROCR 140 140 STORE ADJUST DETAILS SR 14002 81 140 2 0 0 0 140 14003 17 3 0 0 0 14004 101 460 1 2 0 14005 72 140 28 0 0 0 140 gTOO MANY STORED 14006 10 0 0 0 0 14007 35 0 0 0 11 14008 36 17 14 0 0 0 14009 5 136 2 0 0 0 136 ITEM 14010 17 14 0 0 0 14011 30 0 0 0 2- 14012 80 142 2 0 0 0 142 14013 5 141 2 0 0 0 141 BIN REF 14014 124 141 2 0 1 0 141 14015 6 100- 0 0 0 UPDATED REF 14016 80 143 2 0 0 0 143 gTO DEC 14017 30 0 0 0 2 14018 1 136 2 0 0 0 136 14019 124 17 3 0 1 0 14020 5 19 0 0 0 0 LOCN OF ADJUSTMENT 14021 0 17 15 0 0 0 14022 124 17 3 0 1 0 14023 5 19 1 0 0 0 QUANTITY 14024 62 0 0 0 0 14025 10 0 0 0 2 14026 4 17 3 0 0 0 STEP CTR 14027 60 0 0 0 0 14005>14028 82 140 2 0 0 0 140 14100 PROCR 141 141 SR TO READ PT AND TEST END 14102 81 141 2 0 0 0 141 14114>14103 100 17 22 1 0 0 14104 62 0 0 0 0 14105 34 999 14 0 0 0 14106 27 10 0 0 0 14107 11 0 0 0 4 14108 80 126 2 0 0 0 126 gREAD B1 14109 100 17 22 1 1 0 14110 5 0 1 0 0 14111 12 0 0 0 7258555573 SHEET' 14112 71 141 15 0 0 0 141 14113 80 131 2 0 0 0 131 14114 76 141 3 0 0 0 141 gREAD NEXT BLOCK 14112>14115 0 5 0 1 0 0 14116 30 0 0 0 4- 14117 30 0 0 0 4 14118 2 148 60 1 0 0 148 END ' 14119 82 141 2 0 0 0 141 (A)=0 IF END 14200 PROCR 142 142 CONVERT TO BIN 14202 81 142 2 0 0 0 142 14203 5 148 42 1 0 0 148 14204 62 0 0 0 0 14205 124 148 22 0 2 0 148 14206 112 148 42 1 0 0 148 14207 82 142 2 0 0 0 142 14300 PROCR 143 143 14302 81 143 2 0 0 0 143 CONVERT TO DEC 14303 5 148 42 1 0 0 148 14304 60 0 0 0 0 14305 124 148 2 0 2 0 148 14306 112 148 42 1 0 0 148 14307 82 143 2 0 0 0 143 14400 PROCR 144 144 DEAL WITH 'TRAMD' BLOCK IF FIRST PT BLOCK 10707>14402 80 145 2 0 0 0 145 UNPACK AND CHECK PROG ID 14403 40 A6 0 0 0 0 14404 0 10 12 2 0 0 14405 5 27 0 0 0 0 SET 'EX ISSUE 7' IND 14406 10 0 0 0 0 14407 34 10 12 1 0 0 14408 32 0 0 0 2 14409 12 0 0 0 47 14410 73 109 61 0 0 0 109 gMADE BEFORE ISSUE 7, ALARM 7 14411 10 16 2 0 0 MULTIRECORD IND 14412 5 27 1 0 0 0 14413 0 148 72 1 0 0 148 'TRAMD' 14414 5 148 52 1 0 0 148 OVER 'AMEND' 14415 55 149 12 1 0 4 149 ADD'->PTS'TO COMMENT 14416 C 149 10 1 0 0 149 14417 52 18 0 0 0 0 14418 C 149 2 0 0 0 149 14419 154 18 0 0 0 0 TYPE 'TRAMD' COMMENT 14422>14420 80 131 2 0 0 0 131 14421 80 141 2 0 0 0 141 READ PT 14422 71 144 20 0 0 0 144 gNOT END 14423 80 131 2 0 0 0 131 WRITE END BLOCK ***REWIND A6 14424 45 A6 0 0 0 0 REWIND A6 14425 62 0 0 0 0 14426 27 10 0 0 0 14427 11 0 0 0 18 14428 80 126 2 0 0 0 126 CLOSE B1 14429 54 8 4 1 0 46 14430 40 A2 0 0 0 0 OPEN OUTPUT 14431 32 0 0 0 10 SPOOL NO->A 14432 84 153 2 0 0 0 153 14433 80 146 2 0 0 0 146 WRITE TWO BLANK BLOCKS 14434 80 146 2 0 0 0 146 14435 55 148 74 1 0 10 148 14436 C 8 4 1 0 0 14437 80 146 2 0 0 0 146 WRITE 'INDEX' BLOCK 14438 17 28 0 0 0 PROG IDENTITY 14439 3 94 0 0 0 0 14440 3 8 4 2 0 0 14441 3 8 12 2 0 0 14442 60 0 0 0 0 14443 10 0 0 0 1 14444 35 0 0 0 11 14445 36 17 29 0 0 0 14446 37 17 29 0 0 0 UPDATED PROG SERIAL 14447 62 0 0 0 0 14448 17 29 0 0 0 14449 3 8 6 2 0 0 14450 5 8 14 2 0 0 14451 10 0 0 0 2 14452 5 8 10 2 0 0 14453 10 0 0 0 3 14454 5 8 18 2 0 0 14455 10 0 0 0 4 14456 5 8 16 2 0 0 14457 148 78 1 0 0 148 £££££ 14458 5 8 20 1 0 0 14459 80 146 2 0 0 0 146 14460 17 28 0 0 0 PROG IDENTITY 14461 5 8 4 2 0 0 14462 17 29 0 0 0 14463 5 8 6 2 0 0 14464 148 78 1 0 0 148 14465 5 8 8 1 0 0 14466 148 54 1 0 0 148 'PASS ' 14467 5 8 10 1 0 0 14468 155 0 0 0 0 TRANSLATOR SERIAL 14469 5 8 12 1 0 0 14470 5 8 14 1 0 0 14471 27 1 0 0 0 14472 5 8 16 2 0 0 MULTI RECORD IND 14473 80 146 2 0 0 0 146 WRITE 'PASS 1' BLOCK 14474 80 137 2 0 0 0 137 gREADA1 14475 80 128 2 0 0 0 128 gWRITE +READ PROCR LENGTH INDEX 14476 80 128 2 0 0 0 128 14477 17 29 0 0 0 14478 3 94 1 0 0 0 14479 5 10 12 2 0 0 UPDATE SERIAL IN'PROGM'BLOCK 14493>14480 80 128 2 0 0 0 128 gCOPY 14481 27 1 0 0 0 14482 70 144 85 0 0 0 144 gSINGLE-RECORD BLOCKS 14483 0 10 12 1 0 0 14484 76 144 86 0 0 0 144 OF INTERCODE 14482>14485 0 10 10 1 0 0 14484>14486 2 148 46 1 0 0 148 'PROCR' 14487 70 147 2 0 0 0 147 14488 1 148 46 1 0 0 148 14489 2 148 50 1 0 0 148 'CONST' 14490 70 147 2 0 0 0 147 14491 1 148 50 1 0 0 148 14492 2 148 48 1 0 0 148 'TABLE' 14493 71 144 80 0 0 0 144 14494 76 147 2 0 0 0 147 14500 PROCR 145 145 UNPACK AMEND HEADING, GET TO PROGM START 14502 81 145 2 0 0 0 145 14503 87 27 10 0 0 0 14504 C 145 9 0 0 0 145 gPT 14505 C 145 6 0 0 0 145 gCARDS 14505>14506 50 5 0 0 0 0 14507 C 150 10 0 0 0 150 14508 76 145 12 0 0 0 145 14504>14509 124 150 10 0 2 0 150 UNPACK PT 14510 124 999 15 1 2 0 14511 128 0 0 3 0 14508>14512 4 2 0 0 0 SUITE 14513 30 0 0 0 2 14514 1 4 3 0 0 0 14515 3 4 2 0 0 0 14516 5 17 28 0 0 0 PROG ID 14517 4 4 0 0 0 PROG 14518 5 17 29 0 0 0 14519 80 138 2 0 0 0 138 gOPEN A1 14520 80 136 2 0 0 0 136 gCHECK PROG ID, GET TO 'PASSI' BLOCK 14521 82 145 2 0 0 0 145 14600 PROCR 146 146 O/P->A2 14602 81 146 2 0 0 0 146 14603 10 0 0 0 7.0000007. 14604 5 8 50 1 0 0 14605 43 A2 0 0 0 0 14606 C 8 0 0 0 0 14607 54 8 4 1 0 46 14608 82 146 2 0 0 0 146 14700 PROCR 147 147 'TRAMD'RUN-COPY INTERCODE UP TO MIDDLE INDEX 14715> 14494> 14490> 14487>14702 27 1 0 0 0 14703 70 147 16 0 0 0 147 14704 0 10 4 2 0 0 14705 30 0 0 0 5 14706 91 0 0 1 0 14713>14707 0 10 12 1 1 0 14708 2 148 60 1 0 0 148 'END' 14709 70 147 19 0 0 0 147 gYES 14710 0 10 6 2 1 0 RECORD LENGTH 14711 5 146 2 0 0 0 146 14712 97 146 2 0 1 0 146 14713 C 147 7 0 0 0 147 14718>14714 80 128 2 0 0 0 128 gWRITE/READ 14715 76 147 2 0 0 0 147 14703>14716 0 10 10 1 0 0 14717 2 148 60 1 0 0 148 'END' 14718 71 147 14 0 0 0 147 gNOT YET 14722> 14709>14719 80 128 2 0 0 0 128 gWRITE/READ/(END SIGNGET TO 'INDEX' 14720 0 10 6 1 0 0 14721 2 148 76 1 0 0 148 'INDEX' 14722 71 147 19 0 0 0 147 gNOT YET 14723 10 10 2 0 0 14724 12 0 0 0 3 14725 70 147 33 0 0 0 147 14726 86 786 2 0 0 0 786 PASS 3 ID 14727 5 142 2 0 0 0 142 14728 46 A1 10 0 0 1 14729 C 142 2 0 0 0 142 14730 80 137 2 0 0 0 137 14731 10 0 0 0 3 14732 5 10 10 2 0 0 14725>14733 80 128 2 0 0 0 128 gWRITE/READ 14741>14734 90 0 0 1 0 DRAIN INDEX DETAILS 14735 C 0 0 0 48 14739>14736 0 10 4 2 1 0 PROG IDENTITY 14737 2 148 20 0 0 0 148 £££££ 14738 70 147 42 0 0 0 147 gEND 14739 94 147 36 0 1 8 147 14740 80 137 2 0 0 0 137 gREAD 14741 76 147 34 0 0 0 147 14738>14742 10 0 0 0 1.006 1/1/3 6(R1 NON-ZERO) 14743 3 92 30 0 0 0 SET'AMEND RUN' 14744 3 27 13 0 0 0 SET NONZERO 14745 3 27 11 0 0 0 14746 5 101 4 0 0 0 101 CHANGE OLAY ORDER 14747 10 0 0 0 2 14748 5 27 12 0 0 0 SET'PTS NEEDED' 14749 80 134 2 0 0 0 134 RESTORE ASLS 14750 27 9 0 0 0 OFF LINE PRINT? 14751 70 147 59 0 0 0 147 gPRINTER 14752 90 0 0 6 0 14753 C 0 0 0 300 14754 86 787 2 0 0 0 787 A9 OR NOT 14755 71 147 68 0 0 0 147 g'PRINT'BLOCK 14756 10 0 0 0 1200000 OPEN MT 14757 34 148 98 1 0 0 148 OFF LINE PRINT? 14758 76 147 62 0 0 0 147 14751>14759 27 8 0 0 0 OPEN PRINTER 14760 11 0 0 0 t 14761 30 0 0 0 5 14758>14762 1 999 7 0 0 0 14763 125 4096 1 1 0 14764 124 999 0 0 3 0 14765 123 160 0 2 0 14766 27 9 0 0 0 14767 70 125 40 0 0 0 125 gENTER PASS 4 14755>14768 10 0 0 0 6769596573 PRINT' 14769 5 10 4 1 0 0 14770 10 0 0 0 8000 14771 5 10 6 2 0 0 14772 155 0 0 0 0 14773 5 10 8 1 0 0 TRANSLATOR SERIAL 14774 17 28 0 0 0 PROG ID 14775 5 10 10 2 0 0 14776 10 0 0 0 7.0000007. 14777 5 10 12 1 0 0 14778 10 0 0 0 800000 WRITE A9 HDG BLOCK 14779 34 999 12 0 0 0 14780 125 4096 1 1 0 14781 1 999 7 0 0 0 14782 124 999 0 0 3 0 14783 123 160 0 2 0 14784 76 125 40 0 0 0 125 gENTER PASS 4 14800 CONST 148 148 1 CONVERT TABLES 14802 (D)1; BIN>DEC 14804 16; 14806 256; 14808 4096; 14810 65536; 14812 1048576; 14814 16777216; 14816 268435456; 14818 4294967296; 14820 ££££££££££; 14822 1; DEC>BIN 14824 t; 14826 64; 14828 3.8; 14830 2710; 14832 186t0; 14834 £4240; 14836 989680; 14838 5£5.100; 14840 3e9t+t00; 14842 0; WL(A) 14844 (A)PROGM; 14846 (A)PROCR; 14848 (A)TABLE; 14850 (A)CONST; 14852 AMEND; 14854 (A)PASSI; 14856 (A)DUMPS; 14858 (A)FILES; 14860 (A)END ; 14862 (A)INDEX; 14864 FINIS; 14866 (D)0000005.5.; DOUBLE LINE END 14868 (D)3££; BITS 1-10 14870 0524108000; 14872 (A)TRAMD; 14874 (D)6£6£6£6£6£; 14876 (A)INDEX; 14878 £££££; 14880 2; 14882 CHAIN; 14884 FIEND; 14886 08000; 14888 ALLOC; 14890 ATED ; 14892 EXTRA; 14894 ROUTE; 14896 (D)£8; 14898 (D)0514908000; BITS 4-8 14900 TABLE 149 149 1 TYPE'AMEND'COMMENT 14902 148 86 0 0 2 0 5 0 0 0 0 0 0 08000' 14904 148 52 0 0 2 0 5 0 2 0 0 0 0 AMEND' 14906 4 2 0 0 0 0 5 0 2 0 0 0 0 PROG NO 14908 4 4 0 0 0 0 5 0 1 4 0 0 0 SERIAL NO 14910 148 66 0 0 2 0 2 3 3 0 0 0 1 DOUBLE LINE END 14912 151 2 0 0 2 0 5 0 5 0 0 0 0 & t 14914 148 66 0 0 2 0 2 3 3 0 0 0 1 DOUBLE LINE END 14916 148 86 0 0 2 0 5 0 0 0 0 0 0 08000' 14918 148 88 0 0 2 0 5 0 1 0 0 0 0 ALLOC' 14920 148 90 0 0 2 0 5 0 0 0 0 0 0 ATED' 14922 148 92 0 0 2 0 5 0 0 0 0 0 0 EXTRA' 14924 148 94 0 0 2 0 5 0 1 0 0 0 0 ROUTE' 14926 148 42 0 0 0 0 2 3 2 1 0 0 0 CHANNEL 14928 129 2 0 0 0 0 1 4 0 0 0 0 0 ROUTE 14930 148 66 0 0 2 0 2 3 1 0 0 0 1 DOUBLE LE 15000 TABLE 150 150 3 UNPACK PT OR CARD INPUT 15002 4 2 0 0 2 0 5 0 0 0 0 0 0 SER+AMEND DIRECTIVE 15004 4 6 0 0 2 0 5 0 0 0 0 0 0 DIRECTIVE WORD 15006 4 8 0 0 1 0 3 0 0 0 0 0 0 PROCR NUMBER 15008 4 16 0 0 0 0 1 0 0 0 0 0 1 /////TYPE OR(ANNOTATION+TYPE) 15010 4 6 0 0 2 0 5 0 0 0 0 0 0 (AMEND) 15012 4 2 0 0 0 0 3 0 0 0 0 0 0 SUITE 15014 4 3 0 0 0 0 2 0 0 0 0 0 0 JOB 15016 4 4 0 0 0 0 5 0 0 0 0 0 1 SERIAL 15018 4 2 0 0 2 0 5 0 0 0 0 0 0 SERIAL 15020 4 4 0 0 2 0 5 0 0 0 0 0 0 DIRECTIVE LETER 15022 4 6 0 0 2 0 5 0 0 0 0 0 0 DIRECTIVE WORD 15024 4 8 0 0 1 0 3 0 0 0 0 0 0 PROCR NUMBER 15026 4 16 0 0 0 0 1 0 0 0 0 0 1 TYPE 15100 CONST 151 151 1 15102 (A)+ PTS; 15104 ; 15106 ; 15108 ; 15110 ; 15112 ; 15114 ; 15116 ; 15118 ; 15120 ; 15122 ; 15124 ; 15126 ; 15128 ; 15130 ; 15132 ; 15134 ; 15136 ; 15138 ; 15140 ; 15142 ; 15144 ; 15146 ; 15148 ; 15150 ; 15152 ; 15154 ; 15156 ; 15158 ; 15160 ; 15162 ; 15164 ; 15166 ; 15168 ; 15170 ; 15172 ; 15174 ; 15176 ; 15178 ; 15180 ; 15182 ; 15184 ; 15186 ; 15188 ; 15190 ; 15192 ; 15194 ; 15196 ; 15198 ; 15200 PROCR 152 152 START OF PASS 1 15201 NOTES 32446> 32473> 32478> 32480>15202 152 152 4 0 0 0 152 CALL/ENTER PASS 2 15203 C 327 6 0 0 0 327 (OVERLAY THE OLAY ORDER) 15204 62 0 0 0 0 15205 54 25 0 1 0 42 CLEAR TRACE SECN 15206 27 10 0 0 0 15207 12 0 0 0 1 15208 70 152 12 0 0 0 152 gB1 IS PT 15209 326 8 0 0 0 326 28/0/2 15210 5 326 4 0 0 0 326 SET 'UNPACK FIXED' 15211 76 152 17 0 0 0 152 15208>15212 101 512 0 1 0 Q10 15213 33 0 0 0 3 15214 10 0 0 0 0 15215 37 312 8 1 0 0 312 CLEAR BIT 40 15216 37 312 14 1 0 0 312 DO. 15211>15217 326 6 0 0 0 326 15218 3 23 46 0 0 0 SET 'PRINT PASS 2' 15219 5 326 3 0 0 0 326 15220 54 1 0 1 0 46 15221 83 100 2 0 0 1 100 SET 'PRINT PASS 3' 15222 5 27 6 0 0 0 CLEAR 'PT OMITTED' 15223 84 511 2 0 0 0 511 15224 84 514 2 0 0 0 514 15225 5 27 4 0 0 0 15226 83 252 2 0 0 5 252 AMEND DIRECTIVE SWITCH 15227 95 0 0 1 0 15228 70 157 2 0 0 0 157 gCOMPILER DIDN'T CALL TRAMSLATOR 15229 3 1 0 1 0 0 15230 54 27 0 1 0 20 15231 96 0 0 3 0 MOD ONLY A9 IND 15232 3 27 9 0 0 0 SET IND 15233 10 0 0 0 70000 15234 3 27 0 0 0 0 SET 'MULTI RECORD' 15235 3 27 4 0 0 0 SET'COMPILER' 15236 5 27 1 0 0 0 SET 'ISSUE 7 O/P' 15237 54 72 0 1 0 888 15238 34 1 1 0 0 0 15239 36 320 22 0 0 0 320 1 15240 70 152 42 0 0 0 152 15241 83 100 2 0 0 2 100 SET 'DONT PRINT' 15240>15242 36 318 2 0 0 0 318 BIT 2 15243 12 0 0 0 2 15244 5 23 46 0 0 0 INHIBIT PRINT 15245 36 318 10 0 0 0 318 BIT 3='PTS NEEDED' 15246 12 0 0 0 4 15247 70 152 50 0 0 0 152 gNO 15248 10 0 0 0 2 15249 5 27 12 0 0 0 15247>15250 36 318 7 0 0 0 318 BIT 4='CLEO TRAMD'IF NON-ZERO 15251 5 27 2 0 0 0 SET'PSEUDO-ISSUE 5' 15252 101 450 1 3 0 15253 30 0 0 0 5 15254 1 1 0 0 0 0 DATA START 15255 124 999 1 0 3 0 15256 128 18 0 1 1 0 15257 5 153 2 0 0 0 153 15258 90 0 0 3 0 CALC COMPILER'S HIGHEST PROCR 15259 C 0 0 0 450 15272>15260 34 18 0 0 3 0 15261 32 0 0 0 7 15262 33 0 0 0 2 15263 2 153 2 0 0 0 153 15264 73 152 66 0 0 0 152 15265 4 153 2 0 0 0 153 UPDATE 15264>15266 10 0 0 0 0 15267 33 0 0 0 10 15268 2 153 2 0 0 0 153 15269 73 152 71 0 0 0 152 15270 4 153 2 0 0 0 153 UPDATE 15269>15271 10 0 0 0 0 15272 94 152 60 0 3 1 152 15273 153 2 0 0 0 153 15274 11 0 0 0 1 15275 5 18 1055 0 0 0 (HIGHEST C/FWD PROCR+1)IN BINARY 15276 54 18 450 1 0 596 15277 95 0 0 2 0 15278 5 1 0 1 0 0 PROG ID+SERIAL 15279 125 4096 1 1 0 15280 123 153 2 0 2 0 153 >SET ASL'S+GUARD WORDS 15281 76 156 2 0 0 0 156 15300 PROCR 153 153 SET UP TAGS 15 WORDS FOR TX AREAS, AND FILES IN CHAP 3 15302 81 153 2 0 0 0 153 LINK 15303 10 0 0 0 £ 15304 124 317 92 0 3 0 317 15305 123 56 1 0 0 SEC 5 15306 124 317 92 0 3 0 317 15307 123 210 1 0 0 SEC 7 15308 124 317 92 0 3 0 317 15309 123 364 1 0 0 SEC 8 15310 124 317 92 0 3 0 317 15311 123 518 1 0 0 SEC 9 15312 124 317 92 0 3 0 317 15313 123 576 1 0 0 B1 15314 124 317 92 0 3 0 317 15315 123 730 1 0 0 A1 15316 124 317 92 0 3 0 317 15317 123 884 1 0 0 A2 15318 124 317 92 0 3 0 317 15319 123 1038 1 0 0 A6 15400 PROCR 154 154 SET UP ASL'S FOR TX AREAS, AND FILES IN CHAP 3 15402 123 317 2 0 3 0 317 PROG TAG 15403 30 0 0 0 4 15404 4 317 92 0 0 0 317 15405 317 92 0 0 0 317 ABS START 15406 124 999 14 1 2 0 SEC 5 15407 103 64 0 0 0 15408 101 58 1 1 0 15409 124 999 16 1 2 0 SEC 7 15410 103 64 0 0 0 15411 101 154 1 1 0 15412 124 999 18 1 2 0 SEC 8 15413 103 64 0 0 0 15414 101 154 1 1 0 15415 124 999 20 1 2 0 SEC 9 15416 103 64 0 0 0 15417 101 154 1 1 0 15418 124 999 8 0 3 0 B1 15419 103 64 0 0 0 15420 101 58 1 1 0 15421 124 999 9 0 3 0 A1 15422 103 64 0 0 0 15423 101 154 1 1 0 15424 124 999 10 0 3 0 A2 15425 103 64 0 0 0 15426 101 154 1 1 0 15427 124 999 11 0 3 0 A6 15428 102 64 0 0 0 15500 PROCR 155 155 SET UP ASL'S FOR FILES 15502 124 999 5 0 3 0 15503 106 34 0 0 0 PRINTER ROUTE ENTRY SPECIAL CHAPTER 15504 30 0 0 0 4- 15505 5 27 8 0 0 0 15506 35 0 0 0 1111 Q1-4 15507 999 5 0 0 0 15-BIT START SPECIAL CHAP 15508 101 204 1 1 0 15509 124 999 12 1 2 0 SEC 10 15510 114 64 0 0 0 15511 999 5 0 0 0 15512 101 598 1 1 0 394+204 15513 124 999 7 1 2 0 15514 114 64 0 0 0 15515 10 0 0 0 £ 15516 124 999 5 0 3 0 SPECIAL CHAP 15-BIT START 15517 123 596 1 0 0 15518 124 999 5 0 3 0 15519 123 990 1 0 0 204+392+394=D1 15520 126 153 2 0 3 0 153 gEXIT 15600 PROCR 156 156 TIDY UP FOR COMPILER 15281>15602 54 12 0 1 0 120 15603 0 1 0 1 0 0 15604 5 12 0 1 0 0 15605 40 A1 0 0 0 1 15609>15606 80 291 2 0 0 0 291 gREAD 15607 0 7 10 1 0 0 15608 2 181 20 1 0 0 181 'PASS1' 15609 71 156 6 0 0 0 156 gNOT YET 15610 10 0 0 0 1 15611 3 92 30 0 0 0 15612 5 12 8 0 0 0 15613 319 14 1 0 0 319 'END ' 15614 5 9 4 1 0 0 SET END SIGN 15615 76 158 3 0 0 0 158 gENTER PASS 1 (SIC) 15700 PROCR 157 157 TEST INITIAL RUN 15701 NOTES RADIX 15228>15702 40 A6 0 0 0 1 15703 54 12 0 1 0 120 15704 10 0 0 0 6700 15705 5 12 3 0 0 0 ERROR LETTER'P' 15706 80 292 2 0 0 0 292 gREAD FIRST BLOCK 15707 124 179 2 0 2 0 179 15708 80 326 2 0 0 0 326 gUNPACK BLOCK 15709 60 0 0 0 0 15710 1 2 1 0 0 TESTTHIS IS AN 15711 2 181 16 1 0 0 181 'AMEND' 15712 70 157 20 0 0 0 157 15713 80 297 2 0 0 0 297 gANNOTATION IF CARD 15714 80 176 2 0 0 0 176 gCHECK PROGM BLOC 15715 10 0 0 0 2 15716 3 12 33 0 0 0 SET'PT INPUT' 15717 5 27 12 0 0 0 SET'PTS NEEDED' 15718 5 1 8 1 0 0 ENSURE FIRST SERIAL=0,INITIAL TRANSLATIO 15719 76 160 2 0 0 0 160 15712>15720 5 1 16 1 0 0 CLEAR FOR INDS 15721 5 1 18 1 0 0 15722 124 179 38 0 2 0 179 15723 80 326 2 0 0 0 326 gUNPACK 'AMEND' BLOCK AGAIN 15724 10 0 0 0 0 15725 34 1 16 0 0 0 PRINT INDS 15726 36 318 2 0 0 0 318 BIT 2 15727 5 23 46 0 0 0 15728 87 27 10 0 0 0 15729 C 157 34 0 0 0 157 gPT 15730 C 157 31 0 0 0 157 gCARDS 15730>15731 1 18 1 0 0 15732 12 0 0 0 73 15733 76 157 36 0 0 0 157 15729>15734 1 20 1 0 0 15735 12 0 0 0 7300000000 15733>15736 71 157 39 0 0 0 157 15737 10 0 0 0 2 15738 76 157 40 0 0 0 157 15736>15739 10 0 0 0 0 15738>15740 5 27 12 0 0 0 0/2=PTS NO/YES 15741 27 0 0 0 0 15742 71 157 46 0 0 0 157 gISSUE 6 O/P 15743 1 16 0 0 0 15744 12 0 0 0 4 15745 5 23 46 0 0 0 PRINT ISSUE5 O/P 15742>15746 10 0 0 0 2- 15747 36 320 2 0 0 0 320 BIT 1 15748 84 100 2 0 0 0 100 SET AT 1 OR 2 15749 0 1 17 0 0 0 CHANGE TO ISSUE? 15750 5 197 2 0 0 0 197 SR LINK 15751 80 297 2 0 0 0 297 gANNOTATION IF CARD 15752 71 157 57 0 0 0 157 gNOT CARD 15753 0 1 8 1 0 0 RE-FORM ISSUE+SERIAL IN 18' 15754 30 0 0 0 6 15755 1 1 20 1 0 0 CARD SERIAL 15756 5 1 8 1 0 0 15752>15757 0 1 4 0 0 0 SUITE 15758 30 0 0 0 2 15759 1 1 6 0 0 0 15760 5 12 0 0 0 0 15761 34 1 8 1 0 0 15762 80 321 2 0 0 0 321 RIGHT ALIGN 15763 0 12 88 2 0 0 15764 5 12 1 0 0 0 15765 10 0 0 0 1 SET'AMEND RUN' 15766 3 92 30 0 0 0 15767 5 12 8 0 0 0 15800 PROCR 158 158 15801 NOTES RADIX 15802 80 292 2 0 0 0 292 gREAD PT 15615>15803 54 1 0 0 0 46 15807>15804 80 291 2 0 0 0 291 gREAD MT 15805 0 7 6 1 0 0 15806 2 181 12 1 0 0 181 PROGM' 15807 71 158 4 0 0 0 158 gGET TO IT 15808 9 4 1 0 0 15809 2 181 12 1 0 0 181 PROGM' 15810 70 159 2 0 0 0 159 ='PROGM' BLOCK IS AMENDED 15811 50 7 4 0 0 0 15812 C 175 32 0 0 0 175 15813 55 7 20 1 0 30 COPY ANNOTATION 15814 C 1 16 1 0 0 15912>15815 60 0 0 0 0 15816 10 0 0 0 1 AUGMENT PROG SERIAL 15817 35 0 0 0 11 15818 36 1 8 2 0 0 15819 37 1 8 2 0 0 NO CARRY AFTER 99 15820 76 160 2 0 0 0 160 15900 PROCR 159 159 INPUT AMENDMENTS TO PRGRAM 15901 NOTES RADIX 15810>15902 124 179 2 0 2 0 179 15903 80 326 2 0 0 0 326 gUNPACK NEW 'PROGM' BLOCK 15904 80 297 2 0 0 0 297 gWORDS IF CARDS 15905 0 12 1 0 0 0 15906 3 1 8 2 0 0 15907 11 0 0 0 1 15908 30 0 0 0 2 15909 5 1 0 0 0 0 15910 5 12 8 0 0 0 SET PAPER TAPE INPUT INDICATOR 15911 80 176 2 0 0 0 176 gCHECK 'PROGM' BLOCK 15912 76 158 15 0 0 0 158 gUPDATE SERIAL 16000 PROCR 160 160 OPEN O/P FILE WRITE INDEX BLOX+'PASSI' BLOCK+'PROGM' BLOCK 16001 NOTES 15820> 15719>16002 54 8 4 0 0 46 16003 27 4 0 0 0 COMPILER? 16004 70 160 9 0 0 0 160 gNORMAL 16005 48 A2 0 0 0 3 BACK 0 I/P+O/P 16006 C 999 0 0 0 0 16007 10 0 0 0 0 (ZERO SPOOL NUMBER) 16008 76 160 11 0 0 0 160 g 16004>16009 40 A2 0 0 0 0 OPEN FILE 16010 32 0 0 0 10 16008>16011 84 153 2 0 0 0 153 SPOOL NUMBER+WL 16012 80 289 2 0 0 0 289 16013 80 289 2 0 0 0 289 g2 BLANKS 16014 55 319 30 1 0 10 319 16015 C 8 4 1 0 0 16016 80 289 2 0 0 0 289 16017 1 4 0 0 0 SUITE 16018 30 0 0 0 2 16019 1 1 6 0 0 0 16020 3 12 32 0 0 0 WL=PROG IDENTITY 16021 3 8 4 2 0 0 16022 3 8 12 2 0 0 16023 0 1 8 2 0 0 PROGRAM SERIAL 16024 5 12 1 0 0 0 WL 16025 0 197 2 0 0 0 197 NEW ISSUE WL 16026 70 160 30 0 0 0 160 gNO CHANGE 16027 30 0 0 0 2 16028 35 0 0 0 11100 16029 37 12 1 0 0 0 REPLACE EXISTING ISSUE 16026>16030 52 1 8 0 0 0 16031 C 175 30 0 0 0 175 RESTORE TD 1/8 WITH SIG ZEROS 16032 0 1 8 1 0 0 16033 3 8 6 1 0 0 16034 5 8 14 1 0 0 16035 10 0 0 0 2 INTERCODE IDENTIFIER 16036 5 8 10 2 0 0 16037 10 0 0 0 3 MACHINE CODE IDENTIFIER 16038 3 8 18 2 0 0 16039 10 0 0 0 2 16040 1 27 12 0 0 0 0 OR 2 16041 5 8 16 2 0 0 16042 319 30 2 0 0 319 £££££ 16043 5 8 20 2 0 0 16044 80 289 2 0 0 0 289 16045 12 32 0 0 0 16046 5 8 4 2 0 0 PROG IDENTITY 16047 1 8 1 0 0 16048 5 8 6 1 0 0 PROG SERIAL 16049 10 0 0 0 £££££ 16050 5 8 8 2 0 0 16051 181 20 1 0 0 181 PASSI' 16052 5 8 10 1 0 0 16053 0 27 4 0 0 0 NON-ZERO IF COMPILER 16054 3 8 14 2 0 0 SET 'PSEUDO ISSUE 5' 16055 71 160 58 0 0 0 160 16056 155 0 0 0 0 PROG SERIAL 16057 3 8 12 1 0 0 ISSUE 6' ND 16055>16058 5 8 16 2 0 0 SET 'MULTI RECORD' 16059 80 289 2 0 0 0 289 16060 18 1055 0 0 0 16061 5 319 23 0 0 0 319 16062 27 4 0 0 0 16063 71 160 70 0 0 0 160 gCOMPILER O/P 16064 55 18 1010 0 0 23 FIRST PROCR LENGTH DETAILS BLOCK 16065 C 8 4 2 0 0 A6 16066 80 289 2 0 0 0 289 16067 55 18 1033 0 0 23 SECOND PROCR LENGTH DETAILS BLOCK 16068 C 8 4 2 0 0 16069 80 289 2 0 0 0 289 16063>16070 52 8 4 0 0 0 16071 C 175 32 0 0 0 175 16072 55 1 16 1 0 30 COPY ANNOTATION 16073 C 8 20 1 0 0 16074 80 289 2 0 0 0 289 16075 0 317 89 0 0 0 317 ABS ADDRESS 18:2496 16076 5 92 9 0 0 0 16077 60 0 0 0 0 16100 PROCR 161 161 DEAL WITH UNAMENDED ENTRY, FILES, CHAP STARTS 16101 NOTES 16102 12 8 0 0 0 16103 70 162 2 0 0 0 162 g FILES REPLACED EX PT 16104 80 291 2 0 0 0 291 g READ 'ENTRY' EX MT 16105 10 0 0 0 0 16106 5 7 46 1 0 0 CLEAR REPORT WORDS 16107 5 7 48 1 0 0 16108 5 12 33 0 0 0 SET 'MT INPUT' 16109 7 8 2 0 0 16110 80 200 2 0 0 0 200 g REPLACE PROCR 16111 C 178 2 0 0 0 178 16112 71 161 16 0 0 0 161 g OK 16113 319 40 1 0 0 319 ????R' 16114 5 7 48 1 0 0 16115 76 161 17 0 0 0 161 g USE OLD VALUE 16112>16116 5 7 8 2 0 0 16132> 16115>16117 80 171 2 0 0 0 171 g WRITE 16118 80 291 2 0 0 0 291 g READ 16119 7 6 1 0 0 16120 2 181 18 1 0 0 181 CHAPS 16121 70 161 33 0 0 0 161 g YES 16122 0 7 8 2 0 0 ROUTE TYPE 16123 80 245 2 0 0 0 245 g TO BIN 16124 33 0 0 0 2- 16125 1 7 7 0 0 0 FILE ID 16126 33 0 0 0 18- 16127 7 46 1 0 0 16128 80 164 2 0 0 0 164 gSTORE FILE DETAILS 16129 71 161 32 0 0 0 161 gLIST NOT FULL 16130 319 26 1 0 0 319 SET 'IGNORE' 16131 5 7 46 1 0 0 16129>16132 76 161 17 0 0 0 161 gWRITE 16257> 16121>16133 9 4 1 0 0 16134 2 181 18 1 0 0 181 'CHAPS' 16135 70 165 2 0 0 0 165 gPT & MT BOTH AT 'CHAPS' 16136 55 7 8 2 0 30 16137 C 12 13 0 0 0 MT 'CHAPS' UNAMENDED 16138 5 12 33 0 0 0 SET 'MT INPUT' 16139 12 13 0 0 0 NUMBER OF CHAPS 16140 80 245 2 0 0 0 245 gTO BIN 16141 5 12 13 0 0 0 16142 91 12 12 0 2 0 16151>16143 12 14 0 2 0 START 16144 80 200 2 0 0 0 200 gREPLACE PROCR 16145 C 178 2 0 0 0 178 16146 71 161 50 0 0 0 161 gOK 16147 319 40 1 0 0 319 '????R' 16148 5 8 48 1 0 0 16149 76 161 51 0 0 0 161 gUSE OLD VALUE 16146>16150 5 12 14 0 2 0 16149>16151 94 161 43 0 2 1 161 16152 55 12 14 0 0 14 16153 C 7 10 2 0 0 16154 55 7 4 1 0 34 COPY ANNEXES 16155 C 8 4 1 0 0 16156 76 165 51 0 0 0 165 gTO TEST 'STORE' 16200 PROCR 162 162 DEAL WITH PT INPUT FOR ENTRY FILES 16201 NOTES 16103>16202 54 1 0 1 0 46 16203 80 292 2 0 0 0 292 gRAD PT 16204 124 179 2 0 2 0 179 16205 80 326 2 0 0 0 326 gUNPACK 16206 80 297 2 0 0 0 297 gCOPY ANNOTATION FOR CARDS 16207 10 0 0 0 5500 16208 5 12 3 0 0 0 LETTER E FOR REPORTS 16209 1 2 1 0 0 CHECK 'ENTRY' 16210 2 181 14 1 0 0 181 'ENTRY' 16211 70 162 14 0 0 0 162 gOK 16212 10 0 0 0 1 16213 80 177 2 0 0 0 177 gREPORT *E1 16211>16214 1 4 0 0 0 ENTRY PROCR 16215 12 0 0 0 100 16216 73 162 19 0 0 0 162 gWRONG 16217 12 0 0 0 899 16218 73 162 22 0 0 0 162 gOK 16216>16219 10 0 0 0 2 16220 80 177 2 0 0 0 177 gREPORT *E2 16221 80 295 2 0 0 0 295 IGNORE 16218>16222 10 0 0 0 1 16223 5 12 33 0 0 0 SET 'PT INPUT' 16224 1 4 0 0 0 16225 80 200 2 0 0 0 200 REPLACE PROCR 16226 C 178 2 0 0 0 178 16227 71 162 31 0 0 0 162 gOK 16228 319 40 1 0 0 319 '????R' 16229 5 1 44 1 0 0 16230 76 162 32 0 0 0 162 16227>16231 5 1 4 0 0 0 NEW PROCR 16230>16232 1 6 1 0 0 PRIORITY CLASS 16233 12 0 0 0 1 16234 73 162 37 0 0 0 162 gWRONG 16235 12 0 0 0 4 16236 73 162 40 0 0 0 162 gOK 16234>16237 10 0 0 0 3 16238 80 177 2 0 0 0 177 gREPORT*E3 16239 80 295 2 0 0 0 295 IGNORE 16236>16240 52 8 4 0 0 0 16241 C 175 32 0 0 0 175 16242 55 1 16 1 0 30 ANNOTATION 16243 C 8 20 1 0 0 16244 80 289 2 0 0 0 289 gWRITE 16398>16245 80 292 2 0 0 0 292 gREAD PT TESTS FOR END OF 16246 92 30 0 0 0 PT FILE DETAILS 16247 70 162 58 0 0 0 162 gINITIAL TRANSLATION 16248 80 294 2 0 0 0 294 gTEST PT AT AMEND DIRECTIVE 16249 71 162 53 0 0 0 162 gYES 16250 9 4 1 0 0 16251 2 181 18 1 0 0 181 'CHAPS' 16252 71 162 73 0 0 0 162 gASSUME ANOTHER FILE EX PT 16256> 16249>16253 80 291 2 0 0 0 291 gREAD MT 16254 7 6 1 0 0 IGNORE MT FILES 16255 2 181 18 1 0 0 181 'CHAPS' 16256 71 162 53 0 0 0 162 gREAD/IGNORE MT FILES->PROCESS MT CHAPS 16257 76 161 33 0 0 0 161 gPROCESS MT CHAPS 16247>16258 9 4 1 0 0 16259 2 181 18 1 0 0 181 'CHAPS' 16260 70 165 2 0 0 0 165 gEND OF FILE DETAILS EX PT 16261 9 4 1 0 0 16262 30 0 0 0 4- 16263 30 0 0 0 4 16264 2 319 14 1 0 0 319 'END ' 16265 71 162 73 0 0 0 162 16266 10 0 0 0 900000 16267 1 27 9 0 0 0 16268 91 0 0 3 0 16269 150 0 0 0 1 END' BEFORE 'CHAPS'ALARM*01 16270 C 162 72 0 0 0 162 gUNLOAD 16271 C 100 2 0 0 0 100 gRE-ENTER 16270>16272 151 0 0 0 0 16265> 16252>16273 54 1 0 1 0 46 16274 5 12 2 0 0 0 CLEAR CTR 16275 124 179 12 0 2 0 179 16276 80 326 2 0 0 0 326 gUNPACK FILE DETAILS 16277 80 297 2 0 0 0 297 gUNPACK CARD ANNOTATION 16300 PROCR 163 163 CHECK/STORE/OUTPUT FILR DETAILS EX PT 16301 NOTES 16302 10 0 0 0 5600 16303 5 12 3 0 0 0 ERROR LETER F 16304 34 1 2 1 0 0 FILE IDENTITY 16305 80 300 2 0 0 0 300 gL-ALIGN IN A 16306 3 1 2 1 0 0 16307 32 0 0 0 9- 16308 12 0 0 0 5 CONTROL OF ALPHA PART 16309 73 163 24 0 0 0 163 gREPORT 16310 10 0 0 0 0 16311 32 0 0 0 1 BASIC OF ALPHA PART 16312 12 0 0 0 t 16313 72 163 24 0 0 0 163 gREPORT 16314 10 0 0 0 0 16315 32 0 0 0 2 NUMERIC PART 16316 12 0 0 0 30 16317 70 163 22 0 0 0 163 gOK 16318 12 0 0 0 11 16319 73 163 24 0 0 0 163 gREPORT 16320 12 0 0 0 9 16321 72 163 24 0 0 0 163 gREPORT 16317>16322 10 0 0 0 0 16323 74 163 26 0 0 0 163 gOK 16321> 16319> 16313> 16309>16324 10 0 0 0 1 16325 80 177 2 0 0 0 177 gREPORT*F1 16323>16326 1 4 1 0 0 ROUTE TYPE 16327 12 0 0 0 1 16328 73 163 62 0 0 0 163 gIGNORE 16329 12 0 0 0 2 16330 71 163 33 0 0 0 163 gNOT 3. DEC CARD O/P 16331 10 0 0 0 26 16332 76 163 60 0 0 0 163 gSET BLOCK LENGTH 16330>16333 12 0 0 0 1 16334 70 163 51 0 0 0 163 gGP PRINTER 16335 12 0 0 0 15 16336 70 163 51 0 0 0 163 gRT 19 16337 12 0 0 0 1 16338 70 163 70 0 0 0 163 g OUT, IF RT20 16339 12 0 0 0 1 16340 70 163 62 0 0 0 163 gREJECT RT 21 16341 12 0 0 0 1 16342 70 163 70 0 0 0 163 g22,DATA LINK 16343 12 0 0 0 1 16344 70 163 62 0 0 0 163 gREJECT RT 23 16345 12 0 0 0 1 16346 70 163 70 0 0 0 163 gRT24 16347 12 0 0 0 1 16348 70 163 70 0 0 0 163 gRT25 16349 72 163 62 0 0 0 163 gREJECT 16350 76 163 70 0 0 0 163 16336> 16334>16351 1 8 1 0 0 BLOCK LENGTH 16352 80 245 2 0 0 0 245 gTO BIN 16353 33 0 0 0 6- DIVIDE BY 64 16354 39 0 0 0 0 ROUND UP 16355 12 0 0 0 5 16356 72 163 66 0 0 0 163 gTOO BIG 16357 11 0 0 0 5 16358 31 0 0 0 6 16359 80 244 2 0 0 0 244 gTO DEC 16332>16360 5 1 8 1 0 0 16361 76 163 70 0 0 0 163 16349> 16344> 16340> 16328>16362 10 0 0 0 2 16363 80 177 2 0 0 0 177 gREPORT*F2 16364 80 295 2 0 0 0 295 gIGNORE 16365 76 163 70 0 0 0 163 16371> 16372> 16356>16366 10 0 0 0 4 16367 80 177 2 0 0 0 177 gREPORT*F4 16368 80 295 2 0 0 0 295 gIGNORE 16369 76 163 73 0 0 0 163 16365> 16361> 16350> 16348> 16346> 16342> 16338>16370 0 1 8 1 0 0 BLOCK LENGTH 16371 73 163 66 0 0 0 163 16372 70 163 66 0 0 0 163 16369>16373 76 164 15 0 0 0 164 16419> 16433> 16436> 16441>16374 10 0 0 0 5 16375 80 177 2 0 0 0 177 gREPORT*F5 16376 80 295 2 0 0 0 295 gIGNORE 16420> 16437> 16440>16377 1 6 1 0 0 CHAP IND 16378 73 163 81 0 0 0 163 gREPORT 16379 12 0 0 0 100 16380 73 163 84 0 0 0 163 gOK 16378>16381 10 0 0 0 3 16382 80 177 2 0 0 0 177 gREPORT*F3 16383 80 295 2 0 0 0 295 IGNORE 16380>16384 1 4 1 0 0 ROUTE TYPE 16385 80 245 2 0 0 0 245 gTO BIN 16386 33 0 0 0 2- 16387 1 1 3 0 0 0 FILE ID 16388 33 0 0 0 18- 16389 1 42 1 0 0 16390 80 164 2 0 0 0 164 gSTORE DETAIL 16391 71 163 93 0 0 0 163 gOK, LIST NOT FULL 16392 80 295 2 0 0 0 295 gIGNORE 16391>16393 52 8 6 0 0 0 16394 C 175 2 0 0 0 175 16395 55 1 28 1 0 18 16396 C 8 32 1 0 0 16397 80 289 2 0 0 0 289 gWRITE 16398 76 162 45 0 0 0 162 16400 PROCR 164 164 STORE FILE DETAILS SR 16401 NOTES 16402 81 164 2 0 0 0 164 16403 2 319 26 1 0 0 319 16404 70 164 13 0 0 0 164 gIGNORED ALREADY 16405 10 0 0 0 10 =16 16406 2 91 1 0 0 0 16407 70 164 13 0 0 0 164 LIST FULL. IGNORE 16408 32 0 0 0 5 16409 124 91 1 0 1 0 16410 5 91 5 0 0 0 STORE 16411 10 0 0 0 2 16412 4 91 1 0 0 0 STEP CTR 16407> 16404>16413 60 0 0 0 0 16414 82 164 2 0 0 0 164 (A)=0 IF FILE TO BE IGNORED 16373>16415 1 10 0 0 0 ALT ROUTE IND 16416 71 164 21 0 0 0 164 16417 1 4 0 0 0 16418 12 0 0 0 19 16419 70 163 74 0 0 0 163 gREPORT 16420 76 163 77 0 0 0 163 gOK 16416>16421 1 4 0 0 0 ROUTE TYPE 16422 12 0 0 0 5 16423 70 164 38 0 0 0 164 gPT 16424 12 0 0 0 2 16425 70 164 38 0 0 0 164 gMT 7 16426 12 0 0 0 1 16427 70 164 38 0 0 0 164 gMT 8 16428 12 0 0 0 3 16429 70 164 38 0 0 0 164 gMT 11 16430 12 0 0 0 4 16431 70 164 38 0 0 0 164 gPT 15 16432 12 0 0 0 4 16433 71 163 74 0 0 0 163 gREPORT. NOT 19 16434 1 10 0 0 0 SPECIAL ANNEX LENGTH 16435 12 0 0 0 4096 16436 72 163 74 0 0 0 163 gREPORT 16437 76 163 77 0 0 0 163 gOK 16431> 16429> 16427> 16425> 16423>16438 1 10 0 0 0 ALT ROUTE IND 16439 12 0 0 0 1 >OK 16440 70 163 77 0 0 0 163 gREPORT 16441 76 163 74 0 0 0 163 16500 PROCR 165 165 'CHAPS' ON PT 16501 NOTES 16260> 16135>16502 10 0 0 0 5300 16503 3 12 33 0 0 0 SET 'PT IN' 16504 5 12 3 0 0 0 ERROR LETTER C 16505 54 1 0 1 0 46 16506 12 1 0 0 0 STORE AMEND SERIAL INDICATOR 16507 30 0 0 0 2 16508 5 1 0 0 0 0 16509 124 180 2 0 2 0 180 16510 80 326 2 0 0 0 326 gUNPACK 'CHAPS' 16511 1 4 0 0 0 NO OF CHARS 16512 12 0 0 0 1 16513 73 165 16 0 0 0 165 gREPORT 16514 12 0 0 0 14 16515 73 165 19 0 0 0 165 gOK 16513>16516 10 0 0 0 1 16517 3 1 4 0 0 0 (SAFE VALUE) 16518 80 177 2 0 0 0 177 gREPORT*C1 16515>16519 1 4 0 0 0 16520 80 245 2 0 0 0 245 gTO BIN 16521 5 12 13 0 0 0 16522 60 0 0 0 0 16523 91 12 12 0 2 0 C:0 16539>16524 1 5 0 2 0 16525 80 200 2 0 0 0 200 gREPLACE PROCR 16526 C 178 2 0 0 0 178 16527 71 165 31 0 0 0 165 gOK 16528 319 40 1 0 0 319 '????R' 16529 5 1 44 1 0 0 16530 1 5 0 2 0 OLD VALUE 16527>16531 3 12 14 0 2 0 STORE START POINTS 16532 3 1 5 0 2 0 16533 12 0 0 0 100 16534 73 165 37 0 0 0 165 gREPORT 16535 12 0 0 0 899 16536 73 165 39 0 0 0 165 gOK 16534>16537 10 0 0 0 2 16538 80 177 2 0 0 0 177 gREPORT*C2 16536>16539 94 165 24 0 2 1 165 16540 1 5 0 2 0 NEXT CHAP START 16541 70 165 44 0 0 0 165 gOK 16542 10 0 0 0 3 16543 80 177 2 0 0 0 177 gREPORT*C3 16541>16544 55 1 4 0 0 15 NO OF CHAPS*START 16545 C 8 8 2 0 0 16546 55 1 34 1 0 12 REPORTS 16547 C 8 38 1 0 0 16548 52 8 4 0 0 0 EDIT AMEND IND+'CHARS' 16549 C 175 26 0 0 0 175 16550 80 292 2 0 0 0 292 gREAD PT 16156>16551 9 4 1 0 0 DEAL WITH 'STOR 16552 2 181 22 1 0 0 181 'STORE' 16553 70 165 57 0 0 0 165 gPT AT STORE 16554 92 30 0 0 0 16555 71 165 74 0 0 0 165 gMT UNAMENDED 16556 76 166 2 0 0 0 166 gINITIAL TRANS WITHOUT STORE 16553>16557 92 30 0 0 0 16558 70 165 64 0 0 0 165 INITIAL TRANS 16559 80 291 2 0 0 0 291 READ A1 16560 7 6 1 0 0 16561 2 181 22 1 0 0 181 'STORE' 16562 71 165 64 0 0 0 165 16563 80 291 2 0 0 0 291 READ A1 16562> 16558>16564 54 1 0 1 0 20 16565 124 180 2 0 2 0 180 16566 80 326 2 0 0 0 326 UNPACK 'STORE' 16567 80 289 2 0 0 0 289 WRITE 'CHAPS' 16568 55 1 4 0 0 7 16569 C 8 8 1 0 0 16570 181 22 1 0 0 181 'STORE' 16571 5 8 6 1 0 0 16572 80 292 2 0 0 0 292 READ A6 16573 76 166 2 0 0 0 166 16555>16574 80 291 2 0 0 0 291 READ A1 MT UNAMENDED 16575 7 6 1 0 0 16576 2 181 22 1 0 0 181 16577 71 166 2 0 0 0 166 gNOT STORE 16578 80 289 2 0 0 0 289 WRITE 'CHAPS' 16579 55 7 4 1 0 40 16580 C 8 4 1 0 0 16581 80 291 2 0 0 0 291 gREAD A1 16600 PROCR 166 166 PREPARE TP PROCESS SECTION DETAILS+DEAL WITH INITIAL TRANSLATION 16601 NOTES 16577> 16573> 16556>16602 10 0 0 0 ££££££££££ 16603 5 18 2498 1 0 0 LIST END SIGN 16604 5 18 2496 1 0 0 CLEAR FIRST ENTRY 16605 83 267 2 0 0 1 267 SAFETY SETTINGS 16606 0 12 13 0 0 0 NO OF CHAPS 16607 80 244 2 0 0 0 244 gTO DEC 16608 5 181 8 0 0 0 181 16609 10 0 0 0 7200 16610 5 12 3 0 0 0 ERROR LETTERS 16611 10 0 0 0 99 16612 5 92 3 0 0 0 FIRST PROCR-1 16613 90 0 0 4 0 16614 C 0 0 0 14 TO STORE CHAPTER ENDS 16615 62 0 0 0 0 16616 91 12 12 0 3 0 16619>16617 11 0 0 0 1 16618 3 92 10 0 3 0 STORE UNCORRECETD CHAP NUMBERS 16619 94 166 17 0 3 1 166 16620 60 0 0 0 0 16621 10 0 0 0 1001 16622 5 12 9 0 0 0 SET FIRST SECTION SERIAL NUMBER 16623 92 30 0 0 0 16624 71 167 2 0 0 0 167 gNOT INITIAL TRANSLATION 16635>16625 87 27 10 0 0 0 16626 C 166 28 0 0 0 166 gPT 16627 C 166 30 0 0 0 166 gCARDS 16626>16628 9 4 1 0 0 16629 76 166 31 0 0 0 166 16627>16630 9 8 1 0 0 16629>16631 80 287 2 0 0 0 287 gTEST PT='PROCR' ETC 16632 12 38 0 0 0 16633 73 185 2 0 0 0 185 gYES, END OF SECTION DETAILS 16634 80 170 2 0 0 0 170 gUNPACK/OUTPUT PT 16635 76 166 25 0 0 0 166 16700 PROCR 167 167 DEAL WITH UNAMENDED SECTION LINE 16624>16702 80 173 2 0 0 0 173 gTEST PT AT AMEND DIRECTIVE 16703 71 167 7 0 0 0 167 16704 34 181 10 1 0 0 181 FIVE SQUARES 16705 76 169 3 0 0 0 169 16722> 16812> 16817>16706 80 291 2 0 0 0 291 gREAD MT 16831> 16921> 16703>16707 12 45 0 0 0 16708 71 167 13 0 0 0 167 gNO MORE PT AMENDS TO SECTIONS 16709 7 4 2 0 0 16710 2 9 4 2 0 0 16711 70 168 2 0 0 0 168 gMT AMENDED 16712 73 169 2 0 0 0 169 gMT>PT, REPORT 16708>16713 80 174 2 0 0 0 174 gTEST MT=PROCR ETC 16714 12 38 0 0 0 16715 73 185 2 0 0 0 185 gYES 16716 50 7 6 0 0 0 16717 C 175 16 0 0 0 175 16718 55 7 32 1 0 16 16719 C 1 28 1 0 0 16720 5 1 44 1 0 0 CLEAR REPORT WL 16721 80 172 2 0 0 0 172 gCHECK/EDIT/WRITE SECTION DETAIL 16722 76 167 6 0 0 0 167 16800 PROCR 168 168 EFFECT REPLACEMENTS, DELETIONS, INSERTIONS 16711>16802 85 252 2 0 0 0 252 16803 C 168 7 0 0 0 168 gREPLACE 16804 C 168 15 0 0 0 168 gDELETE 16805 C 168 27 0 0 0 168 gINSERT BEFORE 16806 C 168 7 0 0 0 168 gANNOTATION 16814> 16806> 16803>16807 80 174 2 0 0 0 174 gTEST MT=PROCR ETC 16808 0 12 38 0 0 0 16809 73 185 2 0 0 0 185 gYES 'REPLACE'LOOP 16810 80 170 2 0 0 0 170 gAPPLY PT 16811 80 173 2 0 0 0 173 gTEST NEXT PT=DIRECTIVE 16812 71 167 6 0 0 0 167 gYES 16813 80 291 2 0 0 0 291 gREAD MT 16814 76 168 7 0 0 0 168 16825> 16804>16815 80 292 2 0 0 0 292 gREAD PT 16816 80 173 2 0 0 0 173 gTEST DIRECTIVE DELETE 16817 71 167 6 0 0 0 167 gYES 16826>16818 80 291 2 0 0 0 291 gREAD MT 16819 80 174 2 0 0 0 174 g TEST MT=PROCR ETC 16820 12 38 0 0 0 16821 73 185 2 0 0 0 185 gYES 16822 7 4 2 0 0 16823 2 9 4 2 0 0 16824 73 169 2 0 0 0 169 gMODS OUT OF ORDER 16825 70 168 15 0 0 0 168 gEND OF DELETION 16826 76 168 18 0 0 0 168 gREAD/IGNORE MT 16805>16827 80 292 2 0 0 0 292 READ FIRST INSERTED BLOCK 16830>16828 80 170 2 0 0 0 170 gUNPACK/OUTPUT/READ NEXT PT BLOCK 16829 80 173 2 0 0 0 173 gTEST AMEND DIRECTIVE 16830 70 168 28 0 0 0 168 gNO 16831 76 167 7 0 0 0 167 gYES 16900 PROCR 169 169 DEAL WITH SEQUENCE ERROR IN MODS 16824> 16712>16902 34 1 2 1 0 0 16705>16903 0 8 47 0 0 0 TEST TOP HALF TO BE'??5' 16904 2 318 27 0 0 0 318 16905 70 169 10 0 0 0 169 gLINE IGNORED, DONT OVERWRITE WORD 16906 10 0 0 0 0 CLEAR SIGN BIT A 16907 32 0 0 0 10 16908 5 8 46 1 0 0 16909 76 169 12 0 0 0 169 16905>16910 32 0 0 0 10 16911 5 8 44 1 0 0 16909>16912 0 1 4 1 0 0 AMEND LETTER 16913 5 8 48 1 0 0 16914 35 0 0 0 1111 16915 10 0 0 0 1:1: 16916 3 27 6 0 0 0 SET 'PT OMITTED' 16917 37 8 48 1 0 0 PLANT '??' 16920>16918 80 292 2 0 0 0 292 gREADPT 16919 80 173 2 0 0 0 173 gTEST AMEND DIRECTIVE 16920 70 169 18 0 0 0 169 gNO 16921 76 167 7 0 0 0 167 gYES(DEAL WITH CURRENT MT BLOCK) 17000 PROCR 170 170 AMENDS TO SECTION DESCRIPTION EX PT 17002 81 170 2 0 0 0 170 17003 54 1 0 1 0 46 17004 124 179 26 0 2 0 179 17005 80 326 2 0 0 0 326 gUNPACK PT SECTION 17006 80 297 2 0 0 0 297 UNPACK ANNOTATION(CARDS) 17007 86 252 2 0 0 0 252 17008 12 0 0 0 4 17009 71 170 13 0 0 0 170 gNOT 'UNPACK ANNOTATION' 17010 50 7 6 0 0 0 17011 C 175 16 0 0 0 175 UNPACK MT DETAILS 17012 76 170 15 0 0 0 170 17009>17013 0 12 1 0 0 0 SET AMEND IND 17014 5 1 6 0 0 0 17012>17015 80 292 2 0 0 0 292 gREAD NEXT PT BLOCK 17016 80 172 2 0 0 0 172 gCHECK/EDIT/OUTPUT SECTION DETAIL 17017 82 170 2 0 0 0 170 17100 PROCR 171 171 17102 81 171 2 0 0 0 171 17103 43 A2 0 0 0 0 17104 C 7 0 0 0 0 17105 82 171 2 0 0 0 171 17200 PROCR 172 172 CHECK/EDIT/WRITE SECTION DETAILS 17202 81 172 2 0 0 0 172 17203 80 189 2 0 0 0 189 DELETE B/FWD REPORTS 17204 90 0 0 1 0 17205 C 0 0 0 4 17206 90 0 0 2 0 17207 C 0 0 0 8 17208 10 0 0 0 0 17209 5 1 44 1 0 0 CLEAR REPORT WORD 17222>17210 1 2 0 1 0 17211 2 181 3 0 2 0 181 LOWER LIMIT 17212 73 172 16 0 0 0 172 gREPORT 17213 181 2 0 2 0 181 UPPER LIMIT 17214 2 1 2 0 1 0 17215 72 172 21 0 0 0 172 gOK 17212>17216 96 0 0 1 0 17217 11 0 0 0 1 17230>17218 80 177 2 0 0 0 177 gREPORT S(NOMBER) 17219 80 295 2 0 0 0 295 gIGNORE SECTION 17220 76 172 44 0 0 0 172 17215>17221 94 0 0 1 1 17222 94 172 10 0 2 2 172 17223 1 4 0 0 0 TX AREA IND 17224 70 172 31 0 0 0 172 gNO 17225 4 92 6 0 0 0 AUG CTR 17226 92 6 0 0 0 17227 12 0 0 0 9 17228 73 172 31 0 0 0 172 gOK, NOT >8 TX AREAS 17235>17229 10 0 0 0 5 17230 76 172 18 0 0 0 172 gREPORT, IGNORE 17228> 17224>17231 1 2 0 0 0 17232 80 183 2 0 0 0 183 gDECODE SEC NUMBER 17233 34 12 40 0 0 0 17234 36 12 72 0 3 0 17235 71 172 29 0 0 0 172 gSECTION ALREADY USED 17236 62 0 0 0 0 17237 12 40 0 0 0 17238 4 12 72 0 3 0 SET ' AM A SECTION' IND 17239 1 4 0 0 0 17240 70 172 44 0 0 0 172 gNOT TX AREA 17241 12 40 0 0 0 17242 31 0 0 0 10 17243 4 12 72 0 3 0 SET ' AM A TX AREA' IND 17240> 17220>17244 60 0 0 0 0 17245 80 289 2 0 0 0 289 gWRITE PREVINS BLOCK 17246 52 8 4 0 0 0 17247 C 175 12 0 0 0 175 17248 10 0 0 0 1 17249 4 12 9 0 0 0 STEP SERIAL CTR 17250 55 1 28 1 0 18 ANNOTATION 17251 C 8 32 1 0 0 17252 82 172 2 0 0 0 172 17300 PROCR 173 173 TEST PT REPRESENTS AMENDMENT TO SECTION DESCRIPTION 17302 81 173 2 0 0 0 173 17303 80 294 2 0 0 0 294 gTEST AMEND DIRECTIVE/END 17304 70 173 12 0 0 0 173 gNO 17305 1 3 0 0 0 TOPCHAR OF SERIAL NUMBER 17306 30 0 0 0 3- 17307 12 0 0 0 5e * 17308 70 173 11 0 0 0 173 gIS MOD TO SECTIONS 17309 10 0 0 0 1 17310 5 12 45 0 0 0 17308>17311 10 0 0 0 1 17304>17312 82 173 2 0 0 0 173 (A)=0 IF NOT DIRECTIVE 17400 PROCR 174 174 TEST MT AT START OF CODING 17402 81 174 2 0 0 0 174 17403 27 1 0 0 0 17404 70 174 8 0 0 0 174 gSINGLE RECORD BLOCKS 17405 7 12 1 0 0 DIRECTIVE WORD 17409>17406 80 287 2 0 0 0 287 17407 82 174 2 0 0 0 174 17404>17408 7 10 1 0 0 17409 76 174 6 0 0 0 174 17500 TABLE 175 175 1 17501 NOTES 17502 1 2 0 0 2 0 5 0 0 0 0 0 0 FILE IDENTITY==FILES LINE 17504 1 4 0 0 0 0 5 0 0 5 0 0 0 RTE TYPE 17506 1 6 0 0 0 0 5 0 0 5 0 0 0 RETN PERIOD 17508 1 8 0 0 0 0 5 0 0 5 0 0 0 MAX BLOCK 17510 1 10 0 0 0 0 5 0 0 5 0 0 1 ALT ROUTE 17512 319 8 0 0 2 0 1 0 0 0 0 0 0 * 17514 12 9 0 0 0 0 4 1 0 3 0 0 0 SECTION SERIAL NUMBER 17516 1 2 0 0 0 0 5 0 0 4 0 0 0 SECTION==SECTION LINE 17518 1 3 0 0 0 0 5 0 0 4 0 0 0 LENGTH 17520 1 4 0 0 0 0 5 0 0 4 0 0 0 TX AREA IND 17522 1 5 0 0 0 0 5 0 0 4 0 0 0 CHAPTER 17524 1 6 0 0 0 0 5 0 0 5 0 0 1 AMEND IND 17526 1 0 0 0 0 0 5 0 0 5 0 0 0 AMEND IND 17528 1 2 0 0 2 0 5 0 0 0 0 0 1 'CHAPS' 17530 12 1 0 0 0 0 5 0 0 4 0 0 1 FOR UPDATED SERIAL 17532 1 0 0 0 0 0 5 0 0 5 0 0 0 AMEND IND 17534 1 2 0 0 2 0 5 0 0 0 0 0 0 17536 1 4 0 0 0 0 5 0 0 5 0 0 0 17538 1 6 0 0 0 0 5 0 0 4 0 0 0 17540 1 8 0 0 2 0 5 0 0 0 0 0 0 SERIAL/CODER 17542 1 10 0 0 1 0 10 0 0 10 0 0 0 (SPACER) 17544 1 10 0 0 0 0 5 0 0 5 0 0 1 (SPACER) 17600 PROCR 176 176 CHECK PERFORATING IN PROGM BLOCK 17601 NOTES 17602 81 176 2 0 0 0 176 17603 1 4 0 0 0 SUITE 17604 12 0 0 0 1000 17605 73 176 8 0 0 0 176 gOK 17606 10 0 0 0 41 17607 80 177 2 0 0 0 177 gREPORT*P1 17605>17608 1 6 0 0 0 JOB 17609 12 0 0 0 100 17610 73 176 13 0 0 0 176 gOK 17611 10 0 0 0 42 17612 80 177 2 0 0 0 177 gREPORT*P2 17610>17613 1 4 0 0 0 17614 1 1 6 0 0 0 17615 71 176 18 0 0 0 176 gOK 17616 10 0 0 0 43 17617 80 177 2 0 0 0 177 gREPORT*P3 17615>17618 92 30 0 0 0 17619 71 176 21 0 0 0 176 gAMEND RUN 17620 5 1 8 1 0 0 CLEAR SERIAL NUMBER 17619>17621 10 0 0 0 0 17622 5 12 2 0 0 0 CLEAR CTR 17623 82 176 2 0 0 0 176 17700 PROCR 177 177 ERROR REPORT SR 17702 81 177 2 0 0 0 177 17703 5 12 4 0 0 0 17704 91 12 2 0 3 0 CTR 17705 319 8 1 0 0 319 * 17706 1 12 4 0 0 0 REPORT NUMBER 17707 1 12 3 0 0 0 REPORT LETTER 17708 5 1 38 1 3 0 17709 12 0 0 0 2 17710 4 12 2 0 0 0 REDUCE CTR 17711 10 0 0 0 0 17712 82 177 2 0 0 0 177 17800 PROCR 178 178 REPLACE CODERS PROCR-ISSUE 6 O/P-ENTRY AND CHAPS 17802 81 178 2 0 0 0 178 (12/119=DEC PROCR) 17803 12 119 0 0 0 17804 80 245 2 0 0 0 245 gBIN 17805 33 0 0 0 1- 17806 5 320 42 1 0 0 320 17807 91 320 42 0 1 0 320 17808 74 178 12 0 0 0 178 gEVEN 17809 18 50- 0 1 0 17810 31 0 0 0 10- 17811 76 178 14 0 0 0 178 17808>17812 34 319 20 0 0 0 319 BITS 1-10 17813 36 18 50- 0 1 0 17811>17814 80 244 2 0 0 0 244 gDEC 17815 82 178 2 0 0 0 178 17900 TABLE 179 179 3 UNPACK PROGM/ENTRY/SECTION 17901 NOTES SALE DESCRIPTION FROM P/T & CARDS 17902 1 2 0 0 2 0 5 0 0 0 0 0 0 PROGM/ENTRY 17904 1 4 0 0 1 0 3 0 0 0 0 0 0 SUITE NO/E POINT 17906 1 6 0 0 1 0 2 0 0 0 0 0 0 JOB NO/PRIORITY CLASS 17908 1 8 0 0 2 0 5 0 0 0 0 0 0 SERIAL, VERSION, BLANK/CODER 17910 1 16 0 0 2 1 5 0 0 0 0 0 1 /////ANNOTATION/CHECKER 17912 12 48 0 0 0 0 2 0 0 0 0 0 0 FILES DESCRIPTION-SERIAL NO 17914 1 2 0 0 2 0 2 0 0 0 0 0 0 FILE ID 17916 1 4 0 0 1 0 2 0 0 0 0 0 0 ROUTE TYPE 17918 1 6 0 0 1 0 2 0 0 0 0 0 0 CHAPTER 17920 1 8 0 0 1 0 4 0 0 0 0 0 0 BLOCK LENGTH 17922 1 10 0 0 1 0 4 0 0 0 0 0 0 ALT ROUTE IND 17924 1 28 0 0 2 0 5 0 0 0 0 0 1 ANNOTATION 17926 12 48 0 0 0 0 6 0 0 0 0 0 0 /////SERIAL-SEC DESCRIPTION 17928 1 2 0 0 0 0 2 0 0 0 0 0 0 SECTION NO 17930 1 3 0 0 0 0 4 0 0 0 0 0 0 LENGTH 17932 1 4 0 0 0 0 1 0 0 0 0 0 0 TX? 17934 1 5 0 0 0 0 2 0 0 0 0 0 0 CHAP NO 17936 1 28 0 0 2 0 5 0 0 0 0 0 1 ANNOTATION 17938 1 2 0 0 2 0 5 0 0 0 0 0 0 'AMEND' 17940 1 4 0 0 1 0 3 0 0 0 0 0 0 SUITE NO 17942 1 6 0 0 1 0 2 0 0 0 0 0 0 JOB NO 17944 1 8 0 0 2 0 2 0 0 0 0 0 0 (ISSUE+SERIAL)/ISSUE 17946 1 20 0 0 2 0 3 0 0 0 0 0 0 (WORDS ETC)/SERIAL 17948 1 16 0 0 0 0 1 0 0 0 0 0 0 ''PRINT PASS 3'' IND 17950 1 17 0 0 0 0 3 0 0 0 0 0 0 NEW ISSUE 17952 1 18 0 0 2 0 1 0 0 0 0 0 1 PTS IND(CARDS) 18000 TABLE 180 180 3 UNPACK CHAPS BLOCK 18001 NOTES FROM CARDS 18002 1 2 0 0 2 0 5 0 0 0 0 0 0 CHAPS' 18004 1 4 0 0 0 0 2 0 0 0 0 0 0 NO OF CHAPS 18006 1 5 0 0 0 0 3 0 0 0 0 0 0 1-ST START 18008 1 6 0 0 0 0 3 0 0 0 0 0 0 2-ND START 18010 1 7 0 0 0 0 3 0 0 0 0 0 0 18012 1 8 0 0 0 0 3 0 0 0 0 0 0 18014 1 9 0 0 0 0 3 0 0 0 0 0 0 18016 1 10 0 0 0 0 3 0 0 0 0 0 0 18018 1 11 0 0 0 0 3 0 0 0 0 0 0 18020 1 12 0 0 0 0 3 0 0 0 0 0 0 18022 1 13 0 0 0 0 3 0 0 0 0 0 0 18024 1 14 0 0 0 0 3 0 0 0 0 0 0 10-TH START 18026 1 15 0 0 0 0 3 0 0 0 0 0 0 18028 1 16 0 0 0 0 3 0 0 0 0 0 0 18030 1 17 0 0 0 0 3 0 0 0 0 0 0 18032 1 18 0 0 0 0 3 0 0 0 0 0 1 14-TH START 18100 CONST 181 181 1 FUNCTIONAL 18102 (D)100099; UPPER/LOWER LIM SEC NUMBER 18104 4096; DO LENGTH 18106 1; DO TX AREA IND 18108 0; DO CHAP NUMBER 18110 1£1£1£1£1£; 18112 (A)PROGM; 18114 ENTRY; 18116 AMEND; 18118 CHAPS; 18120 PASSI; 18122 STORE; 18200 CONST 182 182 1 DUMMY 18202 (B)0; 18204 ; 18206 ; 18208 ; 18210 ; 18300 PROCR 183 183 DECODE SECTION NUMBER 18301 NOTES RADIX D BITS 1-10 OF 10 LOCATIONS 18302 81 183 2 0 0 0 183 18303 70 183 11 0 0 0 183 gZERO SECTION 18304 32 0 0 0 1- DIVIDE BY 10 18305 92 0 0 3 0 SET MODIFIER=LOCN CLEAR A 18306 32 0 0 0 1 REMAINDER 18307 5 12 40 0 0 0 WL 18308 10 0 0 0 1 18309 124 12 40 0 0 0 18310 31 0 0 0 0 ///// 18303>18311 5 12 40 0 0 0 STORE COLLATION BIT 18312 82 183 2 0 0 0 183 18400 CONST 184 184 1 DUMMY 18500 PROCR 185 185 MAIN LOOP-DEAL WITH INITIAL TRANSLATION 18501 NOTES RADIX 16821> 16809> 16715> 16633>18502 55 18 0 0 0 1010 COPY CURRENT AMEND DETAILS 18503 C 93 0 0 0 0 18504 54 29 0 1 0 44 18505 83 191 2 0 0 2 191 SAFETY SETTINGS 18506 10 0 0 0 1 18507 5 27 5 0 0 0 UNPACK SWITCH 18508 0 92 30 0 0 0 18509 3 12 8 1 0 0 (CLEAR 12/9) 18510 70 185 14 0 0 0 185 gINITIAL TRANSLATION 18511 59 7 6 0 8 0 SET I/P MR 18512 C 7 4 2 0 0 18513 76 251 2 0 0 0 251 18510>18514 10 0 0 0 1 18515 5 12 33 0 0 0 SET 'PT INS INPUT' 18534>18516 9 4 1 0 0 18517 30 0 0 0 4- 18518 30 0 0 0 4 18519 2 319 14 1 0 0 319 'END ' 18520 70 322 2 0 0 0 322 gEND OF INITIAL TRANSLATION 18521 9 4 1 0 0 18522 2 319 46 1 0 0 319 'TRAMD' 18523 70 322 2 0 0 0 322 18524 87 27 10 0 0 0 18525 C 185 27 0 0 0 185 gPT 18526 C 185 29 0 0 0 185 gCARDS 18525>18527 9 4 1 0 0 18528 76 185 30 0 0 0 185 18526>18529 9 8 1 0 0 18528>18530 80 287 2 0 0 0 287 gTEST STACK DIRECTIVE 18531 80 283 2 0 0 0 283 gUNPACK PT 18532 80 186 2 0 0 0 186 gCHECK/EDIT/OUTPUT 18533 80 292 2 0 0 0 292 gREAD PT 18534 76 185 16 0 0 0 185 gLOOP TILL END 18600 PROCR 186 186 START OF CHECK/EDIT/OUTPUT SR 18601 NOTES RADIX 18602 81 186 2 0 0 0 186 18603 12 38 0 0 0 STACKING DIRECTIVE 18604 70 190 2 0 0 0 190 NO 18605 72 191 2 0 0 0 191 g'NOTES' BLOCK 18606 12 61 0 0 0 C-LINE MUST FOLLOW 18607 70 186 9 0 0 0 186 INDICATOR 18608 80 296 2 0 0 0 296 IGNORE THIS INSTRUCTION 18607>18609 12 54 0 0 0 18610 12 0 0 0 55 18611 70 186 14 0 0 0 186 18612 10 0 0 0 0 18613 5 12 60 1 0 0 18611>18614 5 12 9 0 0 0 18615 5 12 43 0 0 0 CLEAR LINE INCREMENT FOR 'SER' CHECKS 18616 92 30 0 0 0 18617 71 186 22 0 0 0 186 gAMEND RUN 18618 9 50 2 0 0 PASS 0 DOESN'T LIKE IT' IND 18619 70 186 22 0 0 0 186 gOK 18620 319 40 1 0 0 319 ????R' 18621 5 1 44 1 0 0 18619> 18617>18622 27 5 0 0 0 18623 12 0 0 0 4 18624 70 187 38 0 0 0 187 gVALUE (DIRECTIVE OR DATA) 18625 92 3 0 0 0 18626 11 0 0 0 1 FORM TRANSLATORS PROCR 18627 3 92 3 0 0 0 18628 3 12 0 0 0 0 18629 5 12 4 0 0 0 18700 PROCR 187 187 TEST NEW CHAPTER 18702 1 8 2 0 0 18703 30 0 0 0 2- 18704 3 1 14 0 0 0 B/FWD PROCR 18705 80 200 2 0 0 0 200 gREPLACE PROCR 18706 C 202 2 0 0 0 202 18707 2 92 3 0 0 0 18708 70 187 11 0 0 0 187 gOK PASS 0 HASN'T BOOBED 18709 319 40 1 0 0 319 ????R' 18710 5 1 44 1 0 0 18708>18711 52 1 8 0 0 0 EDIT NEW PROCR 18712 C 306 2 0 0 0 306 18713 27 4 0 0 0 18714 71 187 19 0 0 0 187 gCOMPILER.DONT SET IND 18715 1 14 0 0 0 OLD 18716 2 12 4 0 0 0 NEW 18717 70 187 19 0 0 0 187 gPROCR DOESNT CHANGE 18718 80 188 2 0 0 0 188 gSET 'PRINT PROCR' 18717> 18714>18719 92 3 0 0 0 18720 12 0 0 0 100 18721 71 187 25 0 0 0 187 gNOT FIRST TIME THROUGH 18722 0 12 0 0 0 0 FIRST CODERS PROCR 18723 5 12 14 0 0 0 SET AS FIRST CHAP START 18724 76 187 33 0 0 0 187 18721>18725 12 14 0 4 0 18726 2 12 0 0 0 0 18727 71 187 38 0 0 0 187 gTHIS PROCR IS NOT A CHAPTER START 18728 92 3 0 0 0 18729 12 0 0 0 1 18730 80 245 2 0 0 0 245 gCHAP END IN BIN 18731 30 0 0 0 2 18732 4 92 9 0 4 0 STORE CHAP END POINT 18724>18733 62 0 0 0 0 18734 10 0 0 0 1 18735 4 92 0 0 0 0 STEP UNCORR CHAP IN BIN 18736 60 0 0 0 0 18737 94 0 0 4 1 18727> 18624>18738 83 191 2 0 0 1 191 SET CHECK SWITCH FOR DIRECTIVES 18739 76 191 2 0 0 0 191 18800 PROCR 188 188 SET IND IN SEC 23 IF PROCR TO BE PRINTED 18802 81 188 2 0 0 0 188 18803 92 3 0 0 0 CURRENT PROCR 18804 80 245 2 0 0 0 245 gBIN 18805 19 0 0 0 14 18806 5 320 42 0 0 0 320 18807 32 0 0 0 9 18808 5 320 43 0 0 0 320 REMAINDER 18809 34 320 22 0 0 0 320 1 18810 124 320 43 0 1 0 320 18811 33 0 0 0 0 ///// 18812 320 20 0 0 0 320 £X5 18813 124 320 42 0 1 0 320 18814 37 23 5- 0 0 0 SET BIT 18815 60 0 0 0 0 18816 82 188 2 0 0 0 188 18900 PROCR 189 189 CHECK FOR B/FWD ERROR REPORTS 18901 NOTES 0 18902 81 189 2 0 0 0 189 18903 1 42 1 0 0 LAST 5 CHARS OF ANNOTATION 18904 2 319 26 1 0 0 319 '?????' 18905 70 189 12 0 0 0 189 18906 1 42 1 0 0 18907 12 0 0 0 5£5£5£5£5£ FIVE SQUARES 18908 70 189 12 0 0 0 189 18909 1 42 1 0 0 18910 2 319 24 1 0 0 319 'SHEET' 18911 71 189 13 0 0 0 189 18908> 18905>18912 5 1 42 1 0 0 CLEAR OUT REPORT 18911>18913 82 189 2 0 0 0 189 19000 PROCR 190 190 CHECK SERIAL NUMBER SEQUENCE - INITIAL TRANSLATION 19001 NOTES RADIX 18604>19002 92 30 0 0 0 19003 71 191 2 0 0 0 191 19004 34 1 2 1 0 0 RIGHT ALIGN 19005 80 321 2 0 0 0 321 SERIAL NO 19006 12 88 2 0 0 19007 2 12 43 0 0 0 19008 70 190 14 0 0 0 190 SERIAL NO IS IN FACT SERIAL 19009 86 191 2 0 0 0 191 19010 12 0 0 0 6 19011 72 191 2 0 0 0 191 gNO CHECK ON PM+TRIAL DATA 19012 10 0 0 0 725569 PUT'SER' IN ERROR INDICATOR 19013 5 1 44 1 0 0 19008>19014 12 88 2 0 0 STORE THIS SERIAL NO 19015 1 12 90 0 0 0 gLONG/SHORT COUNTER 19016 11 0 0 0 1 1 19017 5 12 43 0 0 0 TO TEST NEXT INSTRUCTION 19100 PROCR 191 191 SWITCH B 19101 NOTES RADIX 19011> 19003> 18739> 18605>19102 80 189 2 0 0 0 189 gDELETE B/FWD ERROR REPORTS 20712>19103 12 33 0 0 0 19104 70 191 9 0 0 0 191 gEX MT 19105 92 30 0 0 0 19106 70 191 9 0 0 0 191 19107 80 188 2 0 0 0 188 gSET'PRINT PROCR' 19108 10 0 0 0 0 19106> 19104>19109 85 191 2 0 0 0 191 19110 C 205 2 0 0 0 205 STACKING DIRECTIVE 19111 C 210 2 0 0 0 210 INSTRUCTIONS 19112 C 276 2 0 0 0 276 TABLES 19113 C 260 2 0 0 0 260 CONSTANTS 19114 C 191 15 0 0 0 191 VALUE'=5 19114>19115 0 1 9 0 0 0 REF 19116 34 1 10 0 0 0 19117 74 191 23 0 0 0 191 ZERO REF & ITEM 19118 80 275 2 0 0 0 275 gUPDATE ADDRESS 19119 0 12 4 0 0 0 19120 5 1 9 0 0 0 NEW REF 19121 80 277 2 0 0 0 277 CHECK ADJUSTED REF 19122 76 247 2 0 0 0 247 gEDIT AND OUTPUT 19117>19123 85 108 2 0 0 0 108 19124 C 247 2 0 0 0 247 >LAST REF/ITEM CORRECT 19125 C 191 26 0 0 0 191 >LAST REF/ITEM IGNORED 19125>19126 80 195 2 0 0 0 195 REPORT R 19127 80 295 2 0 0 0 295 IGNORE THIS LINE 19128 76 247 2 0 0 0 247 gEDIT AND OUTPUT 19200 PROCR 192 192 CHECK I IS EVEN,REPORT IF NOT 19201 NOTES 0 0 19202 81 192 2 0 0 0 192 19203 5 245 2 0 0 0 245 ITEM TO WL=SR LINK 19204 10 0 0 0 1 19205 32 0 0 0 10- 19206 36 245 2 0 0 0 245 19207 70 192 9 0 0 0 192 gOK 19208 80 196 2 0 0 0 196 gREPORT I 19207>19209 82 192 2 0 0 0 192 19300 PROCR 193 193 ERROR REPORT OF D 19301 NOTES 19302 81 193 2 0 0 0 193 19303 10 0 0 0 54 D 19304 80 199 2 0 0 0 199 19305 82 193 2 0 0 0 193 19400 PROCR 194 194 ERROR REPORT OF M 19401 NOTES 19402 81 194 2 0 0 0 194 19403 10 0 0 0 64 M 19404 80 199 2 0 0 0 199 19405 82 194 2 0 0 0 194 19500 PROCR 195 195 ERROR REPORT OF R 19501 NOTES 19502 81 195 2 0 0 0 195 19503 10 0 0 0 69 19504 80 199 2 0 0 0 199 19505 82 195 2 0 0 0 195 19600 PROCR 196 196 ERROR REPORT OF I 19601 NOTES 19602 81 196 2 0 0 0 196 19603 10 0 0 0 59 I 19604 80 199 2 0 0 0 199 19605 82 196 2 0 0 0 196 19700 PROCR 197 197 ERROR REPORT OF L 19701 NOTES 19702 81 197 2 0 0 0 197 19703 10 0 0 0 63 L 19704 80 199 2 0 0 0 199 19705 82 197 2 0 0 0 197 19800 PROCR 198 198 ERROR REPORT OF T 19801 NOTES 19802 81 198 2 0 0 0 198 19803 10 0 0 0 73 T 19804 80 199 2 0 0 0 199 19805 82 198 2 0 0 0 198 19900 PROCR 199 199 MAKE ERROR REPORT 19901 NOTES 19902 81 199 2 0 0 0 199 19903 32 0 0 0 10- 19904 1 44 1 0 0 TEST REPORT ALREADY MADE 19905 30 0 0 0 2- WITH '????' 19906 12 0 0 0 5:5:5:5: 19907 70 199 20 0 0 0 199 gYES,DON'T CORRUPT IT 19908 1 44 1 0 0 19909 12 0 0 0 725569 'SER' 19910 71 199 12 0 0 0 199 19911 5 1 44 1 0 0 LET OTHERS TAKE PRECEDENCE 19910>19912 10 0 0 0 0 19913 32 0 0 0 10 19914 124 12 115 1 2 0 19915 30 0 0 0 0 ///// 19916 4 1 44 1 0 0 19917 10 0 0 0 2 19918 1 12 115 0 0 0 19919 5 12 115 0 0 0 19907>19920 82 199 2 0 0 0 199 20000 PROCR 200 200 REPLACE CODERS PROCR TO C/FWD VALUE 20002 81 200 2 0 0 0 200 20003 3 12 119 0 0 0 20004 3 12 118 0 0 0 20005 12 0 0 0 100 20006 73 200 27 0 0 0 200 gEX RANGE 20007 12 0 0 0 899 20008 72 200 27 0 0 0 200 gDON'T REPLACE 20009 12 33 0 0 0 20010 71 200 21 0 0 0 200 gEX PT 20011 27 0 0 0 0 20012 71 200 21 0 0 0 200 gISSUE 6 O/P 20013 27 4 0 0 0 20014 71 200 21 0 0 0 200 gCOMPILER CALLED TRANSLATOR 20015 80 201 2 0 0 0 201 gREPLACE EX ISSUE 5 20016 71 200 19 0 0 0 200 gOK 20017 80 195 2 0 0 0 195 gREPORT R 20018 76 200 21 0 0 0 200 20016>20019 3 12 119 0 0 0 20020 5 12 118 0 0 0 20018> 20014> 20012> 20010>20021 80 1001 0 0 0 0 gREPLACE EX ISSUE 6 20022 71 200 26 0 0 0 200 gOK 20023 319 40 1 0 0 319 '????R' 20024 5 1 44 1 0 0 20025 82 200 2 0 0 0 200 20022>20026 3 12 119 0 0 0 20008> 20006>20027 82 200 2 0 0 0 200 20100 PROCR 201 201 REPLACE CODERS PROCR-ISSUE 5 O/P 20102 81 201 2 0 0 0 201 (12/119)=DEC PROCR 20103 27 2 0 0 0 20104 70 201 7 0 0 0 201 gNOT PSEUDO-ISSUE 5 O/P 20105 12 119 0 0 0 REPLACEMENT=ITSELF 20106 76 201 23 0 0 0 201 20104>20107 12 119 0 0 0 20108 12 0 0 0 600 20109 72 201 24 0 0 0 201 gOUT OF RANGE 20110 12 119 0 0 0 20111 80 245 2 0 0 0 245 gTO BIN 20112 33 0 0 0 1- 20113 5 245 2 0 0 0 245 SR LINK 20114 74 201 19 0 0 0 201 gEVEN 20115 124 245 2 0 1 0 245 20116 53 50- 0 0 0 20117 31 0 0 0 10- 20118 76 201 22 0 0 0 201 20114>20119 34 319 20 0 0 0 319 BITS 1 -10 20120 124 245 2 0 1 0 245 20121 36 53 50- 0 0 0 20118>20122 80 244 2 0 0 0 244 g TO DEC 20106>20123 82 201 2 0 0 0 201 20109>20124 10 0 0 0 0 20125 82 201 2 0 0 0 201 20200 PROCR 202 202 REPLACE CODERS PROCR-ISSUE 6 O/P 20202 81 202 2 0 0 0 202 (12/119-DEC PROCR) 20203 12 119 0 0 0 20204 80 245 2 0 0 0 245 g TO BIN 20205 33 0 0 0 1- 20206 5 245 2 0 0 0 245 20207 74 202 12 0 0 0 202 g EVEN 20208 124 245 2 0 1 0 245 20209 93 50- 0 0 0 20210 31 0 0 0 10- 20211 76 202 15 0 0 0 202 20207>20212 34 319 20 0 0 0 319 BITS 1 -10 20213 124 245 2 0 1 0 245 20214 36 93 50- 0 0 0 20211>20215 80 244 2 0 0 0 244 g TO DEC 20216 82 202 2 0 0 0 202 20300 PROCR 203 203 ADJUST SR-ISSUE 5 O/P 20302 81 203 2 0 0 0 203 (A) = SERIAL TO BE ADJUSTED 20303 90 0 0 1 0 20304 C 0 0 0 160 20305 5 12 58 0 0 0 20306 5 12 46 0 0 0 20307 35 0 0 0 11100 20308 36 12 58 0 0 0 20309 5 12 30 0 0 0 STORE PROCR 20316>20310 36 54 0 0 1 0 20311 70 203 17 0 0 0 203 g END 20312 2 12 30 0 0 0 20313 70 203 20 0 0 0 203 g PROCR MATCHES 20314 72 203 17 0 0 0 203 g POINT PASSED END 20322> 20325>20315 10 0 0 0 0 20316 94 203 10 0 1 2 203 20314> 20311>20317 12 46 0 0 0 TOTAL ADJUSTMENT 20318 1 12 58 0 0 0 20319 82 203 2 0 0 0 203 20313>20320 12 58 0 0 0 SEARCH WITHIN PROCR 20321 2 54 0 0 1 0 20322 73 203 15 0 0 0 203 g NOT FOR THIS POINT IN PROCR 20323 54 1 0 1 0 20324 4 12 46 0 0 0 FORM TOTAL ADJUSTMENT 20325 76 203 15 0 0 0 203 20400 PROCR 204 204 ADJUST SR-ISSUE 6 O/P 20402 81 204 2 0 0 0 204 20403 90 0 0 1 0 20404 C 0 0 0 460 20405 10 0 0 0 0 (12/58)= SERIAL TO BE ADJUSTED 20406 5 12 46 0 0 0 CLEAR FOR TOTAL ADJUSTMENT 20407 35 0 0 0 11100 20408 36 12 58 0 0 0 20409 5 12 30 0 0 0 PROCR 20422>20410 36 97 0 0 1 0 20411 70 204 23 0 0 0 204 g END 20412 2 12 30 0 0 0 20413 73 204 21 0 0 0 204 g SEARCH 20414 71 204 23 0 0 0 204 g END 20415 97 0 0 1 0 20416 2 12 58 0 0 0 20417 70 204 19 0 0 0 204 20418 72 204 32 0 0 0 204 g NEXT ADJUST POINT IN PROCR IS LATER 20417>20419 97 1 0 1 0 20420 4 12 46 0 0 0 20413>20421 10 0 0 0 0 20422 94 204 10 0 1 2 204 20434> 20440> 20442> 20444> 20446> 20449> 20414> 20411>20423 35 0 0 0 11 20424 12 46 0 0 0 TOTAL ADJUSTMENT 20425 36 12 58 0 0 0 20426 3 12 58 0 0 0 NEW ITEM 20427 12 0 0 0 100 20428 73 204 31 0 0 0 204 20429 319 42 1 0 0 319 '???? ' 20430 5 1 44 1 0 0 REPORT WRITTEN ITEM >99 20428>20431 82 204 2 0 0 0 204 20418>20432 1 97 1 0 1 0 QUANTITY (+ -) 20433 70 204 35 0 0 0 204 g ADDRESS DELETED 20434 72 204 23 0 0 0 204 g NEXT IS INSERTION 20433>20435 0 1 7 0 0 0 20436 12 0 0 0 53000 20437 70 204 47 0 0 0 204 g C-LINE REPORT 20438 12 54 0 0 0 BIN ACTION 20439 101 83 1 2 0 20440 70 204 23 0 0 0 204 g 83 DON'T REPORT 20441 101 1 1 2 0 20442 70 204 23 0 0 0 204 g 84 20443 101 1 1 2 0 20444 70 204 23 0 0 0 204 g 85 20445 101 1 1 2 0 20446 70 204 23 0 0 0 204 g 86 20437>20447 319 44 1 0 0 319 '???? DELTA' 20448 5 1 44 1 0 0 20449 76 204 23 0 0 0 204 20500 PROCR 205 205 DEAL WITH PROCR/TABLE/CONST 20501 NOTES RADIX 19110>20502 1 6 1 0 0 20503 2 319 6 1 0 0 319 PROCR 20504 71 205 7 0 0 0 205 NO 20505 5 12 90 1 0 0 20506 76 247 2 0 0 0 247 FORM SERIAL 20504>20507 1 6 1 0 0 20508 2 319 2 1 0 0 319 TABLE 20509 71 206 5 0 0 0 206 NO 20510 10 0 0 0 100001 SET LONG/SHORT 20511 5 12 90 1 0 0 COUNTER 20512 34 1 16 1 0 0 TABLE TYPE 20513 80 321 2 0 0 0 321 gRIGHT ALIGN 20514 0 12 88 2 0 0 20515 73 205 20 0 0 0 205 TABLE TYPE IS 20516 3 12 59 0 0 0 20517 70 205 20 0 0 0 205 20518 12 0 0 0 5 20519 73 206 2 0 0 0 206 20517> 20515>20520 83 278 8 0 0 5 278 TABLE TYPE IS OUT 20521 76 282 29 0 0 0 282 20600 PROCR 206 206 20601 NOTES RADIX 20519>20602 84 278 8 0 0 0 278 SET TABLE CHECKING 20603 C 12 59 0 0 0 SWITCH ACCORDING TO 20604 76 247 2 0 0 0 247 FORM SERIAL NO. 20509>20605 1 6 1 0 0 20606 2 319 4 1 0 0 319 CONST 20607 71 206 25 0 0 0 206 gNO 20608 54 94 60 0 0 40 20609 34 318 3 0 0 0 318 BIT 17 20610 36 1 16 2 0 0 20611 30 0 0 0 4- 20612 3 12 90 0 0 0 LONG/SHORT IND 20613 71 206 15 0 0 0 206 gLONG 20614 10 0 0 0 30 ALPHA ZERO 20613>20615 30 0 0 0 3 20616 35 0 0 0 11000 20617 37 1 17 0 0 0 20618 76 206 21 0 0 0 206 SET ALPHA 0 OR 1 20619 10 0 0 0 1 20620 3 12 90 0 0 0 20618>20621 83 263 2 0 0 1 263 SAFETY VALUE 20622 10 0 0 0 4 SET CHECK SWITCH 20623 84 191 2 0 0 0 191 20624 76 247 2 0 0 0 247 gO/P 20607>20625 0 1 6 1 0 0 20626 2 319 28 1 0 0 319 'VALUE' 20627 71 207 2 0 0 0 207 gHENCE 'NOTES' 20628 10 0 0 0 5 20629 84 191 2 0 0 0 191 20630 5 12 90 1 0 0 CLEAR IND=SHORT 20631 76 247 2 0 0 0 247 O/P 20700 PROCR 207 207 DEAL WITH NOTES 20701 NOTES RADIX 20627>20702 12 91 0 0 0 20703 71 207 6 0 0 0 207 20704 10 0 0 0 2 FOR INSTRUCTIONS 20705 76 207 7 0 0 0 207 20703>20706 10 0 0 0 3 FOR TABLE ENTRIES 20705>20707 84 191 2 0 0 0 191 SET CHECK SWITCH 20708 2 12 38 0 0 0 DIRECTIVE IND FOR THIS LINE 20709 73 247 2 0 0 0 247 gIS'NOTES'(IE>0) 20710 10 0 0 0 2 20711 5 12 9 0 0 0 SET THIS LINE SERIAL 20712 76 191 3 0 0 0 191 gTO CHECK SWITCH 20800 PROCR 208 208 REPLACE AND ADJUST B/FWD ADDRESSES IN TABLE ENTRIES AND INSTRUCTI 20801 NOTES RADIX 20802 81 208 2 0 0 0 208 20803 34 1 8 1 0 0 REF 20804 80 321 2 0 0 0 321 gRIGHT ALIGN 20805 12 0 0 0 67 20806 3 274 2 0 0 0 274 20807 71 208 10 0 0 0 208 gNOT'P' 20808 0 12 0 0 0 0 20809 5 12 88 2 0 0 27507> 20807>20810 0 12 88 2 0 0 20811 3 12 4 0 0 0 20812 12 0 0 0 100 20813 73 208 32 0 0 0 208 gSECTION 20814 12 0 0 0 899 20815 72 208 32 0 0 0 208 gNOT REPLACEABLE (INCLUDES 999) 20816 1 10 1 0 0 20817 5 294 2 0 0 0 294 'PREVIOUS' ITEM 20818 80 209 2 0 0 0 209 gCALC C/FWD ADDRESS 20819 27 4 0 0 0 20820 71 208 28 0 0 0 208 gCOMPILER, DONT SET IND 20821 12 88 2 0 0 TEST IMPLICIT 20822 2 12 4 0 0 0 AMENDMENT 20823 71 208 27 0 0 0 208 gCHANGE TO REF 20824 1 10 1 0 0 20825 2 294 2 0 0 0 294 20826 70 208 28 0 0 0 208 gNO CHANGE TO ITEM 20823>20827 80 188 2 0 0 0 188 gSET'PRINT PROCEDURE' 20826> 20820>20828 12 88 2 0 0 20829 5 12 4 0 0 0 NEW REF 20830 52 1 8 0 0 0 REPLACE REF WITH ZEROS 20831 C 306 2 0 0 0 306 20815> 20813>20832 82 208 2 0 0 0 208 20900 PROCR 209 209 REPLACE AND ADJUSR ADDRESS 20901 NOTES 20902 81 209 2 0 0 0 209 20903 92 30 0 0 0 20904 71 209 8 0 0 0 209 gNOT INITIAL 20905 10 0 0 0 2 20906 4 1 10 1 0 0 20907 76 209 50 0 0 0 209 20904>20908 27 0 0 0 0 20909 34 12 33 0 0 0 20910 75 209 50 0 0 0 209 gISSUE 6 I/P OR PT I/P 20911 274 2 0 0 0 274 20912 70 209 50 0 0 0 209 gREF WAS'P' 20913 27 4 0 0 0 20914 71 209 50 0 0 0 209 gCOMPILER CALLED TRANSLATOR 20915 12 88 2 0 0 20916 5 12 119 0 0 0 20917 80 201 2 0 0 0 201 gREPLACE OLD PROCR 20918 71 209 38 0 0 0 209 gMATCH FOUND NOW ADJUST 20919 12 88 2 0 0 20920 30 0 0 0 2 TRY UNIQUE REFS 20921 1 1 10 0 0 0 20922 90 0 0 1 0 20923 C 0 0 0 50 20924 5 245 2 0 0 0 245 20929>20925 55 1 0 1 0 20926 70 209 30 0 0 0 209 gEND,NO MATCH 20927 2 245 2 0 0 0 245 20928 70 209 32 0 0 0 209 20929 94 209 25 0 1 2 209 20926>20930 80 195 2 0 0 0 195 gREPORT R 20931 76 209 50 0 0 0 209 gCARRY ON 20928>20932 55 0 0 1 0 EQUIVALENT OF UNIQUE REF 20933 32 0 0 0 2- 20934 5 12 88 2 0 0 20935 32 0 0 0 2 20936 5 1 10 0 0 0 20937 76 209 50 0 0 0 209 gNOW REPLACE/ADJUST(NEW STYLE) 20918>20938 3 12 88 2 0 0 20939 30 0 0 0 2 20940 1 1 10 0 0 0 20941 5 203 2 0 0 0 203 WL 20942 1 10 1 0 0 20943 73 209 50 0 0 0 209 gDONT ADJUST NEG ITEM 20944 203 2 0 0 0 203 20945 80 203 2 0 0 0 203 gADJUST(OLD STYLE) 20946 32 0 0 0 2- 20947 5 12 88 2 0 0 20948 32 0 0 0 2 20949 5 1 10 0 0 0 20943> 20937> 20931> 20914> 20912> 20910> 20907>20950 12 88 2 0 0 REPLACE PROCR(NEW STYLE) 20951 3 12 118 0 0 0 20952 5 12 119 0 0 0 20953 274 2 0 0 0 274 20954 71 209 57 0 0 0 209 gREF WAS NOT'P' 20955 12 88 2 0 0 20956 76 209 79 0 0 0 209 20954>20957 80 202 2 0 0 0 202 gREPLACE 20958 71 209 79 0 0 0 209 gMATCH 20959 12 88 2 0 0 20960 30 0 0 0 2 TRY UNIQUE REFS 20961 1 1 10 0 0 0 (NEW STYLE) 20962 90 0 0 1 0 20963 C 0 0 0 100 20964 5 245 2 0 0 0 245 20969>20965 52 0 0 1 0 20966 70 209 70 0 0 0 209 gEND,NO MATCH 20967 2 245 2 0 0 0 245 20968 70 209 73 0 0 0 209 gMATCH 20969 94 209 65 0 1 2 209 20966>20970 319 40 1 0 0 319 '????R' 20971 5 1 44 1 0 0 20972 76 209 88 0 0 0 209 gEND 20968>20973 52 1 0 1 0 20974 32 0 0 0 2- 20975 5 12 88 2 0 0 20976 32 0 0 0 2 20977 5 1 10 0 0 0 20978 76 209 88 0 0 0 209 gNEW ADDRESS CALCULATED 20958> 20956>20979 3 12 88 2 0 0 20980 30 0 0 0 2 NEW REF 20981 1 1 10 0 0 0 20982 5 12 58 0 0 0 20983 1 10 1 0 0 20984 73 209 88 0 0 0 209 gDONT ADJUST NEG ITEMS 20985 80 204 2 0 0 0 204 gADJUST SR(NEW STYLE) 20986 12 58 0 0 0 NEW ITEM 20987 5 1 10 0 0 0 20984> 20978> 20972>20988 82 209 2 0 0 0 209 21000 PROCR 210 210 BEGIN CHECKS ON ACTION OR C-LINE 21001 NOTES RADIX 19111>21002 80 208 2 0 0 0 208 gDEAL WITH ADDRESS OF INSTRUCTION 21003 12 4 0 0 0 NEW REF 21004 12 0 0 0 100 21005 73 210 10 0 0 0 210 gSECTION 21006 12 0 0 0 899 21007 72 210 10 0 0 0 210 gREF=999+ 21008 12 118 0 0 0 PEVIOUS PROCR 21009 5 1 22 0 0 0 21007> 21005>21010 1 7 0 0 0 21011 12 0 0 0 53000 'C ' 21012 71 210 28 0 0 0 210 gNOT C-LINE 21013 12 60 1 0 0 21014 70 211 2 0 0 0 211 gIGNORE C-LINE NOT POSSIBLE 21015 124 12 55 1 2 0 21016 100 1 0 2 0 C-LINE CHECK CONSTANT TO B 21017 0 317 88 0 0 0 317 A 55 ACTION WILL TERMINATE 21018 5 317 25 0 0 0 317 AFTER 2 C-LINES 21019 62 0 0 0 0 21020 0 12 54 0 0 0 ACION 21021 12 0 0 0 2e 43 21022 70 210 25 0 0 0 210 gYES 21023 11 0 0 0 1 21024 71 210 62 0 0 0 210 gNOT 21022>21025 10 0 0 0 1 21026 4 12 55 0 0 0 (TO GET NEXT C-LINE CHECK CONST) 21027 76 210 62 0 0 0 210 21012>21028 12 61 0 0 0 21029 70 210 31 0 0 0 210 21030 80 296 2 0 0 0 296 21029>21031 34 1 6 1 0 0 21032 80 321 2 0 0 0 321 RIGHT ALIGN ACTION 21033 0 12 88 2 0 0 21034 73 211 2 0 0 0 211 gNEGATIVE ACTION 21035 12 0 0 0 159 REJECT ACTION>158 21036 72 211 2 0 0 0 211 21037 0 12 88 2 0 0 21038 80 245 2 0 0 0 245 gBIN 21039 3 12 54 0 0 0 BINARY ACTION 21040 12 0 0 0 41 65 21041 72 210 54 0 0 0 210 g SECOND HALF OF TABLE 21042 0 12 54 0 0 0 21043 30 0 0 0 3 21044 101 316 2 0 0 0 316 TLU 21057>21045 32 0 0 0 10 ABS BIN ADDRESS > A 21046 3 12 55 0 0 0 LOCN TO SELECT C-LINE CHECK CONSTANT 21047 0 12 54 0 0 0 BIN ACTION 21048 12 0 0 0 37 = 55 21049 71 210 60 0 0 0 210 g NOT 21050 0 1 16 1 0 0 LITERAL 21051 71 210 58 0 0 0 210 g SET SECOND C-LINE IMPOSSIBLE 21052 0 317 86 0 0 0 317 21053 76 210 59 0 0 0 210 g SET SECOND C-LINE ESSENTIAL 21041>21054 0 12 54 0 0 0 21055 30 0 0 0 3 21056 101 317 34 0 0 0 317 TLU FOR ACTION > 64 21057 76 210 45 0 0 0 210 21051>21058 0 317 88 0 0 0 317 21053>21059 5 317 25 0 0 0 317 CHECK CONST FOR ACTION 55 C-LINE 21049>21060 124 12 55 1 2 0 21061 100 0 0 2 0 CHECK CONST 21027> 21024>21062 10 0 0 0 0 21063 36 318 4 0 0 0 318 Q1-3 21064 71 211 6 0 0 0 211 g ACTION EXISTS 21100 PROCR 211 211 21101 NOTES RADIX 21036> 21034> 21014>21102 10 0 0 0 5100000000 21103 5 1 44 1 0 0 NONEXISTENT ACTION = ERROR OF A 21319>21104 80 295 2 0 0 0 295 21105 76 247 2 0 0 0 247 21064>21106 30 0 0 0 2- 21107 84 227 2 0 0 0 227 LITERAL' SWITCH BY Q3 21108 36 318 5 0 0 0 318 BITS 5-7 21109 30 0 0 0 1- 21110 84 217 2 0 0 0 217 'REF/ITEM' 21111 36 318 6 0 0 0 318 BITS 1-3 21112 84 214 2 0 0 0 214 'DISC/MOD' SWITCH BY Q1 21113 36 318 7 0 0 0 318 BIT 4 21114 5 12 61 0 0 0 IND THAT C-LINE ESSENTIAL 21115 36 318 8 0 0 0 318 BIT 8 21116 5 12 60 0 0 0 IND THAT C-LINE IS POSSIBLE 21117 5 12 59 0 0 0 CLEAR THIS 21200 PROCR 212 212 21201 NOTES RADIX 21202 60 0 0 0 0 21203 1 10 0 0 0 MODULUS OF ITEM 21204 12 0 0 0 8192 21205 72 212 8 0 0 0 212 g REPORT 21206 1 11 0 0 0 21207 70 212 9 0 0 0 212 g OK 21205>21208 80 196 2 0 0 0 196 g REPORT 1 21207>21209 0 12 54 0 0 0 BIN ACTION 21210 12 0 0 0 64 100 21211 73 212 26 0 0 0 212 g NOT MACHINE CODE 21212 0 12 54 0 0 0 21213 12 0 0 0 84 132 21214 72 212 26 0 0 0 212 gNOT MACHINE CODE 21215 0 1 12 1 0 0 DISC 21216 70 212 20 0 0 0 212 gOK 21217 12 0 0 0 1 21218 70 212 20 0 0 0 212 gOK 21219 80 193 2 0 0 0 193 gREPORT D 21218> 21216>21220 0 1 14 1 0 0 MOD 21221 70 217 2 0 0 0 217 gOK 21222 12 0 0 0 4 21223 73 217 2 0 0 0 217 gOK 21224 80 194 2 0 0 0 194 gREPORT M 21225 76 217 2 0 0 0 217 gTO CHECK R,I,L 21214> 21211>21226 0 1 12 1 0 0 D 21227 70 213 7 0 0 0 213 gOK 21228 0 1 10 0 0 0 21229 80 192 2 0 0 0 192 gCHECK I 21300 PROCR 213 213 TEST D AND M ARE IN RANGE 21301 NOTES RADIX ACCEPTABLE 21302 1 12 1 0 0 21303 73 213 6 0 0 0 213 21304 12 0 0 0 3 21305 73 213 7 0 0 0 213 21303>21306 80 193 2 0 0 0 193 gREPORT D 21305> 21227>21307 1 14 1 0 0 MOD DIGITS 21308 70 214 2 0 0 0 214 gOK 21309 73 213 18 0 0 0 213 21310 12 0 0 0 21 21311 72 213 18 0 0 0 213 gWRONG 21312 0 1 14 0 0 0 21313 12 0 0 0 4 21314 72 214 2 0 0 0 214 21315 10 0 0 0 1 IF MR 1-3 21316 5 92 4 0 0 0 SETTING 'REQUIRED' IND 21317 76 214 2 0 0 0 214 21311> 21309>21318 80 194 2 0 0 0 194 gREPORT M 21319 76 211 4 0 0 0 211 gIGNORE 21400 PROCR 214 214 21401 NOTES RADIX 21317> 21314> 21308>21402 85 214 2 0 0 0 214 21403 C 217 2 0 0 0 217 gD,M ANY VALUE 21404 C 215 2 0 0 0 215 gD,M MUST BOTH BE ZERO 21405 C 215 7 0 0 0 215 gD ZERO, M ANY 21406 C 215 3 0 0 0 215 gM ZERO, D ANY 21407 C 215 9 0 0 0 215 gD ZERO, M NONZERO 21408 C 215 10 0 0 0 215 gM NONZERO, D ANY 21409 C 214 10 0 0 0 214 gD,M ZERO, R NON-ZERO IF L=0 21409>21410 1 16 0 0 0 L 21411 70 214 16 0 0 0 214 gEXPECT R 21412 0 1 8 2 0 0 REF 21413 70 215 2 0 0 0 215 gOK 21414 80 195 2 0 0 0 195 gREPORT R 21415 76 215 2 0 0 0 215 21411>21416 1 8 2 0 0 21417 71 215 2 0 0 0 215 gOK 21418 80 197 2 0 0 0 197 gREPORT L 21500 PROCR 215 215 CHECK D AND M 21501 NOTES RADIX 21417> 21415> 21413> 21404>21502 80 216 2 0 0 0 216 21406>21503 1 14 1 0 0 21504 70 217 2 0 0 0 217 21513>21505 80 194 2 0 0 0 194 gREPORT M 21506 76 217 2 0 0 0 217 21405>21507 80 216 2 0 0 0 216 21508 76 217 2 0 0 0 217 gCHECK D=0 21407>21509 80 216 2 0 0 0 216 21408>21510 1 14 1 0 0 gOK 21511 71 217 2 0 0 0 217 gIGNORE 21512 80 295 2 0 0 0 295 gREPORT M 21513 76 215 5 0 0 0 215 21600 PROCR 216 216 TO CHECK REFERENCE AND ITEM 21601 NOTES RADIX 21602 81 216 2 0 0 0 216 21603 1 12 1 0 0 21604 70 216 6 0 0 0 216 21605 80 193 2 0 0 0 193 gREPORT D 21604>21606 82 216 2 0 0 0 216 21700 PROCR 217 217 21701 NOTES RADIX 21511> 21508> 21506> 21504> 21403> 21225> 21223> 21221>21702 85 217 2 0 0 0 217 21703 C 218 2 0 0 0 218 gR ZERO, PROCR, SECTION OR '1000+' 21704 C 219 2 0 0 0 219 gR, I BOTH ZERO 21705 C 220 2 0 0 0 220 MAINLINE OF FILE CONTROL 21706 C 224 2 0 0 0 224 R=100-998 OR 1000+, I EVEN 21707 C 225 2 0 0 0 225 gR IS A TRANSIT AREA 21708 C 226 2 0 0 0 226 gR IN RANGE 100-998 21709 C 218 58 0 0 0 218 gR IS PROCR OR SECTION, BUT NOT TX AREA 21800 PROCR 218 218 SWITCH = 1 21801 NOTES RADIX 22011> 22504> 21703>21802 12 4 0 0 0 21803 73 218 36 0 0 0 218 gIGNORE R 21804 71 218 20 0 0 0 218 gOK 21805 1 14 0 0 0 MOD DIGITS 21806 71 218 49 0 0 0 218 gOK EXCEPT FOR 93,97 21807 0 1 10 1 0 0 ITEM 21808 73 218 13 0 0 0 218 gACCEPT ONLY IF ITEM 21809 71 218 55 0 0 0 218 gOK 21810 0 12 54 0 0 0 ACTION 21811 70 218 36 0 0 0 218 gIGNORE R 21812 76 218 55 0 0 0 218 gOJ 21808>21813 10 0 0 0 0 21814 35 0 0 0 1 21815 36 1 10 0 0 0 21816 12 0 0 0 + 21817 70 218 55 0 0 0 218 gOK(ITEM*) 22207> 22208> 22210> 22216>21818 80 295 2 0 0 0 295 gIGNORE 21819 76 219 6 0 0 0 219 gREPORT I 21804>21820 12 0 0 0 100 21821 73 218 31 0 0 0 218 gSECTION 21822 12 0 0 0 900 21823 73 218 55 0 0 0 218 gOK 21824 70 218 36 0 0 0 218 gIGNORE IF=1000 21825 12 0 0 0 21 21826 72 218 36 0 0 0 218 gIGNORE IF>1020 21827 0 12 54 0 0 0 BIN ACTION 21828 12 0 0 0 50 80 21829 70 218 36 0 0 0 218 gIGNORE 21830 76 218 55 0 0 0 218 gOK 21821>21831 12 4 0 0 0 DECSECTION 21832 80 183 2 0 0 0 183 gDECODE SECTION NUMBER 21833 34 12 40 0 0 0 21834 36 12 72 0 3 0 21835 71 218 55 0 0 0 218 gSECTION EXISTS 21851> 21854> 22407> 22411> 22413> 22604> 22606> 21829> 21826> 21824> 21811> 21803>21836 80 295 2 0 0 0 295 gIGNORE 21903>21837 80 195 2 0 0 0 195 gREPORT R 21838 86 217 2 0 0 0 217 21839 12 0 0 0 5 21840 70 225 31 0 0 0 225 g42 OR 43 ACTION.IGNORE PREVIOUS LINE 21841 12 54 0 0 0 21842 101 40 1 2 0 40 21843 70 225 31 0 0 0 225 gIGNORE PREVIOUS LINE 21844 101 93 1 2 0 133 21845 70 225 31 0 0 0 225 gIGNORE PREVIOUS LINE 21846 101 1 1 2 0 134 21847 70 225 31 0 0 0 225 gIGNORE PREVIOUS LINE 21848 76 227 2 0 0 0 227 21806>21849 12 54 0 0 0 21850 101 93 1 2 0 93? 21851 70 218 36 0 0 0 218 gREPORT 21852 12 54 0 0 0 21853 101 97 1 2 0 97? 21854 70 218 36 0 0 0 218 gREPORT 21835> 21830> 21823> 21817> 21812> 21809>21855 12 59 0 0 0 21856 70 227 2 0 0 0 227 gGO TO CHECK L 21857 76 225 5 0 0 0 225 gCHECK SECTION IS TX AREA 21709>21858 80 277 2 0 0 0 277 gCHECK REF 21859 76 227 2 0 0 0 227 gCHECK LITERAL 21900 PROCR 219 219 TEST R AND I ARE BOTH ZERO 21901 NOTES RADIX 21704>21902 1 8 2 0 0 TEST REF IS ZERO 21903 71 218 37 0 0 0 218 21904 1 10 1 0 0 21905 70 227 2 0 0 0 227 21819>21906 80 196 2 0 0 0 196 gREPORT I 21907 76 227 2 0 0 0 227 gNO CHECK LITERAL 22000 PROCR 220 220 CHECK FILES 22001 NOTES RADIX 21705>22002 12 54 0 0 0 ACTION 22003 101 40 1 2 0 22004 71 220 12 0 0 0 220 gNOT ACTION 40 22005 12 60 1 0 0 22006 70 220 12 0 0 0 220 gNOT C-LINE 22007 1 7 0 0 0 22008 12 0 0 0 53000 'C ' 22009 71 220 12 0 0 0 220 gNOT THE C-LINE 22010 1 12 1 0 0 C-LINE DISC 22011 71 218 2 0 0 0 218 gCHECK REF IS SEC/PROCR 22009> 22006> 22004>22012 91 1 0 0 0 22013 30 0 0 0 5 22014 91 0 0 5 0 22015 317 94 0 0 0 317 SET 2ND C-LINE POSSIBLE 22016 5 317 14 0 0 0 317 22024>22017 91 5 0 5 0 22018 33 0 0 0 6- 22019 70 220 30 0 0 0 220 gNO FILES 22020 11 0 0 0 4000 BIT 15 22021 30 0 0 0 1 22022 2 1 9 0 0 0 22023 70 220 39 0 0 0 220 gMATCH FOUND 22024 94 220 17 0 5 2 220 22025 1 7 0 0 0 22026 12 0 0 0 53000 'C ' 22027 71 220 30 0 0 0 220 g 22028 80 295 2 0 0 0 295 SET C-LINE IMPOSS 22029 80 296 2 0 0 0 296 IGNORE PREVIOUS LINE 22532> 22027> 22019>22030 80 195 2 0 0 0 195 gREPORT R 22031 80 295 2 0 0 0 295 gIGNORE 22164>22032 12 54 0 0 0 22033 101 42 1 2 0 22034 70 220 37 0 0 0 220 22035 101 1 1 2 0 22036 71 235 2 0 0 0 235 g 22034>22037 5 12 60 1 0 0 42 OR 43 22038 76 235 2 0 0 0 235 g 22023>22039 62 0 0 0 0 22040 12 54 0 0 0 22041 101 132 1 2 0 22042 73 220 47 0 0 0 220 gHENCE GROUP 4 22043 101 3 1 2 0 22044 73 222 2 0 0 0 222 gACTIONS 132-134 22045 76 227 2 0 0 0 227 gACTION 156 22046 70 227 2 0 0 0 227 gACTION 156 CHECK L 22042>22047 10 0 0 0 0 CLEAR A 22048 33 0 0 0 6 ROUTE TYPE 22049 12 0 0 0 5 22050 73 221 20 0 0 0 221 gRT1-4 22051 70 221 13 0 0 0 221 gRT5 22052 12 0 0 0 1 22053 70 221 2 0 0 0 221 gRT6 22054 12 0 0 0 3 22055 73 221 24 0 0 0 221 gRT7,8 22056 70 221 20 0 0 0 221 gRT9 22057 12 0 0 0 1 22058 70 221 2 0 0 0 221 gRT10 22059 12 0 0 0 1 22060 70 221 24 0 0 0 221 gRT11 22061 12 0 0 0 1 22062 70 221 2 0 0 0 221 gRT12 22063 12 0 0 0 1 22064 70 221 65 0 0 0 221 gRT13 22065 12 0 0 0 2 22066 70 221 2 0 0 0 221 gRT15 22067 12 0 0 0 1 22068 70 221 20 0 0 0 221 gRT16 22069 12 0 0 0 2 22070 70 221 65 0 0 0 221 gRT 18 22071 12 0 0 0 1 22072 70 221 20 0 0 0 221 gRT19 22073 12 0 0 0 1 22074 70 220 82 0 0 0 220 gRT 20 22075 12 0 0 0 2 22076 70 221 55 0 0 0 221 g22 22077 12 0 0 0 2 22078 70 221 9 0 0 0 221 gRT24 22079 12 0 0 0 1 22080 71 221 60 0 0 0 221 gNOT 25 22081 76 221 20 0 0 0 221 gLIKE1 22074>22082 12 54 0 0 0 ACTION 22083 101 40 1 2 0 22084 70 222 6 0 0 0 222 gACTION 40 22085 12 0 0 0 1 22086 70 221 60 0 0 0 221 gREJECT 22100 PROCR 221 221 CHECK FILES (CONTD) 22115> 22066> 22062> 22058> 22053>22102 12 54 0 0 0 ACTION 22103 101 42 1 2 0 22104 70 235 2 0 0 0 235 gOK 22123>22105 12 54 0 0 0 RT 1-6+9-10 22106 101 42 1 2 0 22107 73 235 2 0 0 0 235 gOK 22108 76 221 60 0 0 0 221 gREJECT 22078>22109 12 54 0 0 0 ACTION 22110 101 42 1 2 0 22111 70 235 2 0 0 0 235 gOK 22112 76 221 60 0 0 0 221 gREJECT 22051>22113 12 54 0 0 0 RT 5 22114 101 44 1 2 0 22115 71 221 2 0 0 0 221 22116 1 16 0 0 0 L 22117 12 0 0 0 3 22118 70 235 2 0 0 0 235 gOK 22119 76 228 4 0 0 0 228 gIGNORE L 22159> 22081> 22072> 22068> 22056> 22050>22120 12 54 0 0 0 RT 1-4+9 22121 101 43 1 2 0 22122 70 235 2 0 0 0 235 gOK 22123 76 221 5 0 0 0 221 22060> 22055>22124 0 12 54 0 0 0 BIN ACTION 22125 12 0 0 0 30 48 22126 70 221 50 0 0 0 221 gACTION 48 22127 12 54 0 0 0 22128 12 0 0 0 29 41 22129 70 221 50 0 0 0 221 gACTION 41 FOR M/T 22130 12 54 0 0 0 22131 12 0 0 0 2+ 22132 70 221 45 0 0 0 221 g44 22133 12 0 0 0 2 22134 70 221 37 0 0 0 221 g46 22135 12 0 0 0 1 22136 71 227 2 0 0 0 227 gNOT 47, CHECK L 22134>22137 1 10 1 0 0 22138 73 221 43 0 0 0 221 gREPORT 22139 35 0 0 0 0 22140 33 0 0 0 1- 22141 10 0 0 0 0 22142 74 227 2 0 0 0 227 gEVEN, OK 22138>22143 80 196 2 0 0 0 196 REPORT I 22144 76 227 2 0 0 0 227 22132>22145 1 16 1 0 0 L 22146 12 0 0 0 2 22147 70 235 2 0 0 0 235 gOK 22148 12 0 0 0 1 22149 76 228 2 0 0 0 228 22129> 22126>22150 1 16 1 0 0 LITERAL 22151 73 228 5 0 0 0 228 gREPORT L 22152 12 0 0 0 4 22153 72 228 5 0 0 0 228 gREPORT L 22154 76 235 2 0 0 0 235 gOK 22076>22155 317 87 0 0 0 317 CONST FOR 2ND C-LINE 22156 5 317 14 0 0 0 317 22157 12 54 0 0 0 ACTION 22158 101 41 1 2 0 22159 71 221 20 0 0 0 221 gOK, NOT 41 22168> 22205> 22112> 22108> 22086> 22080>22160 10 0 0 0 5100000000 A 22161 5 1 44 1 0 0 22162 80 295 2 0 0 0 295 gIGNORE THIS INSTRUCTION 22163 5 2 60 1 0 0 SET C LINE IMPOSSIBLE 22164 76 220 32 0 0 0 220 gCHECK FOR C-LINE 22070> 22064>22165 12 54 0 0 0 22166 101 44 1 2 0 22167 73 235 2 0 0 0 235 gOK 22168 76 221 60 0 0 0 221 gREJECT 22200 PROCR 222 222 ACTIONS 132-134 22044>22202 10 0 0 0 0 CLEAR A 22203 33 0 0 0 6 RT 22204 12 0 0 0 11 22205 71 221 60 0 0 0 221 gWRONG FILE 22084>22206 1 10 1 0 0 ITEM 22207 73 218 18 0 0 0 218 gIGNORE I 22208 70 218 18 0 0 0 218 gIGNORE I 22209 12 0 0 0 100 22210 72 218 18 0 0 0 218 gIGNORE I 22211 1 10 1 0 0 22212 80 183 2 0 0 0 183 gDECODE SECTION NO 22213 34 12 40 0 0 0 COLLATION BIT 22214 33 0 0 0 10 22215 36 12 72 0 3 0 22216 70 218 18 0 0 0 218 gNOT A TX AREA, IGNORE I 22217 76 225 17 0 0 0 225 gX AREA CHECK, & CHECK L 22300 PROCR 223 223 ACTIONS 132-134 22400 PROCR 224 224 TEST R IS A PROCEDURE NUMBER 22401 NOTES RADIX SWITCH=4 21706>22402 12 4 0 0 0 22403 71 224 6 0 0 0 224 gNOT ABSOLUTE ADDRESS 22404 0 1 14 0 0 0 MOD DIGITS 22405 71 224 14 0 0 0 224 gOK 22403>22406 12 0 0 0 100 22407 73 218 36 0 0 0 218 gIGNORE R 22408 12 0 0 0 899 22409 73 224 14 0 0 0 224 gOK 22410 12 0 0 0 2 22411 73 218 36 0 0 0 218 gIGNORE R 22412 12 0 0 0 20 22413 72 218 36 0 0 0 218 gIGNORE R 22409> 22405>22414 12 54 0 0 0 22415 101 70 1 2 0 22416 73 224 19 0 0 0 224 gCHECK I 22417 101 10 1 2 0 22418 73 227 2 0 0 0 227 gACTION 70-79, DON'T CHECK I 22416>22419 1 10 0 0 0 22420 80 192 2 0 0 0 192 gCHECK I EVEN 22421 76 227 2 0 0 0 227 gCHECK LITERAL 22500 PROCR 225 225 22501 NOTES RADIX 21707>22502 10 0 0 0 1 SWITCHES 22503 5 12 59 0 0 0 22504 76 218 2 0 0 0 218 gCHECK R IS A SECTION 21857>22505 10 0 0 0 0 22506 34 12 40 0 0 0 22507 33 0 0 0 10 22508 36 12 72 0 3 0 COLLATE TX AREA IND 22509 70 225 31 0 0 0 225 gNOT, IGNORE PREVIOUS INSTRUCTION 22510 10 0 0 0 0 22511 34 320 44 0 0 0 320 BITS 1-6 22512 36 91 5 0 5 0 22513 12 0 0 0 3 22514 70 227 2 0 0 0 227 gRT 3 CARD O/P 22515 12 0 0 0 1 22516 70 227 2 0 0 0 227 gRT 4 GP PRINT 22217>22517 96 0 0 3 0 22518 35 0 0 0 0 CLEAR B 22519 33 0 0 0 1- HALVE THE MODIFIER 22520 92 0 0 3 0 SET NEW MODIFIER, CLEAR A 22521 74 225 26 0 0 0 225 g NO REMAINDER 22522 34 12 40 0 0 0 22523 12 40 0 0 0 22524 33 0 0 0 10 FORM 5-LOCN MATRIX FOR ALL TX AREAS 22525 76 225 28 0 0 0 225 NOT USED IN GPOP ORDERS 22521>22526 12 40 0 0 0 22527 34 12 40 0 0 0 22525>22528 37 12 100 0 3 0 SET BIT 22529 60 0 0 0 0 AREA PATTERN 22530 76 227 2 0 0 0 227 22509> 21847> 21845> 21843> 21840>22531 80 296 2 0 0 0 296 IGNORE PREVIOUS INSTRUCTION 22532 76 220 30 0 0 0 220 22600 PROCR 226 226 TEST REFERENCE IS GREATER THAN 99 22601 NOTES RADIX SWITCH=6 21708>22602 12 4 0 0 0 22603 12 0 0 0 100 22604 73 218 36 0 0 0 218 22605 12 0 0 0 900 22606 72 218 36 0 0 0 218 IGNORE R 22700 PROCR 227 227 SWITCH FOR LITERALS 22701 NOTES RADIX CHECK L IS NOT > 10 QUARTETS 22530> 22516> 22514> 22421> 22418> 22144> 22142> 22136> 22046> 22045> 21907> 21905> 21859> 21856> 21848>22702 0 1 18 1 0 0 22703 71 228 4 0 0 0 228 gIGNORE L 22704 34 1 16 1 0 0 22705 32 0 0 0 10 22706 5 1 18 1 0 0 STORE MODULUS L 22707 85 227 2 0 0 0 227 22708 C 235 2 0 0 0 235 gNO FURTHER CHECK 22709 C 233 2 0 0 0 233 gMOD L<8192 22710 C 229 2 0 0 0 229 gL POSITIVE/ZERO 22711 C 230 2 0 0 0 230 MOD<32 22712 C 231 2 0 0 0 231 L HAS DIGITS 0 OR 1 22713 C 232 2 0 0 0 232 1- 23421> 22149>22802 70 235 2 0 0 0 235 22803 76 228 5 0 0 0 228 22904> 23203> 23313> 23319> 23409> 23425> 23430> 22703> 22119>22804 80 295 2 0 0 0 295 gIGNORE 23003> 23005> 23109> 23205> 23306> 23310> 23418> 23423> 22803> 22153> 22151>22805 80 197 2 0 0 0 197 gREPORT L 22806 76 235 2 0 0 0 235 gEND OF CHECKS 22900 PROCR 229 229 TEST L IS POSITIVE OR ZERO 22901 NOTES RADIX SWITCH=3 22710>22902 1 16 1 0 0 (ACTIONS 11,12) 22903 72 235 2 0 0 0 235 gOK 22904 76 228 4 0 0 0 228 gIGNORE L 23000 PROCR 230 230 L=1-31 INCLUSIVE 23001 NOTES RADIX SWITCH=4 22711>23002 0 1 18 1 0 0 MOD L (ACTIONS 30-33) 23003 70 228 5 0 0 0 228 gREPORT L 23004 12 0 0 0 32 23416>23005 72 228 5 0 0 0 228 gREPORT L 23006 76 235 2 0 0 0 235 23100 PROCR 231 231 TEST DIGITS OF L ARE 1 OR 0 23101 NOTES RADIX SWITCH=5 22712>23102 90 0 0 3 0 ACTION 35, CERTAIN GROUP 4 23103 C 0 0 0 10 23104 10 0 0 0 0 23105 34 1 16 1 0 0 23110>23106 32 0 0 0 1 23107 70 231 10 0 0 0 231 23108 12 0 0 0 1 23109 71 228 5 0 0 0 228 23107>23110 94 231 6 0 3 1 231 23111 76 235 2 0 0 0 235 gOK 23200 PROCR 232 232 TEST L IS IN RANGE 1-15 23201 NOTES RADIX SWITCH=6 22713>23202 1 16 1 0 0 ACTION 38 23203 73 228 4 0 0 0 228 gREPORT L IGNORE 23204 12 0 0 0 16 23205 72 228 5 0 0 0 228 23206 76 235 2 0 0 0 235 gOK 23300 PROCR 233 233 L IS LESS THAN 8192 BULK COPY 23301 NOTES RADIX SWITCH=7 22709>23302 12 61 0 0 0 C-LINE IND (ACTION 90) 23303 71 233 7 0 0 0 233 gNOT C-LINE 23304 12 46 0 0 0 FIRST LINE LITERAL 23305 34 1 18 0 0 0 C-LINE LITERAL 23306 74 228 5 0 0 0 228 gREPORT L IF BOTH ZERO 23303>23307 1 18 1 0 0 23308 3 12 46 0 0 0 23309 12 0 0 0 8192 23310 72 228 5 0 0 0 228 gREPORT L 23311 76 235 2 0 0 0 235 gOK 22714>23312 1 16 1 0 0 ACTION 55 23313 73 228 4 0 0 0 228 gIGNORE L 23413>23314 1 12 0 0 0 DISC 23315 70 233 17 0 0 0 233 gSHORT 23316 10 0 0 0 4095 23315>23317 11 0 0 0 4095 23318 2 1 16 1 0 0 23319 73 228 4 0 0 0 228 gIGNORE L 23320 76 235 2 0 0 0 235 gOK 23400 PROCR 234 234 23401 NOTES RADIX 22715>23402 0 1 16 1 0 0 LITERAL IN 5 QUARTETS 23403 30 0 0 0 5- (LEAVE SIGN IN A) 23404 76 228 2 0 0 0 228 22716>23405 0 12 54 0 0 0 ACTIONS 54,94 23406 12 0 0 0 36 23407 71 234 14 0 0 0 234 gNOT ACTION 54 23408 0 1 16 1 0 0 23409 73 228 4 0 0 0 228 gIGNORE L 23410 70 234 34 0 0 0 234 23411 10 0 0 0 0 23412 5 12 60 1 0 0 23413 76 233 14 0 0 0 233 gCHECK RANGE 23407>23414 0 1 18 1 0 0 MOD L 23415 12 0 0 0 4096 23416 76 230 5 0 0 0 230 22717>23417 0 1 16 1 0 0 CHECK L NONZERO (ACTION 17:19) 23418 70 228 5 0 0 0 228 23419 76 235 2 0 0 0 235 22718>23420 1 16 1 0 0 CHECK L=0 ACTIONS 83 23421 76 228 2 0 0 0 228 22719>23422 1 16 1 0 0 L<100 23423 73 228 5 0 0 0 228 g REPORT L 23424 12 0 0 0 100 23425 72 228 4 0 0 0 228 g IGNORE L 23426 0 12 54 0 0 0 ACTION 23427 101 83 1 2 0 23428 71 235 2 0 0 0 235 g NOT 83 23429 0 1 16 0 0 0 23430 70 228 4 0 0 0 228 g IGNORE L 23431 76 235 2 0 0 0 235 22720>23432 0 1 16 1 0 0 ACTION 77, 78 23433 71 235 2 0 0 0 235 g OK 23410>23434 10 0 0 0 1 (ZERO L FOR 54, 77, 78 ACTIONS) 23435 5 12 61 0 0 0 MUST BE C-LINE 23500 PROCR 235 235 TEST FP/MG USED, STORE MR>3 DETAILS 23501 NOTES RADIX 23433> 23431> 23428> 23419> 23320> 23311> 23206> 23111> 23006> 22903> 22806> 22802> 22708> 22167> 22154> 22147> 22122> 22118> 22111> 22107> 22104> 22038> 22036>23502 62 0 0 0 0 23503 12 54 0 0 0 23504 12 0 0 0 14 TEST ACTION IS 20 - 29 23505 73 247 2 0 0 0 247 23506 12 0 0 0 t 23507 73 235 17 0 0 0 235 23508 12 0 0 0 15 23509 73 247 2 0 0 0 247 g30 - 50 23510 12 0 0 0 £ 23511 70 235 14 0 0 0 235 g 66 23512 12 0 0 0 1 23513 71 235 19 0 0 0 235 gNOT 67 23511>23514 10 0 0 0 1- 23515 5 92 5 0 0 0 23516 76 235 19 0 0 0 235 23507>23517 5 92 5 0 0 0 SET F. PT. INDICATOR FOR PASS 3 23518 76 247 2 0 0 0 247 23516> 23513>23519 1 14 0 0 0 MOD DIGITS 23520 80 245 2 0 0 0 245 gCONVERT 23521 3 12 88 0 0 0 STORE 23522 70 236 2 0 0 0 236 23523 12 0 0 0 4 23524 73 236 2 0 0 0 236 gMR 1-3 23525 12 54 0 0 0 ACTION 23526 12 0 0 0 3e 59 23527 70 235 32 0 0 0 235 gACTION 59 23528 12 0 0 0 1£ 31 23529 73 236 2 0 0 0 236 g<90 23530 12 0 0 0 4 23531 72 236 2 0 0 0 236 g>93 23527>23532 91 71 0 0 3 0 CTR OF MR'S (INITIALLY 0:0) 23539>23533 10 0 0 0 0 23534 35 0 0 0 11 23535 36 71 2 0 3 0 23536 70 235 40 0 0 0 235 gNONE STORED YET 23537 2 12 88 0 0 0 THIS ONE 23538 70 236 2 0 0 0 236 gALREADY STORED 23539 94 235 33 0 3 1 235 gSEARCH 23536>23540 92 0 0 0 0 UNCORR CHAP (BIN) 23541 30 0 0 0 4 23542 1 12 88 0 0 0 MR (BIN) 23543 5 71 2 0 3 0 STORE DETAIL 23544 10 0 0 0 1 23545 4 71 1 0 0 0 AUG CTR 23600 PROCR 236 236 TEST ACTION IS C 23601 NOTES RADIX FOR ACTIONS 85 AND 150 23538> 23531> 23529> 23524> 23522>23602 62 0 0 0 0 23700 PROCR 237 237 TEST FOR SEQUENCE CHANGES 23701 NOTES RADIX 23702 0 12 54 0 0 0 BIN ACTION 23703 12 0 0 0 46 23704 73 243 2 0 0 0 243 gACTION <70 23705 12 0 0 0 7 23706 73 240 2 0 0 0 240 ACTIONS 70-76 23707 12 0 0 0 2 23708 70 240 2 0 0 0 240 gACTION 79 23709 72 237 14 0 0 0 237 gOTHERS 23710 0 1 6 1 0 0 ACTION OR C 23711 12 0 0 0 5300000000 23712 71 240 2 0 0 0 240 gMAINLINE OF 77, 78 23713 76 247 2 0 0 0 247 gHENCE C-LINE OF 77-78 23709>23714 12 0 0 0 6 23715 70 238 2 0 0 0 238 gACTION 85 23716 12 0 0 0 2 23717 70 237 22 0 0 0 237 g87 23718 12 0 0 0 7 23719 70 239 13 0 0 0 239 gACTION 94 23720 12 0 0 0 3 23721 71 237 26 0 0 0 237 gACTIONS>97 23727> 23717>23722 1 7 0 0 0 23723 12 0 0 0 53000 23724 70 240 2 0 0 0 240 gIS C-LINE, COUNT AS CHANGE 23725 76 247 2 0 0 0 247 gOUTPUT 23721>23726 12 0 0 0 35 23727 70 237 22 0 0 0 237 gACTION 150 23728 76 239 2 0 0 0 239 gTRY MACHINE CODE ACTIONS 23800 PROCR 238 238 FORM SWITCH DETAILS 23801 NOTES RADIX 23715>23802 1 7 0 0 0 23803 12 0 0 0 53000 23804 70 240 2 0 0 0 240 gIS C-LINE OF 85 ACTION 23805 91 95 0 0 3 0 23806 12 4 0 0 0 PROCR 23807 80 245 2 0 0 0 245 gCONVERT 23808 5 12 32 0 0 0 23815>23809 10 0 0 0 0 23810 34 319 20 0 0 0 319 BITS 1-10 23811 36 95 2 0 3 0 23812 70 238 16 0 0 0 238 gNONE STORED YET 23813 2 12 32 0 0 0 23814 70 238 25 0 0 0 238 gALREADY STORED 23815 94 238 9 0 3 1 238 23812>23816 0 95 1 0 0 0 23817 12 0 0 0 30 23818 72 238 25 0 0 0 238 gDONT STORE 49-TH 23819 0 92 0 0 0 0 CURRENT BIN UNCORR CHAP 23820 30 0 0 0 4 23821 1 12 32 0 0 0 SWITCH PROCR 23822 5 95 2 0 3 0 STORE DETAIL 23823 10 0 0 0 1 23824 4 95 1 0 0 0 STEP CTR 23818> 23814>23825 60 0 0 0 0 COUNTER IN BINARY 23826 76 247 2 0 0 0 247 gO/P INSTRUCTION 23900 PROCR 239 239 MACHINE CODE SEQUENCE CHANGES 23901 NOTES RADIX 23728>23902 0 12 54 0 0 0 BIN ACTION 23903 12 0 0 0 7£ 23904 70 240 2 0 0 0 240 gACTION 127/D/M 23905 11 0 0 0 3 23906 71 241 2 0 0 0 241 gNOT 124/D/M 23907 1 12 0 0 0 23908 12 0 0 0 1 23909 71 241 2 0 0 0 241 gNOT 124/1/M 23910 1 14 0 0 0 23911 71 241 2 0 0 0 241 gNOT 124/1/0 23912 76 240 2 0 0 0 240 ACTION 94 23719>23913 60 0 0 0 0 23914 0 1 16 1 0 0 23915 71 239 17 0 0 0 239 23916 80 197 2 0 0 0 197 gREPORT L 23915>23917 0 1 8 1 0 0 23918 71 240 2 0 0 0 240 gCOUNT AS SEQ CHANGE 23919 0 1 10 0 0 0 23920 70 247 2 0 0 0 247 23921 80 196 2 0 0 0 196 gREPORT I 23922 76 247 2 0 0 0 247 24000 PROCR 240 240 TEST IF SEQUENCE CHANGE IS FORWARD OR BACK 24001 NOTES RADIX 23918> 23912> 23904> 23804> 23724> 23712> 23708> 23706>24002 0 12 4 0 0 0 DEC REF 24003 12 0 0 0 999 24004 72 247 2 0 0 0 247 24005 0 92 3 0 0 0 (CURRENT LINE SERIAL) 24006 30 0 0 0 2 24007 1 12 9 0 0 0 SEQ CHANGE SOURCE 24008 3 12 118 0 0 0 SOURCE 24009 2 1 8 2 0 0 L-ALIGNED REF 24010 2 1 10 0 0 0 ITEM 24011 73 247 2 0 0 0 247 gSOURCE 23909> 23906>24102 12 54 0 0 0 BIN ACTION 24103 12 0 0 0 98 24104 71 243 2 0 0 0 243 gNOT ACTION 152, OVERLAY 24105 91 12 12 0 3 0 SCAN CHAPTER STARTS 24109>24106 12 4 0 0 0 PROCR OF OLAID/OLAYER CHAP START 24107 2 12 14 0 3 0 NEXT CHAP START 24108 70 241 13 0 0 0 241 gMATCH FOUND 24109 94 241 6 0 3 1 241 gTRY NEXT 24110 80 195 2 0 0 0 195 gREPORT R 24111 80 295 2 0 0 0 295 gIGNORE INSTRUCTION 24112 76 241 14 0 0 0 241 gPRETEND IS CHAP 1 24108>24113 95 0 0 3 0 24112>24114 11 0 0 0 1 24115 5 12 46 0 0 0 24116 0 12 61 0 0 0 IS C-LINE READ YET? 24117 70 242 2 0 0 0 242 gTHIS IS C-LINE NOW 24118 0 12 46 0 0 0 OLAID CHAP 24119 5 12 47 0 0 0 24120 76 247 2 0 0 0 247 gO/P+READ C-LINE 24200 PROCR 242 242 UPDATE CORR CHAP INDEX, UPDATE NO OF INITIAL CHAPS 24201 NOTES RADIX 24117>24202 10 0 0 0 10 BIT 5 24203 32 0 0 0 10- 24204 10 0 0 0 10 24205 124 12 46 0 1 0 OLAYER SET 'NON-UNIQUE' IND 24206 37 92 9 0 0 0 BIT 5 24207 124 12 47 0 1 0 OLAID 24208 37 92 9 0 0 0 24209 10 0 0 0 0 24210 35 0 0 0 1 24211 124 12 46 0 1 0 24212 36 92 9 0 0 0 OLAYER PREVIOUS CORR CHAP 24213 5 12 46 0 0 0 24214 124 12 47 0 1 0 24215 36 92 9 0 0 0 CORR CHAP OF OLAID 24216 3 12 47 0 0 0 24217 2 12 46 0 0 0 24218 70 247 2 0 0 0 247 gNO ADJUSTMENTS NEEDED 24219 73 242 24 0 0 0 242 g12/46>12/47 24220 34 12 46 0 0 0 24221 4 12 46 0 0 0 24222 32 0 0 0 10 24223 5 12 47 0 0 0 GREATER IN 46 LESSER IN 47 24219>24224 91 12 12 0 3 0 UNCORR CHAPS:0 24225 35 0 0 0 1 24232>24226 10 0 0 0 0 24227 36 92 10 0 3 0 CORR CHAP 24228 2 12 46 0 0 0 GREATER IN THIS OVERLAY 24229 71 242 32 0 0 0 242 gNOT TO BE REPLACED 24230 12 47 0 0 0 24231 37 92 10 0 3 0 REPLACE 24229>24232 94 242 26 0 3 1 242 gTREAT ALL CHAPS 24233 76 247 2 0 0 0 247 O/P INSTRUCTION 24300 PROCR 243 243 STORE OLD/NEW RADICES FOR CONVERT ACTIONS 24301 NOTES RADIX 24104> 23704>24302 62 0 0 0 0 24303 12 54 0 0 0 24304 12 0 0 0 5: 24305 70 243 14 0 0 0 243 gACTION 93 DEC-BIN 24306 11 0 0 0 1+ 24307 70 243 32 0 0 0 243 gACTION 65 ANY-ANY 24308 11 0 0 0 2 24309 70 243 13 0 0 0 243 gACTION 63 DEC-STERLING 24310 12 0 0 0 1 24311 71 246 2 0 0 0 246 gACTION NOT 64, STERLING - DECIMAL 24312 10 0 0 0 7£:££802 24309>24313 11 0 0 0 66.64 24305>24314 11 0 0 0 6666600000 24315 5 12 46 1 0 0 STORE OLD - NEW RADIX 24335>24316 92 7 0 0 0 CTR OF CONVERT TABLES TO DATE 24317 30 0 0 0 5 24318 91 0 0 3 0 24319 70 243 27 0 0 0 243 g NONE STORED YET 24323>24320 99 0 1 3 0 24321 2 12 46 1 0 0 24322 70 247 2 0 0 0 247 g ALREADY STORED 24323 94 243 20 0 3 2 243 24324 0 92 7 0 0 0 24325 12 0 0 0 32 50 24326 72 247 2 0 0 0 247 g DONT STORE 26-TH 24319>24327 0 12 46 1 0 0 24328 5 99 0 1 3 0 24329 10 0 0 0 2 24330 4 92 7 0 0 0 AUG CTR 24331 76 247 2 0 0 0 247 g O/P INSTRUCTION 24307>24332 1 16 0 0 0 L=RADIX 24333 5 12 46 0 0 0 24334 12 61 0 0 0 C-LINE IND 24335 70 243 16 0 0 0 243 g THIS IS C-LINE INSERT RADIX PAIR 24336 12 46 0 0 0 24337 5 12 47 0 0 0 SET OLD RADIX 24338 76 247 2 0 0 0 247 g GET C-LINE 24400 PROCR 244 244 CONVERT (A) TO DEC 24401 NOTES 24402 81 244 2 0 0 0 244 24403 5 320 42 1 0 0 320 24404 60 0 0 0 0 SET DEC 24405 124 320 2 0 2 0 320 24406 112 320 42 1 0 0 320 24407 82 244 2 0 0 0 244 24500 PROCR 245 245 CONVERT (A) TO BINARY 24501 NOTES 24502 81 245 2 0 0 0 245 24503 5 320 42 1 0 0 320 24504 62 0 0 0 0 SET BIN 24505 124 320 22 0 2 0 320 24506 112 320 42 1 0 0 320 24507 82 245 2 0 0 0 245 24600 PROCR 246 246 STORE UNPACK AND CONDENSE 24601 NOTES RADIX 24311>24602 0 12 61 0 0 0 24603 70 247 2 0 0 0 247 g THIS IS C-LINE 24604 0 12 54 0 0 0 ACTION 24605 101 51 1 2 0 24606 70 246 11 0 0 0 246 g UNPACK 24607 101 2 1 2 0 24608 70 246 11 0 0 0 246 gCONDENSE 24609 101 104 1 2 0 24610 71 247 2 0 0 0 247 gNOT EXPAND (157) 24608> 24606>24611 12 4 0 0 0 SECTION 24612 80 245 2 0 0 0 245 gCONVERT 24613 3 12 88 0 0 0 SEC/ PROCR 24614 12 0 0 0 64 100 24615 72 247 2 0 0 0 247 gDON'T STORE FOR 3-DIGT REP 24616 98 0 1 0 0 24617 91 98 0 0 3 0 24618 70 246 28 0 0 0 246 gNONE STORED YET 24624>24619 10 0 0 0 0 24620 35 0 0 0 11 24621 36 98 2 0 3 0 24622 2 12 88 0 0 0 24623 70 247 2 0 0 0 247 g MATCH FWND 24624 94 246 19 0 3 1 246 24625 0 98 1 0 0 0 24626 12 0 0 0 t 24627 72 247 2 0 0 0 247 g DONT STORE 11 - TH 24618>24628 0 92 0 0 0 0 THIS CHAP UNCORR 24629 30 0 0 0 4 24630 1 12 88 0 0 0 SECTION 24631 5 98 2 0 3 0 24632 10 0 0 0 1 24633 4 98 1 0 0 0 AUG CTR 24700 PROCR 247 247 FORM SERIAL NUMBER 24701 NOTES RADIX 26621> 26624> 26714> 26725> 26727> 26729> 26733> 26808> 27103> 27107> 27304> 27813> 28026> 28037> 28143> 28231> 24627> 24623> 24615> 24610> 24603> 24338> 24331> 24326> 24322> 24233> 24218> 24120> 24038> 24029> 24015> 24013> 24011> 24004> 23922> 23920> 23826> 23725> 23713> 23518> 23509> 23505> 21105> 20709> 20631> 20624> 20604> 20506> 19128> 19124> 19122>24702 0 12 85 0 0 0 TEST IF TO IGNORE 24703 70 247 5 0 0 0 247 THIS BLOCK 24704 80 295 2 0 0 0 295 YES - IGNORE 24703>24705 60 0 0 0 0 24706 92 3 0 0 0 TRANSLATOR'S PROCR 24707 30 0 0 0 2 24708 5 12 88 0 0 0 24709 86 191 2 0 0 0 191 24710 12 0 0 0 5 24711 70 247 26 0 0 0 247 gVALUES 24712 12 9 0 0 0 LONE SERIAL IN PROCR 24713 12 0 0 0 100 24714 73 247 26 0 0 0 247 gOK 24715 86 191 2 0 0 0 191 24716 12 0 0 0 2 24717 70 247 22 0 0 0 247 gINSTRUCTIONS, IGNORE 24718 35 0 0 0 111111 TABLE ENTRIES, CONSTS='SER' 24719 10 0 0 0 725569 24720 37 1 44 1 0 0 24721 76 247 23 0 0 0 247 24717>24722 80 295 2 0 0 0 295 gIGNORE 24721>24723 10 0 0 0 99 24724 2 12 90 0 0 0 (0=SHORT, 1=LONG) 24725 76 247 27 0 0 0 247 gSET 98 OR 99 24714> 24711>24726 12 9 0 0 0 24725>24727 4 12 88 0 0 0 24728 52 1 2 0 0 0 EDIT SERIAL 24729 C 306 6 0 0 0 306 24800 PROCR 248 248 AUGMENT INSTRUCTION COUNTER 24801 NOTES RADIX 24802 10 0 0 0 0 24803 85 191 2 0 0 0 191 24804 C 248 11 0 0 0 248 g'PROCR/TABLE' 24805 C 249 13 0 0 0 249 gINSTRUCTIONS/'NNOTES' 24806 C 249 2 0 0 0 249 gTABLE ENTRY/'NOTES' 24807 C 249 7 0 0 0 249 gCONSTANT/'CONST' 24808 C 248 9 0 0 0 248 VALUE ENTRY/VALUE 24808>24809 5 1 2 1 0 0 CLEAR LINE SERIAL 24810 76 248 13 0 0 0 248 24804>24811 0 12 9 0 0 0 SERIAL THIS LINE WITHIN SECTION 24812 71 248 18 0 0 0 248 gNOTES BLOCK 24911> 24810>24813 319 22 0 0 0 319 SW 27/5 LAST TIME THRU 24814 12 0 0 0 3 24815 71 248 18 0 0 0 248 gLAST TIME WASN'T FOR CONSTANTS 24816 10 0 0 0 1 24817 5 29 6 1 0 0 CONSTS END SIGN 24815> 24812>24818 10 0 0 0 0 24819 76 249 13 0 0 0 249 24900 PROCR 249 249 AUGMENT INSTRUCTION 24901 NOTES RADIX 24806>24902 12 9 0 0 0 24903 12 0 0 0 1 24904 70 249 13 0 0 0 249 24905 10 0 0 0 2 24906 76 249 14 0 0 0 249 24807>24907 12 9 0 0 0 24908 71 249 12 0 0 0 249 gNOT 'CONST' BLOCK 24909 10 0 0 0 1 24910 4 12 9 0 0 0 (SO AS TO STEP BY 2 EVENTUALLY) 24911 76 248 13 0 0 0 248 gTEST IF LAST SECTION WAS CONSTANTS 24908>24912 0 12 90 0 0 0 24904> 24819> 24805>24913 11 0 0 0 1 24906>24914 4 12 9 0 0 0 24915 0 12 33 0 0 0 24916 70 249 20 0 0 0 249 gBLOCK EX MT 24917 0 12 1 0 0 0 24918 30 0 0 0 2 24919 5 1 0 1 0 0 AMEND IND 24916>24920 5 92 34 1 0 0 CLEAR 25000 PROCR 250 250 EDIT 25002 62 0 0 0 0 25003 318 11 0 0 0 318 INDICATOR 25004 70 250 7 0 0 0 250 gFIRST RECORD 25005 80 288 2 0 0 0 288 25006 76 250 8 0 0 0 250 25004>25007 80 289 2 0 0 0 289 gWRITE LAST SECTION 25006>25008 12 38 0 0 0 25009 71 250 30 0 0 0 250 gDIRECTIVE 25010 27 5 0 0 0 SWITCH 25011 12 0 0 0 4 25012 70 250 25 0 0 0 250 gVALUES 25013 124 27 5 0 1 0 25014 305 6 0 0 0 305 25015 128 29 2 1 2 0 EDIT PROCR, TABLE, CONST. 25016 319 48 1 0 0 319 25017 124 27 5 0 1 0 25018 124 305 2 0 1 0 305 25019 128 29 0 1 1 0 COPY ANNOTATION 25020 1 44 1 0 0 25021 124 27 5 0 1 0 25022 124 305 2 0 1 0 305 25023 5 29 2- 1 0 0 COPY REPORTS PASS 1 25024 76 250 48 0 0 0 250 25012>25025 55 1 11 0 0 16 VALUES 25026 C 29 10 2 0 0 25027 52 29 6 0 0 0 REF+ITEM 25028 C 315 2 0 0 0 315 25029 76 250 48 0 0 0 250 25009>25030 52 29 2 0 0 0 DIRECTIVES 25031 C 307 16 0 0 0 307 25032 10 0 0 0 0 25033 5 319 22 0 0 0 319 25034 27 5 0 0 0 25035 12 0 0 0 1 25036 71 250 43 0 0 0 250 gNOT PROCR 25037 12 38 0 0 0 25038 73 250 43 0 0 0 250 NOT NOTES OF PROCR 25039 1 8 1 0 0 25040 5 29 12 1 0 0 COPY 'RADIX' 25041 5 29 8 1 0 0 CLEAR 25042 76 250 45 0 0 0 250 25038> 25036>25043 1 44 1 0 0 PASS 1 REPORTS 25044 5 29 12 1 0 0 25042>25045 55 1 16 1 0 28 BULK COPY ANNOTATION 25046 C 29 14 1 0 0 25047 76 250 50 0 0 0 250 25029> 25024>25048 27 5 0 0 0 25049 5 319 22 0 0 0 319 25047>25050 10 0 0 0 1 25051 5 318 11 0 0 0 318 SET INDICATOR 25052 60 0 0 0 0 25053 10 0 0 0 0 25054 5 12 115 0 0 0 ERROR REPROT SHIFT CONTROL 25055 0 23 47 0 0 0 25056 35 0 0 0 1111 25057 37 29 2 1 0 0 25058 10 0 0 0 0 25059 5 23 47 0 0 0 IMPLICITLY AMENDED' 25060 82 186 2 0 0 0 186 25100 PROCR 251 251 START OF UPDATING LOOP-DEAL WITH UNAMENDED MT OR PT AT END 25428> 25562> 25619> 18513>25102 80 294 2 0 0 0 294 gTEST PT AT DIRECTIVE/END 25103 70 252 2 0 0 0 252 gNO 25121> 25317> 25532> 25843>25104 0 12 45 0 0 0 25105 71 251 14 0 0 0 251 gPT AT END 25106 27 1 0 0 0 25107 70 251 10 0 0 0 251 gSINGLE-RECORD BLOCKS 25108 4 2 8 0 (ABS MR) 25109 76 251 11 0 0 0 251 25107>25110 0 7 6 2 0 0 MT SERIAL 25109>25111 2 9 4 2 0 0 A6 SERIAL 25112 70 252 2 0 0 0 252 gMT AMENDED 25113 72 253 2 0 0 0 253 gMT>PT, REPORT 25105>25114 80 299 2 0 0 0 299 gTEST MT=END 25115 10 0 0 0 0 SET 'MT INPUT' 25116 5 12 33 0 0 0 25117 80 303 2 0 0 0 303 gTEST MT=PROCR 25118 80 284 2 0 0 0 284 gUNPACK 25119 80 186 2 0 0 0 186 gCHECK/EDIT/OUTPUT 25120 80 302 2 0 0 0 302 gGET NEXT RECORD 25121 76 251 4 0 0 0 251 25200 PROCR 252 252 SWITCH FOR AMENDMENTS 25201 NOTES RADIX 25112> 25103>25202 85 252 2 0 0 0 252 25203 C 254 2 0 0 0 254 gREPLACE 25204 C 255 2 0 0 0 255 gDELETE 25205 C 258 2 0 0 0 258 gINSERT BEFORE 25206 C 256 2 0 0 0 256 gREPLACE ANNOTATION 25300 PROCR 253 253 DEAL WITH OUT-OF-SEQUENCE DIRECTIVE 25301 NOTES RADIX 25113>25302 1 4 1 0 0 AMENDMENTS MODS ARE 25303 124 319 22 0 1 0 319 25304 124 305 10 0 1 0 305 25305 5 29 0 1 0 0 REPORT WORD 25306 34 1 2 1 0 0 SERIAL 25543> 25545>25307 80 259 2 0 0 0 259 PUT ERROR REPORT 25308 10 0 0 0 1:5: '??' OF 5-DIGIT 25309 3 27 6 0 0 0 SET 'PT OMITTED' 25310 35 0 0 0 1111 SERIAL AND 25311 124 319 22 0 1 0 319 25312 124 305 10 0 1 0 305 25313 37 29 0 1 0 0 REPORT WORD 25316>25314 80 292 2 0 0 0 292 INPUT ON PAPER 25315 80 294 2 0 0 0 294 FIND DIRECTIVE 25316 70 253 14 0 0 0 253 gREAD/IGNORE PT TO NEXT DIRECTIVE 25317 76 251 4 0 0 0 251 gMAKE THIS AMENDMENT 25400 PROCR 254 254 REPLACE 25401 NOTES RADIX 25203>25402 9 50 2 0 0 'PASS 0' IND 25403 71 254 34 0 0 0 254 gREJECT 25404 27 5 0 0 0 'UNPACK SWITCH' 25405 5 296 2 0 0 0 296 25406 80 303 2 0 0 0 303 gTEST MT=PROCR 25407 0 12 38 0 0 0 25408 5 197 2 0 0 0 197 25409 80 293 2 0 0 0 293 gTEST PT=STACK DIRECTIVE 25410 0 12 38 0 0 0 IS REPLACING BLOCK STACK DIR OR NOT 25411 2 197 2 0 0 0 197 ARE BOTH BLOCKS SIMILAR 25412 71 254 29 0 0 0 254 ILLEGAL? 25431>25413 10 0 0 0 1 SET AS PT INPUT 25414 5 12 33 0 0 0 25415 80 283 2 0 0 0 283 gUNPACK PT 25416 80 299 2 0 0 0 299 gDON'T REPLACE END SIGN 25417 0 12 38 0 0 0 25418 72 254 25 0 0 0 254 gNOT PT DIRECTIVE 25419 27 1 0 0 0 25420 70 254 23 0 0 0 254 g1 RECORD PER BLOCK 25421 8 1 8 0 PROCR NO 25422 76 254 24 0 0 0 254 25420>25423 0 7 16 1 0 0 25422>25424 5 1 8 1 0 0 TRANSFER MT PROCR NUMBER 25418>25425 80 302 2 0 0 0 302 gGET NEXT A1 RECORD 25426 80 186 2 0 0 0 186 gCHECK/EDIT/OUTPUT 25427 80 292 2 0 0 0 292 gREAD PT 25428 76 251 2 0 0 0 251 25412>25429 0 12 38 0 0 0 PT DIRECTIVE 25430 1 197 2 0 0 0 197 MT DIRECTIVE 25431 72 254 13 0 0 0 254 gNEITHER IS STACK DIRECTIVE, ALLOW REPLA 25432 296 2 0 0 0 296 25433 5 27 5 0 0 0 RESTORE SWITCH 25403>25434 10 0 0 0 69 25435 76 255 36 0 0 0 255 gREPORT 25500 PROCR 255 255 DELETION LOOP 25501 NOTES RADIX 25204>25502 80 299 2 0 0 0 299 gEND SIGN ON MT? 25503 9 4 1 0 0 25504 5 1 0 1 0 0 STORE SERIAL 25505 9 50 2 0 0 'PASS 0' IND 25506 71 255 35 0 0 0 255 gREPORT 25507 80 292 2 0 0 0 292 gREAD PT 25508 80 294 2 0 0 0 294 gTEST DIRECTIVE 25509 71 255 46 0 0 0 255 gYES (SINGLE-LINE DELETE) 25510 9 50 2 0 0 PASS 0 IND 25511 71 255 35 0 0 0 255 gMOD REJECTED 25512 27 1 0 0 0 25513 70 255 16 0 0 0 255 g1 RECORD/BLOCK 25514 4 2 8 0 25515 76 255 17 0 0 0 255 25513>25516 7 6 2 0 0 MT SERIAL 25515>25517 30 0 0 0 8 25518 70 255 20 0 0 0 255 gDIRECTIVE DELETED 25519 80 188 2 0 0 0 188 gSET 'PRINT PROCEDURE' 25534> 25518>25520 80 302 2 0 0 0 302 gGET NEXT RECORD 25521 80 299 2 0 0 0 299 gTEST END 25522 27 1 0 0 0 25523 70 255 26 0 0 0 255 25524 4 2 8 0 25525 76 255 27 0 0 0 255 25523>25526 7 6 2 0 0 MT SERIAL 25525>25527 2 1 2 2 0 0 PT SERIAL 25528 71 255 34 0 0 0 255 25529 80 302 2 0 0 0 302 gGET NEXT RECORD 25530 80 292 2 0 0 0 292 gREAD PT(NEXT DIRECTIVE) 25531 80 294 2 0 0 0 294 gTEST DIRECTIVE 25532 71 251 4 0 0 0 251 gYES 25533 76 255 35 0 0 0 255 gREJECT 25528>25534 73 255 20 0 0 0 255 gLOOP 25533> 25511> 25506>25535 10 0 0 0 54 REPORT 25607> 25847> 25435>25536 30 0 0 0 8 25537 124 319 22 0 1 0 319 25538 124 305 10 0 1 0 305 25539 5 29 0 1 0 0 REPORT WORD 25540 27 1 0 0 0 25541 70 255 44 0 0 0 255 g1 RECORD BLOCK 25542 34 4 1 8 0 25543 76 253 7 0 0 0 253 25541>25544 34 7 6 1 0 0 SERIAL BEING DELETED 25545 76 253 7 0 0 0 253 gREPORT 25509>25546 27 1 0 0 0 25547 70 255 50 0 0 0 255 25548 4 2 8 0 25549 76 255 51 0 0 0 255 25547>25550 7 6 2 0 0 25549>25551 30 0 0 0 8 25552 70 255 54 0 0 0 255 25553 80 188 2 0 0 0 188 25561> 25552>25554 80 302 2 0 0 0 302 gGET RECORD AFTER DELETED ONE 25555 27 1 0 0 0 25556 70 255 59 0 0 0 255 25557 4 2 8 0 25558 76 255 60 0 0 0 255 25556>25559 7 6 2 0 0 25558>25560 2 1 0 2 0 0 PT SERIAL FOR DELETION 25561 70 255 54 0 0 0 255 gDELETE ALL BLOCKS THIS SERIAL 25562 76 251 2 0 0 0 251 25600 PROCR 256 256 REPLACE ANNOTATION 25601 NOTES RADIX 25206>25602 80 303 2 0 0 0 303 gTEST MT=PROCR 25603 80 283 2 0 0 0 283 gUNPACK PT BLOCK 25604 9 50 2 0 0 'PASS 0' IND 25605 70 256 8 0 0 0 256 25606 10 0 0 0 51 25607 76 255 36 0 0 0 255 gREPORT, READ NEXT DIRECTIVE 25605>25608 10 0 0 0 1 25609 3 23 47 0 0 0 SET 'IMPLICITLY AMENDED' 25610 5 12 86 0 0 0 SET IND FOR SR 25611 80 257 2 0 0 0 257 25612 10 0 0 0 0 25613 5 12 86 0 0 0 25614 80 292 2 0 0 0 292 gREAD PT 25615 10 0 0 0 0 25616 5 12 33 0 0 0 25617 80 186 2 0 0 0 186 SET 'MT IN' 25618 80 302 2 0 0 0 302 gCHECK/EDIT/OUTPUT 25619 76 251 2 0 0 0 251 gGET NEXT A1 RECORD 25700 PROCR 257 257 ENTRY TO 'UNPACK' SR 25702 81 257 2 0 0 0 257 25703 0 257 2 0 0 0 257 25704 5 284 2 0 0 0 284 PLANT LINK 25705 76 284 4 0 0 0 284 AVOID BULK CLEAR 25800 PROCR 258 258 INSERTION LOOP 25801 NOTES RADIX 25205>25802 9 50 2 0 0 PASS 0' IND 25803 71 258 46 0 0 0 258 gREPORT 25804 5 12 38 0 0 0 SET NON DIRECTIVE 25805 87 27 5 0 0 0 25806 C 258 17 0 0 0 258 25807 C 258 17 0 0 0 258 25808 C 258 10 0 0 0 258 CONST 25809 C 258 17 0 0 0 258 25808>25810 54 1 0 1 0 46 25811 124 312 2 0 2 0 312 25812 80 326 2 0 0 0 326 UNPACK (PRETEND ITS PROCR) 25813 10 0 0 0 0 25814 5 1 20 1 0 0 CLEAR CLEO WORD 25815 5 1 44 1 0 0 CLEAR ERROR WORD 25816 76 258 18 0 0 0 258 25809> 25807> 25806>25817 80 283 2 0 0 0 283 UNPACK 25816>25818 90 0 0 1 6 25819 C 0 0 0 44 25822>25820 1 0 1 1 0 25821 71 258 24 0 0 0 258 gREPORT, CODING 25822 94 258 20 0 1 2 258 25823 76 258 41 0 0 0 258 25821>25824 10 0 0 0 73 25825 30 0 0 0 8 25826 124 319 22 0 1 0 319 25827 124 305 10 0 1 0 305 25828 5 29 0 1 0 0 REPORT WORD 25829 27 1 0 0 0 25830 70 258 33 0 0 0 258 g1 RECORD/BLOCK 25831 34 4 1 8 0 LINE SERIAL 25832 76 258 34 0 0 0 258 25830>25833 34 7 6 1 0 0 LINE SERIAL 25832>25834 80 259 2 0 0 0 259 STORE REPORT 25835 10 0 0 0 1:5: 25836 3 27 6 0 0 0 SET 'PT OMITTED' 25837 35 0 0 0 1111 25838 124 319 22 0 1 0 319 25839 124 305 10 0 1 0 305 25840 37 29 0 1 0 0 25853> 25823>25841 80 292 2 0 0 0 292 gREAD PT 25842 80 294 2 0 0 0 294 FIND AMENDMENT DIRECTIVE 25843 71 251 4 0 0 0 251 gNEW DIRECTIVE OR END SIGN 25844 9 50 2 0 0 PASS 0' IND 25845 70 258 48 0 0 0 258 gMOD OK 25803>25846 10 0 0 0 73 25847 76 255 36 0 0 0 255 gREPORT, READ TO NEXT AMEND DIRECTIVE 25845>25848 80 293 2 0 0 0 293 gTEST STACK DIRECTIVE 25849 10 0 0 0 1 25850 5 12 33 0 0 0 SET 'PT IS INPUT' 25851 80 283 2 0 0 0 283 gUNPACK 25852 80 186 2 0 0 0 186 gCHECK/EDIT/OUTPUT 25853 76 258 41 0 0 0 258 25900 PROCR 259 259 STORE ERROR REPORT FOR OUT-OF-SEQUENCE MODS 25902 81 259 2 0 0 0 259 (B)=REPORT WORD 25903 124 319 22 0 1 0 319 25904 124 305 2 0 1 0 305 25905 29 15 0 0 0 LAST 2.5 CHARS ANNOTATION 25906 2 319 27 0 0 0 319 25907 70 259 14 0 0 0 259 gLINE IGNORED DON'T OVERWRITE WORD 25908 10 0 0 0 0 CLEAR SIGN BIT A 25909 32 0 0 0 10 25910 124 319 22 0 1 0 319 25911 124 305 2 0 1 0 305 LAST FIVE CHARS ANNOTATION 25912 5 29 14 1 0 0 25913 82 259 2 0 0 0 259 25907>25914 32 0 0 0 10 25915 124 319 22 0 1 0 319 25916 124 305 2 0 1 0 305 25917 5 29 12 1 0 0 25918 82 259 2 0 0 0 259 26000 PROCR 260 260 CONSTANTS ROUTINE 26001 NOTES RADIX 19113>26002 5 12 69 0 0 0 26003 5 12 66 1 0 0 CLEAR INDICATORS 26004 5 12 70 0 0 0 26005 84 695 2 0 0 0 695 CLEAR WL=SWITCH 26006 91 12 66 0 2 0 CLEAR R2 26007 90 0 0 3 0 26008 C 0 0 0 5 26009 90 0 0 1 0 26010 C 0 0 0 18 26011 54 94 0 0 0 60 CLEAR UNPACK AREA 26012 62 0 0 0 0 26013 34 1 6 1 0 0 FIRST WORD 26014 12 33 0 0 0 NON ZERO IF EX PT 26015 5 12 70 0 0 0 SET 'NE FOUND' IND 26016 76 261 3 0 0 0 261 26311> 26339>26017 80 295 2 0 0 0 295 gIGNORE CONST 26100 PROCR 261 261 26101 NOTES RADIX 26110> 26116> 26321> 26332> 26336> 26362> 26403> 26413> 26416> 26454>26102 80 274 2 0 0 0 274 gGET NEXT CHAR 26016>26103 32 0 0 0 2 26104 3 12 88 1 0 0 26105 12 0 0 0 7: 26106 70 261 12 0 0 0 261 gNE 26107 12 0 0 0 1 26108 70 265 2 0 0 0 265 gBE,STORE NE AND END 26109 12 70 0 0 0 26110 71 261 2 0 0 0 261 gNO, DONT STORE CHAR 26111 76 261 17 0 0 0 261 gSTORE AND PROCESS 26106>26112 12 70 0 0 0 'NE FOUND' IND 26113 70 265 2 0 0 0 265 gYES, STORE NE AND END 26114 5 12 70 0 0 0 26115 5 12 70 0 0 0 CLEAR 26116 76 261 2 0 0 0 261 gGNC 26111>26117 12 88 0 0 0 26118 5 94 0 0 2 0 STORE THIS CHAR 26200 PROCR 262 262 26201 NOTES RADIX 26202 96 0 0 2 0 26203 94 262 4 0 2 1 262 26203>26204 71 262 21 0 0 0 262 gNOT FIRST CHAR IN LINE 26205 12 88 0 0 0 THIS CHAR 26206 12 0 0 0 7t 26207 70 262 23 0 0 0 262 g'(' 26208 83 263 10 0 0 5 263 IGNORE '(' 26209 5 94 60 0 0 0 26210 0 94 61 0 0 0 SF CTR IN DIRECTIVE LINE 26211 70 262 19 0 0 0 262 gWRONG 26212 84 267 2 0 0 0 267 SET CHECK SWITCH 26213 C 94 62 0 0 0 26214 0 94 62 0 0 0 SWITCH FOR FIRST SUBFIELD 26215 12 0 0 0 5 26216 71 262 21 0 0 0 262 gNOT REL ADDRESS 26217 83 695 2 0 0 1 695 SET WL=1 26218 76 262 21 0 0 0 262 26317> 26328> 26351> 26447> 26211>26219 83 263 10 0 0 1 263 gIGNORE UNDIRECTED CONST 26220 80 263 10 0 0 0 263 gCLEAR OUT ALL DETAILS 26218> 26216> 26204>26221 12 88 0 0 0 26222 76 263 10 0 0 0 263 CHECK 26207>26223 80 263 10 0 0 0 263 gCLEAR OUT ALL DETAILS 26224 76 263 20 0 0 0 263 gSET SWITCH AT 2 26300 PROCR 263 263 26301 NOTES RADIX 26302 81 263 10 0 0 0 263 26303 5 94 60 1 0 0 CLEAR DETAILS 26304 5 94 62 1 0 0 26305 5 94 64 1 0 0 26306 5 94 66 1 0 0 26307 5 94 68 1 0 0 26308 5 94 70 1 0 0 26309 82 263 10 0 0 0 263 26222>26310 85 263 10 0 0 0 263 26311 C 260 17 0 0 0 260 >IGNORE 26312 C 263 40 0 0 0 263 >PREVIOUS WAS'C' DIRECTIV E LETTER 26313 C 264 39 0 0 0 264 >')' EXPECTED 26314 C 263 16 0 0 0 263 >',' FORBIDDEN, '(' ALLOWED 26315 C 263 22 0 0 0 263 >'(' FORBIDDEN, ',' ALLOWED 26314>26316 12 0 0 0 7+ COMMA 26317 70 262 19 0 0 0 262 gIGNORE 26318 11 0 0 0 2 26319 71 264 2 0 0 0 264 gCHECK CHAR 26224>26320 83 263 10 0 0 2 263 SET TO EXPECT DIRECTIVE LETTER 26321 76 261 2 0 0 0 261 gGET NEXT CHAR 26315>26322 12 0 0 0 7+ 26323 71 263 37 0 0 0 263 gNOT COMMA 26324 10 0 0 0 2 26325 4 94 60 0 0 0 26326 124 94 60 0 0 0 SF CTR IN NON-DIRECTIVE LINE 26327 94 62 0 0 0 SF DETAILS 26328 70 262 19 0 0 0 262 gIGNORE 26329 84 267 2 0 0 0 267 26330 86 267 2 0 0 0 267 26331 12 0 0 0 5 26332 71 261 2 0 0 0 261 gNOT REL ADDRESS 26333 96 0 0 2 0 26334 11 0 0 0 1 26335 84 695 2 0 0 0 695 WL=LOCN OF SECOND CHAR 26336 76 261 2 0 0 0 261 gGET NEXT CHAR 26323>26337 11 0 0 0 2 26338 71 264 2 0 0 0 264 gNOT '(', CHECK CHAR 26339 76 260 17 0 0 0 260 gIGNORE GET NEXT CHAR 26312>26340 12 0 0 0 51 26341 70 263 59 0 0 0 263 gA 26342 12 0 0 0 1 26343 70 263 57 0 0 0 263 gB 26344 12 0 0 0 1 26345 70 263 52 0 0 0 263 gC 26346 12 0 0 0 1 26347 70 263 58 0 0 0 263 gD 26348 12 0 0 0 13 26349 70 263 56 0 0 0 263 gP 26350 12 0 0 0 2 26351 71 262 19 0 0 0 262 gIGNORE NOT R 26345>26352 96 0 0 2 0 26353 11 0 0 0 2 26354 84 695 2 0 0 0 695 WL=LOCN OF SECOND CHAR 26355 10 0 0 0 1 RANDO 26349>26356 11 0 0 0 1 P 26343>26357 11 0 0 0 1 B 26347>26358 11 0 0 0 1 D 26341>26359 11 0 0 0 1 A 26360 84 267 2 0 0 0 267 SET CHECKING SWITCH 26361 83 263 10 0 0 3 263 SET TO EXPECT ')' 26362 76 261 2 0 0 0 261 gGET NEXT CHAR 26400 PROCR 264 264 26401 NOTES RADIX 26338> 26319>26402 85 267 2 0 0 0 267 CHECK SWITCH 26403 C 261 2 0 0 0 261 >A,GNC 26404 C 264 8 0 0 0 264 >D 26405 C 264 17 0 0 0 264 >B 26406 C 264 21 0 0 0 264 >P 26407 C 264 26 0 0 0 264 >R 26420> 26422> 26424> 26432> 26404>26408 0 12 88 0 0 0 DECIMAL 26409 30 0 0 0 1- CONTROL 26410 12 0 0 0 2 26411 70 264 14 0 0 0 264 gREPORT * 26412 12 0 0 0 3 26413 73 261 2 0 0 0 261 gOK 26419> 26425> 26411>26414 10 0 0 0 5e * 26415 5 1 44 1 0 0 26416 76 261 2 0 0 0 261 26438> 26443> 26446> 26405>26417 0 12 88 2 0 0 BASIC BINARY 26418 12 0 0 0 t 26419 72 264 14 0 0 0 264 gREPORT 26420 76 264 8 0 0 0 264 gCHECK CONTROL 26406>26421 0 12 88 2 0 0 BASIC PATTERN 26422 70 264 8 0 0 0 264 26423 12 0 0 0 1 26424 70 264 8 0 0 0 264 26425 76 264 14 0 0 0 264 gREPORT 26407>26426 12 88 0 0 0 CHAR RELATIVE ADDRESS 26427 12 0 0 0 4: 26428 71 264 33 0 0 0 264 gNOT COLON 26429 0 12 66 0 0 0 26430 5 12 67 0 0 0 12/67=REF, 12/66=ITEM 26431 5 12 66 0 0 0 26432 76 264 8 0 0 0 264 gCHECK CONTROL 26428>26433 0 12 66 0 0 0 26434 30 0 0 0 1 26435 1 12 88 2 0 0 ASSEMBLE REF/ITEM 26436 5 12 66 0 0 0 26437 83 263 10 0 0 5 263 INHIBIT ANOTHER DIRECTIVE 26438 76 264 17 0 0 0 264 gCHECK AS BINARY 26313>26439 12 0 0 0 7e 26440 70 264 48 0 0 0 264 gIS ')' 26441 0 94 2- 0 2 0 26442 12 0 0 0 52 26443 70 264 17 0 0 0 264 LAST CHAR WAS 'B' +CHECK THIS 26444 0 94 3- 0 2 0 26445 12 0 0 0 52 26446 70 264 17 0 0 0 264 ONE BEFORE WAS 'B' +CHECK THIS 26447 76 262 19 0 0 0 262 NEITHER WAS 'B' +IGNORE 26440>26448 86 267 2 0 0 0 267 CHECK SWITCH 26449 124 94 61 0 0 0 CTR IN DIRECTIVE LINE 26450 5 94 62 0 0 0 26451 10 0 0 0 2 26452 4 94 61 0 0 0 26453 83 263 10 0 0 4 263 COMMA FORBIDDEN' 26454 76 261 2 0 0 0 261 gGNC 26500 PROCR 265 265 TIDY UP AND REASSEMBLE CONST 26501 NOTES RADIX 26113> 26108>26502 10 0 0 0 7: 26503 5 94 0 0 2 0 STORE END SIGN 26504 86 263 10 0 0 0 263 DIRECTIVE SWITCH 26505 12 0 0 0 4 26506 72 265 8 0 0 0 265 gOK SWITCH SETTINGS 26507 80 295 2 0 0 0 295 gIGNORE THIS CONST 26506>26508 94 60 0 0 0 COMMAS X2 26509 70 265 14 0 0 0 265 26510 11 0 0 0 2 26511 2 94 61 0 0 0 DIRECTIVE CTR 26512 70 265 14 0 0 0 265 26513 80 295 2 0 0 0 295 gIGNORE THIS CONST 26512> 26509>26514 94 61 0 0 0 DIRECTIVE CTR 26515 12 0 0 0 + 26516 73 265 18 0 0 0 265 gOK, NOT MORE THAN 5 26517 80 295 2 0 0 0 295 gIGNORE 26516>26518 96 0 0 2 0 26519 5 12 70 0 0 0 TOT NO OF CHARS 26520 91 0 0 2 0 CLEAR BOTH 26521 91 0 0 3 0 26522 86 695 2 0 0 0 695 26523 70 265 47 0 0 0 265 gNO REL ADDRESS IN CONST 26524 91 0 0 1 0 26525 0 12 67 0 0 0 REF 26526 12 0 0 0 100 26527 73 265 47 0 0 0 265 gSECTION 26528 12 0 0 0 899 26529 72 265 47 0 0 0 265 gEX RANGE 26530 0 12 67 0 0 0 26531 80 200 2 0 0 0 200 gREPLACE PROCR 26532 C 202 2 0 0 0 202 26533 12 119 0 0 0 26534 62 0 0 0 0 26535 32 0 0 0 2- REPLACE 3-DIGIT NUMBER 26536 5 94 1- 0 1 0 (FIRST DIGIT ALWAYS ZERO) 26537 32 0 0 0 1 26538 71 265 40 0 0 0 265 26539 10 0 0 0 30 26538>26540 5 94 0 0 1 0 26541 32 0 0 0 1 26542 71 265 44 0 0 0 265 26543 10 0 0 0 30 26542>26544 5 94 1 0 1 0 26545 54 1 6 0 0 18 26546 76 265 83 0 0 0 265 gASSEMBLE 26529> 26527> 26523>26547 0 12 33 0 0 0 26548 70 266 17 0 0 0 266 gMT 26549 54 1 6 0 0 18 CLEAR 1/6'-1.22'=EDIT AREA 26550 87 27 10 0 0 0 26551 C 265 83 0 0 0 265 gPT 26552 C 265 53 0 0 0 265 gCARDS 26552>26553 94 61 0 0 0 DIRECTIVE CTR 26554 12 0 0 0 4 26555 72 265 72 0 0 0 265 gMIXED CONSTANT 26556 86 267 2 0 0 0 267 26557 12 0 0 0 1 26558 71 265 72 0 0 0 265 gNOT ALPHA 26559 94 0 0 0 0 FIRST CHAR 26560 12 0 0 0 7t 26561 70 265 63 0 0 0 265 g'(' 26562 10 0 0 0 3- 26561>26563 11 0 0 0 3 26564 17 12 90 0 0 3 LONG/SHORT CTR 26565 11 0 0 0 1.00002 END VLAUE 30 26566 3 12 70 0 0 0 NEW CONSTANT LENGTH 26567 91 0 0 1 0 26568 10 0 0 0 7: 26570>26569 5 94 0 0 1 0 26570 94 265 69 0 1 1 265 gCLEAR REST OF CONSTANT 26571 76 265 83 0 0 0 265 26558> 26555>26572 90 0 0 1 28 26573 C 0 0 0 0 26576>26574 94 0 0 1 0 26575 71 265 77 0 0 0 265 gFIRST NON ZERO CHAR FROM END 26576 94 265 74 0 1 1- 265 26575>26577 10 0 0 0 7: 26578 5 94 1 0 1 0 SET CONST END 26579 5 94 29 0 0 0 CLEAR OLD END 26580 96 0 0 1 0 26581 11 0 0 0 1 26582 5 12 70 0 0 0 NEW NUMBERS OF CHARS 26616> 26571> 26551> 26546>26583 94 0 0 2 0 26600 PROCR 266 266 26601 NOTES RADIX STORE OLD - NEW RADIX 26602 30 0 0 0 2 CTR OF CONVERT TABLES TO DATE 26603 1 94 1 0 2 0 26604 30 0 0 0 2 26605 1 94 2 0 2 0 26606 30 0 0 0 2 26607 1 94 3 0 2 0 26608 30 0 0 0 2 26609 1 94 4 0 2 0 26610 5 1 6 1 3 0 STORE NEXT WORD OF CONST 26611 125 2 0 3 0 26612 125 5 0 2 0 26613 96 0 0 2 0 26614 12 0 0 0 1 26615 2 12 70 0 0 0 NO OF CHARS 26616 73 265 83 0 0 0 265 g CYCLE FOR MULTIPLE OF 5 26548>26617 1 42 1 0 0 26618 2 319 26 1 0 0 319 26619 71 266 22 0 0 0 266 g OK 26620 80 263 10 0 0 0 263 CLEAR ALL DETAILS 26621 76 247 2 0 0 0 247 26619>26622 0 94 61 0 0 0 SF CTR IN DIRECTIVE LINE 26623 12 0 0 0 4 26624 72 247 2 0 0 0 247 g CONST IS MIXED OR CONTAINS 26625 90 0 0 1 0 CLEAR MODIFIER 26626 C 0 0 0 0 ///// 26627 94 0 0 1 0 NEXT CHAR 26628 12 0 0 0 7t P e e he I h e t e te 26629 71 267 2 0 0 0 267 > NOT '(' 26633>26630 0 94 1 0 1 0 CHAR AFTER '(' 26631 94 0 0 1 1 26632 12 0 0 0 7e P e e he I h e t e te 26633 71 266 30 0 0 0 266 26634 94 0 0 1 1 TO SELECT CHAR AFTER DIRECTIVE 26700 PROCR 267 267 CONSTANTS SWITCH 26701 NOTES 26629>26702 85 267 2 0 0 0 267 26703 C 268 2 0 0 0 268 26704 C 269 2 0 0 0 269 26705 C 270 2 0 0 0 270 26706 C 272 2 0 0 0 272 26707 C 267 8 0 0 0 267 > RELATIVE ADDRESS 26707>26708 12 67 0 0 0 REF (DEC) 26709 12 0 0 0 1000 26710 72 267 28 0 0 0 267 g REPORT R 26711 11 0 0 0 £67 1000 - 99 BIN RADIX 26712 72 267 30 0 0 0 267 gREF IS A PROCR 26713 12 67 0 0 0 SECTION IN DEC 26714 70 247 2 0 0 0 247 gABS ADDRESS, NO CHECKS 26715 80 183 2 0 0 0 183 gDECODE 26716 34 12 40 0 0 0 26717 36 12 72 0 3 0 26718 70 267 28 0 0 0 267 g SECTION NON-EXISTEREPORT R 26719 10 0 0 0 0 26720 33 0 0 0 10 SHIFT COLLATOR 26721 36 12 72 0 3 0 26722 71 267 28 0 0 0 267 g SECTION IS TX AREAREPORT R 26723 12 66 0 0 0 ITEM 26724 12 0 0 0 8191 26725 73 247 2 0 0 0 247 g OK 26732>26726 80 196 2 0 0 0 196 g REPORT 26727 76 247 2 0 0 0 247 26722> 26718> 26710>26728 80 195 2 0 0 0 195 g REPORT R 26729 76 247 2 0 0 0 247 26712>26730 12 66 0 0 0 ITEM 26731 12 0 0 0 99 26732 72 267 26 0 0 0 267 g REPORT 1 26733 76 247 2 0 0 0 247 g OK 26800 PROCR 268 268 CHECK ALPHA CONSTANTS 26801 NOTES 26703>26802 0 12 90 0 0 0 LONG/SHORT CONST INDICATOR 26803 70 268 5 0 0 0 268 26804 10 0 0 0 3 26803>26805 11 0 0 0 2 26912> 26915>26806 98 0 0 1 0 > MODIFIER = DIRECTIVE LENGTH 26807 2 12 70 0 0 0 TOT CHARS IN CONST+1 (INDIRECTIVE) 26808 72 247 2 0 0 0 247 g OK 26809 76 273 2 0 0 0 273 g REPORT 26900 PROCR 269 269 CHECK DECIMAL CONSTANTS 26901 NOTES RADIX 26704>26902 0 12 90 0 0 0 LONG/SHORT CONST INDICATOR 26903 70 269 5 0 0 0 269 g SHORT 26904 10 0 0 0 5 26903>26905 11 0 0 0 5 27206>26906 5 12 67 0 0 0 26907 124 12 70 0 0 0 CHARS IN CONST 26908 94 1- 0 0 0 FINAL BEFOR NE 26909 12 0 0 0 10 26910 70 269 13 0 0 0 269 g ALLOW FOR SIGN 26911 0 12 67 0 0 0 26912 76 268 6 0 0 0 268 g CHECK 26910>26913 0 12 67 0 0 0 26914 11 0 0 0 1 26915 76 268 6 0 0 0 268 g CHECK 27000 PROCR 270 270 BINARY NUMBERS 27001 NOTES RADIX 26705>27002 90 0 0 2 0 27003 C 0 0 0 11 27016>27004 94 0 0 1 0 NEXT CHAR 27005 12 0 0 0 7: 27006 70 271 2 0 0 0 271 gNUMBER END 27007 11 0 0 0 6: 27008 70 271 2 0 0 0 271 gMINUS SIGN 27009 11 0 0 0 10 27010 5 12 10 1 0 0 STORE CHARACTER 27011 0 12 66 1 0 0 27012 30 0 0 0 1 27013 1 12 10 2 0 0 BASIC QTT 27014 5 12 66 1 0 0 ASSEMBLE CONST QTT BY QTT 27015 94 270 16 0 1 1 270 27015>27016 94 270 4 0 2 1 270 27017 76 273 2 0 0 0 273 gREPORT TOO MANY CHARS 27100 PROCR 271 271 27101 NOTES RADIX 27008> 27006>27102 0 12 90 0 0 0 LONG/SHORT CONST IND 27103 71 247 2 0 0 0 247 27104 12 66 1 0 0 27105 12 0 0 0 1048576 27106 72 273 2 0 0 0 273 27107 76 247 2 0 0 0 247 27200 PROCR 272 272 BINARY PATTERN 27201 NOTES RADIX 26706>27202 0 12 90 0 0 0 LONG/SHORT CONSTANT IND 27203 70 272 5 0 0 0 272 27204 10 0 0 0 14 27203>27205 11 0 0 0 14 27206 76 269 6 0 0 0 269 gCHECK LENGTH VIA DEC 27300 PROCR 273 273 ERROR REPORT 27301 NOTES RADIX 27106> 27017> 26809>27302 10 0 0 0 5e 27303 5 1 44 1 0 0 27304 76 247 2 0 0 0 247 27400 PROCR 274 274 GET NEXT CHAR OF CONSTANT(IE NEXT WORD) 27401 NOTES RADIX 27402 81 274 2 0 0 0 274 27403 10 0 0 0 0 27404 94 274 13 0 3 1 274 gHAVE NOT EXHAUSTED 5-CHAR WORD 27405 94 274 10 0 1 2 274 STEP FOR NEXT WORD IF PRESENT 27406 80 295 2 0 0 0 295 *IGNORE MORE THAN 45 CHAR 27407 10 0 0 0 7: 27408 32 0 0 0 2- 27409 82 274 2 0 0 0 274 27405>27410 90 0 0 3 0 R3 COUNTS A 5-CHAR WORD 27411 C 0 0 0 5 27412 34 1 6 1 1 0 NEXT WORD CONSTANT 27404>27413 82 274 2 0 0 0 274 27500 PROCR 275 275 ALTERNATIVE ENTRY TO UPDATE ADDRESS 27502 81 275 2 0 0 0 275 27503 5 12 88 2 0 0 27504 0 275 2 0 0 0 275 27505 3 274 2 0 0 0 274 SET NONZERO='NOT P' 27506 5 208 2 0 0 0 208 27507 76 208 10 0 0 0 208 gENTER 27600 PROCR 276 276 27601 NOTES RADIX 19112>27602 5 12 3 0 0 0 CLEAR ERROR WL 27603 90 0 0 2 0 27604 C 0 0 0 8 27618>27605 0 1 22 0 2 0 ITEM 27606 5 1 10 0 0 0 27607 0 1 20 1 2 0 REF (NUM) 27608 80 275 2 0 0 0 275 gUPDATE ADDRESS 27609 0 1 10 0 0 0 NEW ITEM 27610 5 1 22 0 2 0 27611 0 12 4 0 0 0 NEW REF 27612 5 1 20 0 2 0 27613 80 277 2 0 0 0 277 CHECK REF 27614 1 19 0 0 0 DISC 27615 70 276 18 0 0 0 276 27616 1 10 0 0 0 27617 80 192 2 0 0 0 192 gCHECK ITEM IS EVEN 27615>27618 94 276 5 0 2 4 276 27619 76 278 2 0 0 0 278 27700 PROCR 277 277 SR TO CHECK TABLE ADDRESSES AND VALUE ADDRESSES 27701 NOTES RADIX 27702 81 277 2 0 0 0 277 27703 83 108 2 0 0 1 108 27704 12 4 0 0 0 REF TO BE CHECKED 27705 12 0 0 0 100 27706 72 277 27 0 0 0 277 gNOT SECTION 27707 0 12 4 0 0 0 27708 73 277 23 0 0 0 277 27709 70 277 18 0 0 0 277 27710 80 183 2 0 0 0 183 gDECODE SR 27711 34 12 40 0 0 0 27712 36 12 72 0 3 0 27713 70 277 23 0 0 0 277 gIGNORE, SECTION NONEXISTENT 27714 33 0 0 0 10 27715 10 0 0 0 0 27716 36 12 72 0 3 0 27717 71 277 23 0 0 0 277 gIGNORE, SECTION IS TX AREA 27709>27718 0 1 10 0 0 0 27719 12 0 0 0 8192 27720 73 277 29 0 0 0 277 27721 80 196 2 0 0 0 196 gREPORT I 27722 76 277 24 0 0 0 277 27728> 27717> 27713> 27708>27723 80 195 2 0 0 0 195 gREPORT R 27722>27724 80 295 2 0 0 0 295 gIGNORE 27725 83 108 2 0 0 2 108 IGNORE ANY MORE 'VALTHIS REF FOR 27726 76 277 29 0 0 0 277 27706>27727 12 0 0 0 900 27728 72 277 23 0 0 0 277 gREF>999, IGNORE 27726> 27720>27729 82 277 2 0 0 0 277 27800 PROCR 278 278 TABLE SWITCH 27801 NOTES RADIX 27619>27802 0 1 19 0 0 0 DISC 27803 73 282 18 0 0 0 282 gREPORT T5 27804 12 0 0 0 3 27805 72 282 18 0 0 0 282 27806 0 1 20 0 0 0 FIRST REF 27807 70 282 24 0 0 0 282 gREPORT T1 27808 85 278 8 0 0 0 278 27809 C 279 2 0 0 0 279 27810 C 281 2 0 0 0 281 27811 C 279 10 0 0 0 279 gTYPE 3 27812 C 281 23 0 0 0 281 gTYPE 4 27813 C 247 2 0 0 0 247 27900 PROCR 279 279 TYPES 1 AND 3 27901 NOTES RADIX EDIT AND UNPACK FIXED 27809>27902 1 12 0 0 0 NO OF CHARS 27903 1 1 14 0 0 0 SPACES 27904 4 12 5 0 0 0 TOTAL FOR TABLE 27905 1 16 0 0 0 SIGN 27906 12 0 0 0 2 27907 71 279 10 0 0 0 279 gNOT SEPARATE CHARACTER 27908 10 0 0 0 1 27909 4 12 5 0 0 0 STEP TOTAL 27907> 27811>27910 1 24 0 0 0 SECOND REF 27911 34 1 26 0 0 0 SECON ITEM 27912 75 282 22 0 0 0 282 gREPORT T3 27913 1 11 0 0 0 27914 71 282 16 0 0 0 282 g'UNPACK TO BE' IS SET 27915 0 1 19 0 0 0 DISC 27916 12 0 0 0 1 27917 70 279 19 0 0 0 279 27918 10 0 0 0 5- 27917>27919 11 0 0 0 10 27920 2 1 12 0 0 0 CHARS 27921 2 1 13 0 0 0 DISCARDS 27922 73 282 14 0 0 0 282 gINCONSISTENT WITH SOURCE LENGTH 27923 1 1 12 0 0 0 27924 1 1 13 0 0 0 27925 2 1 15 0 0 0 ZEROS 27926 73 282 8 0 0 0 282 gMORE ZEROS THAN SOURCE 27927 1 12 0 0 0 CHARS 27928 2 1 15 0 0 0 ZEROS 27929 73 282 8 0 0 0 282 gZEROS>NO CHARS 'T10' 28000 PROCR 280 280 28001 NOTES RADIX 28002 1 14 0 0 0 28003 12 0 0 0 16 28004 72 282 10 0 0 0 282 gTOO MANY SPCES 28005 0 1 12 0 0 0 CHARS 28006 70 282 14 0 0 0 282 gREPORT 'T7' 28007 0 1 19 0 0 0 DISC 28008 12 0 0 0 2 28009 71 280 12 0 0 0 280 gNOT ALPHA 28010 0 1 15 0 0 0 ZEROS 28011 71 282 8 0 0 0 282 gREPORT 'T10' 28009>28012 1 17 0 0 0 STERLING INDICATOR 28013 71 280 17 0 0 0 280 28014 2 12 63 0 0 0 STERLING CTR 28015 70 280 24 0 0 0 280 28016 76 280 38 0 0 0 280 gREPORT 'T12' 28013>28017 12 0 0 0 1 28018 71 282 4 0 0 0 282 28019 12 63 0 0 0 28020 12 0 0 0 2 28021 70 280 23 0 0 0 280 28022 11 0 0 0 3 28021>28023 5 12 63 0 0 0 28015>28024 1 18 0 0 0 LAST TABLE ENTRY 28025 3 12 6 0 0 0 COPY TO WL 28026 70 247 2 0 0 0 247 28027 12 0 0 0 1 28028 71 282 2 0 0 0 282 g'T13' IF LTE WRONG 28029 12 5 0 0 0 CHARACTERS EDITED 28030 1 12 5 0 0 0 28031 30 0 0 0 9 28032 70 280 35 0 0 0 280 gMULT OF 5 28033 10 0 0 0 727464 SUM' 28034 5 1 44 1 0 0 28032>28035 5 12 5 0 0 0 CLEAR STR AT EACH LTE 28036 2 12 63 0 0 0 STERLING INDICATORS NOT 28037 70 247 2 0 0 0 247 OCCURRED IN 3 CONSECUTIVE LINES 28016>28038 4 12 63 0 0 0 CLEAR COUNTER 28039 76 282 4 0 0 0 282 ERROR REPORT T12 28100 PROCR 281 281 CHECK TABLES 28101 NOTES RADIX TYPES 2 AND 4 27810>28102 1 24 0 0 0 2ND REF 28103 70 281 23 0 0 0 281 gIS ZERO 28104 30 0 0 0 2- 28105 71 281 13 0 0 0 281 g3 DIG REF 28106 1 20 0 0 0 28107 32 0 0 0 2- 28108 71 282 22 0 0 0 282 g3 DIG + 2 DIG 'T3' 28109 32 0 0 0 2 28110 2 1 24 0 0 0 2ND REF 28111 71 282 22 0 0 0 282 g2 DIG REF 28112 76 281 20 0 0 0 281 gCHECK ITEMS 28105>28113 1 20 0 0 0 1ST REF 28114 32 0 0 0 2- 28115 70 282 22 0 0 0 282 g2 DIG + 3 DIG RED (3 DIG) 'T3' 28116 1 24 0 0 0 2ND REF 28117 2 1 20 0 0 0 1ST REF 28118 73 282 22 0 0 0 282 g2ND REF <1ST REF (3 DIG) 'T3' 28119 71 281 23 0 0 0 281 28112>28120 1 26 0 0 0 2ND ITEM 28121 2 1 22 0 0 0 FIRST ITEM 28122 73 282 20 0 0 0 282 g2ND <1ST 'T4' 28119> 28103> 27812>28123 1 11 0 0 0 'SINGLE/BE' 28124 70 281 29 0 0 0 281 28125 12 0 0 0 1 28126 71 282 16 0 0 0 282 28127 1 18 0 0 0 LAST TABLE ENTRY' 28128 70 282 2 0 0 0 282 28124>28129 1 12 0 0 0 NO OF CHARS 28130 71 282 14 0 0 0 282 28131 1 13 0 0 0 DISCARDS 28132 71 282 12 0 0 0 282 28133 1 14 0 0 0 SPACES 28134 71 282 10 0 0 0 282 28135 1 15 0 0 0 ZEROS 28136 71 282 8 0 0 0 282 28137 1 16 0 0 0 SIGN 28138 70 281 41 0 0 0 281 28139 12 0 0 0 2 28140 71 282 6 0 0 0 282 28138>28141 1 17 0 0 0 STERLING IND 28142 71 282 4 0 0 0 282 28143 76 247 2 0 0 0 247 28200 PROCR 282 282 MAKE REPORT 'T*' 28201 NOTES RADIX 28128> 28028>28202 10 0 0 0 1 28203 5 12 3 0 0 0 28142> 28039> 28018>28204 10 0 0 0 1 28205 4 12 3 0 0 0 28140>28206 10 0 0 0 1 28207 4 12 3 0 0 0 28136> 28011> 27929> 27926>28208 10 0 0 0 1 28209 4 12 3 0 0 0 28134> 28004>28210 10 0 0 0 1 28211 4 12 3 0 0 0 28132>28212 10 0 0 0 1 28213 4 12 3 0 0 0 28130> 28006> 27922>28214 10 0 0 0 1 28215 4 12 3 0 0 0 28126> 27914>28216 10 0 0 0 1 28217 4 12 3 0 0 0 27805> 27803>28218 10 0 0 0 1 28219 4 12 3 0 0 0 28122>28220 10 0 0 0 1 28221 4 12 3 0 0 0 28118> 28115> 28111> 28108> 27912>28222 10 0 0 0 2 28223 4 12 3 0 0 0 27807>28224 10 0 0 0 1 28225 1 12 3 0 0 0 28226 5 12 88 0 0 0 28227 52 1 44 0 0 0 28228 C 306 6 0 0 0 306 20521>28229 10 0 0 0 730000 28230 4 1 44 1 0 0 28231 76 247 2 0 0 0 247 28300 PROCR 283 283 UNPACK PAPER TAPE PART ONE-DIRECTIVES 28301 NOTES RADIX 28302 81 283 2 0 0 0 283 28303 54 1 0 1 0 46 28304 12 38 0 0 0 28305 70 285 2 0 0 0 285 NOT A DIRECTIVE 28306 87 27 10 0 0 0 28307 C 283 9 0 0 0 283 28308 C 283 31 0 0 0 283 CARDS 28307>28309 0 92 30 0 0 0 AMEND RUN? 28310 70 283 13 0 0 0 283 28311 124 311 2 0 2 0 311 28312 76 283 14 0 0 0 283 28310>28313 124 311 4 0 2 0 311 28312>28314 80 326 2 0 0 0 326 UNPACK P/T S/DIR 28315 0 27 5 0 0 0 28316 12 0 0 0 2 28317 71 283 28 0 0 0 283 gNOT TABLE 28318 0 12 38 0 0 0 28319 73 283 28 0 0 0 283 gNOT 'NOTES' OF TABLE 28320 10 0 0 0 0 S/DIR WAS 'NOTES' OF TABLE 28321 5 1 8 1 0 0 & MUST BE UNPACKED DIFFERENTLY 28322 0 92 30 0 0 0 28323 70 283 26 0 0 0 283 gINITIAL TRANSLATION 28324 124 311 10 0 2 0 311 28325 76 283 27 0 0 0 283 28323>28326 124 311 12 0 2 0 311 28325>28327 80 326 2 0 0 0 326 UNPACK CORRECTLY 28339> 28342> 28506> 28612> 28638> 28649> 28319> 28317>28328 10 0 0 0 0 28329 5 1 44 1 0 0 CLEAR ERROR WL 28330 82 283 2 0 0 0 283 28308>28331 50 9 8 0 0 0 UNPACK S/DIR FROM CARD 28332 C 311 4 0 0 0 311 28333 55 9 18 1 0 16 28334 C 1 18 1 0 0 28335 0 1 8 1 0 0 28336 30 0 0 0 4 LEFT ALIGN SECTION NO 28337 5 1 8 1 0 0 28338 0 12 38 0 0 0 28339 73 283 28 0 0 0 283 NOT 'NOTES' 28340 27 5 0 0 0 28341 12 0 0 0 1 28342 71 283 28 0 0 0 283 gNOT 'PROCR' LEAVE SR 28343 0 1 18 1 0 0 S/DIR WAS ''NOTES'' OF PROCR 28344 5 1 8 1 0 0 MOVE ''RADIX'' 28345 55 9 20 1 0 16 COPY WORDS 28346 C 1 18 1 0 0 28347 82 283 2 0 0 0 283 28400 PROCR 284 284 UNPACK OFF MAGNETIC TAPE-ONE RECORD PER BLOCK 28401 NOTES RADIX 28402 81 284 2 0 0 0 284 28403 54 1 6 1 0 40 25705>28404 27 1 0 0 0 28405 71 304 2 0 0 0 304 gMULTI-RECORD BLOCKS 28406 12 38 0 0 0 28407 70 284 21 0 0 0 284 gNOT DIRECTIVE 28408 50 7 4 0 0 0 28409 C 307 2 0 0 0 307 28410 12 86 0 0 0 28411 70 284 18 0 0 0 284 28412 27 5 0 0 0 28413 12 0 0 0 1 28414 70 284 46 0 0 0 284 g'PROCR' 28415 0 7 20 1 0 0 28416 5 1 16 1 0 0 COPY TABLE OR CONST TYPE 28417 76 284 46 0 0 0 284 28411>28418 55 7 20 1 0 30 28419 C 1 16 1 0 0 28420 76 284 45 0 0 0 284 28407>28421 87 27 5 0 0 0 28422 C 284 31 0 0 0 284 g'PROCR' 28423 C 284 34 0 0 0 284 g'TABLE' 28424 C 284 37 0 0 0 284 g'CONST' 28425 C 284 26 0 0 0 284 VALUE'=4 28425>28426 55 7 8 2 0 36 R, I+VALUES 28427 C 1 9 0 0 0 28428 55 7 44 2 0 6 ANNOTATION 28429 C 1 40 2 0 0 28430 82 284 2 0 0 0 284 28422>28431 50 7 4 0 0 0 INSTRUCTIONS 28432 C 308 2 0 0 0 308 28433 76 284 41 0 0 0 284 28423>28434 50 7 4 0 0 0 28435 C 309 2 0 0 0 309 UNPACK TABLE ENTRIES. 28436 76 284 41 0 0 0 284 28424>28437 55 7 12 1 0 18 CONSTANTS 28438 C 1 6 1 0 0 28439 7 4 2 0 0 AMEND IND 28440 5 1 0 1 0 0 28436> 28433>28441 12 86 0 0 0 28442 71 284 46 0 0 0 284 28443 55 7 32 1 0 18 28444 C 1 28 1 0 0 28420>28445 5 1 44 1 0 0 CLEAR ERROR INDICATOR 28442> 28417> 28414>28446 82 284 2 0 0 0 284 28500 PROCR 285 285 28501 NOTES RADIX 28305>28502 87 27 5 0 0 0 28503 C 286 2 0 0 0 286 g'PROCR' 28504 C 286 9 0 0 0 286 g'TABLE' 28505 C 286 14 0 0 0 286 g'CONST' 28506 C 283 28 0 0 0 283 VALUE' (DUMMY) 28600 PROCR 286 286 28601 NOTES RADIX 28503>28602 124 312 2 0 2 0 312 28603 80 326 2 0 0 0 326 gINSTRUCTIONS 28604 10 0 0 0 0 28605 5 1 20 1 0 0 CLEAR 'CLEO' WORD 28606 87 27 10 0 0 0 28607 C 286 38 0 0 0 286 P/T INSTRUCTIONS 28608 C 286 19 0 0 0 286 CARD INSTRUCTIONS 28504>28609 124 313 2 0 2 0 313 28610 80 326 2 0 0 0 326 gTABLE ENTRIES 28611 87 27 10 0 0 0 28612 C 283 28 0 0 0 283 28613 C 286 35 0 0 0 286 TABLE ENTRY FROM CARD 28505>28614 124 314 2 0 2 0 314 28615 80 326 2 0 0 0 326 gCONSTANTS 28616 87 27 10 0 0 0 28617 C 286 47 0 0 0 286 P/T CONST 28618 C 286 39 0 0 0 286 CARD CONST 28608>28619 62 0 0 0 0 28620 1 8 1 0 0 REF ALPHA E-ALIGNED 28621 32 0 0 0 4- TEST TOP CHAR 28622 12 0 0 0 10 28623 70 286 26 0 0 0 286 g't' FIRST WAY 28624 12 0 0 0 3t 28625 71 286 27 0 0 0 286 gNOT 't' OTHER WAY 28623>28626 10 0 0 0 40.6 28625>28627 11 0 0 0 4t 28628 60 0 0 0 0 28629 32 0 0 0 6- R-ALIGN IN B 28630 80 300 2 0 0 0 300 LEFT ALIGN 28631 5 1 8 1 0 0 REF ALPHA E-ALIGNED 28632 34 1 6 1 0 0 28633 80 300 2 0 0 0 300 LEFT ALIGN 28634 5 1 6 1 0 0 ACTION 28613>28635 9 4 1 0 0 LINE SERIAL 28636 5 1 2 1 0 0 28637 80 298 2 0 0 0 298 gUNPACK ANNOTATION 28607>28638 76 283 28 0 0 0 283 28618>28639 9 4 1 0 0 LINE SERIAL 28640 5 1 2 1 0 0 28641 80 298 2 0 0 0 298 gUNPACK ANNOTATION 28642 10 0 0 0 7: 28643 35 0 0 0 11 28644 32 0 0 0 8 28645 37 9 18 1 0 0 IN 36-TH CHAR POSN 28646 37 9 6 1 0 0 IN 6-TH CHAR POSN 28617>28647 50 9 4 0 0 0 28648 C 310 8 0 0 0 310 28649 76 283 28 0 0 0 283 28700 PROCR 287 287 TEST WORD IN ACCUMULATOR 28701 NOTES RADIX IS A STACKING DIRECTIVE 28702 81 287 2 0 0 0 287 28703 2 319 4 1 0 0 319 'CONST' 28704 73 287 35 0 0 0 287 gNOT DIRECTIVE 28705 70 287 28 0 0 0 287 28706 1 319 4 1 0 0 319 28707 2 319 12 1 0 0 319 'NOTES' 28708 71 287 14 0 0 0 287 28709 27 5 0 0 0 28710 12 0 0 0 3 28711 70 287 35 0 0 0 287 gNOTES FOLLOWING 'CONST'-NOT DIRECTIVE 28712 10 0 0 0 10 SET (12/38)>0 28713 76 287 33 0 0 0 287 28708>28714 1 319 12 1 0 0 319 'NOTES' 28715 2 319 6 1 0 0 319 'PROCR' 28716 70 287 30 0 0 0 287 gYES 28717 73 287 35 0 0 0 287 gNOT A DIRECTIVE 28718 1 319 6 1 0 0 319 'PROCR' 28719 2 319 2 1 0 0 319 'TABLE' 28720 70 287 29 0 0 0 287 gYES 28721 73 287 35 0 0 0 287 gNOT A DIRECTIVE 28722 1 319 2 1 0 0 319 'TABLE' 28723 2 319 28 1 0 0 319 'VALUE' 28724 71 287 35 0 0 0 287 gHENCE NOT A DIRECTIVE 28725 12 33 0 0 0 28726 71 287 35 0 0 0 287 gPT IN, 'VALUE' ISNT A DIRECTIVE 28727 10 0 0 0 1 28705>28728 11 0 0 0 1 (CONST) 28720>28729 11 0 0 0 1 (TABLE) 28716>28730 11 0 0 0 1 (PROCR) 28731 5 27 5 0 0 0 28732 12 0 0 0 10 28713>28733 5 12 38 0 0 0 SET<0 IF PROCR/TABLE/CONST/VALUE 28734 82 287 2 0 0 0 287 28726> 28724> 28721> 28717> 28711> 28704>28735 10 0 0 0 0 28736 5 12 38 0 0 0 28737 82 287 2 0 0 0 287 28800 PROCR 288 288 SQUASH NEXT RECORD IN SEC 29, COPY TO 8, WRITE 8 IF FULL 28801 NOTES RADIX 28802 81 288 2 0 0 0 288 28803 12 110 0 0 0 28804 70 288 11 0 0 0 288 28805 12 111 0 0 0 CARD SER ERROR 28806 70 288 10 0 0 0 288 gNO ERROR 28807 124 319 22 0 1 0 319 28808 124 305 10 0 1 0 305 28809 5 29 0 1 0 0 WRONG SERIAL TO ERROR REPORT WORD 28806>28810 5 12 110 0 0 0 28804>28811 90 0 0 1 44 28812 C 0 0 0 2 28817>28813 29 2- 1 1 0 LAST WORD 28814 70 288 17 0 0 0 288 28815 2 319 10 1 0 0 319 28816 71 288 18 0 0 0 288 28814>28817 94 288 13 0 1 2- 288 28816>28818 96 0 0 1 0 CONTENTS OF MODIFIER 28819 3 29 0 2 0 0 REC LENGTH 28820 10 0 0 0 90 TOTAL ROOM SEC 8 28821 2 318 12 0 0 0 318 28822 2 29 0 2 0 0 CURRENT RECORD LENGTH 28823 72 288 32 0 0 0 288 g+VE OR ZERO 32505>28824 318 12 0 0 0 318 28825 3 8 4 2 0 0 BLOCK LENGTH 28826 91 318 12 0 1 0 318 28827 319 10 1 0 0 319 BE WORD 28828 5 8 6 1 1 0 28829 80 290 2 0 0 0 290 gWRITE 28830 54 8 4 1 0 46 28831 5 318 12 0 0 0 318 28823>28832 10 0 0 0 6 28833 5 12 2 0 0 0 28834 91 318 12 0 1 0 318 28835 55 29 0 1 0 0 COPY TO SEC 8 28836 C 8 6 1 1 0 28837 C 29 0 2 0 0 28838 29 0 2 0 0 28839 4 318 12 0 0 0 318 STEP QTTY IN BLOCK TO DATE 28840 54 29 0 1 0 44 CLEAR SEC 29 28841 82 288 2 0 0 0 288 28900 PROCR 289 289 28902 81 289 2 0 0 0 289 28903 0 319 10 1 0 0 319 28904 5 8 50 1 0 0 28905 80 290 2 0 0 0 290 28906 54 8 4 1 0 46 28907 82 289 2 0 0 0 289 29000 PROCR 290 290 29002 81 290 2 0 0 0 290 29003 43 A2 0 0 0 0 29004 C 8 0 0 0 0 29005 82 290 2 0 0 0 290 29100 PROCR 291 291 READ B/FWD MT FILE 29102 81 291 2 0 0 0 291 29103 42 A1 0 0 0 0 29104 C 7 0 0 0 0 29105 82 291 2 0 0 0 291 29200 PROCR 292 292 INPUT OFF PAPER TAPE 29201 NOTES RADIX 29202 81 292 2 0 0 0 292 29224> 29233>29203 80 301 2 0 0 0 301 gREAD A6 29204 87 27 10 0 0 0 29205 C 292 13 0 0 0 292 29206 C 292 7 0 0 0 292 CARDS-CHECK CARD SER 29206>29207 9 34 2 0 0 29208 2 12 111 0 0 0 PREVIOUS SER 29209 4 12 111 0 0 0 STORE THIS SER 29210 12 0 0 0 1 29211 5 12 110 0 0 0 STORE ANY ERROR 29212 5 9 34 1 0 0 29205>29213 9 4 1 0 0 29214 2 319 24 1 0 0 319 'SHEET' 29215 71 292 34 0 0 0 292 29216 124 306 8 0 2 0 306 29217 80 326 2 0 0 0 326 UNPACK 29218 34 12 88 1 0 0 SHEET NO 29219 80 321 2 0 0 0 321 29220 0 12 88 2 0 0 29221 2 12 92 0 0 0 PREVIOUS SER 29222 4 12 92 0 0 0 REPLACE BY CURRENT 29223 12 0 0 0 1 CHECK SEQUENCE 29224 70 292 3 0 0 0 292 gCORRECT 29225 0 319 24 1 0 0 319 'SHEET'' 29226 124 319 22 0 1 0 319 29227 124 305 2 0 1 0 305 29228 5 29 14 1 0 0 29229 0 12 88 1 0 0 WRONG NUMBER 29230 124 319 22 0 1 0 319 29231 124 305 10 0 1 0 305 29232 5 29 0 1 0 0 29233 76 292 3 0 0 0 292 29215>29234 9 4 1 0 0 29235 2 319 46 1 0 0 319 'TRAMD' 29236 70 292 49 0 0 0 292 gDON'T INSERT BE 29237 34 9 48 2 0 0 29238 10 0 0 0 0 29239 32 0 0 0 7 29240 5 320 42 1 0 0 320 WORD CTR 29241 91 320 42 0 1 0 320 29242 32 0 0 0 3 29243 5 288 2 0 0 0 288 COL POSN+WL 29244 35 0 0 0 11 29245 10 0 0 0 7. 29246 124 288 2 0 1 0 288 29247 32 0 0 0 0 ///// 29248 37 9 0 1 1 0 29236>29249 82 292 2 0 0 0 292 29300 PROCR 293 293 TEST AMENDMENT IS A STACKING DIRECTIVE 29301 NOTES RADIX 29302 81 293 2 0 0 0 293 29303 54 1 0 1 0 8 29304 87 27 10 0 0 0 29305 C 293 13 0 0 0 293 29306 C 293 7 0 0 0 293 CARDS 29306>29307 50 9 8 0 0 0 29308 C 311 4 0 0 0 311 29309 0 1 8 1 0 0 29310 30 0 0 0 4 29311 5 1 8 1 0 0 L-ALIGN PROCR NUMBER 29312 76 293 15 0 0 0 293 29305>29313 124 311 2 0 2 0 311 29314 80 326 2 0 0 0 326 29312>29315 1 6 1 0 0 29316 80 287 2 0 0 0 287 gTEST DIRECTIVE 29317 82 293 2 0 0 0 293 29400 PROCR 294 294 TEST FOR MOD END SIGN 29401 NOTES RADIX OR DIRECTIVE 29402 81 294 4 0 0 0 294 29403 9 4 1 0 0 29404 30 0 0 0 4- 29405 30 0 0 0 4 29406 2 319 14 1 0 0 319 'END ' 29407 70 294 11 0 0 0 294 29408 9 4 1 0 0 29409 2 319 46 1 0 0 319 'TRAMD' 29410 71 294 13 0 0 0 294 29407>29411 10 0 0 0 100000 29412 76 294 39 0 0 0 294 29410>29413 10 0 0 0 0 CLEAR LOCATION TO WHICH 29414 5 1 4 1 0 0 AMENDMENT DIRECTIVE IS UNPACKED 29415 124 311 10 0 2 0 311 29416 80 326 2 0 0 0 326 gUNPACK AMEND LETTER 29417 87 27 10 0 0 0 29418 C 294 22 0 0 0 294 P/T 29419 C 294 20 0 0 0 294 CARDS 29419>29420 34 1 6 1 0 0 29421 76 294 23 0 0 0 294 29418>29422 34 1 4 1 0 0 29421>29423 10 0 0 0 0 29424 32 0 0 0 2 29425 12 0 0 0 69 29426 70 294 36 0 0 0 294 29427 11 0 0 0 15 29428 70 294 35 0 0 0 294 29429 12 0 0 0 19 29430 70 294 34 0 0 0 294 29431 11 0 0 0 22 29432 71 294 41 0 0 0 294 29433 10 0 0 0 1 29430>29434 11 0 0 0 1 29428>29435 11 0 0 0 1 29426>29436 11 0 0 0 1 29437 84 252 2 0 0 0 252 29438 10 0 0 0 1 29442> 29412>29439 3 12 44 1 0 0 29440 82 294 2 0 0 0 294 29432>29441 10 0 0 0 0 29442 76 294 39 0 0 0 294 29500 PROCR 295 295 IGNORE THIS INSTRUCTION 29501 NOTES RADIX 29502 81 295 2 0 0 0 295 29503 319 26 1 0 0 319 IGNORE INDICATOR 29504 5 1 42 1 0 0 29505 82 295 2 0 0 0 295 29600 PROCR 296 296 IGNORE PREVIOUS INSTRUCTION 29601 NOTES RADIX 29602 81 296 2 0 0 0 296 29603 319 26 1 0 0 319 29604 124 319 22 0 1 0 319 29605 124 305 2 0 1 0 305 29606 5 29 14 1 0 0 29607 82 296 2 0 0 0 296 29700 PROCR 297 297 gANNOTATION IF CARD 29701 NOTES RADIX 29702 81 297 2 0 0 0 297 29703 10 0 0 0 £ 29704 87 27 10 0 0 0 29705 C 297 8 0 0 0 297 P/T 29706 C 297 7 0 0 0 297 CARDS 29706>29707 80 298 2 0 0 0 298 BULK COPY WORDS-THUS SETTING (A)=0 29705>29708 82 297 2 0 0 0 297 29800 PROCR 298 298 BULK COPY ANNOTATION 29801 NOTES RADIX 29802 81 298 2 0 0 0 298 29803 55 9 18 1 0 16 29804 C 1 28 1 0 0 29805 82 298 2 0 0 0 298 29900 PROCR 299 299 TEST END SIGN ON MAG TAPE 29901 NOTES RADIX 29902 81 299 2 0 0 0 299 29903 27 1 0 0 0 29904 70 299 7 0 0 0 299 g1 RECORD PER BLOCK 29905 6 1 8 0 29906 76 299 8 0 0 0 299 29904>29907 0 7 10 1 0 0 29906>29908 2 319 14 1 0 0 319 29909 70 322 2 0 0 0 322 29910 1 319 14 1 0 0 319 29911 2 319 16 1 0 0 319 'DUMPS' 29912 70 322 2 0 0 0 322 29913 1 319 16 1 0 0 319 29914 2 319 18 1 0 0 319 'FILES' 29915 70 322 2 0 0 0 322 29916 82 299 2 0 0 0 299 30000 PROCR 300 300 LEFT ALIGN SUBROUTINE 30001 NOTES RADIX 30002 81 300 2 0 0 0 300 DATA IN B 30003 10 0 0 0 0 30004 74 300 8 0 0 0 300 ZERO NUMBER? 30006>30005 32 0 0 0 2 30006 70 300 5 0 0 0 300 30007 32 0 0 0 8 LEFT ALIGN IN A 30004>30008 82 300 2 0 0 0 300 30100 PROCR 301 301 30102 81 301 2 0 0 0 301 30103 42 A6 0 0 0 0 30104 C 9 0 0 0 0 30105 82 301 2 0 0 0 301 30200 PROCR 302 302 STEP MR.TEST END OF BLOCK 30202 81 302 2 0 0 0 302 30203 27 1 0 0 0 30204 70 302 13 0 0 0 302 g1 RECORD PER BLOCK 30205 0 2 8 0 CURRENT RECORD LENGTH 30206 5 291 2 0 0 0 291 WL 30207 97 291 2 0 8 0 291 30208 C 302 12 0 0 0 302 >BLOCK NOT EMPTY 30209 80 291 2 0 0 0 291 gREAD A1 30210 59 7 6 0 8 0 30211 C 7 4 2 0 0 30208>30212 82 302 2 0 0 0 302 30204>30213 80 291 2 0 0 0 291 gREAD A1 30214 82 302 2 0 0 0 302 30300 PROCR 303 303 TEST MT=STACK DIRECTIVE 30302 81 303 2 0 0 0 303 30303 27 1 0 0 0 30304 70 303 8 0 0 0 303 30305 6 1 8 0 30309>30306 80 287 2 0 0 0 287 30307 82 303 2 0 0 0 303 30304>30308 7 10 1 0 0 30309 76 303 6 0 0 0 303 30400 PROCR 304 304 UNPACK MT-MULTIRECORD BLOCKS 28405>30402 62 0 0 0 0 30403 54 28 0 1 0 46 30404 12 38 0 0 0 30405 70 304 37 0 0 0 304 gNOT DIRECTIVE 30406 0 2 8 0 30407 30 0 0 0 5 30408 98 0 0 8 0 30409 128 28 0 1 1 0 COPY DIRECTIVE+LENGTH WORD 30410 50 28 2 0 0 0 UNPACK 30411 C 307 16 0 0 0 307 30412 27 5 0 0 0 30413 12 0 0 0 1 30414 71 304 19 0 0 0 304 gNOT'PROCR' 30415 12 38 0 0 0 30416 73 304 19 0 0 0 304 gNOT NOTES OF PROCR 30417 28 12 1 0 0 30418 5 1 8 1 0 0 COPY 'RADIX' 30416> 30414>30419 12 86 0 0 0 30420 70 304 34 0 0 0 304 gNOT 'REPLACE ANNOTATION' 30421 27 5 0 0 0 30422 12 0 0 0 1 30423 70 304 29 0 0 0 304 gPROCR,TEST NOTES 30424 12 0 0 0 1 30425 71 304 31 0 0 0 304 gCONST 30426 12 38 0 0 0 30427 72 304 52 0 0 0 304 gNOTES OF TABLE 30428 76 304 31 0 0 0 304 gNOT TABLE NOTES 30423>30429 12 38 0 0 0 30430 73 304 52 0 0 0 304 gNOT NOTES OF PROCR 30428> 30425>30431 28 14 1 0 0 30432 5 1 16 1 0 0 CONST/TABLE TYPE OR RADIX LETTER 30433 76 304 52 0 0 0 304 30420>30434 55 28 14 1 0 26 ANNOTATION ETC EVEN IF ABSENT 30435 C 1 16 1 0 0 30436 76 304 52 0 0 0 304 30405>30437 27 5 0 0 0 30438 12 0 0 0 4 30439 70 304 66 0 0 0 304 gVALUES 30440 0 2 8 0 30441 3 320 42 0 0 0 320 LENGTH 30442 124 27 5 0 1 0 30443 2 305 2 0 0 0 305 (MAX DATA LENGTH*2) 30444 72 304 54 0 0 0 304 gRECORD HAS ANNOTATION 30445 320 42 0 0 0 320 30465>30446 30 0 0 0 5 30447 98 0 0 8 0 DATA START 30448 128 28 0 1 1 0 COPY RECORD 30449 124 27 5 0 1 0 30450 305 6 0 0 0 305 30451 128 28 2 0 2 0 UNPACK-SEC1 30472> 30436> 30433> 30430> 30427>30452 60 0 0 0 0 30453 82 284 2 0 0 0 284 30444>30454 5 320 43 0 0 0 320 ANNOTATION LENGTH ANNOTATED DATA 30455 12 86 0 0 0 30456 71 304 63 0 0 0 304 gJUST HERE TO UNPACK NUMBERS 30457 320 43 0 0 0 320 30458 30 0 0 0 5 30459 98 0 0 8 0 30460 124 27 5 0 1 0 30461 1 305 2 0 0 0 305 DATA LENGTH+2 30462 128 1 28 1 1 0 COPY ANNOTATION 30456>30463 124 27 5 0 1 0 30464 305 2 0 0 0 305 30465 76 304 46 0 0 0 304 gUNPACK NUMBERS 30439>30466 0 2 8 0 LENGTH VALUES 30467 12 0 0 0 6 30468 30 0 0 0 5 30469 98 0 0 8 0 START 30470 11 0 0 0 7 30471 128 1 9 1 0 0 ALPHA+NUM 30472 76 304 52 0 0 0 304 gEXIT 30500 CONST 305 305 0 FOR UNPACKING MULTIRECORD MT 30502 (B)24; DIRECTIVES-ANNOTATION 30503 24; ORDER LENGTH+2 30504 24; TABLE 30505 28; CONSTANT 30506 28; VALUES 30507 (R)308:0; UNPACK ORDERS 30508 309:0; UNPACK TABLES 30509 310:0; UNPACK CONSTANTS 30510 (B)12; DIRECTIVES-PASS 1 REPORTS 30511 22; ORDERS 30512 22; TABLE 30513 26; CONSTANT 30514 42; VALUES 30600 TABLE 306 306 1 'INDEX' LINE 30601 NOTES 30602 12 4 0 0 0 0 3 2 0 2 0 0 0 TO REPLACE CODERS REF 30604 92 8 0 0 0 0 2 0 0 2 0 0 1 30606 12 88 0 0 0 0 5 0 0 5 0 0 1 30608 12 88 0 0 2 0 5 0 0 0 0 0 0 'SHEET ' 30610 12 88 0 0 2 0 5 0 0 0 0 0 1 SHEET NUMBER 30700 TABLE 307 307 1 EDIT STACKING DIRECTIVE 30701 NOTES 30702 1 0 0 0 0 0 5 0 0 5 0 0 0 AMEND IND 30704 1 2 0 0 2 0 5 0 0 0 0 0 0 'PROCR'/TABLE/CONST' ETC 30706 92 35 0 0 0 0 5 0 0 5 0 0 0 30708 1 6 0 0 2 0 5 0 0 0 0 0 0 TYPE 30710 92 34 0 0 1 0 10 0 0 10 0 0 0 30712 1 8 0 0 2 0 5 0 0 0 0 0 0 NEW PROCR NUMBER 30714 1 14 0 0 0 0 5 0 0 4 0 0 1 PREVIOUS PROCR NUMBER 30716 1 0 0 0 0 0 5 0 0 5 0 0 0 AMEND IND-----MULTIREC BLOX 30718 1 2 0 0 2 0 5 0 0 0 0 0 0 LINE SERIAL 30720 1 6 0 0 2 0 5 0 0 0 0 0 0 'PROCR' ETC 30722 1 8 0 0 2 0 5 0 0 0 0 0 0 CURRENT PROCR 30724 1 14 0 0 0 0 5 0 0 5 0 0 1 PREVIOUS PROCR 30800 TABLE 308 308 3 EDIT INSTRUCTIONS 30801 NOTES 30802 1 0 0 0 0 0 5 0 0 5 0 0 0 AMEND IND 30804 1 2 0 0 2 0 5 0 0 0 0 0 0 LINE SERIAL 30806 1 6 0 0 2 0 5 0 0 0 0 0 0 ACTION 30808 1 8 0 0 2 0 5 0 0 0 0 0 0 REF 30810 1 10 0 0 1 0 5 5 0 5 1 0 0 ITEM +/- 30812 1 12 0 0 0 0 2 3 0 2 0 0 0 DISC 30814 1 14 0 0 0 0 3 2 0 3 0 0 0 MODIFIER 30816 1 16 0 0 1 0 10 0 0 10 1 0 0 LITERAL +/- 30818 1 20 0 0 2 0 5 0 0 0 0 0 0 'CLEO' PARA WORD 30820 1 22 0 0 0 0 5 0 0 5 0 0 1 PREVIOUS PROCR NO 30900 TABLE 309 309 1 EDIT TABLE ENTRIES 30901 NOTES 30902 1 0 0 0 0 0 5 0 0 5 0 0 0 AMEND IND 30904 1 2 0 0 2 0 5 0 0 0 0 0 0 30906 1 20 0 0 0 0 5 0 0 5 0 0 0 FIRST REF 30908 1 22 0 0 0 0 5 0 0 5 0 0 0 FIRST ITEM 30910 1 24 0 0 0 0 5 0 0 5 0 0 0 SECOND REF 30912 1 26 0 0 0 0 5 0 0 5 0 0 0 SECOND ITEM 30914 1 19 0 0 0 0 2 3 0 2 0 0 0 DISC 30916 1 11 0 0 0 0 3 2 0 3 0 0 0 SINGLE/TO BE 30918 1 12 0 0 0 0 2 3 0 2 0 0 0 NO 30920 1 13 0 0 0 0 3 2 0 3 0 0 0 DISCARDED 30922 1 14 0 0 0 0 2 3 0 2 0 0 0 SPACES 30924 1 15 0 0 0 0 3 2 0 3 0 0 0 ZEROS 30926 1 16 0 0 0 0 1 4 0 1 0 0 0 SIGN 30928 1 17 0 0 0 0 2 3 0 2 0 0 0 STERLING 30930 1 18 0 0 0 0 2 3 0 2 0 0 1 LAST TABLE ENTRY 31000 TABLE 310 310 3 UNPACK CONSTANT AND EDIT 31001 NOTES 31002 1 0 0 0 0 0 5 0 0 5 0 0 0 AMEND IND 31004 1 2 0 0 2 0 5 0 0 0 0 0 0 31006 92 34 0 0 0 0 5 0 0 5 0 0 0 ZERO WORD 31008 1 6 0 0 2 0 5 0 0 0 0 0 0 CONSTANT UNPACKED 31010 1 8 0 0 2 0 5 0 0 0 0 0 0 FIXED FIELD TO 31012 1 10 0 0 2 0 5 0 0 0 0 0 0 1/6' ONWARD 31014 1 12 0 0 2 0 5 0 0 0 0 0 0 31016 1 14 0 0 2 0 5 0 0 0 0 0 0 31018 1 16 0 0 2 0 5 0 0 0 0 0 0 31020 1 18 0 0 2 0 5 0 0 0 0 0 0 31022 1 20 0 0 2 0 5 0 0 0 0 0 0 31024 1 22 0 0 2 0 5 0 0 0 0 0 1 31100 TABLE 311 311 3 UNPACK STACKING DIRECTIVE 31101 NOTES FROM CARDS OR PAPER TAPE 31102 1 2 0 0 2 0 5 0 0 0 0 0 0 SER+AMEND DIR? 31104 1 6 0 0 2 0 5 0 0 0 0 0 0 DIRECTIVE 31106 1 8 0 0 2 0 3 0 0 0 0 0 0 SECTION NO 31108 1 16 0 0 2 1 5 0 0 0 0 0 1 /////TYPE OR ANNOTATION 31110 1 2 0 0 2 0 5 0 0 0 0 0 0 SER NO +AMEND DIR? 31112 1 6 0 0 2 0 5 0 0 0 0 0 0 ''NOTES'' OF TABLE 31114 1 16 0 0 2 0 5 0 0 0 0 0 1 ANNOTATION 31200 TABLE 312 312 3 UNPACK INSTRUCTIONS 31201 NOTES FROM P/T OR CARDS 31202 1 2 0 0 2 0 6 0 0 0 0 0 0 /////SER+AMEND LETTER 31204 1 6 0 0 2 0 3 0 0 0 0 0 0 ACTION 31206 1 8 0 0 2 0 3 0 0 0 0 0 0 REF 31208 1 10 0 0 1 0 5 0 0 0 1 0 0 ITEM 31210 1 12 0 0 0 0 1 0 0 0 0 0 0 D 31212 1 14 0 0 0 0 2 0 0 0 0 0 0 M 31214 1 16 0 0 1 0 10 0 0 0 1 0 0 LITERAL 31216 1 28 0 0 2 0 5 0 0 0 0 0 0 NOTES FROM P/T -RUBBISH FROM CARD 31218 1 36 0 0 2 0 5 0 0 0 0 0 1 COMMENTARY FROM P/T 31300 TABLE 313 313 3 UNPACK TABLE ENTRIES 31302 1 2 0 0 2 0 6 0 0 0 0 0 0 /////SER+AMEND LETTER 31304 1 20 0 0 0 0 3 0 0 0 0 0 0 FIRST REF 31306 1 22 0 0 0 0 5 0 0 0 0 0 0 FIRST ITEM 31308 1 24 0 0 0 0 3 0 0 0 0 0 0 SECOND REF 31310 1 26 0 0 0 0 5 0 0 0 0 0 0 SECOND ITEM 31312 1 19 0 0 0 0 1 0 0 0 0 0 0 DISC 31314 1 11 0 0 0 0 1 0 0 0 0 0 0 SINGLE TO BE 31316 1 12 0 0 0 0 2 0 0 0 0 0 0 NO OF CHARS 31318 1 13 0 0 0 0 2 0 0 0 0 0 0 DISCARDS 31320 1 14 0 0 0 0 2 0 0 0 0 0 0 SPACES 31322 1 15 0 0 0 0 2 0 0 0 0 0 0 ZEROS 31324 1 16 0 0 0 0 1 0 0 0 0 0 0 SIGN 31326 1 17 0 0 0 0 1 0 0 0 0 0 0 £ 31328 1 18 0 0 0 0 1 0 0 0 0 0 0 LTE 31330 1 28 0 0 2 0 5 0 0 0 0 0 1 P/T ANNOTATION-SPACES IF CARD 31400 TABLE 314 314 3 UNPACK CONSTANT (FIRST STAGE) 31402 1 2 0 0 2 0 6 0 0 0 0 0 0 /////SER+AMEND LETTER 31404 1 6 0 0 2 0 5 0 0 0 0 0 0 CONSTANT (OR FIRST 5 CHS OF CONST) 31406 1 28 0 0 2 0 5 0 0 0 0 0 1 ANNOTATION (FROM P/T) OR NEXT 5 31500 TABLE 315 315 1 EDIT ALL BUT TRIAL DATA 31502 1 9 0 0 0 0 5 0 0 4 0 0 0 REF---VALUES 31504 1 10 0 0 0 0 5 0 0 4 1 0 1 LTE 31600 CONST 316 316 0 CHECKING CONST FOR INSTRUCTIONS 31602 (D)06e11; 'LITERAL' SWITCH Q3 31603 08e19; 'REF/ITEM' SW Q2 31604 00e11; 'DISC/MOD' SWITCH Q1 31605 09e11; 31606 0t122; ACTION 10 31607 0+322; 31608 0£000; 31609 11t11; 31610 12000; 31611 13t91; 31700 CONST 317 317 0 CHECKING CONSTANTS FOR INSTRUCTIONS 31702 (D)1te11; ACTIONS 20-26 31703 1+000; 2728 31704 1:e11; 29 31705 21422; 30-33 31706 22e11; 31707 23522; 31708 25e11; 31709 26622; 31710 27e22; 31711 295e2; 31712 005e2; ACTIONS 42, 43 31713 2ee39; 42, 43 FIRST C-LINE 31714 00e:1; 43 SECOND LINE 31715 00e41; 44 31716 2++32; 31717 2:531; ACTIONS 46-49 31718 3153t; 46-49 C-LINES 31719 00114; ACTIONS 50-53 31720 35e1e; 31721 00e43; ACTION 54 31722 36991; 31723 00e13; 31724 37719; 31725 00e91; 31726 38e11; 31727 39117; 57 31728 3t112; 31729 3e11:; 59 31730 00e14; C-LINE 31731 3:e22; 6061 31732 3.822; 31733 40e11; 31734 41819; 31735 00822; 31736 43e22; 66.67 31737 45000; 6869 31738 4+e42; 70-76 31739 4.:+2; 77-78 31740 00e12; C-LINE 31741 4£e42; 79 31742 50e+2; 80 31743 00e92; C-LINE 31744 52e42; 81-82 31745 53+62; 83 31746 54e.2; 84 31747 00e11; 84 C-LINE 31748 55e6t; 85 31749 00e.1; 31750 56162; 86 31751 57e1e; 31752 00e.1; C-LINE 31753 59000; 31754 5t22:; ACTION 90 31755 00222; 31756 5:e16; ACTIONS 91-93 31757 5.915; 94 31758 60e25; 31759 61e95; ACTION 97 31760 00e62; 31761 63e26; 9899 31762 83e91; 31763 00e11; 31764 84e32; 132 31765 8653t; 133-4 31766 00e62; C-LINE 31767 8e000; 31768 8£e91; 140-143 31769 90000; 144 31770 94e91; ACTIONS 145-148 31771 00e11; CONTINUATION LINES 31772 95000; 31773 96+1£; 31774 00e.1; 31775 97e22; 31776 98e4t; 31777 00e42; 31778 99e22; ACTION 153 31779 9te12; ACTION 153-154 31780 9ee22; 31781 9+e31; 31782 9:e1e; 31783 00e43; C-LINE 31784 9.511; 31785 ££000; 31786 00e19; CONST FOR ACTION 55=2 C-LINES 31787 00e:9; 2ND C LINE RT 22 ACTION 43 31788 00e11; =1 C-LINE 31789 (R)18:2496; FOR SEQUENCE CHANGES 31790 (R)18:0; 31791 (R)93:0; 31792 (R)14:0; 31793 (D)0; ZERO IF RT9 PRINTER 31794 00e:1; 43 ACTIONS 31800 CONST 318 318 0 MISC 31802 (D)2; 31803 10000; BIT 17 31804 £££; Q1-3 31805 70; BITS 5-7 31806 7; BITS 1-3 31807 8; BIT 4 31808 80; BIT 8 31809 £00; 31810 4; BIT3 31811 0; FIRST RECORD INDICATOR 31812 0; ACC.RECORD LENGTH 31900 CONST 319 319 1 ALPHA CONSTANTS 31902 (A)TABLE; 31904 CONST; 31906 PROCR; 31908 * ; 31910 (D)7.0000007.; BLOCK END WORD 31912 (A)NOTES; 31914 END ; 31916 DUMPS; 31918 FILES; 31920 (D)££+00003££; BITS 1-10 AND 31-40 31922 0; EVEN=WL FOR EDIT SWITCH, ODD=C/FWD HIGHE 31924 (A)SHEET; 31926 (D)5:5:5:5:5:; '?????' 31928 (A)VALUE; 31930 (D)6£6£6£6£6£; 31932 (A)INDEX; 31934 £££££; 31936 2; 31938 CHAIN; 31940 ????R; 31942 ????I; 31944 ????*; 31946 (A)TRAMD; 31948 (B20)16(D)0(C)1:28; BULK COPY 31950 (A)FINIS; 32000 CONST 320 320 1 CONVERT TABLES 32002 (D)1; BIN+DEC 32004 16; 32006 256; 32008 4096; 32010 65536; 32012 1048576; 32014 16777216; 32016 268435456; 32018 4294967296; 32020 ££££££££££; 32022 1; DEC+BIN 32024 t; 32026 64; 32028 3.8; 32030 2710; 32032 186t0; 32034 £4240; 32036 989680; 32038 5£5.100; 32040 3e9t+t00; 32042 0; (A)WL 32044 3£; BITS 1-6 32046 (A)CHAPT; 32048 PREND; 32100 PROCR 321 321 RIGHT ALIGN A WORD 32101 NOTES RADIX PLACED IN B 32102 81 321 2 0 0 0 321 32103 10 0 0 0 0 32104 5 12 88 1 0 0 32108>32105 1 12 88 1 0 0 32106 32 0 0 0 2 LEAVE A CLEAR 32107 5 12 88 1 0 0 32108 75 321 5 0 0 0 321 AND PUT WORD 32109 12 88 1 0 0 32110 82 321 2 0 0 0 321 IN 12/88' 32200 PROCR 322 322 END ROUTINE 32201 NOTES RADIX 29915> 29912> 29909> 18523> 18520>32202 60 0 0 0 0 32203 10 0 0 0 1 32204 4 92 3 0 0 0 STEP PROCR 32205 62 0 0 0 0 32206 319 22 0 0 0 319 DIRECTIVE FOR LAST BLOCK EDITED 32207 12 0 0 0 3 32208 71 322 11 0 0 0 322 gWASN'T A CONSTANT 32209 10 0 0 0 1 32210 5 29 6 0 0 0 32208>32211 80 288 2 0 0 0 288 gO/P FINAL DATA BLOCK 32212 0 92 3 0 0 0 32213 30 0 0 0 2 32214 5 12 88 0 0 0 32215 52 29 4 0 0 0 32216 C 306 6 0 0 0 306 32229>32217 9 4 1 0 0 32218 30 0 0 0 4- 32219 30 0 0 0 4 32220 2 319 14 1 0 0 319 32221 70 322 30 0 0 0 322 g END WITHOUT TD 32222 9 4 1 0 0 32223 2 319 46 1 0 0 319 'TRAMD' 32224 70 322 32 0 0 0 322 32225 10 0 0 0 5£5£5£5£5£ 5 SQUARES 32226 3 27 6 0 0 0 'PT OMMITTED' 32227 5 29 12 1 0 0 32228 80 301 2 0 0 0 301 g READ PT 32229 76 322 17 0 0 0 322 g TEST NEXT BLOCK 32221>32230 319 50 1 0 0 319 'FINIS' 32231 5 9 4 1 0 0 32224>32232 319 14 1 0 0 319 32233 5 29 6 1 0 0 'END' 32234 80 288 2 0 0 0 288 g WRITE INTERCODE END SIGN 32235 80 325 2 0 0 0 325 32236 90 0 0 1 1 32237 C 0 0 0 100 32238 90 0 0 2 0 32239 C 0 0 0 200 32268>32240 96 0 0 1 0 32241 80 244 2 0 0 0 244 g TO DEC 32242 62 0 0 0 0 32243 32 0 0 0 1- DIVIDE BY 10 32244 92 0 0 3 0 TENS DIGIT 32245 32 0 0 0 1 32246 5 244 2 0 0 0 244 WL 32247 10 0 0 0 1 32248 124 244 2 0 1 0 244 32249 31 0 0 0 0 /////BIT PATTERN OF UNITS DIGIT 32250 3 244 2 0 0 0 244 32251 33 0 0 0 30- REL TO BIT 10 OF 8 32252 36 12 72 0 3 0 12/72-81= SECTION BIT PATTERNS 32253 70 322 68 0 0 0 322 g NOT TX AREA 32254 96 0 0 3 0 32255 35 0 0 0 0 CLEAR B 32256 33 0 0 0 1- HALVE 32257 92 0 0 3 0 32258 75 322 61 0 0 0 322 g WAS ODD 32259 34 244 2 0 0 0 244 32260 76 322 63 0 0 0 322 32258>32261 34 244 2 0 0 0 244 32262 33 0 0 0 10 32260>32263 36 12 100 0 3 0 12/100-104='TX AREA USED' INDS 32264 71 322 68 0 0 0 322 g NOT PSEUDEO-TX AREA 32265 96 0 0 1 0 32266 5 92 34 0 2 0 STORE SECTION NUMBER 32267 94 0 0 2 1 32264> 32253>32268 94 322 40 0 1 1 322 > NEXT SECTION 32300 PROCR 323 323 CALC CHAPS INITIALLY 32302 10 0 0 0 £££00 32303 3 23 47 0 0 0 (TO PRINT HEADING) 32304 124 92 0 0 0 0 32305 4 92 9 0 0 0 'LAST PROCR' IN FINAL CHAP 32306 91 12 12 0 3 0 32313>32307 92 10 0 3 0 32308 30 0 0 0 9 32309 30 0 0 0 9- ISOLATE Q1-CORR CHAP 32310 2 92 29 0 0 0 (ZERO INITIALLY) 32311 73 323 13 0 0 0 323 32312 4 92 29 0 0 0 UPDATE 32311>32313 94 323 7 0 3 1 323 32314 10 0 0 0 1 32315 4 92 29 0 0 0 FORM CHAPS INITIALLY 32316 92 9 0 0 0 32317 5 92 8 0 0 0 STORE SC CTR 32318 92 29 0 0 0 32319 5 92 9 0 0 0 SPEC CHAP - 'UNCORR CHAP 0' EQUIVALENT 32400 PROCR 324 324 READ/COPY TRIAL DATA MODS 32401 NOTES RADIX 1 32402 80 289 2 0 0 0 289 32403 80 289 2 0 0 0 289 g WRITE 2 BLANKS 32404 319 30 1 0 0 319 32405 5 8 4 1 0 0 5 ALIGN MARKS 32406 10 0 0 0 6 32407 5 8 10 0 0 0 32408 80 289 2 0 0 0 289 g WRITE ALIGN BLOCK FOR PASS 3 32409 319 32 1 0 0 319 'INDEX' 32410 5 8 4 1 0 0 32411 80 289 2 0 0 0 289 g WRITE 32412 90 0 0 1 0 32413 C 0 0 0 1010 32414 90 0 0 2 0 32415 C 0 0 0 48 32424>32416 93 0 0 1 0 32417 5 8 4 2 2 0 32418 94 324 24 0 2 2 324 32419 319 10 1 0 0 319 BEW 32420 5 8 52 1 0 0 32421 80 290 2 0 0 0 290 g WRITE 32422 90 0 0 2 0 32423 C 0 0 0 48 32418>32424 94 324 16 0 1 1 324 32425 80 290 2 0 0 0 290 g LAST BLOCK 32426 80 289 2 0 0 0 289 32427 80 289 2 0 0 0 289 g TWO BLANKS 32435>32428 0 9 4 1 0 0 32429 2 319 50 1 0 0 319 'FINIS' 32430 70 324 36 0 0 0 324 32431 55 9 4 1 0 50 32432 C 8 4 1 0 0 32433 80 289 2 0 0 0 289 g WRITE 32434 80 301 2 0 0 0 301 g READ 32435 76 324 28 0 0 0 324 32430>32436 27 4 0 0 0 COMPILER ? 32437 70 324 41 0 0 0 324 g NORMAL 32438 46 A2 10 0 0 0 (TO START OF INTERCODE) 32439 C 0 0 0 2 32440 76 324 43 0 0 0 324 32437>32441 45 A2 0 0 0 0 32442 45 A6 0 0 0 1 32440>32443 0 12 12 1 0 0 COPY DATA FOR PASS 2 PREP STAGE 32444 5 94 0 1 0 0 32445 0 92 30 0 0 0 IND OF AMEND RUN 32446 70 152 2 0 0 0 152 gNO, CALL PASS 2 32447 27 4 0 0 0 32448 70 324 52 0 0 0 324 gNORMAL 32449 27 2 0 0 0 32450 70 324 74 0 0 0 324 32451 76 324 58 0 0 0 324 32448>32452 86 786 2 0 0 0 786 32453 70 324 74 0 0 0 324 gNO TRIAL DATA 32454 5 289 2 0 0 0 289 WL 32455 47 A1 10 0 0 0 RUN TO START OF THIS PROGS MACHINE CODE 32456 C 289 2 0 0 0 289 32470>32457 80 291 2 0 0 0 291 gREAD A1 32451>32458 7 4 1 0 0 TESTS FOR CLOSING A1 32459 2 320 48 1 0 0 320 'PREND' 32460 70 324 74 0 0 0 324 gYES 32461 1 320 48 1 0 0 320 32462 2 319 18 1 0 0 319 'FILES' 32463 70 324 71 0 0 0 324 32464 1 319 18 1 0 0 319 32465 2 320 46 1 0 0 320 'CHAPT' 32466 70 324 71 0 0 0 324 gYES 32467 1 320 46 1 0 0 320 32468 2 319 50 1 0 0 319 'FINIS' 32469 70 324 74 0 0 0 324 gYES 32470 76 324 57 0 0 0 324 gREAD/IGNORE 32466> 32463>32471 10 0 0 0 1 32472 5 27 3 0 0 0 32473 76 152 2 0 0 0 152 gCALL PASS 2,LEAVE A1 OPEN 32469> 32460> 32453> 32450>32474 5 27 3 0 0 0 32475 27 4 0 0 0 COMPILER CALLED TRANSLATOR? 32476 70 324 79 0 0 0 324 gNO 32477 45 A1 0 0 0 1 32478 76 152 2 0 0 0 152 gCALL PASS 2 32476>32479 41 A1 0 0 0 1 32480 76 152 2 0 0 0 152 gCALL PASS 2 32500 PROCR 325 325 32502 81 325 2 0 0 0 325 32503 325 2 0 0 0 325 32504 5 288 2 0 0 0 288 32505 76 288 24 0 0 0 288 32600 PROCR 326 326 UNPACK SECTION 9 SUBROUTINE 32601 NOTES RADIX 32602 81 326 2 0 0 0 326 32603 124 999 0 1 2 0 (FORMED) 32604 128 4 0 3 0 32605 82 326 2 0 0 0 326 32606 9 0 0 0 0 DUMMY FOR PARAMETER 32607 128 4 0 2 0 32700 PROCR 327 327 START OF PASS 2 32701 NOTES RADIX DEAL WITH SECTIONS USED ONLY FOR GP OUTPUT 36935> 36937>32702 152 152 4 0 0 0 152 CALL/ENTER PASS 3 32703 C 553 4 0 0 0 553 32704 999 16 1 0 0 COPY SEC 7 PARAS-PTS WL'S 32705 5 999 30 1 0 0 32706 54 5 0 0 0 50 32707 52 5 2 0 0 0 32708 C 342 36 0 0 0 342 EDIT 'INDEX' LINE 32800 PROCR 328 328 CALC LENGTHS OF SWITCH PROCR IN EACH CORRECTED CHAPTER 32801 NOTES RADIX AND MOVE THE SC BACK LIST 32802 54 72 3 0 0 14 32803 90 0 0 19 0 32804 C 0 0 0 10 32805 90 0 0 20 0 32806 C 0 0 0 10 32807 10 0 0 0 1 32808 5 61 4 0 0 0 CTR INCREMENT 32809 95 1 0 0 0 NO OF SWITCHES 32810 70 328 16 0 0 0 328 gNONE 32811 5 61 1 0 0 0 32812 10 0 0 0 t 32813 5 61 3 0 0 0 BIT SHIFT CONTROL 32814 124 95 0 0 2 0 32815 80 329 2 0 0 0 329 gPROCESS 32810>32816 10 0 0 0 8 32817 5 61 3 0 0 0 BIT SHIFT CONTROL 32818 98 1 0 0 0 NO OF ITEM+ 32819 70 328 23 0 0 0 328 gNONE 32820 5 61 1 0 0 0 32821 124 98 0 0 2 0 32822 80 329 2 0 0 0 329 gPROCESS 32819>32823 91 94 0 0 3 0 UNCORR CHAP CTR 32828>32824 10 0 0 0 1 32825 32 0 0 0 10- 32826 36 72 3 0 3 0 32827 4 72 3 0 3 0 ROUND UP CTRS 32828 94 328 24 0 3 1 328 32829 71 1 0 0 0 CTR OF INDIRECT MR'S 32830 70 328 36 0 0 0 328 gNONE 32831 5 61 1 0 0 0 32832 10 0 0 0 2 32833 5 61 4 0 0 0 CTR INCREMENT 32834 124 71 0 0 2 0 32835 80 329 2 0 0 0 329 gPROCESS 32830>32836 10 0 0 0 2 SEQ CHANGE LIST 32837 4 92 8 0 0 0 32838 1 545 74 0 0 0 545 ABS ADDRESS 18:2496 32839 2 92 8 0 0 0 32840 3 344 2 0 0 0 344 QTY TO COPY 32841 70 328 46 0 0 0 328 gNONE 32842 30 0 0 0 5 32843 1 92 8 0 0 0 START 32844 124 544 17 1 2 0 544 ABS ADDRESS 18/0 32845 128 0 1 1 0 32841>32846 544 17 0 0 0 544 32847 1 344 2 0 0 0 344 QTTY 32848 5 92 8 0 0 0 NEW LIST END 32849 27 4 0 0 0 COMPILER? 32850 70 330 2 0 0 0 330 gNO 32851 76 330 3 0 0 0 330 32900 PROCR 329 329 PROCESS SW/ITEM+/INDIRECT MR LISTS 32901 NOTES 32902 81 329 2 0 0 0 329 32903 3 61 0 0 0 0 32904 4 61 1 0 0 0 32905 91 61 0 0 1 0 32914>32906 2 0 1 0 32907 30 0 0 0 4- 32908 5 61 2 0 0 0 UNCORR CHAP 32909 35 0 0 0 1 32910 124 61 2 0 1 0 32911 36 92 9 0 0 0 32912 32 0 0 0 4 32913 37 2 0 1 0 REPLACE BY CORR CHAP 32914 94 329 6 0 1 1 329 >NEXT DETAIL 32915 10 0 0 0 0 32916 5 61 2 0 0 0 32917 91 94 0 0 2 0 UNCORR CHAP CTR 32934>32918 10 0 0 0 1 32919 4 61 2 0 0 0 32920 91 61 0 0 1 0 32933>32921 2 0 1 0 32922 30 0 0 0 4- 32923 2 61 2 0 0 0 32924 71 329 33 0 0 0 329 gNOT IN THIS CORR CHAP 32925 124 61 2 0 1 0 32926 72 2 0 0 0 CTR WITHIN SWITCH PROCR 32927 124 61 3 0 1 0 32928 31 0 0 0 0 /////AS NEEDED 32929 4 2 0 1 0 32930 61 4 0 0 0 INCREMENT 32931 124 61 2 0 1 0 32932 4 72 2 0 0 0 STEP CTR 32924>32933 94 329 21 0 1 1 329 >NEXT DETAIL 32934 94 329 18 0 2 1 329 >NEXT CORR CHAP 32935 82 329 2 0 0 0 329 33000 PROCR 330 330 OPEN FILES CLEAR W/LS 33001 NOTES RADIX PREP STAGE 32850>33002 40 A2 0 0 0 1 *****DON'T MOVE***** 32851>33003 0 27 9 0 0 0 33004 71 330 13 0 0 0 330 gNOT PRINT 33005 27 8 0 0 0 PRINTER TYPE 33006 11 0 0 0 t 33007 30 0 0 0 5 33008 1 999 7 0 0 0 ROUTE 33009 125 4096 1 1 0 33010 124 999 0 0 3 0 33011 123 160 0 2 0 >OPEN PRINTER OR MT A9 33012 62 0 0 0 0 33004>33013 54 61 0 0 0 120 33014 54 94 0 0 0 100 33015 54 66 0 0 0 34 66+49 33016 10 0 0 0 1 33017 4 92 0 0 0 0 NO OF CHAPS 33018 101 998 1 3 0 33019 1 92 0 0 0 0 (CHAPS CODED)+1 33020 3 61 5 0 0 0 LONG CONSTS PROCR 33021 11 0 0 0 1 33022 3 61 6 0 0 0 SHORT CONSTS PROCR 33023 11 0 0 0 1 33024 5 61 7 0 0 0 TSL PROCR 33025 10 0 0 0 800000 33026 1 27 9 0 0 0 33027 91 0 0 3 0 SET FOR REENTRY 33100 PROCR 331 331 I/P 1ST BLOCK, UNPACK, PRINT 33101 NOTES RADIX B PREP STAGE 33108>33102 80 539 2 0 0 0 539 gREAD 33103 8 6 1 0 0 33104 2 343 4 1 0 0 343 'PROGM' 33105 70 331 12 0 0 0 331 gOK 33106 8 4 1 0 0 33107 12 0 0 0 5659650000 ' FIN' 33108 71 331 2 0 0 0 331 gKEEP READING 33109 150 0 0 0 4 33110 C 331 11 0 0 0 331 gUNLOAD 33110>33111 151 0 0 0 0 33105>33112 50 8 4 0 0 0 33113 C 341 2 0 0 0 341 33114 52 8 2 0 0 0 33115 C 341 2 0 0 0 341 33116 66 4 1 0 0 SUITE NO 33117 30 0 0 0 2 33118 1 66 6 2 0 0 JOB NO 33119 5 61 112 0 0 0 PROG ID 33120 00 66 8 1 0 0 33121 5 72 0 1 0 0 ALPHA SERIAL NUMBER 33122 27 9 0 0 0 33123 70 331 48 0 0 0 331 gPRINTING 33124 27 4 0 0 0 33125 71 331 46 0 0 0 331 gDON'T WRITE HDG EITHER 33126 86 787 2 0 0 0 787 33127 71 331 34 0 0 0 331 gDON'T OPEN A9 33128 10 0 0 0 1200000 33129 34 343 14 1 0 0 343 33130 1 999 7 0 0 0 33131 125 4096 1 1 0 33132 124 999 0 0 3 0 33133 123 160 0 2 0 gOPEN A9 O/P MT 33127>33134 62 0 0 0 0 33135 10 0 0 0 6769596573 'PRINT' 33136 5 10 4 1 0 0 33137 10 0 0 0 8000 33138 5 10 6 2 0 0 33139 155 0 0 0 0 33140 5 10 8 1 0 0 33141 61 112 0 0 0 OBJECT PROG ID 33142 5 10 10 2 0 0 33143 544 2 1 0 0 544 33144 5 10 12 1 0 0 33145 80 541 2 0 0 0 541 gWRITE A9 HEADING BLOCK 33125>33146 90 0 0 6 0 PREPARE FOR 6 BLKS 33147 C 0 0 0 300 33123>33148 80 340 2 0 0 0 340 gWRITE/PRINT 'PROGM' 33149 27 4 0 0 0 COMPILER? 33150 71 331 53 0 0 0 331 gYES 33151 40 A6 0 0 0 0 33152 76 331 56 0 0 0 331 33150>33153 48 A6 0 0 0 3 BACK 0 I/PgO/P 33154 C 999 0 0 0 0 33155 76 331 64 0 0 0 331 gDON'T WRITE 'INDEX' 33152>33156 52 9 4 0 0 0 EDIT FIRST HEADING 33157 C 341 12 0 0 0 341 BLOCK 33158 80 514 2 0 0 0 514 OP 33159 543 20 0 0 0 543 '£££££' 33160 5 9 4 2 0 0 33161 544 2 1 0 0 544 BEW 33162 5 9 6 1 0 0 33163 80 514 2 0 0 0 514 gDUMMY 'INDEX' DATA 33155>33164 52 9 4 0 0 0 PROG & SERIAL FOR PASS 3 33165 C 341 20 0 0 0 341 33166 5 9 16 1 0 0 33167 80 514 2 0 0 0 514 gSHORT RUBBISH BLOCK 33168 80 539 2 0 0 0 539 I/P 33169 50 8 4 0 0 0 33170 C 341 2 0 0 0 341 33171 66 4 1 0 0 PROCR OF ENTRY 33172 80 537 2 0 0 0 537 gCONVERT 33173 5 72 2 0 0 0 33174 52 8 2 0 0 0 33175 C 341 2 0 0 0 341 33176 80 340 2 0 0 0 340 PRINT 'ENTRY' 33177 52 9 4 0 0 0 EDIT SECOND BLOCK 33178 C 341 28 0 0 0 341 33179 80 514 2 0 0 0 514 gO/P 33200 PROCR 332 332 DEAL WITH FILE IDS 33201 NOTES RADIX B 33202 17 92 7 0 0 10 SPACE OCCUPIED BY CONVERT TABLES 33203 101 204 1 1 0 FOR ALLOCATOR 33204 5 61 100 0 0 0 SP CHAP SPACE CTR 33205 0 91 1 0 0 0 2R 33206 31 0 0 0 1- 33207 1 92 29 0 0 0 EXTRA CHAP NO 33208 1 92 29 0 0 0 33209 3 61 40 0 0 0 LAST ROUTE PARAMETER 33210 5 61 39 0 0 0 PARA CTR 33211 0 91 1 0 0 0 2R 33212 3 91 2 0 0 0 33213 5 91 3 0 0 0 33214 91 91 0 0 2 0 SCAN FILE LIST 33445>33215 90 0 0 1 0 O/P M.R. 33216 C 0 0 0 48 33406> 33441>33217 80 539 2 0 0 0 539 I/P 33218 8 6 1 0 0 33219 2 343 8 1 0 0 343 'CHAPS' 33220 70 335 2 0 0 0 335 gYES 33221 50 8 4 0 0 0 33222 C 341 52 0 0 0 341 UNPACK FILE IDENTITIES 33223 8 46 1 0 0 33224 2 542 28 1 0 0 542 '?????' 33225 3 344 2 1 0 0 344 WL 33226 70 334 2 0 0 0 334 gFILE IGNORED 33227 66 4 0 0 0 ROUTE TYPE 33228 12 0 0 0 19 33229 70 332 54 0 0 0 332 gROUTE TYPE 19 33230 66 6 0 0 0 CHAP NO 33231 80 537 2 0 0 0 537 CONVERT TO BIN 33232 2 92 0 0 0 0 CHAPS +1 33233 73 333 2 0 0 0 333 gOK 33234 542 28 1 0 0 542 ?????' 33235 5 8 46 1 0 0 33236 5 344 2 1 0 0 344 33237 91 3 0 0 0 2(R+T)=LIST LENGTH 33238 99 0 0 2 0 -R2 MODIFIER 33239 30 0 0 0 5 FORM LENGTH OF REMAINDER OF LIST Q6-10 33240 1 343 2 0 0 0 343 ADDRESS 91:6 33241 98 0 0 2 0 FORM ADDRESS OF FIRST TO OPY 33242 124 999 24 0 0 0 (R2) 33243 128 91 4 0 0 0 COPY UP TO DELETE A FILE 33244 12 0 0 0 2 33245 4 91 1 0 0 0 REDUCE CTRS FOR DELETED FILE 33246 4 91 2 0 0 0 33247 4 91 3 0 0 0 33248 124 999 22 0 3 0 33249 107 5 0 0 0 REDUCE R2 END VALUE 33250 11 0 0 0 1 33251 4 61 39 0 0 0 (REDUCE BY 1) 33252 4 61 40 0 0 0 33253 76 334 2 0 0 0 334 gFILE IGNORED 33229>33254 66 6 0 0 0 CHAPTER PAIR RT19 33255 30 0 0 0 2 Q2->Q4 33256 35 0 0 0 1000 33257 124 91 3 0 1 0 33258 37 91 4 0 0 0 STORE TX AREA CHAP WITH GP DETAILS 33259 66 10 0 0 0 SPECIAL LENGTH 33260 80 537 2 0 0 0 537 gBIN 33261 35 0 0 0 111 33262 124 91 3 0 1 0 33263 37 91 4 0 0 0 STORE HALF-LENGTH AS GP LENGTH 33264 66 8 0 0 0 GP HALF-LENGTH 33265 80 537 2 0 0 0 537 gBIN 33266 76 333 9 0 0 0 333 33300 PROCR 333 333 FILE IDS 33301 NOTES RADIX B 33233>33302 66 4 0 0 0 ROUTE TYPE 33303 12 0 0 0 3 33304 70 333 11 0 0 0 333 33305 12 0 0 0 1 33306 71 334 2 0 0 0 334 gNOT 4 33307 0 66 8 0 0 0 ANNEX LENGTH 33308 80 537 2 0 0 0 537 gCONVERT 33266>33309 33 0 0 0 6- DIVIDE BY 64 33310 5 61 8 0 0 0 MULTIPLES FOR Q10 FN WORD 33304>33311 61 39 0 0 0 PARA CTR 33312 11 0 0 0 1 33313 124 91 3 0 1 0 33314 5 91 5 0 0 0 TX AREA ENTRY 33315 35 0 0 0 1000 33316 66 8 0 0 0 HALF LENGTH 33317 80 537 2 0 0 0 537 gBIN 33318 35 0 0 0 111 33319 11 0 0 0 2 33320 37 91 4 1 2 0 33321 35 0 0 0 10000 33322 91 3 0 0 0 2(R+T) 33323 2 91 2 0 0 0 33324 30 0 0 0 4 CTR WITHIN GPTXAREAS 33325 37 91 4 1 2 0 33326 10 0 0 0 0 33327 124 91 3 0 1 0 33328 2 91 4 0 0 0 33329 124 91 3 0 1 0 33330 5 91 4 0 0 0 SET GP TX AREA SIGN B/T 33331 10 0 0 0 2 33332 4 91 3 0 0 0 STEP(ROUTES +TX AREAS) CTR 33333 4 61 39 0 0 0 STEP PARA CTR 33400 PROCR 334 334 FILE IDS 33401 NOTES RADIX 33306> 33253> 33226>33402 52 8 2 0 0 0 33403 C 341 52 0 0 0 341 33404 80 340 2 0 0 0 340 PRINT FILES 33405 0 344 2 1 0 0 344 33406 70 332 17 0 0 0 332 gFILE IGNORED 33407 94 0 0 2 2 33408 90 0 0 3 0 33409 C 0 0 0 6 33413>33410 66 4 1 3 0 33411 80 537 2 0 0 0 537 CONVERT 33412 5 66 4 1 3 0 33413 94 334 10 0 3 2 334 33414 35 0 0 0 1000 33415 66 6 1 0 0 33416 30 0 0 0 3 33417 37 91 2 1 2 0 CHAP NO (BIN) 33418 66 4 0 0 0 33419 12 0 0 0 13 33420 71 334 28 0 0 0 334 gNOT RT 19 33421 66 6 0 0 0 PAIR OF CHAPS 33422 80 538 2 0 0 0 538 gDEC 33423 62 0 0 0 0 33424 35 0 0 0 1000 33425 30 0 0 0 3 33426 37 91 2 1 2 0 STORE Q1 OF DECIMAL PAIR 33427 76 334 33 0 0 0 334 33420>33428 66 8 1 0 0 ANNEX (BIN) IN WORDS 33429 11 0 0 0 2 33430 4 91 2 1 2 0 HALF LENGTH 33431 3 66 8 1 0 0 SET ANNEX LENGTH 33432 4 66 8 1 0 0 33427>33433 0 66 4 1 0 0 ROUTE TYPE 33434 30 0 0 0 1 33435 5 66 4 1 0 0 33436 0 66 2 1 0 0 33437 30 0 0 0 6- RT. ALIGN THE FILE I.D. 33438 5 66 2 1 0 0 33439 52 9 4 0 1 0 33440 C 341 64 0 0 0 341 33441 94 332 17 0 1 12 332 O/P CTR 33442 544 2 1 0 0 544 B.E.WORD 33443 5 9 52 1 0 0 33444 80 514 2 0 0 0 514 33445 76 332 15 0 0 0 332 33500 PROCR 335 335 O/P REMAINING FILE IDS, CHAP START POINTS 33501 NOTES RADIX B PREP 33220>33502 96 0 0 1 0 33503 70 335 7 0 0 0 335 33504 544 2 1 0 0 544 BE WORD 33505 5 9 4 1 1 0 33506 80 514 2 0 0 0 514 O/P 33503>33507 50 8 4 0 0 0 33508 C 342 2 0 0 0 342 UNPACK 'CHAPS' 33509 54 70 0 1 0 100 CLEAR FOR SECTION DETAILS 33510 80 512 2 0 0 0 512 gBLANK LINE 33511 52 8 2 0 0 0 33512 C 342 2 0 0 0 342 33513 80 340 2 0 0 0 340 PRINT 'CHAPS' 33514 80 539 2 0 0 0 539 gREAD MT 33515 8 6 1 0 0 33516 12 0 0 0 7273666955 'STORE' 33517 71 337 2 0 0 0 337 gNO 33518 50 8 8 0 0 0 33519 C 342 8 0 0 0 342 66/6 ET SEQ 33520 10 0 0 0 7273666955 'STORE' 33521 5 66 2 1 0 0 33522 5 66 4 1 0 0 33523 52 8 4 0 0 0 33524 C 342 4 0 0 0 342 33525 5 8 8 1 0 0 CLEAR 33600 PROCR 336 336 DEAL WITH 'STORE' DATA 33602 91 92 28 0 1 0 CHAPS INITIALLY 33603 92 0 0 1 0 (CLEAR MODIFIER) 33613>33604 66 6 0 1 0 33605 12 0 0 0 1 33606 70 336 13 0 0 0 336 gOP,FIRST STORE 33607 12 0 0 0 1 33608 71 336 16 0 0 0 336 gREJECT 33609 10 0 0 0 20 BIT 6 33610 32 0 0 0 10- 33611 10 0 0 0 20 33612 37 92 10 0 1 0 SET IND FOR SECOND STORE 33606>33613 94 336 4 0 1 1 336 33614 66 7 0 1 0 33615 70 336 18 0 0 0 336 gOK 33608>33616 542 28 1 0 0 542 '?????' 33617 5 8 46 1 0 0 33615>33618 80 340 2 0 0 0 340 gPRINT STORE 33619 80 539 2 0 0 0 539 gREAD 33700 PROCR 337 337 PRINT CHAPS I/P & TEST S/D 33701 NOTES RADIX B PREP STAGE 33517>33702 80 530 2 0 0 0 530 gPRINT'INDEX'EX SEC 5 33703 80 530 2 0 0 0 530 gPRINT BLANK LINE 33704 76 337 7 0 0 0 337 33812>33705 80 340 2 0 0 0 340 PRINT IGNORED SECTION 33927>33706 80 539 2 0 0 0 539 gREAD 33704>33707 8 12 1 0 0 33708 2 542 8 1 0 0 542 PROCR 33709 70 346 2 0 0 0 346 33710 1 542 8 1 0 0 542 33711 2 542 4 1 0 0 542 TABLE 33712 70 346 2 0 0 0 346 33713 1 542 4 1 0 0 542 33714 2 542 6 1 0 0 542 CONST 33715 70 346 2 0 0 0 346 33800 PROCR 338 338 SECTION DETAILS 33801 NOTES RADIX B PREP STAGE 33802 8 14 1 0 0 AMEND IND 33803 30 0 0 0 4 33804 5 8 2 1 0 0 33805 5 8 14 1 0 0 33806 50 8 2 0 0 0 33807 C 341 40 0 0 0 341 33808 52 8 2 0 0 0 33809 C 341 40 0 0 0 341 33810 8 46 1 0 0 33811 2 542 28 1 0 0 542 ????? 33812 70 337 5 0 0 0 337 gIGNORE THIS SECTION 33813 80 340 2 0 0 0 340 PRINT SECTIONS 33814 66 4 1 0 0 33815 80 537 2 0 0 0 537 CONVERT 33816 5 66 4 1 0 0 33817 66 8 1 0 0 33818 80 537 2 0 0 0 537 gCONVERT 33819 5 66 8 1 0 0 CHAP OF SECTION 33820 66 2 1 0 0 33821 80 537 2 0 0 0 537 CONVERT 33822 3 66 2 1 0 0 SECT NO 33823 92 0 0 1 0 33824 66 6 1 0 0 T.A. IND 33825 70 339 16 0 0 0 339 -NOT T.A. 33826 90 0 0 2 0 33827 C 0 0 0 4 33831>33828 92 34 0 2 0 CODER'S TRANSIT AREAS ONLY FOR GP O/P 33829 2 66 2 1 0 0 SECTION NUMBER 33830 70 339 16 0 0 0 339 gDON'T COUNT SECTION AS TRANSIT AREA 33831 94 338 28 0 2 1 338 33832 10 0 0 0 2 33833 4 91 3 0 0 0 TX AREA CTR 33834 4 66 4 1 0 0 INCREASE ANNEX LENGTH 33835 4 61 39 0 0 0 PARA COUNTER 33900 PROCR 339 339 SECT DETAILS 33901 NOTES RADIX B PREP STAGE 33902 0 66 4 1 0 0 LENGTH IN WORDS 33903 31 0 0 0 5 IN LOCNS IN Q2 33904 35 0 0 0 1 33905 124 66 8 0 0 0 UNCORRECTED CHAPTER 33906 36 92 9 0 0 0 CORRECTED CHAP OF TRANSIT AREA 33907 30 0 0 0 2 LENGTH Q7-10,CHAP Q6 33908 1 61 39 0 0 0 PARA CTR 33909 12 0 0 0 1 33910 30 0 0 0 3 PARAMETER IN Q4-5 33911 1 66 2 1 0 0 SECTION NUMBER Q1-3 33912 124 91 3 0 1 0 2(ROUTES+TX AREAS) 33913 5 91 2 1 0 0 33914 545 58 0 0 0 545 BIT 19 AND 20 BIT 20 FOR T.A. IN 33915 76 339 17 0 0 0 339 33830> 33825>33916 545 9 0 0 0 545 BIT 19 33915>33917 17 66 4 1 0 32 LENGTH X 2 AND SHIFT Q 33918 1 66 8 1 0 0 UNCORR CHAP NO 33919 5 70 0 0 1 0 SECT DETS 33920 92 66 8 0 2 0 UNCORR CHAP 33921 0 61 54 0 2 0 SPACE CTR 33922 124 66 2 0 0 0 SEC NO 33923 5 94 0 0 0 0 SET REL START 33924 0 66 4 0 0 0 33925 1 66 4 0 0 0 LENGTH (LOCNS) 33926 4 61 54 0 2 0 33927 76 337 6 0 0 0 337 gNEXT SECTION 34000 PROCR 340 340 34002 81 340 2 0 0 0 340 34003 55 8 0 1 0 52 34004 C 7 0 1 0 0 34005 35 0 0 0 1111 34006 37 7 2 0 0 0 34007 80 511 2 0 0 0 511 PRINT 34008 82 340 2 0 0 0 340 34100 TABLE 341 341 1 34101 NOTES 34102 66 0 0 0 2 0 5 0 0 0 0 0 0 AMEND IND 34104 66 2 0 0 2 0 5 0 11 0 0 0 0 PROGM/ENTRY 34106 66 4 0 0 1 0 5 5 1 2 0 0 0 SUITE/PROCR 34108 66 6 0 0 2 0 5 0 2 0 0 0 0 JOB/PRIORITY 34110 66 8 0 0 2 0 5 0 1 0 0 0 1 SERIAL/CODER 34112 343 12 0 0 2 0 5 0 0 0 0 0 0 ALIGN MARKS 34114 343 10 0 0 2 0 5 0 0 0 0 0 0 'INDEX' 34116 543 20 0 0 0 0 5 0 0 0 0 0 0 34118 343 15 0 0 0 0 1 3 4 0 0 0 0 '4' 34120 66 4 0 0 1 0 3 7 0 0 0 0 0 PROG SUITE 34122 66 6 0 0 2 0 2 3 0 0 0 0 0 PROG ID 34124 66 8 0 0 2 0 5 0 0 0 0 0 0 PROG SERIAL 34126 544 2 0 0 2 0 5 0 0 0 0 0 1 BEW 34128 92 5 0 0 0 0 5 0 0 4 0 0 0 FP IND 34130 92 4 0 0 0 0 5 0 0 4 0 0 0 MG 34132 66 6 0 0 2 0 5 0 0 0 0 0 0 PRIORITY 34134 92 0 0 0 0 0 5 0 0 4 0 0 0 CHAPS+1 34136 92 29 0 0 0 0 5 0 0 4 0 0 0 CHAPS INITIALLY 34138 544 2 0 0 2 0 5 0 0 0 0 0 1 BEW 34140 66 10 0 0 2 0 5 0 0 0 0 0 0 AMEND IND 34142 66 0 0 0 2 0 5 0 5 0 0 0 0 SERIAL/CODER 34144 66 2 0 0 1 0 5 5 4 4 0 0 0 SEC NO 34146 66 4 0 0 1 0 5 5 3 4 0 0 0 LENGTH 34148 66 6 0 0 1 0 5 5 0 4 0 0 0 TX AREA IND 34150 66 8 0 0 1 0 5 5 3 4 0 0 1 CHAP 34152 66 0 0 0 2 0 5 0 0 0 0 0 0 AMEND IND == FILES 34154 66 2 0 0 2 0 5 0 15 0 0 0 0 FILE ID 34156 66 4 0 0 1 0 5 5 1 4 0 0 0 ROUTE TYPE 34158 66 6 0 0 1 0 5 5 2 4 0 0 0 RETN PERIOD 34160 66 8 0 0 1 0 5 5 2 4 0 0 0 MBS 34162 66 10 0 0 1 0 5 5 0 4 0 0 1 ALT ROUTE 34164 66 2 0 0 2 0 5 0 0 0 0 0 0 FILE ID == FILES 34166 66 4 0 0 1 0 5 5 0 4 0 0 0 ROUTE TYPE 34168 66 6 0 0 1 0 5 5 0 4 0 0 0 RETN PERIOD 34170 66 8 0 0 1 0 5 5 0 4 0 0 0 MBS 34172 61 0 0 0 0 0 5 0 0 4 0 0 0 START LOCN 34174 66 10 0 0 1 0 5 5 0 4 0 0 1 ALT ROUTE 34200 TABLE 342 342 1 34202 66 0 0 0 2 0 5 0 0 0 0 0 0 AMEND IND 34204 66 2 0 0 2 0 5 0 1 0 0 0 0 'CHAPS' 34206 66 4 0 0 0 0 5 0 0 4 0 0 0 NUMBER OF CHAPS 34208 66 6 0 0 0 0 5 0 1 4 0 0 0 1 34210 66 7 0 0 0 0 5 0 1 5 0 0 0 2 34212 66 8 0 0 0 0 5 0 1 5 0 0 0 3 34214 66 9 0 0 0 0 5 0 1 5 0 0 0 4 34216 66 10 0 0 0 0 5 0 1 5 0 0 0 5 34218 66 11 0 0 0 0 5 0 1 5 0 0 0 6 34220 66 12 0 0 0 0 5 0 1 5 0 0 0 7 34222 66 13 0 0 0 0 5 0 1 5 0 0 0 8 34224 66 14 0 0 0 0 5 0 1 5 0 0 0 9 34226 66 15 0 0 0 0 5 0 1 5 0 0 0 10 34228 66 16 0 0 0 0 5 0 1 5 0 0 0 11 34230 66 17 0 0 0 0 5 0 1 5 0 0 0 12 34232 66 18 0 0 0 0 5 0 1 5 0 0 0 13 34234 66 19 0 0 0 0 5 0 1 5 0 0 1 14-TH START 34236 343 10 0 0 2 0 5 0 6 0 0 0 0 'INDEX' 34238 92 29 0 0 0 0 1 4 4 0 0 0 0 CHAPS INITIALLY 34240 92 10 0 0 0 0 1 4 5 1 0 0 0 CORRECTED CHAPTER NUMBERS 34242 92 11 0 0 0 0 1 4 5 1 0 0 0 34244 92 12 0 0 0 0 1 4 5 1 0 0 0 34246 92 13 0 0 0 0 1 4 5 1 0 0 0 34248 92 14 0 0 0 0 1 4 5 1 0 0 0 34250 92 15 0 0 0 0 1 4 5 1 0 0 0 34252 92 16 0 0 0 0 1 4 5 1 0 0 0 34254 92 17 0 0 0 0 1 4 5 1 0 0 0 34256 92 18 0 0 0 0 1 4 5 1 0 0 0 34258 92 19 0 0 0 0 1 4 5 1 0 0 0 34260 92 20 0 0 0 0 1 4 5 1 0 0 0 34262 92 21 0 0 0 0 1 4 5 1 0 0 0 34264 92 22 0 0 0 0 1 4 5 1 0 0 0 34266 92 23 0 0 0 0 1 4 5 1 0 0 1 LAST ENTRY 34300 CONST 343 343 1 FOR PASS 2 PREP STAGE 34302 (R)91:6; 34304 (A)PROGM; 34306 ENTRY; 34308 CHAPS; 34310 INDEX; 34312 (D)6£6£6£6£6£; 34314 0514908000; 08000 FILE A9 34316 (A); 34400 PROCR 344 344 DUMMIES FOR SEC 61 DESCRIPTION 34401 NOTES 34402 61 0 0 0 0 ACTION WL/ENTRY POINT 34403 61 1 0 0 0 NON-ARITH IND 34500 PROCR 345 345 34502 81 345 2 0 0 0 345 34503 0 345 2 0 0 0 345 34504 5 509 2 0 0 0 509 34505 76 509 8 0 0 0 509 34600 PROCR 346 346 FORM PARA CTR ETC 34601 NOTES RADIX B PREP STAGE 33715> 33712> 33709>34602 80 345 2 0 0 0 345 34603 80 363 2 0 0 0 363 gEDIT FIRST DIRECTIVE 34604 10 0 0 0 0 34605 5 545 99 0 0 0 545 34606 61 39 0 0 0 34607 11 0 0 0 1 FORM 34608 3 61 41 0 0 0 MOD GROUP PARAMETER 34609 11 0 0 0 4 34610 5 61 39 0 0 0 TOTAL NO OF PARAMETORS 34611 0 92 8 0 0 0 LIST END 34612 30 0 0 0 5 34613 1 544 17 0 0 0 544 ABS ADDRESS 18:0 34614 91 0 0 1 0 34615 544 16 0 0 0 544 ABS ADDRESS 18:2499 34616 5 61 118 0 0 0 LOCN CTR SC'S FWD 34617 544 4 1 0 0 544 0:144 34618 5 61 44 1 0 0 O/P MOD CTR 34619 10 0 0 0 1 34620 5 61 111 0 0 0 UNCORRECTED CHAP NO. 34621 5 91 0 0 0 0 34622 54 63 0 1 0 580 63+62+20 36819>34623 10 0 0 0 41 34624 5 61 26 1 0 0 TYPE 34625 5 61 28 1 0 0 SECTION NO. 34626 80 516 2 0 0 0 516 O/P TYPE S/R THIS CLEARS S67 INIT 34627 10 0 0 0 1 34628 5 61 42 1 0 0 34629 5 61 109 0 0 0 CLEAR STERLING CTR 34630 5 67 0 0 0 0 67/0 NOT CLEARED BY O/P TYPE S/R 34700 PROCR 347 347 O/P PARAS 34701 NOTES RADIX B CHAP START ROUTINE 34702 61 39 0 0 0 PARA CTR 34703 30 0 0 0 5 34704 5 61 0 1 0 0 34705 91 61 0 1 3 0 M/R 3 AT W/L 34709>34706 95 0 0 3 0 34707 5 67 2 0 0 0 34708 80 518 2 0 0 0 518 34709 94 347 6 0 3 1 347 34710 10 0 0 0 3 34711 4 61 5 0 0 0 LONG PROCR 34712 4 61 6 0 0 0 SHORT PROCR 34713 4 61 7 0 0 0 TSL PROCR 34714 10 0 0 0 0 34715 35 0 0 0 1 34716 124 61 111 0 0 0 UNCORRECTED CHAP NO 34717 36 92 9 0 0 0 CORRECTED CHAP NUMBER 34718 3 61 51 0 0 0 34719 1 61 51 0 0 0 34720 5 61 3 0 0 0 34721 61 5 0 0 0 34722 30 0 0 0 2 34723 1 61 3 0 0 0 34724 5 61 4 0 0 0 LN:2C 34725 10 0 0 0 .0000. 14:14 34726 5 61 12 1 0 0 LN CTR 34727 5 61 14 1 0 0 SN CTR 34728 544 18 1 0 0 544 SE th e t t e ee 34729 5 61 16 1 0 0 TSL CTR 34730 5 61 10 1 0 0 34731 80 518 2 0 0 0 518 O/P ZERO COMPARTMENTFOR LINK 34732 80 453 2 0 0 0 453 O/P 25/1/1 4096+24/0/3 0 34733 10 0 0 0 700 7 IN Q3 34734 5 67 1 0 0 0 SET'MR ENTRY' IND 34735 0 545 60 0 0 0 545 23/0/2 0 34736 80 359 2 0 0 0 359 gO/P 34737 80 518 2 0 0 0 518 O/P TWO ZERO COMPARTMENTS 34738 80 518 2 0 0 0 518 34739 546 15 0 0 0 546 26/0/1/6- 34740 80 498 2 0 0 0 498 gO/P INT SC 34800 PROCR 348 348 SECTION START ROUTINE 34801 NOTES RADIX B 36510> 36512>34802 62 0 0 0 0 34803 6 1 12 0 34804 2 542 8 1 0 0 542 PROCR 34805 71 348 9 0 0 0 348 34806 10 0 0 0 1 34807 5 61 42 0 0 0 34808 76 350 4 0 0 0 350 34805>34809 1 542 8 1 0 0 542 34810 2 542 2 1 0 0 542 'VALUE' 34811 70 351 24 0 0 0 351 gYES 34812 80 353 2 0 0 0 353 ROUND UP SPACE CTR 34813 14 2 12 0 CONST OR TABLE TYPE 34814 30 0 0 0 4- 34815 5 61 47 0 0 0 34816 10 0 0 0 2 34817 5 61 42 0 0 0 34818 6 1 12 0 34819 2 542 4 1 0 0 542 TABLE 34820 70 350 3 0 0 0 350 34900 PROCR 349 349 SECTION START ROUTINE 34901 NOTES RADIX B 35000 PROCR 350 350 SECTION START ROUTINE 35001 NOTES RADIX B 35002 10 0 0 0 1 'CONST' 34820>35003 11 0 0 0 1 TABLE 34808>35004 11 0 0 0 1 PROCR 35005 3 61 26 2 0 0 35006 84 352 2 0 0 0 352 35007 7 12 2 0 0 NEW PROCR NO 35100 PROCR 351 351 35101 NOTES RADIX B 35102 80 537 2 0 0 0 537 gCONVERT 35103 3 61 28 2 0 0 35104 3 61 10 0 0 0 CURRENT PROCR 35105 2 72 2 0 0 0 ENTRY PROCR 35106 71 351 9 0 0 0 351 gNO 35107 61 43 0 0 0 35108 5 27 5 0 0 0 ENTRY LOCN 35106>35109 0 61 43 0 0 0 35110 5 61 11 0 0 0 STORE PROCR START ADDRESS 35111 80 354 2 0 0 0 354 gSET'PRINT PROCEDURE'IND 35132>35112 80 516 2 0 0 0 516 O/P TYPE 35126>35113 10 0 0 0 80 TRACK 8 35114 5 61 46 0 0 0 HEAD OF FORM 35115 27 4 0 0 0 COMPILER? 35116 70 351 20 0 0 0 351 gNO 35117 5 545 99 0 0 0 545 (ALWAYS PRINT DIRECTIVE BLOX) 35118 23 46 0 0 0 35119 70 351 21 0 0 0 351 gPARTIAL. NO BLANK LINE 35116>35120 80 530 2 0 0 0 530 gSECOND PRINT SR 35119>35121 80 510 2 0 0 0 510 gPRINT 35122 80 360 2 0 0 0 360 BULK CLEAR SEC 7 35123 76 362 2 0 0 0 362 36218> 34811>35124 86 352 2 0 0 0 352 'VALUE' DIRECTIVE 35125 12 0 0 0 7 35126 70 351 13 0 0 0 351 g'VALUE' FOLLOWS 'VALUE' 35127 10 0 0 0 7 35128 3 61 26 2 0 0 35129 84 352 2 0 0 0 352 35130 5 61 28 1 0 0 CLEAR 'PROCR NUMBER' 35131 5 61 42 0 0 0 CLEAR SPACE CTR INCREMENT 35132 76 351 12 0 0 0 351 35200 PROCR 352 352 SWITCH A 35201 NOTES RADIX B 36205> 36228>35202 85 352 2 0 0 0 352 35203 C 370 2 0 0 0 370 INST 35204 C 475 2 0 0 0 475 TABLE 35205 C 454 2 0 0 0 454 CONST 35206 C 362 2 0 0 0 362 DUMMY 35207 C 362 2 0 0 0 362 ' ' 35208 C 362 2 0 0 0 362 ' ' 35209 C 480 2 0 0 0 480 VALUE 35300 PROCR 353 353 SUBROUTINE 1 35301 NOTES RADIX B ROUND OFF TO MULT OF 2 35302 81 353 2 0 0 0 353 35303 10 0 0 0 0 35304 34 544 6 0 0 0 544 35305 36 61 43 0 0 0 SPACE CTR 35306 70 353 11 0 0 0 353 35307 5 61 42 0 0 0 35308 5 67 0 1 0 0 35309 5 67 2 1 0 0 35310 80 518 2 0 0 0 518 gO/P ZERO LOCATION 35306>35311 82 353 2 0 0 0 353 35400 PROCR 354 354 EXTRACT 'PRINT' PROCEDURE'IND FROM ARRAY IN SEC 23 35402 81 354 2 0 0 0 354 35403 19 61 10 0 0 14 PROCR/20 35404 5 355 2 0 0 0 355 35405 32 0 0 0 9 35406 5 356 2 0 0 0 356 REMAINDER 35407 34 543 22 0 0 0 543 L e 35406 t 35411 t e t 35408 124 356 2 0 1 0 356 35409 33 0 0 0 0 ///// 35410 124 355 2 0 1 0 355 35411 36 23 5- 0 0 0 35412 5 23 47 0 0 0 NON-ZERO TO PRINT WHOLE PROCR 35413 82 354 2 0 0 0 354 35500 PROCR 355 355 O/P WITH ZERO REF: PARA=2C 35501 NOTES 35502 81 355 2 0 0 0 355 (A)=INSTRUCTION 35503 5 67 3 0 0 0 35504 61 3 0 0 0 2C 35505 5 67 2 0 0 0 35506 80 518 2 0 0 0 518 35507 82 355 2 0 0 0 355 35600 PROCR 356 356 O/P NON-ARITH INSTRUCTION 35601 NOTES 35602 81 356 2 0 0 0 356 35603 5 61 0 0 0 0 35604 10 0 0 0 1 35605 5 61 1 0 0 0 35606 80 536 2 0 0 0 536 gCOMPLEX O/P 35607 82 356 2 0 0 0 356 35700 PROCR 357 357 TEST SHORT/LONG NUMBER 35701 NOTES 35702 81 357 2 0 0 0 357 35703 5 61 0 0 0 0 STORE ACTION 35704 61 53 0 0 0 35705 70 357 8 0 0 0 357 gSHORT NO 35706 80 481 2 0 0 0 481 gLONG NO S/R 35707 82 357 2 0 0 0 357 35705>35708 80 483 2 0 0 0 483 gSHORT NO S/R 35709 82 357 2 0 0 0 357 35800 PROCR 358 358 O/P ARITH INSTRUCTION 35801 NOTES 35802 81 358 2 0 0 0 358 35803 5 61 0 0 0 0 35804 5 61 1 0 0 0 35805 80 536 2 0 0 0 536 gCOMPLEX O/P 35806 82 358 2 0 0 0 358 35900 PROCR 359 359 O/P WITH ZERO REF/PARA 35901 NOTES 35902 81 359 2 0 0 0 359 35903 5 67 3 0 0 0 35904 80 518 2 0 0 0 518 gO/P 35905 82 359 2 0 0 0 359 36000 PROCR 360 360 36002 81 360 2 0 0 0 360 36003 54 7 2 1 0 48 BULK CLEAR SECTION 7 36004 82 360 2 0 0 0 360 36100 PROCR 361 361 LN:2C SUBROUTINE 36101 NOTES 36102 81 361 2 0 0 0 361 (A)=INSTRUCTION 36103 5 67 3 0 0 0 36104 0 61 4 0 0 0 LN:2C FOR FIRST LN PROCR 36105 5 67 2 0 0 0 IN CHAP 36106 80 518 2 0 0 0 518 gO/P 36107 82 361 2 0 0 0 361 37623> 37927> 38609> 41326> 43228> 44526> 44534>36108 80 361 2 0 0 0 361 (THEN GET NEXT BLOCK) 36200 PROCR 362 362 GET NEXT BLOCK 36201 NOTES RADIX B 36231> 37010> 37011> 37013> 37313> 37413> 37513> 37805> 37911> 37912> 37919> 38211> 38822> 39731> 39733> 40116> 40125> 40129> 40313> 40822> 40913> 41020> 41515> 42405> 43022> 43127> 43132> 43213> 43312> 43421> 43609> 43709> 44113> 44508> 44522> 44836> 44917> 45113> 45232> 46118> 48044> 52809> 35208> 35207> 35206> 35123>36202 80 509 2 0 0 0 509 gREAD 39726> 39730> 42335> 42372> 42515> 43610> 45204> 45225> 52209>36203 6 1 12 0 36204 2 542 6 1 0 0 542 'CONST' 36205 73 352 2 0 0 0 352 gNOT A DIRECTIVE 36206 80 363 2 0 0 0 363 EDIT DIRECTIVES 36207 6 1 12 0 36208 2 542 6 1 0 0 542 'CONST' 36209 70 365 2 0 0 0 365 36210 1 542 6 1 0 0 542 36211 2 542 4 1 0 0 542 TABLE 36212 70 365 2 0 0 0 365 36213 1 542 4 1 0 0 542 36214 2 542 8 1 0 0 542 'PROCR' 36215 70 365 2 0 0 0 365 36216 1 542 8 1 0 0 542 36217 2 542 2 1 0 0 542 'VALUE' 36218 70 351 24 0 0 0 351 gYES 36219 1 542 2 1 0 0 542 36220 2 542 12 1 0 0 542 END(SPACE) (SPACE) 36221 71 362 26 0 0 0 362 36222 10 0 0 0 1 36223 5 61 48 0 0 0 36224 80 364 2 0 0 0 364 gTEST PREVIOUS DIRECTIVE WAS 'VALUE' 36225 76 365 14 0 0 0 365 36221>36226 1 542 12 1 0 0 542 36227 2 542 10 1 0 0 542 'NOTES' 36228 71 352 2 0 0 0 352 36229 80 510 2 0 0 0 510 gPRINT 'NOTES' LINE 36230 80 360 2 0 0 0 360 BULK CLEAR SEC 7 36231 76 362 2 0 0 0 362 36300 PROCR 363 363 EDIT DIRECTIVES 36302 81 363 2 0 0 0 363 36303 80 360 2 0 0 0 360 BULK CLEAR SEC 7 36304 77 2 1 0 0 AMEND IND 36305 5 7 2 1 0 0 36306 77 4 1 0 0 LINE SERIAL 36307 5 7 6 1 0 0 36308 77 6 1 0 0 'PROCR/TABLE/CONST/NOTES/VALUE/END' 36309 5 7 10 1 0 0 36310 77 8 1 0 0 PROCR NO 36311 30 0 0 0 4- 36312 5 7 12 1 0 0 36313 77 10 1 0 0 OLD PROCR NO 36314 5 7 16 1 0 0 36315 77 6 1 0 0 36316 2 542 10 1 0 0 542 'NOTES' 36317 71 363 21 0 0 0 363 gNO 36318 77 12 1 0 0 'RADIX' 36319 5 7 16 1 0 0 36320 76 363 23 0 0 0 363 36317>36321 77 12 1 0 0 PASS 1 REPORTS 36322 5 7 48 1 0 0 36320>36323 77 6 1 0 0 36324 2 542 8 1 0 0 542 'PROCR' 36325 70 363 29 0 0 0 363 gYES 36326 77 14 1 0 0 TABLE/CONST TYPE/RADIX LETTER 36327 5 7 20 1 0 0 36328 76 363 31 0 0 0 363 36325>36329 77 14 1 0 0 FIRST 5 CHARS ANNOTATION 36330 5 7 20 1 0 0 36328>36331 55 77 16 1 0 26 COPY ANNOTATION 36332 C 7 22 1 0 0 36333 82 363 2 0 0 0 363 36400 PROCR 364 364 DEAL WITH 'VALUE' DIRECTIVE 36401 NOTES 36402 81 364 2 0 0 0 364 36403 86 352 2 0 0 0 352 SWITCH LAST TIME THRU 36404 12 0 0 0 7 36405 71 364 15 0 0 0 364 gNOT 'VALUE' 36406 542 10 1 0 0 542 'NOTES' 36407 5 61 26 1 0 0 36408 5 67 2 0 0 0 REF=0 ITEM=SPACE CTR 36409 61 43 0 0 0 36410 5 67 3 0 0 0 36411 80 517 2 0 0 0 517 gO/P TERMINAL 'REF' UNIT 36412 10 0 0 0 6 36413 5 61 26 2 0 0 36414 80 516 2 0 0 0 516 gO/P'TYPE6' 36405>36415 82 364 2 0 0 0 364 36500 PROCR 365 365 TEST NEW CHAP 36501 NOTES RADIX B 36215> 36212> 36209>36502 80 364 2 0 0 0 364 gTEST LAST DIRECTIVE WAS 'VALUE' 36503 7 12 2 0 0 NEW PROCR 36504 5 61 35 0 0 0 36505 124 61 111 0 0 0 THIS CHAP UNCORR 36506 92 9 0 0 0 LAST PROCR THIS CHAP 36507 30 0 0 0 2- 36508 80 538 2 0 0 0 538 gCONVERT TO DEC 36509 2 61 35 0 0 0 36510 72 348 2 0 0 0 348 NOT NEW CHAP 36511 11 0 0 0 1 TEST THIS PROCEDURE SAFETY 36512 71 348 2 0 0 0 348 ONE GREATER THAN PREDEVICE 36513 62 0 0 0 0 36225>36514 80 353 2 0 0 0 353 gROUND UP SPACE CTR 36515 80 366 2 0 0 0 366 gROUND UP FORMED SECTIONS 36516 80 367 2 0 0 0 367 gO/P FORMED SECTIONS 36517 76 368 2 0 0 0 368 36600 PROCR 366 366 ROUND UP SECTION CTRS 36601 NOTES RADIX B SUBROUTINE 36602 81 366 2 0 0 0 366 36603 90 0 0 2 0 36604 C 0 0 0 6 36611>36605 0 61 13 0 2 0 END VALUE 36606 31 0 0 0 2 36607 32 0 0 0 1- (DIVIDE BY 4) 36608 38 0 0 0 4 ROUND UP TO MULTIPLE OF 4 36609 31 0 0 0 2 36610 5 61 13 0 2 0 36611 94 366 5 0 2 2 366 36612 82 366 2 0 0 0 366 36700 PROCR 367 367 O/P FORMED SECTIONS 36701 NOTES RADIX B SUBROUTINE 36702 81 367 2 0 0 0 367 36703 10 0 0 0 600000 36704 5 61 0 1 0 0 36705 5 61 12 0 0 0 36706 5 61 2 0 0 0 36734>36707 91 61 2 0 3 0 36708 544 7 0 3 0 544 TYPE NO 36709 5 61 26 1 0 0 36710 61 5 0 3 0 36711 5 61 28 2 0 0 PROCR NUMBER 36712 80 516 2 0 0 0 516 O/P TYPE 36713 544 10 0 3 0 544 36714 5 61 42 0 0 0 NO OF LOCNS TO STEP ON LON CTR ON O/P 36715 124 61 0 0 0 0 36716 61 12 1 0 0 SECT COUNTER 36717 5 61 30 1 0 0 36718 0 61 30 0 0 0 36719 2 61 31 0 0 0 36720 70 367 30 0 0 0 367 gNOTHING TO OUTPUT 36729>36721 544 10 0 0 0 544 4 36722 30 0 0 0 5 36723 1 544 13 0 3 0 544 SECT NO OF TRANS SECT 36724 1 61 30 0 0 0 36725 128 67 0 0 0 0 36726 80 518 2 0 0 0 518 O/P 36727 123 4 0 0 0 36728 C 61 30 0 0 0 36729 76 367 21 0 0 0 367 36720>36730 10 0 0 0 1 36731 4 61 2 0 0 0 36732 123 2 0 0 0 36733 C 61 0 0 0 0 36734 76 367 7 0 0 0 367 36735 82 367 2 0 0 0 367 36800 PROCR 368 368 DEAL WITH TRANS VACANT SECTIONS 36801 NOTES RADIX B CHAP END ROUTINE 36517>36802 10 0 0 0 1 TYPE 1 36803 5 61 26 2 0 0 36804 101 1001 1 3 0 CALC SWITCH PROCR 36805 1 61 111 0 0 0 THIS CHAP UNCORRECTED 36806 5 61 28 2 0 0 61/43= CHAP LENGTH 36807 80 516 2 0 0 0 516 gO/P 'TYPE' 36808 61 43 0 0 0 CHAP LENGTH 36809 124 61 111 0 1 0 UNCORR CHAP 36810 5 72 17 0 0 0 STORE 72/18-36 36811 542 24 1 0 0 542 'TYPE.' 36812 5 61 26 1 0 0 36813 5 61 28 1 0 0 36814 80 517 2 0 0 0 517 ALPHA O/P SR 36815 10 0 0 0 1 36816 1 61 111 0 0 0 36817 3 61 111 0 0 0 36818 61 48 0 0 0 36819 70 346 23 0 0 0 346 36820 76 369 3 0 0 0 369 36900 PROCR 369 369 PROG END ROUTINE 36901 NOTES RADIX B 36902 76 369 9 0 0 0 369 THIS AN ORDER CONTANT 36820>36903 80 520 2 0 0 0 520 -O/P REMAINING DETS S/R 36904 0 545 6 0 0 0 545 ALL THE £'S 36905 5 66 2 1 0 0 SET AS BLOCK SERIAL 36906 369 2 0 0 0 369 36907 5 526 2 0 0 0 526 PLANT AN EXIT ORDER 36908 76 522 23 0 0 0 522 gI/P C-LINE SR 36902>36909 10 0 0 0 1 36910 5 23 47 0 0 0 ALWAYS PRINT END SIGN 36911 80 530 2 0 0 0 530 gBLANK LINE 36912 80 511 2 0 0 0 511 gPRINT END SIGN 36913 72 2 0 0 0 ENTRY POINT 36914 5 61 35 0 0 0 36915 80 486 2 0 0 0 486 36916 5 92 8 0 0 0 CHAP OF ENTRY 36917 27 5 0 0 0 ENTRY LOCN 36918 5 92 6 0 0 0 36919 0 542 30 1 0 0 542 'TYPE£' 36920 5 9 4 1 0 0 36921 544 2 1 0 0 544 36922 5 9 6 1 0 0 BEW 36923 80 514 2 0 0 0 514 -O/P REMAINING DETS S/R 36931>36924 80 539 2 0 0 0 539 gREAD A2 36925 8 4 1 0 0 36926 12 0 0 0 5659655972 'FINIS' 36927 70 369 32 0 0 0 369 gEND 36928 55 8 4 1 0 50 36929 C 9 4 1 0 0 36930 80 514 2 0 0 0 514 gWRITE A6 36931 76 369 24 0 0 0 369 36927>36932 55 70 0 1 0 100 COPY DETAILS FOR PASS 3 36933 C 9 0 1 0 0 36934 27 4 0 0 0 COMPILER? 36935 71 327 2 0 0 0 327 gYES, CALL PASS 3 36936 45 A6 0 0 0 0 REWIND O/P FILE 36937 76 327 2 0 0 0 327 gCALL PASS 3 37000 PROCR 370 370 INST ROUTINE 37001 NOTES RADIX B NOTES AND CONTINUATION OF SWITCH INTO NEXT PROCEDURE 35203>37002 10 0 0 0 1 37003 5 61 99 0 0 0 NON I/P IND 37004 80 522 2 0 0 0 522 -I/P C-LINE S/R 37005 66 2 1 0 0 LINE SERIAL 37006 5 67 0 1 0 0 37007 5 61 2 0 0 0 CLEAR MOD DIGITS 37008 5 61 25 0 0 0 SET BINARY INDICATOR 37009 0 61 110 0 0 0 GROUP+1 37010 70 362 2 0 0 0 362 G.N.B. 37011 73 362 2 0 0 0 362 G.N.B. 37012 12 0 0 0 11 37013 72 362 2 0 0 0 362 G.N.B. 37014 84 372 2 0 0 0 372 SWITCH B (GROUP) 37015 C 61 110 0 0 0 37016 84 381 2 0 0 0 381 VARIANT SWITCH 37017 C 61 50 0 0 0 VARIANT+1 37018 0 61 13 0 0 0 LONG 37019 101 148 1 2 0 TEST 32 REMAIN 37020 72 371 2 0 0 0 371 gDUMP 37021 0 61 15 0 0 0 SHORT 37022 101 56 1 2 0 TEST 3 REMAIN 37023 72 371 2 0 0 0 371 gDUMP 37024 0 61 17 0 0 0 TSL 37025 101 218 1 2 0 TEST 1 REMAINS 37026 73 372 2 0 0 0 372 gOK 37100 PROCR 371 371 37101 NOTES 37023> 37020>37102 80 366 2 0 0 0 366 gROUND UP CTRS 37103 0 61 17 0 0 0 37104 2 61 16 0 0 0 TWICE TSL'S 37105 31 0 0 0 1- 37106 1 61 15 0 0 0 SHORT 37107 1 61 13 0 0 0 LONG 37108 5 366 2 0 0 0 366 INCREMENT TO SPACE CTR 37109 34 544 6 0 0 0 544 BIT 1 37110 36 61 43 0 0 0 SPACE CTR 37111 12 0 0 0 2 37112 2 366 2 0 0 0 366 LENTH OF FORMED CONSTANTS 37113 1 545 46 0 0 0 545 24/1/0 TO NEXT ORDER 37114 80 498 2 0 0 0 498 gO/P INT SC 37115 80 353 2 0 0 0 353 gROUND UP SPACE CTR 37116 80 367 2 0 0 0 367 gO/P FORMD SECTIONS 37117 10 0 0 0 1 37118 5 61 42 0 0 0 SPACE CTR INCR 37119 5 61 2 0 0 0 CLEAR 37120 54 63 0 1 0 280 CLEAR 63+62 37121 0 542 6 1 0 0 542 'CONST' 37122 5 5 2 1 0 0 37123 5 61 12 1 0 0 37124 5 61 14 1 0 0 37125 80 530 2 0 0 0 530 gPRINT 37126 0 544 18 1 0 0 544 180:180 37127 5 61 16 1 0 0 TSL CTR 37128 10 0 0 0 3 37129 4 61 5 0 0 0 AUG PROCR NUMBERS 37130 4 61 6 0 0 0 37131 4 61 7 0 0 0 37132 10 0 0 0 6 37133 5 61 26 2 0 0 37134 80 516 2 0 0 0 516 gO/P 'TYPE 6' 37200 PROCR 372 372 SWITCH B 37201 NOTES RADIX B 37026>37202 10 0 0 0 0 37203 85 372 2 0 0 0 372 37204 C 373 2 0 0 0 373 GRP 0 37205 C 374 2 0 0 0 374 1 37206 C 379 2 0 0 0 379 2 37207 C 381 2 0 0 0 381 3 37208 C 387 2 0 0 0 387 4 37209 C 400 2 0 0 0 400 5 37210 C 411 2 0 0 0 411 6 37211 C 417 2 0 0 0 417 7 37212 C 422 2 0 0 0 422 8 37213 C 430 2 0 0 0 430 9 37214 C 440 5 0 0 0 440 10 37215 C 440 4 0 0 0 440 11 37216 C 440 3 0 0 0 440 12 37217 C 440 2 0 0 0 440 13 37218 C 445 2 0 0 0 445 14 37219 C 447 2 0 0 0 447 15 37300 PROCR 373 373 GROUP 0 ACTIONS 37301 NOTES RADIX B 37204>37302 61 50 0 0 0 37303 12 0 0 0 8 37304 73 373 10 0 0 0 373 gACTIONS 0-6 37305 12 0 0 0 2 37306 72 373 14 0 0 0 373 gACTION 9 37307 545 27 0 0 0 545 0/0/2 37308 80 356 2 0 0 0 356 gCOMPLEX O/P NON-A 37309 80 521 2 0 0 0 521 gI/P INSTRUCTION 37316> 37304>37310 124 61 50 0 1 0 VARIANT+1 37311 545 7 0 0 0 545 37626> 37916> 38404> 41403> 44519>37312 80 358 2 0 0 0 358 gCOMPLES O/P ARITH 37313 76 362 2 0 0 0 362 gGNB 37306>37314 545 18 0 0 0 545 18/1/1 1 37315 80 359 2 0 0 0 359 gO/P 37316 76 373 10 0 0 0 373 37400 PROCR 374 374 GROUP 1 ACTIONS 37401 NOTES RADIX 37205>37402 66 14 1 0 0 LITERAL 37403 5 61 52 1 0 0 37404 61 50 0 0 0 VARIANT+1 37405 12 0 0 0 4 37406 72 376 2 0 0 0 376 gNOT ACTIONS 10-12 37407 66 15 0 0 0 37408 70 374 14 0 0 0 374 gSHORT LITERAL 37409 124 61 50 0 0 0 37410 545 7 0 0 0 545 37411 5 61 0 1 0 0 37412 80 481 2 0 0 0 481 LONG NO S/R 37413 76 362 2 0 0 0 362 G.N.B 37408>37414 61 50 0 0 0 VARIANT +1 37415 12 0 0 0 2 TEST VARIANT >0 37416 72 375 2 0 0 0 375 gNOT ACTION 10 37417 66 14 1 0 0 37418 73 375 9 0 0 0 375 - 37500 PROCR 375 375 GROUP 1 ACTIONS 0-2 37501 NOTES RADIX B 37416>37502 544 22 0 0 0 544 1££££ 37503 2 66 14 0 0 0 LITERAL (MODULUS) 37504 73 375 9 0 0 0 375 gNOT LITERAL 37505 124 61 50 0 0 0 37506 545 21 0 0 0 545 37507 1 66 14 0 0 0 37508 76 382 9 0 0 0 382 - 37504> 37418>37509 124 61 50 0 0 0 37510 545 7 0 0 0 545 41109>37511 5 61 0 0 0 0 40907>37512 80 483 2 0 0 0 483 SHORT NO S/R 37513 76 362 2 0 0 0 362 -G.N.B. 37600 PROCR 376 376 ACTION 16 37601 NOTES RADIX B 37406>37602 80 534 2 0 0 0 534 -SUSPEND S/R 37603 54 66 6 0 0 8 37604 61 50 0 0 0 VARIANT +1 37605 12 0 0 0 8 TEST VARIANT >6 37606 72 377 2 0 0 0 377 gACTIONS 17 OR 19 37607 61 26 1 0 0 SUSPENDED REF 37608 34 61 28 1 0 0 ITEM 37609 75 376 12 0 0 0 376 gON(N) 37610 61 32 1 0 0 SUSPENDED MOD 37611 70 376 15 0 0 0 376 gON(A) 37609>37612 545 22 0 0 0 545 1/1/30 37613 80 359 2 0 0 0 359 ZERO REF/PARA 37614 76 376 17 0 0 0 376 37611>37615 546 4 0 0 0 546 2/1/0/6 37707>37616 80 361 2 0 0 0 361 gLN:2C SR 37705> 37614>37617 545 27 0 0 0 545 0/0/2 37618 80 357 2 0 0 0 357 gTEST LONG/SHORT NO S/R 37619 0 61 26 1 0 0 SUSPENDED REF 37620 34 61 28 1 0 0 SUSPENDED ITEM 37621 75 376 24 0 0 0 376 37622 0 545 3 0 0 0 545 10/1/0 6 37623 76 361 8 0 0 0 361 gLN:2C+GNB 37621>37624 80 535 2 0 0 0 535 gRESTORE 37625 0 545 15 0 0 0 545 10/1/0 0 37626 76 373 12 0 0 0 373 gO/P+GNB 37700 PROCR 377 377 ACTIONS 17 AND 19 37701 NOTES RADIX B 37606>37702 71 377 8 0 0 0 377 -IE VARIANT 9 37703 61 26 1 0 0 SUSPENDED REF 37704 34 61 28 1 0 0 ITEM 37705 75 376 17 0 0 0 376 gACTS ON(N) 37706 546 5 0 0 0 546 3/1/0/6 37707 76 376 16 0 0 0 376 37702>37708 545 36 0 0 0 545 1/0/1 0 37709 80 359 2 0 0 0 359 gO/P 37710 0 61 26 1 0 0 REF 37711 34 61 28 1 0 0 ITEM 37712 74 377 16 0 0 0 377 37713 80 535 2 0 0 0 535 -RESTORE S/R 37714 545 8 0 0 0 545 6/0/0 37715 80 358 2 0 0 0 358 gCOMPLEX O/P ARITH 37712>37716 545 64 0 0 0 545 18/1/1/0/4119 37717 80 359 2 0 0 0 359 gO/P 37800 PROCR 378 378 ACTION 19 37801 NOTES RADIX B 37802 54 66 6 0 0 8 CLEAR REF, I,D,M 37803 545 17 0 0 0 545 13/0/0 44823>37804 80 357 2 0 0 0 357 gTEST SHORT/LONG NO SR 37805 76 362 2 0 0 0 362 GNB 37900 PROCR 379 379 GROUP2 37901 NOTES RADIX B 37206>37902 5 66 10 1 0 0 CLEAR DISC 37903 85 381 2 0 0 0 381 37904 C 379 17 0 0 0 379 20 37905 C 379 14 0 0 0 379 21 37906 C 379 14 0 0 0 379 22 37907 C 379 14 0 0 0 379 23 37908 C 379 20 0 0 0 379 24 37909 C 379 14 0 0 0 379 25 37910 C 379 14 0 0 0 379 26=MULTIPLY 37911 C 362 2 0 0 0 362 27 GNB 37912 C 362 2 0 0 0 362 28 GNB 37913 C 379 14 0 0 0 379 29=DIVIDE 37913> 37910> 37909> 37907> 37906> 37905>37914 124 61 50 0 0 0 VARIANT+1 37915 0 545 80 0 0 0 545 F.P. ACTION 37916 76 373 12 0 0 0 373 gCOMPLEX O/P+GNB 37904>37917 0 545 86 0 0 0 545 21/0/0 DRAIN A* 37918 80 380 2 0 0 0 380 F.P.S/R 37919 76 362 2 0 0 0 362 G.N.B. 37908>37920 80 534 2 0 0 0 534 gSUSPEND 37921 545 84 0 0 0 545 21/1/0 37922 80 380 2 0 0 0 380 F.P.S/R 37923 80 535 2 0 0 0 535 gRESTORE 37924 0 545 86 0 0 0 545 21/0/0 37925 80 358 2 0 0 0 358 gCOMPLEX O/P 37926 0 545 85 0 0 0 545 20/0/0 8 37927 76 361 8 0 0 0 361 gLN:2C+GNB 38000 PROCR 380 380 GROUP 2 S/R 38001 NOTES RADIX B 38002 81 380 2 0 0 0 380 38003 12 0 0 0 8 38004 80 361 2 0 0 0 361 gLN:2C SR 38005 545 82 0 0 0 545 20/0/0 38006 80 358 2 0 0 0 358 gCOMPLEX O/P 38007 82 380 2 0 0 0 380 38100 PROCR 381 381 GROUP 3 SWITCH 38101 NOTES RADIX B 37207>38102 85 381 2 0 0 0 381 38103 C 382 2 0 0 0 382 30 QTT SHIFT A 38104 C 382 14 0 0 0 382 31 BIT SHIFT A 38105 C 382 2 0 0 0 382 32 QTT SHFT AB 38106 C 382 14 0 0 0 382 33 BIT SHIFT AB 38107 C 382 12 0 0 0 382 34 SELECT TO B 38108 C 383 2 0 0 0 383 35 SET QTTS OF B 38109 C 384 2 0 0 0 384 36 COLLATE 38110 C 384 2 0 0 0 384 37 REPLACE BITS 38111 C 385 2 0 0 0 385 38 ROUND OFF VBLE 38112 C 386 2 0 0 0 386 39 ROUND UP 38200 PROCR 382 382 GROUP 3 30-33 AND 34 38201 NOTES RADIX B 38105> 38103>38202 66 14 1 0 0 38203 72 382 6 0 0 0 382 38204 10 0 0 0 1020 SET NEGATIVE LITERAL 38205 4 66 14 1 0 0 POSITIVE 38215> 38233> 38203>38206 124 61 50 0 0 0 38207 545 31 0 0 0 545 18 ACTION 38208 2 66 14 0 0 0 38313> 38504> 41518> 42304> 44516> 37508>38209 5 67 3 0 0 0 44105> 47917> 47920>38210 80 518 2 0 0 0 518 -O/P 38211 76 362 2 0 0 0 362 -GNB 38107>38212 0 545 27 0 0 0 545 0/0/2 38213 76 403 12 0 0 0 403 gCOMPLEX O/P+GNB 38106> 38104>38214 0 66 14 1 0 0 LITERAL 38215 72 382 6 0 0 0 382 gTREAT AS ACTIONS 30, 32 38216 32 0 0 0 10- 38217 10 0 0 0 0 COMPLEMENT IN B 38218 36 544 20 0 0 0 544 BITS 1 2 38219 5 518 2 0 0 0 518 g BIT SHIFTS LEFT REQUIRED 38220 36 545 91 0 0 0 545 BITS 3-8+15 38221 36 545 91 0 0 0 545 =(4096+32-N)X4 38222 36 545 91 0 0 0 545 38223 36 545 91 0 0 0 545 38224 30 0 0 0 1- DIVIDE COMPLEMENT BY 4 38225 5 66 14 1 0 0 SET AS ADDRESS FOR QTT RIGHT SHIFT 38226 2 518 2 0 0 0 518 38227 70 382 31 0 0 0 382 gNO BITS LEFT 38228 124 61 50 0 0 0 VARIANT +1 38229 1 545 31 0 0 0 545 18/D/3 38230 80 359 2 0 0 0 359 gO/P 38227>38231 12 0 0 0 1 38232 4 61 50 0 0 0 REDUCE VARIANT 38233 76 382 6 0 0 0 382 gO/P QTT SHIFT RIGHT 38300 PROCR 383 383 ACTION 35 38301 NOTES RADIX 38108>38302 0 66 14 1 0 0 38303 80 538 2 0 0 0 538 gCONVERT TO DEC 38304 5 66 14 1 0 0 38305 62 0 0 0 0 38306 124 542 32 0 2 0 542 38307 112 66 14 1 0 0 CONVERT TO BASE 2 38308 72 383 12 0 0 0 383 - 38309 5 66 14 1 0 0 38310 2 66 14 1 0 0 38311 11 0 0 0 400 38308>38312 1 545 36 0 0 0 545 1/0/1 ACTION 38313 76 382 9 0 0 0 382 38400 PROCR 384 384 ACTIONS 36 AND 37 38401 NOTES RADIX B 38110> 38109>38402 124 61 50 0 0 0 VARIANT +1 38403 545 30 0 0 0 545 15 OR 14 38404 76 373 12 0 0 0 373 38500 PROCR 385 385 ACTION 38 38501 NOTES RADIX 38111>38502 545 39 0 0 0 545 1/0/2 38503 1 66 14 1 0 0 LITERAL 38504 76 382 9 0 0 0 382 O/P & GNB 38600 PROCR 386 386 ACTION 39 38601 NOTES RADIX 38112>38602 545 30 0 0 0 545 2/1/0 38603 80 361 2 0 0 0 361 gLN:2C SR 38604 546 6 0 0 0 546 27/1/0/2 38605 80 498 2 0 0 0 498 gO/P INT SC 38606 545 53 0 0 0 545 1/1/3/0/1 38607 80 359 2 0 0 0 359 gO/P 38608 0 545 54 0 0 0 545 4/1/0 0 38609 76 361 8 0 0 0 361 gLN:2C+GNB 38700 PROCR 387 387 GROUP 4 ACTIONS 38701 NOTES RADIX 37208>38702 61 50 0 0 0 VARIANT + 1 38703 12 0 0 0 4 38704 70 387 6 0 0 0 387 g43 44303>38705 80 508 2 0 0 0 508 0/1/0 0/0/3 S/R 39655> 38704>38706 0 66 6 0 0 0 FILE ID 38707 5 61 54 0 0 0 38708 80 499 2 0 0 0 499 gCALC ROUTE PARA 38709 5 61 114 0 0 0 38710 33 0 0 0 6 ROUTE TYPE 38711 3 61 54 0 0 0 38712 12 0 0 0 7 38713 70 387 32 0 0 0 387 gRT7 38714 12 0 0 0 4 38715 70 387 32 0 0 0 387 gRT11 38716 12 0 0 0 4 38717 70 392 19 0 0 0 392 gRT15 38718 12 0 0 0 5 38719 71 387 34 0 0 0 387 gNOT 20 38720 61 50 0 0 0 VARIANT+1 38721 12 0 0 0 1 38722 71 387 34 0 0 0 387 gNOT 40 38723 66 8 0 0 0 CONVERT TO BINARY 38724 80 537 2 0 0 0 537 38725 5 66 6 0 0 0 CLEAR 38726 5 66 8 0 0 0 38727 545 66 0 0 0 545 38728 80 356 2 0 0 0 356 gCOMPLEX O/P 38729 545 72 0 0 0 545 18/1/1/ 5- 38730 80 359 2 0 0 0 359 38731 76 387 34 0 0 0 387 gEVERYTHING ELSE 38715> 38713>38732 11 0 0 0 8 IF 7 OR 11 SET=8 38733 5 61 54 0 0 0 ROUTE TYPE 38731> 38722> 38719>38734 91 4 0 3 0 38735 30 0 0 0 4- GP CTR OR ZERO 38736 1 91 1 0 0 0 2R 38737 5 61 115 0 0 0 38738 124 61 115 0 1 0 38739 91 5 0 0 0 GP TX AREA PARA 38740 5 61 115 0 0 0 38741 61 50 0 0 0 VARIANT+1 38742 31 0 0 0 5 38743 1 61 54 0 0 0 ROUTE TYPE 38744 31 0 0 0 3 38745 34 545 5 0 0 0 545 BITS 1-3 38746 36 66 14 0 0 0 LITERAL 38747 30 0 0 0 2 TO Q3,4,5 38748 101 398 2 0 0 0 398 TABLE LOOKUP 38749 100 61 56 1 0 0 38750 10 0 0 0 0 38751 35 0 0 0 11 Q1,2 38752 124 61 58 0 3 0 38753 115 0 0 0 0 COLLATE MASTER ROUTE TYPE 38754 33 0 0 0 7- B8+B1 38755 30 0 0 0 3 38756 33 0 0 0 6 B8+B19, B2-7+B1-6 38757 5 61 61 0 0 0 38758 33 0 0 0 1 38759 5 61 60 0 0 0 SET SPECIAL IND FOR 'READ RT 10' 38760 86 372 2 0 0 0 372 38761 12 0 0 0 . 38762 70 443 4 0 0 0 443 gCHEQUE-SORTER 38763 61 50 0 0 0 VARIANT+1 38764 12 0 0 0 4 38765 71 392 8 0 0 0 392 38766 80 522 2 0 0 0 522 gNOT ACTION 43 38767 80 508 2 0 0 0 508 gI/P C-LINE 38768 0 66 6 2 0 0 0/1/0 0/0/3 S/R 38769 80 537 2 0 0 0 537 gTO BIN 38770 5 66 6 1 0 0 38771 0 61 54 0 0 0 ROUTE TYPE 38772 12 0 0 0 3 38773 70 388 26 0 0 0 388 gCARD 38774 12 0 0 0 1 38775 70 388 23 0 0 0 388 gGP PRINT 38776 12 0 0 0 9 38777 70 391 2 0 0 0 391 gRT 13 38778 12 0 0 0 5 38779 70 391 2 0 0 0 391 gRT 18 38780 12 0 0 0 1 38781 71 393 6 0 0 0 393 gNOT ROUTE 19 38782 0 545 8 0 0 0 545 6/0/0 38783 1 61 114 0 0 0 RTE PARA 38784 80 355 2 0 0 0 355 O/P 38785 80 390 2 0 0 0 390 38786 70 387 92 0 0 0 387 gNO FN WORD BITS SET 38787 0 545 13 0 0 0 545 2/0/0 38788 101 8 1 1 0 38789 80 498 2 0 0 0 498 O/P 38790 80 389 2 0 0 0 389 38791 76 387 95 0 0 0 387 38786>38792 0 545 13 0 0 0 545 2/0/0 38793 101 4 1 1 0 38794 80 498 2 0 0 0 498 O/P 38791>38795 92 29 0 0 0 NUMBER OD CHAPS 38796 80 504 2 0 0 0 504 gO/P 24/0/3 BY SPECIAL CHAP START 38797 101 1001 1 3 0 38798 30 0 0 0 2 REF=1001, PARA=0 38799 5 67 2 0 0 0 38800 PROCR 388 388 43 DEAL WITH G.P. O/P 38801 NOTES RADIX B SET UP A FOR EDIT 38802 0 545 47 0 0 0 545 26/0/0 38803 80 359 2 0 0 0 359 g O/P 'ENTER PRINT SR' 38804 546 26 0 0 0 546 24/1/0 5 38805 80 498 2 0 0 0 498 g O/P INT SEQ CHANGE 38806 61 114 0 0 0 38807 5 67 2 0 0 0 38808 80 359 2 0 0 0 359 gO/P ROUTE PARA AS A LITERAL 38809 80 488 2 0 0 0 488 SELECT SECTION TX AREA PARA 38810 11 0 0 0 1 38811 5 67 2 0 0 0 38812 80 359 2 0 0 0 359 gO/P ROUTE PARA AS LITYERAL 38813 61 115 0 0 0 GP TX AREA PARA 38814 11 0 0 0 1 38815 5 67 2 0 0 0 38816 80 359 2 0 0 0 359 gO/P AS LITERAL 38817 61 8 0 0 0 TX AREA LENGTH (OVERFLOW FROM TX ABOVE P 38818 118 7 0 3 0 X64 38819 1 545 13 0 0 0 545 BIT 18 38820 80 359 2 0 0 0 359 *****O/P TOP OF BULK CLEAR CONST 38821 80 399 2 0 0 0 399 gRESTORE ABC 38822 76 362 2 0 0 0 362 gGNB 38775>38823 80 390 2 0 0 0 390 38824 70 388 26 0 0 0 388 g NO FN WORD BITS SET 38825 80 389 2 0 0 0 389 38824> 38773>38826 5 66 10 1 0 0 38827 545 66 0 0 0 545 24/0/2 38828 80 356 2 0 0 0 356 COMPLEX O/P NON-ARITH 38829 0 545 19 0 0 0 545 24/1/2 38830 2 61 115 0 0 0 GP TX AREA PARA 38831 12 0 0 0 1 38832 80 355 2 0 0 0 355 gO/P 38833 61 54 0 0 0 FILE TYPE 38834 12 0 0 0 4 38835 70 388 37 0 0 0 388 gANELEX 38836 0 545 26 0 0 0 545 BIT 14 38835>38837 1 545 67 0 0 0 545 29/0/1 38838 80 359 2 0 0 0 359 gO/P 38839 0 61 115 0 0 0 GP TX AREA PARA 38840 76 393 7 0 0 0 393 38900 PROCR 389 389 S/R TO SET BITS FOR PRINTING 38902 81 389 2 0 0 0 389 38903 545 27 0 0 0 545 0/0/2 38904 80 357 2 0 0 0 357 gLONG O/P 38905 545 8 0 0 0 545 6/0/0 38906 80 357 2 0 0 0 357 gLONGOP 38907 80 535 2 0 0 0 535 gRESTORE 38908 10 0 0 0 1 38909 5 66 10 1 0 0 38910 545 38 0 0 0 545 38911 80 358 2 0 0 0 358 COMPLEX OP ARITH 38912 61 26 1 0 0 SUSPENDED REF 38913 5 66 6 1 0 0 38914 82 389 2 0 0 0 389 39000 PROCR 390 390 SET BITS FOR FN WORD 39002 81 390 2 0 0 0 390 39003 80 534 2 0 0 0 534 SUSPEND 39004 12 0 0 0 1 39005 124 61 8 0 1 0 SET BITS OF 64 WORDS (1-4) 39006 31 0 0 0 0 ///// 39007 11 0 0 0 10 39008 30 0 0 0 9 TO Q10 39009 3 61 52 1 0 0 BITS FOR FN WORD 39010 82 390 2 0 0 0 390 39100 PROCR 391 391 DEAL WITH 43 FOR 'UPTIME' CARD READER 38779> 38777>39102 545 27 0 0 0 545 0/0/2 0 39103 80 361 2 0 0 0 361 gLN:2C (ORIG(A)>B) 39104 76 396 2 0 0 0 396 39200 PROCR 392 392 GROUP 4 SWITCH 39201 NOTES RADIX 39202 81 392 8 0 0 0 392 39203 61 39 0 0 0 LAST PARA NUMBER 39204 5 67 2 0 0 0 39205 545 22 0 0 0 545 1/1/3 0 39206 80 359 2 0 0 0 359 gOUTPUT(SELECT PARA VALUE) 39207 82 392 8 0 0 0 392 38765>39208 85 381 2 0 0 0 381 39209 C 394 2 0 0 0 394 40 39210 C 396 2 0 0 0 396 >41 39211 C 393 2 0 0 0 393 42 39212 C 393 2 0 0 0 393 43 39213 C 393 19 0 0 0 393 44 39214 C 396 3 0 0 0 396 45 39215 C 394 59 0 0 0 394 46 39216 C 394 59 0 0 0 394 47 39217 C 394 59 0 0 0 394 >48 39218 C 394 59 0 0 0 394 49 38717>39219 61 50 0 0 0 V+1 39220 12 0 0 0 2 39221 70 392 31 0 0 0 392 gCLOSE 39222 72 393 2 0 0 0 393 gREAD 39223 80 392 8 0 0 0 392 gO/P 1/1/3 P 39224 546 23 0 0 0 546 3/0/0 2 39225 80 361 2 0 0 0 361 gLN:2C 39226 546 22 0 0 0 546 1/1/1 10 39227 80 359 2 0 0 0 359 gO/P 39228 546 8 0 0 0 546 18/0/0 5 39229 80 359 2 0 0 0 359 39230 76 394 2 0 0 0 394 39221>39231 80 392 8 0 0 0 392 39232 546 24 0 0 0 546 1/1/ 20 39233 80 359 2 0 0 0 359 gO/P 39234 546 8 0 0 0 546 18/0/0 5 39235 80 359 2 0 0 0 359 39236 76 396 2 0 0 0 396 39300 PROCR 393 393 GROUP 4 39301 NOTES RADIX VARIANTS 2 & 3 39222> 39212> 39211>39302 80 522 2 0 0 0 522 I/P C-LINE 39303 66 6 2 0 0 39304 80 537 2 0 0 0 537 CONVERT TO BIN 39305 5 66 6 0 0 0 38781>39306 80 488 2 0 0 0 488 gSELECT TX AREA PARA 38840>39307 1 545 27 0 0 0 545 0/0/2 39308 80 355 2 0 0 0 355 gO/P 39309 61 54 0 0 0 ROUTE TYPE 39310 12 0 0 0 18 39311 71 396 2 0 0 0 396 gNOT RT 24 39312 545 55 0 0 0 545 18/1/1 5 39313 80 359 2 0 0 0 359 gO/P ZERO REF/PARA 39314 546 30 0 0 0 546 1/1/3 1 39315 80 359 2 0 0 0 359 gO/P S/R 39316 545 72 0 0 0 545 18/1/1 5- 39317 80 359 2 0 0 0 359 gO/P S/R 39318 76 396 2 0 0 0 396 39213>39319 0 545 27 0 0 0 545 0/0/2 39320 80 361 2 0 0 0 361 gLN:2C SR 39321 101 1 1 3 0 (A) NON ZERO 39322 76 396 3 0 0 0 396 39400 PROCR 394 394 GROUP 4 39401 NOTES RADIX B 39230> 39209>39402 61 54 0 0 0 39403 12 0 0 0 + 39404 71 394 34 0 0 0 394 gNOT AUTOLECTOR 39405 61 61 0 0 0 39406 5 543 43 0 0 0 543 39407 35 0 0 0 111 39408 36 91 4 0 3 0 ANNEX HALF-LENGTH 39409 36 91 4 0 3 0 39410 12 0 0 0 2 39411 1 545 13 0 0 0 545 BIT 18 39412 30 0 0 0 5 39413 5 61 60 1 0 0 39414 12 0 0 0 40 64- 39415 5 61 52 1 0 0 39416 545 8 0 0 0 545 6/0/0 39417 80 357 2 0 0 0 357 gSHORT O/P 39418 61 114 0 0 0 ROUTE PARA 39419 1 545 10 0 0 0 545 5/0/0 39420 80 355 2 0 0 0 355 gO/P 39421 546 16 0 0 0 546 2/0/0 6 39422 80 361 2 0 0 0 361 gLN:2C SR 39423 61 60 1 0 0 39424 5 61 52 1 0 0 39425 545 8 0 0 0 545 6/0/0 39426 80 357 2 0 0 0 357 gLONG O/P 39427 546 21 0 0 0 546 24/1/2 6 39428 80 361 2 0 0 0 361 gLN:2C SR 39429 10 0 0 0 +4000- 28/1/1 0 39430 80 359 2 0 0 0 359 gO/P 39431 543 43 0 0 0 543 39432 5 61 61 0 0 0 39433 76 396 2 0 0 0 396 39404>39434 12 0 0 0 8 39435 70 396 2 0 0 0 396 39436 66 6 1 0 0 FILE IDENTITY R-ALIGNED 39437 30 0 0 0 5 39438 1 61 112 0 0 0 PROG ID 39439 5 61 52 1 0 0 39440 80 397 2 0 0 0 397 gTEST C-LINE FOLLOWS 39441 3 397 2 0 0 0 397 39442 71 394 54 0 0 0 394 gNO 39443 80 534 2 0 0 0 534 gSUSPEND 39444 66 10 0 0 0 C-LINE DISC 39445 70 394 54 0 0 0 394 gANOTHER 40 ACTION 39446 66 6 2 0 0 REF 39447 80 537 2 0 0 0 537 gBIN 39448 5 66 6 1 0 0 39449 10 0 0 0 1 39450 5 66 10 1 0 0 39451 545 27 0 0 0 545 0/0/2 39452 80 356 2 0 0 0 356 gCOMPLEX O/P NON-ARITH 39453 76 396 2 0 0 0 396 gGET NEXT LINE 39445> 39442>39454 545 27 0 0 0 545 0/0/2 39455 80 357 2 0 0 0 357 gLONG NUMBER O/P 39456 397 2 0 0 0 397 INDICATOR 39457 71 396 20 0 0 0 396 39458 76 396 6 0 0 0 396 39218> 39217> 39216> 39215>39459 80 522 2 0 0 0 522 IP C-LINE 39460 66 6 2 0 0 39461 80 537 2 0 0 0 537 CONVERT 39462 3 66 6 1 0 0 39463 71 395 2 0 0 0 395 39464 0 61 28 1 0 0 SUSPENDED ITEM 39465 30 0 0 0 5 39466 1 66 14 1 0 0 39467 5 61 52 1 0 0 39468 545 27 0 0 0 545 0/0/2 39469 80 357 2 0 0 0 357 gLONG NO O/P 39470 76 396 2 0 0 0 396 -SET UP A 39500 PROCR 395 395 GROUP 4 39501 NOTES RADIX VARIANTS 6,7,8,9 39463>39502 61 50 0 0 0 39503 12 0 0 0 9 39504 73 395 8 0 0 0 395 39505 545 27 0 0 0 545 0/0/2 39506 80 356 2 0 0 0 356 gCOMPLEX O/P NON-ARITH 39507 76 396 2 0 0 0 396 39504>39508 545 8 0 0 0 545 6/0/0 39509 80 358 2 0 0 0 358 gCOMPLEX O/P ARITH 39510 61 28 1 0 0 SUSPENDED ITEM 39511 30 0 0 0 5 39512 5 61 52 1 0 0 39513 545 9 0 0 0 545 4/0/0 39514 80 357 2 0 0 0 357 gLONG NO O/P 39515 545 62 0 0 0 545 18/1/1/0/10 39516 80 359 2 0 0 0 359 gO/P 39600 PROCR 396 396 SET UP A 39601 NOTES RADIX B 39507> 39470> 39453> 39435> 39433> 39318> 39311> 39236> 39210> 39104>39602 80 397 2 0 0 0 397 g TEST C-LINE FOLLOWS SR 39322> 39214>39603 3 397 2 0 0 0 397 STORE IND 39604 71 396 20 0 0 0 396 g NO C-LINE 39605 80 534 2 0 0 0 534 g SUSPEND C-LINE 39458>39606 0 61 50 0 0 0 V + 1 39607 12 0 0 0 3 39608 73 396 20 0 0 0 396 g ACTIONS 40, 41 NOT 42, 43 39609 0 545 55 0 0 0 545 18//1/1/5 39610 80 359 2 0 0 0 359 g O/P 39611 0 66 6 2 0 0 REP (UNCONVERTED FOR GROUP 4) 39612 80 537 2 0 0 0 537 g CONVERT 39613 5 66 6 1 0 0 39614 5 66 8 1 0 0 CLEAR ITEM 39615 0 545 66 0 0 0 545 24/0/2 39616 80 356 2 0 0 0 356 g COMPLEX O/P NON-A 39617 545 72 0 0 0 545 18/1/1 5- 39618 80 359 2 0 0 0 359 g O/P 39619 80 397 2 0 0 0 397 g I/P, SET 380/2 NONZERO 39608> 39604> 39457>39620 61 54 0 0 0 ROUTE TYPE 39621 12 0 0 0 £ 39622 71 396 30 0 0 0 396 g OTHER THAN RT 15 39623 61 50 0 0 0 V + 1 39624 12 0 0 0 3 39625 71 396 44 0 0 0 396 g NOT 42 ACTION 39626 80 392 2 0 0 0 392 g O/P 1/1/3 R 39627 0 546 8 0 0 0 546 18/0/0 5 39628 80 359 2 0 0 0 359 g O/P 39629 76 396 44 0 0 0 396 39622>39630 61 54 0 0 0 ROUTE TYPE 39631 12 0 0 0 2 39632 70 396 35 0 0 0 396 39633 12 0 0 0 1 39634 71 396 40 0 0 0 396 g NOT RT 2 OR 3 39632>39635 61 50 0 0 0 V + 1 39636 12 0 0 0 2 ACTION 41 39637 71 396 40 0 0 0 396 g NO 39638 545 27 0 0 0 545 0/0/2 39639 80 355 2 0 0 0 355 g ZERO REF PARA=2CNO 44320> 39637> 39634>39640 61 60 1 0 0 39641 5 61 52 1 0 0 (61/52 IS CLEARED) 39642 545 8 0 0 0 545 6/0/0 39643 80 357 2 0 0 0 357 g LONG NO O/P 39629> 39625>39644 0 61 114 0 0 0 ROUTE PARA 39645 1 545 9 0 0 0 545 4/0/0 39646 80 355 2 0 0 0 355 g O/P 39647 80 453 2 0 0 0 453 g O/P 25/1/1 4096 > 24/0/3 0 39648 10 0 0 0 100 39649 5 67 1 0 0 0 39650 545 60 0 0 0 545 23/0/2 39651 80 359 2 0 0 0 359 g O/P 39652 0 397 2 0 0 0 397 C LINE FOLLOWS ? 39653 71 397 12 0 0 0 397 g NO 39654 80 535 2 0 0 0 535 g RESTORE C LINE 39655 76 387 6 0 0 0 387 g ASSUME 40/41/44 ACTION. TRANSLATE C-LI 39700 PROCR 397 397 TEST CONTINUATION LINE 39701 NOTES RADIX 39702 81 397 2 0 0 0 397 39703 80 509 2 0 0 0 509 39704 7 0 12 0 TOP OF L-ALIGNED ACTION 39705 2 542 27 0 0 0 542 39706 71 397 11 0 0 0 397 g EXIT WITH A NONZERO IF NOT C-LINE 39707 10 0 0 0 1 39708 5 61 99 0 0 0 NON I/P IND 39709 80 522 2 0 0 0 522 C-LINE S/R 39710 10 0 0 0 0 EXIT WITH A ZERO IF C-LINE 39706>39711 82 397 2 0 0 0 397 39653>39712 0 61 50 0 0 0 V + 1 39713 12 0 0 0 1 39714 71 397 21 0 0 0 397 g NOT ACTION 40 39715 61 54 0 0 0 39716 12 0 0 0 £ 39717 71 397 27 0 0 0 397 g 40 BUT NOT RT 15 39718 546 25 0 0 0 546 0/0/2 2 39719 80 361 2 0 0 0 361 g LN : 2C 39720 76 397 27 0 0 0 397 39714>39721 12 0 0 0 4 39722 70 397 27 0 0 0 397 g ACTION 44 39723 12 0 0 0 1 39724 70 397 32 0 0 0 397 g 45 39725 80 399 2 0 0 0 399 g RESTORE ABC 39726 76 362 3 0 0 0 362 g GNB (NON-INPUT) 39722> 39720> 39717>39727 80 405 2 0 0 0 405 g RESTORE C 39728 61 50 0 0 0 VARIANT +1 39729 12 0 0 0 1 39730 70 362 3 0 0 0 362 g 40 ACTION 39731 76 362 2 0 0 0 362 READ NEXT BLOCK 39724>39732 80 399 2 0 0 0 399 RESTORE ABC 39733 76 362 2 0 0 0 362 39800 CONST 398 398 0 39802 (B4)1(B5)1(B3)7(B7)11(B1)0; B17-20=VARIANT+1 39803 1,3,7,13,0; B12-16=INTERCODE R,TYPE 39804 1,4,7,14,0; B9-11=LITERAL 39805 1,5,7,15,0; B2-8=MASTER R,TYPE 39806 1,6,7,16,0; B1 =NON-STD CARD I/P 39807 1,8,0,18,0; B8=IND FOR Q5 MASTER RT 39808 1,8,7,17,0; 39809 1,9,7,19,0; 39810 1,10,7,16,0; 39811 1,12,7,20,0; 39812 1,13,7,16,0; 39813 1,16,7,75,0; OPEN RT 16 39814 1,18,7,16,0; 39815 1,19,7,19,0; OPEN RT 19 39816 1,20,7,53,0; DT 39817 1,22,7,59,0; DATA LINK 39818 1,25,7,55,0; 39819 2,1,7,21,0; 39820 2,3,7,23,0; 39821 2,4,7,24,0; 39822 2,5,7,25,0; 39823 2,6,7,26,0; 39824 2,8,0,28,0; 39825 2,8,1,27,0; 39826 2,8,2,45,0; 39827 2,8,7,46,0; 39828 2,9,7,29,0; 39829 2,10,7,26,0; 39830 2,12,7,30,0; 39831 2,13,7,26,0; 39832 2,16,7,85,0; CLOSE RT 16 39833 2,18,7,26,0; 39834 2,19,7,29,0; CLOSE RT 19 39835 2,25,7,56,0; 39836 3,5,7,5,0; 39837 3,6,7,6,0; 39838 3,8,7,7,0; 39839 3,10,7,6,1; 39840 3,12,7,10,0; 39841 3,13,7,6,0; 39842 3,17,7,52,0; ACTION 132 39843 3,18,7,6,1; 39844 3,20,7,54,0; DT 39845 3,24,7,5,0; 8 HOLE PT 39846 4,1,7,1,0; 39847 4,3,7,3,0; 39848 4,4,7,4,0; 39849 4,8,7,8,0; 39850 4,9,7,9,0; 39851 4,13,7,49,0; 39852 4,16,7,65,0; WRITE RT 16 39853 4,17,7,50,0; ACTION 133 39854 4,18,7,49,0; 39855 4,22,7,58,0; 39856 5,5,7,48,0; 39857 5,8,2,47,0; 39858 5,8,7,48,0; 39859 5,17,7,51,0; ACTION 134 39860 5,25,7,57,0; 39861 6,8,0,33,0; 39862 6,8,7,34,0; 39863 7,8,0,35,0; 39864 7,8,7,36,0; 39865 8,8,7,37,0; 39866 9,8,0,39,0; 39867 9,8,1,40,0; 39868 9,8,2,43,0; 39869 9,8,7,44,0; 39870 10,8,0,41,0; 39871 10,8,7,42,0; 39900 PROCR 399 399 0/1/1 S/R 39901 NOTES RADIX B 39902 81 399 2 0 0 0 399 39903 61 25 0 0 0 SET BINARY INDICATOR 39904 12 0 0 0 1 39905 3 61 25 0 0 0 39906 70 399 8 0 0 0 399 39907 10 0 0 0 8 39906>39908 1 545 21 0 0 0 545 0/1/1 39909 80 361 2 0 0 0 361 gLN:2C SR 39910 82 399 2 0 0 0 399 40000 PROCR 400 400 GROUP 5 SWITCH 40001 NOTES RADIX B 37209>40002 85 381 2 0 0 0 381 40003 C 401 4 0 0 0 401 50 40004 C 401 2 0 0 0 401 51 40005 C 401 4 0 0 0 401 52 40006 C 401 3 0 0 0 401 53 40007 C 402 2 0 0 0 402 54 40008 C 404 2 0 0 0 404 55 40009 C 408 2 0 0 0 408 56 40010 C 409 2 0 0 0 409 57 40011 C 409 11 0 0 0 409 58=MERGE VARIABLE 40012 C 410 2 0 0 0 410 59 40100 PROCR 401 401 ACTIONS 50-53 40101 NOTES RADIX B 40004>40102 10 0 0 0 1 40006>40103 11 0 0 0 1 40005> 40003>40104 5 61 84 0 0 0 -INDIC 40105 5 66 10 1 0 0 CLEAR FIRST LINE DISC 40106 80 522 2 0 0 0 522 - I/P C-LINE 40107 10 0 0 0 0 40108 5 66 10 1 0 0 40109 545 66 0 0 0 545 24/0/2 40110 80 356 2 0 0 0 356 gCOMPLEX O/P NON-A 40111 80 535 2 0 0 0 535 -REPLACE 40112 124 61 50 0 0 0 VARIANT+1 40113 545 67 0 0 0 545 40114 80 356 2 0 0 0 356 gCOMPLEX O/P NON-A 40115 61 84 0 0 0 40116 70 362 2 0 0 0 362 -GNB 40117 12 0 0 0 1 40118 70 401 23 0 0 0 401 gACTION 53 44846>40119 80 508 2 0 0 0 508 40120 546 7 0 0 0 546 1/1/1/2 40121 80 359 2 0 0 0 359 gO/P 40122 80 405 2 0 0 0 405 RESTORE C 40118>40123 0 61 26 0 0 0 SUSPENDED REF 40124 12 0 0 0 64 100 40125 72 362 2 0 0 0 362 gGNB (NO +CTR) 40126 80 535 2 0 0 0 535 RESTORE S/R 40127 0 545 11 0 0 0 545 3/0/0 40128 80 502 2 0 0 0 502 g'ITEM+' SR 40129 76 362 2 0 0 0 362 gGNB (NO +CTR) 40200 PROCR 402 402 BULK CLEAR 40201 NOTES RADIX B ACTION 54 40007>40202 80 534 2 0 0 0 534 g SUSPEND FIRST LINEO/P 40203 66 14 1 0 0 LITERAL 40204 70 402 8 0 0 0 402 g LITERAL ZERO 40205 1 545 13 0 0 0 545 BIT 18 40206 30 0 0 0 5 40207 76 402 12 0 0 0 402 40204>40208 80 521 2 0 0 0 521 - I/P INST 40209 80 508 2 0 0 0 508 0/1/0 0/0/3 S/R 40210 80 406 2 0 0 0 406 - SECOND SUSPEND S/R 40211 545 13 0 0 0 545 BIT 18 40207>40212 5 61 52 1 0 0 40213 545 8 0 0 0 545 6/0/0 40214 80 357 2 0 0 0 357 g SHORT NO O/P 40215 66 14 1 0 0 LITERAL 40216 71 403 4 0 0 0 403 g NO CONT LINE 40217 80 407 2 0 0 0 407 g SECOND RESTORE S/R 40218 545 9 0 0 0 545 40219 80 358 2 0 0 0 358 g COMPLEX O/P ARITH 40220 80 405 2 0 0 0 405 RESTORE C S/R 40300 PROCR 403 403 BULK CLEAR 40301 NOTES RADIX 40302 546 8 0 0 0 546 18/0/1/5 40303 80 359 2 0 0 0 359 gO/P 40216>40304 80 535 2 0 0 0 535 - RESTORE S/R 40305 66 10 0 0 0 FIRST LINE DISC 40306 70 403 11 0 0 0 403 40307 10 0 0 0 0 40308 5 66 10 1 0 0 CLEAR DISC 40309 546 29 0 0 0 546 28/1/1 40310 76 403 12 0 0 0 403 40306>40311 545 65 0 0 0 545 28/0/0 40443> 40910> 44852> 40310> 38213>40312 80 356 2 0 0 0 356 g COMPLEX O/P NON-A 40313 76 362 2 0 0 0 362 g GNB 40400 PROCR 404 404 BULK COPY 40401 NOTES RADIX 40008>40402 66 14 1 0 0 LITERAL 40403 5 61 113 0 0 0 W/L 40404 80 522 2 0 0 0 522 I/P C-LINE 40405 80 406 2 0 0 0 406 SECOND SUSPEND C/R 40406 0 61 62 0 0 0 40407 70 404 10 0 0 0 404 g SHORT BEST 40408 10 0 0 0 1 READ NEXT BLOCK 40409 5 61 62 0 0 0 40407>40410 61 30 0 0 0 DISC. FIRST LINE 40411 70 404 16 0 0 0 404 g SHORT SOURCE 40412 10 0 0 0 1 40413 3 61 30 0 0 0 40414 2 61 62 0 0 0 40415 4 61 28 1 0 0 AUG BY 0 OR 1 40411>40416 80 535 2 0 0 0 535 RESTORE FIRST LINE 40417 5 66 10 1 0 0 DISC 40418 545 66 0 0 0 545 24/0/2 40419 80 356 2 0 0 0 356 g COMPLEX O/P NON-A 40420 545 72 0 0 0 545 18/1/15- 40421 80 359 2 0 0 0 359 gO/P 40422 61 113 0 0 0 FIRST LINE LITERAL 40423 71 404 28 0 0 0 404 40424 80 521 2 0 0 0 521 I/P INSTRUCTION 40425 545 8 0 0 0 545 6/0/0 40426 80 358 2 0 0 0 358 g COMPLEX O/P ARITH 40427 76 404 30 0 0 0 404 40423>40428 1 545 22 0 0 0 545 1/1/3 40429 80 359 2 0 0 0 359 gO/P 40427>40430 545 55 0 0 0 545 18/1/1/0/5 40431 80 359 2 0 0 0 359 gO/P 40432 80 407 2 0 0 0 407 SECOND RESTORE S/R 40433 61 30 0 0 0 1ST LINE DISC 40434 3 66 10 0 0 0 40435 71 404 40 0 0 0 404 40436 0 61 62 0 0 0 DISC (2ND LINE) 40437 70 404 40 0 0 0 404 40438 10 0 0 0 1 40439 4 66 8 1 0 0 ITEM 40437> 40435>40440 545 65 0 0 0 545 28/0/0 40441 124 61 62 0 0 0 C-LINE DISC 40442 2 545 25 0 0 0 545 40443 76 403 12 0 0 0 403 g COMPLEX O/P > GNB 40500 PROCR 405 405 RESTORE C S/R 40501 NOTES RADIX B 40502 81 405 2 0 0 0 405 40503 61 25 0 0 0 BINARY INDICATOR 40504 12 0 0 0 1 40505 3 61 25 0 0 0 40506 71 405 9 0 0 0 405 40507 546 9 0 0 0 546 0/0/3/4 40508 80 361 2 0 0 0 361 g LN:2C SR 40506>40509 82 405 2 0 0 0 405 40600 PROCR 406 406 SECOND SUSPEND S/R 40601 NOTES RADIX B 40602 81 406 2 0 0 0 406 40603 66 6 1 0 0 REF 40604 5 61 60 0 0 0 40605 66 8 1 0 0 ITEM 40606 5 61 61 0 0 0 40607 66 10 1 0 0 DISC 40608 5 61 62 0 0 0 40609 66 12 1 0 0 MOD 40610 5 61 63 0 0 0 40611 66 14 1 0 0 LIT 40612 5 61 64 0 0 0 40613 66 16 0 0 0 ITEM + IND 40614 5 66 18 0 0 0 ITEM + IND (2ND STORE) 40615 82 406 2 0 0 0 406 40700 PROCR 407 407 SECOND RESTORE S/R 40701 NOTES RADIX B 40702 81 407 2 0 0 0 407 40703 61 60 0 0 0 40704 5 66 6 1 0 0 REF 40705 61 61 0 0 0 40706 5 66 8 1 0 0 ITEM 40707 61 62 0 0 0 40708 5 66 10 1 0 0 DISC 40709 61 63 0 0 0 40710 5 66 12 1 0 0 MOD 40711 61 64 0 0 0 40712 5 66 14 1 0 0 LIT 40713 66 18 0 0 0 ITEM + IND (2ND STORE) 40714 5 66 16 0 0 0 ITEM + IND 40715 82 407 2 0 0 0 407 40800 PROCR 408 408 TABLE LOOK UP 40801 NOTES RADIX B 40009>40802 80 508 2 0 0 0 508 0/1/0 0/0/3 S/R 40803 80 534 2 0 0 0 534 gSUSPEND 40804 545 49 0 0 0 545 1/0/0 40805 80 356 2 0 0 0 356 gCOMPLEX O/P NON-A 40806 545 50 0 0 0 545 18/1/1 10 40807 80 359 2 0 0 0 359 gO/P 40808 0 61 32 0 0 0 SUSPENDED MOD DIGITS 40809 70 408 19 0 0 0 408 gUNMODIFIED 40810 545 10 0 0 0 545 5/0/0 40811 80 439 2 0 0 0 439 MR S/R 40812 61 26 0 0 0 REF 40813 71 408 19 0 0 0 408 g 40814 61 28 0 0 0 ITEM 40815 70 408 21 0 0 0 408 gDON'T BOTHER 40816 1 545 24 0 0 0 545 1/1/2 40817 80 359 2 0 0 0 359 gO/P 40818 76 408 21 0 0 0 408 40813> 40809>40819 545 10 0 0 0 545 5/0/0 40820 80 484 2 0 0 0 484 T.S.L'S 40818> 40815>40821 80 405 2 0 0 0 405 RESTORE C 40822 76 362 2 0 0 0 362 GNB 40900 PROCR 409 409 MERGE FIXED FIELD 40901 NOTES RADIX B 40010>40902 545 51 0 0 0 545 8/0/0 40903 5 61 0 0 0 0 40904 66 14 1 0 0 40905 70 409 8 0 0 0 409 40906 5 61 52 1 0 0 40907 76 375 12 0 0 0 375 gSHORT NO SR, GNB 40905>40908 5 66 12 1 0 0 CLEAR MOD DIGITS 40909 545 51 0 0 0 545 8/0/0 40910 76 403 12 0 0 0 403 gCOMPLEX O/P + GNB 40011>40911 545 52 0 0 0 545 8/1/0 40912 80 355 2 0 0 0 355 gO/P 40913 76 362 2 0 0 0 362 gGNB 41000 PROCR 410 410 ACTION 59 41001 NOTES RADIX B 40012>41002 80 508 2 0 0 0 508 0/1/0 0/0/3 SR 41003 66 12 1 0 0 41004 5 61 38 0 0 0 W/L 41005 5 66 12 1 0 0 41006 545 66 0 0 0 545 24/0/2 41007 80 356 2 0 0 0 356 gCOMPLEX O/P NON-A 41008 0 61 38 0 0 0 41009 5 61 32 0 0 0 TX MOD DIGITS 41010 0 545 11 0 0 0 545 3/0/0 41011 80 439 2 0 0 0 439 gMOD REGISTER SR 41012 80 522 2 0 0 0 522 I/P C-LINE 41013 545 9 0 0 0 545 4/0/0 41014 80 358 2 0 0 0 358 gCOMPLEX O/P ARITH 41015 61 38 0 0 0 41016 5 61 32 0 0 0 T. MOD DIGITS 41017 546 10 0 0 0 546 2/0/0/1 41018 80 439 2 0 0 0 439 gMOD REGISTER S/R 41019 80 399 2 0 0 0 399 g0/0/1 41020 76 362 2 0 0 0 362 gGNB 41100 PROCR 411 411 GROUP 6 ACTIONS 41101 NOTES RADIX B VARIANT 0-2 37210>41102 61 50 0 0 0 VARIANT+1 41103 12 0 0 0 3 41104 72 411 10 0 0 0 411 41105 124 61 50 0 0 0 41106 544 22 0 0 0 544 DEC OR ST RADIX 41112>41107 5 61 52 1 0 0 W/L 41108 545 28 0 0 0 545 0/0/3 41109 76 375 11 0 0 0 375 41104>41110 71 412 2 0 0 0 412 41111 66 14 1 0 0 LITERAL 41112 76 411 7 0 0 0 411 41200 PROCR 412 412 VARIANTS 3-5 41201 NOTES RADIX B STORE NO TO BE CONVERTED IF ACTION WORKS ON (A) 41110>41202 12 0 0 0 4 41203 72 415 2 0 0 0 415 gACTION 66-69 41204 66 12 0 0 0 MOD 41205 71 413 2 0 0 0 413 gACTING ON (N) 41206 0 66 6 0 0 0 REFERENCE 41207 34 66 8 0 0 0 41208 75 413 2 0 0 0 413 41209 10 0 0 0 6 41210 1 545 30 0 0 0 545 2/1/0 41211 80 361 2 0 0 0 361 gLN:2C SR 41300 PROCR 413 413 VARIANTS 3-5 41301 NOTES RADIX B 41208> 41205>41302 61 50 0 0 0 TEST 41303 12 0 0 0 6 VARIANT 5 41304 70 414 4 0 0 0 414 - 41305 80 534 2 0 0 0 534 - SUSPEND 41306 124 61 50 0 0 0 41307 0 544 20 0 0 0 544 NEW RADIX 41409>41308 3 61 76 0 0 0 FORM TABLE W/L 41309 5 61 52 1 0 0 W/L FOR S.N. S/R 41310 545 28 0 0 0 545 0/0/3 41311 80 357 2 0 0 0 357 gCONSTS O/P 41312 61 50 0 0 0 41313 12 0 0 0 6 41314 70 414 10 0 0 0 414 41315 124 61 50 0 0 0 41316 0 544 19 0 0 0 544 OLD RADIX 41411>41317 5 61 77 0 0 0 41318 80 416 2 0 0 0 416 CONVERT S/R 41319 80 535 2 0 0 0 535 gRESTORE SR 41320 66 12 0 0 0 MOD 41321 71 414 2 0 0 0 414 gACTING ON (N) 41322 0 66 6 0 0 0 41323 34 66 8 0 0 0 41324 75 414 2 0 0 0 414 gACTS ON (N) 41325 0 545 4 0 0 0 545 12/1/0 6 41326 76 361 8 0 0 0 361 gLN:2C+GNB 41400 PROCR 414 414 ACTIONS 63-65 41401 NOTES RADIX B 41324> 41321>41402 545 58 0 0 0 545 12 TO B17 41403 76 373 12 0 0 0 373 gCOMPLEX O/P+GNB 41304>41404 66 14 0 0 0 41405 5 61 38 0 0 0 GEN W/L 41406 80 522 2 0 0 0 522 - C-LINE S/R 41407 54 66 6 0 0 8 41408 66 14 0 0 0 41409 76 413 8 0 0 0 413 41314>41410 61 38 0 0 0 41411 76 413 17 0 0 0 413 41500 PROCR 415 415 ACTIONS 66 AND 667 41501 NOTES RADIX B SET FP SIGDIG/NORMAL MODE 41203>41502 70 415 5 0 0 0 415 g66, SIGDIG 41503 10 0 0 0 8000000025 =(B40+37) 41504 76 415 6 0 0 0 415 SELECT FP CONST 41502>41505 12 0 0 0 8000000025 TO PUT INTO 132' 41504>41506 5 61 52 1 0 0 41507 0 545 8 0 0 0 545 6/0/0 41508 80 357 2 0 0 0 357 gLONG NO O/P 41509 10 0 0 0 0 41510 80 504 2 0 0 0 504 gO/P 24/1/2 2C COPY FP CONST 41511 10 0 0 0 38084 3/1/0 132 LONG TO 132' 41512 80 359 2 0 0 0 359 gO/P 41513 0 61 50 0 0 0 VARIANT+1 41514 12 0 0 0 7 TEST ACTION 67 41515 71 362 2 0 0 0 362 gYES, GNB 41516 80 504 2 0 0 0 504 gO/P 24/1/2 2C COPY SHORT TO 132 TO 41517 10 0 0 0 20084 2/0/0 132 SET SIGN BIT THERE 41518 76 382 9 0 0 0 382 O/P AND GET NEXT BLOCK 41600 PROCR 416 416 CONVERSION TABLE S/R 41601 NOTES RADIX B 41602 81 416 2 0 0 0 416 41603 92 7 0 0 0 41604 30 0 0 0 5 41605 91 0 0 2 0 41606 70 416 11 0 0 0 416 gNONE STORED 41610>41607 61 76 1 0 0 41608 2 99 0 1 2 0 41609 70 416 13 0 0 0 416 gMATCH 41610 94 416 7 0 2 2 416 41606>41611 10 0 0 0 53 =C 41612 80 501 2 0 0 0 501 gMISMATCH SR 41609>41613 10 0 0 0 3.8 PROCR 1000 41614 30 0 0 0 2 41615 1 92 29 0 0 0 FORM 2C FOR EXTRA CHAP 41616 1 92 29 0 0 0 41617 12 0 0 0 1 REF: 2C-1 41618 5 61 52 0 0 0 41619 96 0 0 2 0 41620 16 0 0 0 10 41621 5 61 53 0 0 0 CTR WITHIN PROCR 41622 545 8 0 0 0 545 6 TO B17 41623 5 61 0 0 0 0 41624 80 485 2 0 0 0 485 TSL S/R 41625 82 416 2 0 0 0 416 EXIT 41700 PROCR 417 417 GROUP 7 ACTIONS 41701 NOTES RADIX B 43615> 37211>41702 0 61 50 0 0 0 VARIANT+1 41703 12 0 0 0 8 TEST ACTIONS 77-79 41704 73 417 37 0 0 0 417 gACTIONS 70-76 41705 80 534 2 0 0 0 534 SUSPEND LINE 41706 80 504 2 0 0 0 504 24/1/2 2C 41707 0 61 50 0 0 0 V+1 41708 12 0 0 0 t 41709 70 417 11 0 0 0 417 gACTION 79 41710 10 0 0 0 2- 41709>41711 12 0 0 0 10080 17/0/0 128 41712 80 359 2 0 0 0 359 gO/P 41713 0 61 50 0 0 0 V+1 41714 12 0 0 0 t SELECT A* 41715 70 417 34 0 0 0 417 gACTION 79 EXPT OR MANT 41716 0 545 10 0 0 0 545 5/0/0 TO A 41717 5 61 0 1 0 0 41718 0 66 14 1 0 0 LITERAL 41719 71 417 27 0 0 0 417 gNO C-LINE 41720 80 522 2 0 0 0 522 gI/P C-LINE SUBTRACT NC1 41721 80 536 2 0 0 0 536 gO/P INSTRUCTION OR LITERAL 41722 60 0 0 0 0 41723 12 0 0 0 1 41724 4 66 2 1 0 0 41725 62 0 0 0 0 41726 76 417 30 0 0 0 417 41719>41727 5 61 52 1 0 0 LONG CONST W/L 41728 545 10 0 0 0 545 5/0/0 41729 80 357 2 0 0 0 357 gLONG/SHORT NO S/R 41726>41730 80 535 2 0 0 0 535 RESTORE FORST LINE 41731 0 61 50 0 0 0 V+1 41732 12 0 0 0 8 79,78 AS 72 41733 70 417 35 0 0 0 417 gACTION 77 77 AS 73 41715>41734 10 0 0 0 1- 41733>41735 11 0 0 0 4 41736 3 61 50 0 0 0 SET TRICK VARIANT 41704>41737 5 61 1 0 0 0 SET NON-ARITH IND 41738 80 489 2 0 0 0 489 gM&P 41739 80 418 2 0 0 0 418 S. CHANGE S.R. 41740 124 61 50 0 0 0 41741 545 39 0 0 0 545 27 ACTION 41742 5 61 0 0 0 0 41743 76 441 4 0 0 0 441 - STACK O/P GNB 41800 PROCR 418 418 S.C. S/R 41801 NOTES RADIX B 41802 81 418 2 0 0 0 418 41803 0 66 6 1 0 0 REF 41804 70 420 9 0 0 0 420 41805 12 0 0 0 3.7 999 41806 72 420 9 0 0 0 420 g SKIP 41807 66 8 1 0 0 ITEM 41808 71 418 13 0 0 0 418 g NOT TO PROCR START 41809 61 10 0 0 0 THIS PROCR 41810 2 66 6 0 0 0 REF 41811 72 419 30 0 0 0 419 g SC BACK TO PROCR STARTNOT TO PROCR STA 41812 76 418 23 0 0 0 418 gSC FORWARD 41808>41813 95 0 0 1 0 CURRENT HEAD OF 'SC BACK' LIST 41814 30 0 0 0 5 41815 1 544 17 0 0 0 544 ABS ADDRESS 18/0 41816 91 0 0 2 0 R2* (A) 41817 94 418 19 0 2 0 418 ///// 41818 76 418 23 0 0 0 418 NO DESTS REPLACED YET 41822> 41817>41819 66 2 0 0 0 THIS ORDER 41820 2 1 0 2 0 INTERCODE DEST 41821 70 420 2 0 0 0 420 g MATCH FOUND 41822 94 418 19 0 2 2 418 > TRY NEXT 41818> 41812>41823 0 66 6 1 0 0 ASSUME SEQ CH FWD 41824 80 538 2 0 0 0 538 gREF TO DEC 41825 30 0 0 0 2 41826 5 61 18 0 0 0 41827 0 66 8 1 0 0 41828 80 538 2 0 0 0 538 g ITEM TO DEC 41829 11 0 0 0 2 ADD 2 TO ITEM 41830 4 61 18 0 0 0 41831 62 0 0 0 0 SET BINARY 41832 0 61 117 0 0 0 CTR OF SEC 20 LENGTH 41833 91 0 0 2 0 ZERO END VALUE 41834 70 419 9 0 0 0 419 g EMPTY 41835 12 0 0 0 12+ 300 41836 73 418 40 0 0 0 418 g OK 41837 10 0 0 0 78 'Y' 41838 80 501 2 0 0 0 501 g REPORT 41839 82 418 2 0 0 0 418 g EXIT, DON'T SET S'C IND 41908> 41836>41840 0 20 3- 0 2 0 NEXT DEST (LAST IN LIST FIRST) 41841 2 61 18 0 0 0 41842 73 419 9 0 0 0 419 g FITS NOW 41900 PROCR 419 419 S.C. S/R 41901 NOTES RADIX 41902 0 20 3- 0 2 0 MOVE LIST DOWN 1 ITEM 41903 5 20 0 0 2 0 41904 0 20 2- 0 2 0 41905 5 20 1 0 2 0 41906 0 20 1- 0 2 0 41907 5 20 2 0 2 0 41908 94 418 40 0 2 3- 418 > NEXT 41842> 41834>41909 0 61 18 0 0 0 DEST OF NEWCOMER 41910 5 20 0 0 2 0 41911 66 2 1 0 0 SOURCE 41912 5 20 1 0 2 0 41913 66 8 1 0 0 41914 3 20 2 0 2 0 41915 70 419 28 0 0 0 419 g DEST IS A PROCR START 41916 10 0 0 0 1 41917 5 67 1 0 0 0 SET 'SEQ' CH' IND 41918 0 546 19 0 0 0 546 FLIPFLOP 0/10 41919 30 0 0 0 4 TO Q5 41920 1 61 118 0 0 0 ABS LOCN IN SEC 18 918:2499 INITIALLY) 41921 5 20 2 0 2 0 41922 10 0 0 0 t 41923 2 546 19 0 0 0 546 41924 3 546 19 0 0 0 546 REVERSE 41925 71 419 28 0 0 0 419 g NEXT TIME IS TOP 10 BITS OF SAME LOCN 41926 12 0 0 0 1 41927 4 61 118 0 0 0 REDUCE ABS ADDRESS 41925> 41915>41928 10 0 0 0 3 41929 4 61 117 0 0 0 STEP CTR OF ACTIVE SC'S 41811>41930 82 418 2 0 0 0 418 42000 PROCR 420 420 S.C. S/R: MATCH FOUND IN SC BACK LIST 42001 NOTES RADIX B 41821>42002 34 0 0 2 0 PROCR + ITEM 42003 33 0 0 0 30 42004 5 66 6 1 0 0 REF (BITS 11 - 20) 42005 33 0 0 0 10 42006 5 66 8 1 0 0 ITEM (BITS 1 - 10) 42007 96 0 0 2 0 42008 80 421 2 0 0 0 421 g CONTRACT LIST 41806> 41804>42009 82 418 2 0 0 0 418 42100 PROCR 421 421 CONTRACT THE SC BACK LIST BY 1 WORD 42101 NOTES 42102 81 421 2 0 0 0 421 42103 5 61 114 0 0 0 WORD TO BE OVERWRITTEN 42104 95 0 0 1 0 42105 5 61 18 1 0 0 START/END OF LIST (ABS) 42106 61 19 0 0 0 42107 2 61 114 0 0 0 42108 70 421 18 0 0 0 421 g NONE TO BE MOVED 42109 30 0 0 0 5 42110 1 61 114 0 0 0 42111 11 0 0 0 2 FORM SOURCE IN A 42112 124 61 114 0 3 0 42113 128 0 1 1 0 COPY UP BY 1 WORD 42114 12 0 0 0 2 42115 4 61 18 0 0 0 42116 4 61 19 0 0 0 ADJUST R1 FOR NEW LIST POSITION 42117 91 61 18 0 1 0 42108>42118 82 421 2 0 0 0 421 42200 PROCR 422 422 GROUP 8 SWITCH 42201 NOTES RADIX B 37212>42202 85 381 2 0 0 0 381 42203 C 423 5 0 0 0 423 > 80 42204 C 423 2 0 0 0 423 > 81 42205 C 424 2 0 0 0 424 82 42206 C 425 2 0 0 0 425 83 42207 C 426 2 0 0 0 426 84 42208 C 427 2 0 0 0 427 85 42209 C 424 6 0 0 0 424 86 ACTION SELECT SWITCH SETTIN 42210 C 422 11 0 0 0 422 87 (85 ON A COMPT) 42210>42211 5 66 10 1 0 0 CLEAR DISC 42212 0 546 3 0 0 0 546 24/0/1 42213 80 356 2 0 0 0 356 gO/P NON-A 42214 76 427 7 0 0 0 427 gCONTINUE AS 85 42300 PROCR 423 423 ACTIONS 81 AND 80 42301 NOTES 0 0 42204>42302 0 61 10 0 0 0 COPY CURRENT PROCR ACTION 81 42303 5 61 9 0 0 0 42304 76 382 9 0 0 0 382 gO/P ZERO LOCN, GNB 42203>42305 80 534 2 0 0 0 534 g SUSPEND ACTION 80 42306 90 0 0 2 0 42307 C 0 0 0 40 (UP TO 20 C-LINES) 42317>42308 80 397 2 0 0 0 397 g TEST C-LINE 42309 71 423 19 0 0 0 423 g NO 42310 0 66 6 0 0 0 42311 5 61 54 0 2 0 REF 42312 66 10 0 0 0 DISC 42313 30 0 0 0 4 42314 4 61 54 0 2 0 STORE WITH REF 42315 0 66 8 1 0 0 42316 5 61 55 0 2 0 ITEM(+-) 42317 94 423 8 0 2 2 423 42318 80 509 2 0 0 0 509 PROMOTE READ NEXT BLOCK 42309>42319 80 535 2 0 0 0 535 gRESTORE FIRST LINE 42320 96 0 0 2 0 42321 5 66 15 0 0 0 STORE MODIFIER OVER LITERAL 42322 66 6 0 0 0 BIN REF 42323 101 1000 1 2 0 42324 73 423 27 0 0 0 423 gREF NOT 1000+ 42325 10 0 0 0 0 42326 76 423 29 0 0 0 423 gDON'T CLEAR ITEM 42324>42327 10 0 0 0 0 42328 5 66 8 1 0 0 CLEAR I.D.M 42326>42329 5 66 10 1 0 0 42330 5 66 12 1 0 0 42331 5 66 14 0 0 0 42332 0 545 47 0 0 0 545 26/0/0 42333 80 356 2 0 0 0 356 gCOMPLEX O/P NON-A 42334 66 15 0 0 0 42335 70 362 3 0 0 0 362 gNO C-LINES, GNB(NON-I/P) 42336 31 0 0 0 1- 42337 5 61 18 0 0 0 WL 42338 546 11 0 0 0 546 24/1/0/1 42339 2 61 18 0 0 0 SPACE OCCUPIED BY C-LINES 42340 80 498 2 0 0 0 498 gO/P INT SC 42341 91 66 14 0 4 0 42371>42342 35 0 0 0 111 42343 36 61 54 0 4 0 42344 3 66 6 0 0 0 REF 42345 5 61 35 0 0 0 42346 80 486 2 0 0 0 486 gDETERMINE CHAPTER 42347 32 0 0 0 1- 42348 71 423 51 0 0 0 423 gTX AREA 42349 32 0 0 0 1 42350 76 423 56 0 0 0 423 42348>42351 80 488 2 0 0 0 488 gPSEUDOROUTE SR 42352 11 0 0 0 1 PARA 42353 5 61 34 0 0 0 42354 5 66 6 1 0 0 CLEAR REF 42355 76 423 66 0 0 0 423 42350>42356 3 61 34 0 0 0 42357 70 423 60 0 0 0 423 gZERO PARA 42358 12 0 0 0 1 42359 4 61 34 0 0 0 42357>42360 61 54 0 4 0 42361 30 0 0 0 4- 42362 70 423 65 0 0 0 423 gNO DISC IN C-LINE 42363 10 0 0 0 2 42364 5 67 1 0 0 0 SEQ CH IND='ON' 42362>42365 0 61 55 0 4 0 ITEM 42355>42366 5 66 8 1 0 0 42367 5 61 0 0 0 0 CLEAR ACTION 42368 80 531 2 0 0 0 531 gNEG NO 42369 80 532 2 0 0 0 532 gSTACK 42370 80 518 2 0 0 0 518 gO/P 42371 94 423 42 0 4 2 423 42372 76 362 3 0 0 0 362 gGNB(NON-I/P) 42400 PROCR 424 424 ACTIONS 82 AND 86 42401 NOTES RADIX B 42205>42402 54 66 8 0 0 6 CLEAR I, D, M ACTION 82 42403 0 545 48 0 0 0 545 26/0/1 42404 80 356 2 0 0 0 356 gCOMPLEX O/P NON-A 42405 76 362 2 0 0 0 362 gGNB 42209>42406 10 0 0 0 0 86 ACTION 42407 5 61 113 0 0 0 INDICATOR WHETHER TO I/P OR NOT AT GNB. 42408 545 8 0 0 0 545 6/0/0 42409 76 425 7 0 0 0 425 42500 PROCR 425 425 ACTION 83 42501 NOTES RADIX B 42206>42502 545 22 0 0 0 545 1/1/3 42503 1 66 14 0 0 0 42504 80 359 2 0 0 0 359 gO/P 42505 5 61 113 0 0 0 INDICATOR 42612>42506 545 13 0 0 0 545 2/0/0 42409>42507 5 61 0 0 0 0 ACTION W/L 42508 80 429 2 0 0 0 429 SWITCH SR 42509 61 113 0 0 0 42510 70 441 4 0 0 0 441 - STACK O/P GNB 42511 80 532 2 0 0 0 532 - STACK 42512 80 518 2 0 0 0 518 O/P 42513 0 397 2 0 0 0 397 RESTORE IND 42514 5 545 99 0 0 0 545 42515 76 362 3 0 0 0 362 - GNB (NO I/P) 42600 PROCR 426 426 ACTION 84 42601 NOTES RADIX B 42207>42602 80 534 2 0 0 0 534 - SUSPEND 42603 80 397 2 0 0 0 397 gTEST C-LINE SR 42604 3 61 113 0 0 0 NON-I/P IND 42605 70 426 9 0 0 0 426 gYES 42606 0 545 99 0 0 0 545 'PRINT ME' IND FOR LINE READ BY ACCIDENT 42607 5 397 2 0 0 0 397 STORE IND 42608 76 426 11 0 0 0 426 42605>42609 545 8 0 0 0 545 6/0/0 42610 80 358 2 0 0 0 358 gCOMPLEX O/P ARITH 42608>42611 80 535 2 0 0 0 535 - RESTORE S/R 42612 76 425 6 0 0 0 425 42700 PROCR 427 427 ACTION 85 42701 NOTES RADIX B 42208>42702 80 429 2 0 0 0 429 SWITCH SR 42703 0 546 3 0 0 0 546 24/0/1 42704 5 61 0 0 0 0 42705 80 532 2 0 0 0 532 - STACK S/R 42706 80 518 2 0 0 0 518 g = O/P S/R 42214>42707 545 48 0 0 0 545 26/0/1 42708 80 498 2 0 0 0 498 g O/P INT SC 42812>42709 80 522 2 0 0 0 522 I/P C-LINE S/R 42710 10 0 0 0 0 42711 5 61 0 0 0 0 CLEAR ACTION W/L 42800 PROCR 428 428 ACTION 85 (2) 42801 NOTES RADIX 42802 66 6 0 0 0 42803 5 61 35 0 0 0 42804 80 486 2 0 0 0 486 42805 3 61 34 0 0 0 42806 70 428 8 0 0 0 428 g DON'T MAKE A PARA 1- 42807 12 0 0 0 1 42806>42808 4 61 34 0 0 0 42809 80 418 2 0 0 0 418 SEQUENCE CHANGE S/R 42810 80 532 2 0 0 0 532 STACK 42811 80 518 2 0 0 0 518 g O/P 42812 76 427 9 0 0 0 427 42900 PROCR 429 429 SWITCH S/R 42901 NOTES RADIX B 42902 81 429 2 0 0 0 429 42903 91 95 0 0 8 0 NO OF SWITCHES 42904 34 544 26 0 0 0 544 BITS 1-10 42910>42905 10 0 0 0 0 42906 36 95 2 0 8 0 42907 70 429 11 0 0 0 429 g MISMATCH 42908 2 66 6 1 0 0 42909 70 429 13 0 0 0 429 g OK 42910 94 429 5 0 8 1 429 42907>42911 10 0 0 0 72 ERRORS 42912 80 501 2 0 0 0 501 g MISMATCH SR 42909>42913 95 2 0 8 0 42914 32 0 0 0 4- CHAP TO Q1 42915 3 61 54 0 0 0 42916 101 1001 1 1 0 (1001+CHAP)= SWITCH PROCR 42917 5 66 6 0 0 0 PROCR TO SWITCH 42918 33 0 0 0 6 42919 5 66 8 0 0 0 POSITION IN PROCR 42920 61 54 0 0 0 CHAP NO. SWITCH 42921 2 61 51 0 0 0 THIS CHAP 42922 70 429 26 0 0 0 429 g YES 42923 1 61 51 0 0 0 42924 80 504 2 0 0 0 504 24/1/2/2C-1/2C S/R 42925 76 429 27 0 0 0 429 g ZERO PARA 42922>42926 61 3 0 0 0 42925>42927 5 61 34 0 0 0 42928 82 429 2 0 0 0 429 43000 PROCR 430 430 GROUP 9 SWITCH 43001 NOTES RADIX 37213>43002 85 381 2 0 0 0 381 43003 C 431 2 0 0 0 431 90 43004 C 432 2 0 0 0 432 91 43005 C 433 2 0 0 0 433 92 43006 C 434 2 0 0 0 434 93 43007 C 435 2 0 0 0 435 94 43008 C 437 2 0 0 0 437 95 43009 C 437 3 0 0 0 437 96 43010 C 438 2 0 0 0 438 97 43011 C 430 13 0 0 0 430 98 ADD(MR) 43012 C 430 14 0 0 0 430 99 SUBTRACT (MR) 43011>43013 2 545 49 0 0 0 545 1/0/0 (A IS CLEAR) 43012>43014 1 545 10 0 0 0 545 5/0/0 43015 5 537 2 0 0 0 537 43016 80 534 2 0 0 0 534 g SUSPEND 43017 0 66 10 1 0 0 DISC 43018 70 430 20 0 0 0 430 43019 0 545 29 0 0 0 545 BIT 16 43018>43020 1 537 2 0 0 0 537 WL 43021 80 439 2 0 0 0 439 g MR SR 43022 76 362 2 0 0 0 362 g GNB 43100 PROCR 431 431 ACTION 90 43101 NOTES RADIX B 43003>43102 80 534 2 0 0 0 534 - SUSPEND S/R 43103 66 14 1 0 0 43104 5 61 52 0 0 0 SUSPEND LITERAL 43105 80 521 2 0 0 0 521 I/P INST S/R 43106 66 14 1 0 0 43107 5 61 53 0 0 0 43108 61 52 0 0 0 43109 73 431 12 0 0 0 431 g NEGATIVE MODIFIER 43110 0 61 53 0 0 0 43111 72 431 15 0 0 0 431 g POSITIVE MODIFIER > END VALUE 43109>43112 545 49 0 0 0 545 BIT 17 43113 4 61 52 0 0 0 START VALUE 43114 4 61 53 0 0 0 END VALUE 43111>43115 61 32 1 0 0 MOD DIGITS 43116 12 0 0 0 4 43117 73 431 22 0 0 0 431 g MR 1 - 3 43118 0 545 8 0 0 0 545 6/0/0 MR>3 43119 5 61 0 0 0 0 A CLEAR AT START 43120 80 481 2 0 0 0 481 g LONG NUMBER 43121 76 431 28 0 0 0 431 43117>43122 545 47 0 0 0 545 26/0/0 43123 124 61 32 0 0 0 43124 2 545 25 0 0 0 545 43125 5 61 0 0 0 0 43126 80 481 2 0 0 0 481 g LONG NO SR 43127 76 362 2 0 0 0 362 g GNB 43218> 43222> 43121>43128 0 61 32 0 0 0 SUSPEND MOD DIGITS 43129 5 61 2 0 0 0 43130 545 30 0 0 0 545 2/1/0 43131 80 506 2 0 0 0 506 MR >3 SR 43132 76 362 2 0 0 0 362 43200 PROCR 432 432 ACTION 91 43201 NOTES RADIX B 43004>43202 10 0 0 0 0 STORE ABC SET BIN RA 43203 5 66 10 1 0 0 CLEAR DISCRIMINANT 43204 66 6 1 0 0 REF 43205 34 66 8 1 0 0 ITEM 43206 74 432 19 0 0 0 432 g REF AND ITEM ZERO 43207 66 12 0 0 0 MOD DIGITS 43208 3 61 32 0 0 0 43209 12 0 0 0 4 43210 72 432 14 0 0 0 432 gMR>3 43211 545 56 0 0 0 545 26/1/0 43212 80 358 2 0 0 0 358 gCOMPLEX O/P ARITH 43213 76 362 2 0 0 0 362 gGNB 43210>43214 10 0 0 0 0 43215 5 66 12 1 0 0 43216 0 545 57 0 0 0 545 6/1/0 43217 80 358 2 0 0 0 358 gCOMPLEX O/P ARITH 43218 76 431 28 0 0 0 431 43206>43219 66 12 0 0 0 MOD DIGITS 43220 3 61 32 0 0 0 43221 12 0 0 0 4 43222 72 431 28 0 0 0 431 43223 545 31 0 0 0 545 3/1/0 43224 80 361 2 0 0 0 361 gLN:2C SR 43225 0 545 56 0 0 0 545 26/1/0 43226 124 66 12 0 0 0 MOD DIGITS 43227 2 545 25 0 0 0 545 43228 76 361 8 0 0 0 361 gLN:2C +GNB 43300 PROCR 433 433 ACTION 92 43301 NOTES RADIX B 43005>43302 0 66 12 0 0 0 43303 5 61 32 0 0 0 WL 43304 5 66 12 0 0 0 CLEAR MOD DIGITS 43305 0 66 6 0 0 0 REF 43306 34 66 8 0 0 0 ITEM 43307 74 433 10 0 0 0 433 gACTS ON (A) 43308 545 8 0 0 0 545 6 TO B17 43309 80 358 2 0 0 0 358 gCOMPLEX O/P ARITH 43307>43310 0 545 13 0 0 0 545 2/0/0 43311 80 439 2 0 0 0 439 gMOD REGISTER SR 43312 76 362 2 0 0 0 362 gGNB 43400 PROCR 434 434 ACTION 93 (1) 43401 NOTES RADIX B 43006>43402 80 508 2 0 0 0 508 -0/1/0 0/0/3 S/R 43403 80 534 2 0 0 0 534 SUSPEND 43404 544 23 0 0 0 544 DEC RADIX 43405 30 0 0 0 5 43406 5 61 76 1 0 0 43407 80 416 2 0 0 0 416 CONVERSION TABLE SR 43408 80 535 2 0 0 0 535 REPLACE S/R 43409 5 66 12 1 0 0 CLEAR 43410 545 58 0 0 0 545 12/0/0 43411 80 358 2 0 0 0 358 gCOMPLEX O/P ARITH 43412 546 12 0 0 0 546 27/0/2/2 43413 80 498 2 0 0 0 498 gO/P INT SC 43414 545 49 0 0 0 545 BIT 17 43415 5 61 52 1 0 0 43416 545 9 0 0 0 545 4/0/0 43417 80 357 2 0 0 0 357 gSHORT NO O/P 43418 545 13 0 0 0 545 2/0/0 43419 80 439 2 0 0 0 439 MOD REGISTER S/R 43420 80 399 2 0 0 0 399 gRESTORE ABC 43421 76 362 2 0 0 0 362 gGNB 43500 PROCR 435 435 ACTION 94 43501 NOTES RADIX B 43814> 43007>43502 0 66 14 1 0 0 LITERAL 43503 72 435 6 0 0 0 435 43504 10 0 0 0 1000 4096 43505 4 66 14 0 0 0 AUGMENT MODULAS 43503>43506 66 12 0 0 0 43507 3 61 2 0 0 0 STORE DIGITS 43508 12 0 0 0 4 43509 72 436 16 0 0 0 436 gMR>3 43510 545 59 0 0 0 545 25/0/0 43511 2 66 14 0 0 0 MOD L 43512 124 66 12 0 0 0 43513 2 545 25 0 0 0 545 0/0/0 0/0/3 43514 80 359 2 0 0 0 359 gOUTPUT 43600 PROCR 436 436 ACTION 94 43601 NOTES RADIX B 43620>43602 66 6 1 0 0 REF 43603 34 66 8 1 0 0 ITEM 43604 75 436 11 0 0 0 436 REF & ITEM NON ZERO 43605 546 11 0 0 0 546 24/1/0/1 43606 80 498 2 0 0 0 498 gO/P INT SC 43607 0 61 50 0 0 0 VARIANT +1 TEST IF WE CAME IN 43608 12 0 0 0 8 WITH 97 ACTION 43609 71 362 2 0 0 0 362 gGNB 43610 76 362 3 0 0 0 362 gGNB (NO INPUT) 43604>43611 10 0 0 0 7 SET VARIAMT AS 43612 5 61 50 0 0 0 THOUGH 76 ACTION 43613 5 61 2 0 0 0 43614 5 66 12 1 0 0 43615 76 417 2 0 0 0 417 GROUP 7 ACTIONS 43509>43616 0 545 61 0 0 0 545 23/0/0 MR>3 43617 2 66 14 0 0 0 MOD L 43618 80 359 2 0 0 0 359 gO/P, CLEAR A 43619 80 506 2 0 0 0 506 gMR>3 SR 43620 76 436 2 0 0 0 436 43700 PROCR 437 437 ACTIONS 95 AND 96 43701 NOTES RADIX B 43008>43702 0 545 29 0 0 0 545 BIT 16=DISC 43009>43703 1 545 8 0 0 0 545 6/0/0 43704 32 0 0 0 10- 43705 0 66 12 0 0 0 43706 5 61 32 0 0 0 STORE MOD DIGITS 43707 32 0 0 0 10 ACTION 43708 80 439 2 0 0 0 439 gMOD REGISTER SR 43709 76 362 2 0 0 0 362 gGNB 43800 PROCR 438 438 43801 NOTES RADIX B ACTION 97 43010>43802 80 534 2 0 0 0 534 43803 5 66 12 1 0 0 43804 5 66 10 1 0 0 CLEAR DISC. 43805 0 546 3 0 0 0 546 24/0/1 43806 80 356 2 0 0 0 356 gCOMPLEX O/P NON-A 43807 80 397 2 0 0 0 397 gTEST C-LINE FOLLOWS 43808 70 438 12 0 0 0 438 gYES 43809 10 0 0 0 0 43810 5 66 6 1 0 0 43811 5 66 8 1 0 0 43808>43812 0 61 32 1 0 0 STORED MOD DIGITS 43813 5 66 12 1 0 0 43814 76 435 2 0 0 0 435 43900 PROCR 439 439 ARITHMETIC ON MOD REGISTERS=SEL/COPY/SUBTRACT/ADD 43901 NOTES 43902 81 439 2 0 0 0 439 61/32=MR,(A)=ACTION+DISC 43903 5 537 2 0 0 0 537 CONVERT SR LINK 43904 0 61 32 0 0 0 43905 12 0 0 0 4 43906 72 439 16 0 0 0 439 gMR>3 43907 80 505 2 0 0 0 505 g24/0/3 2C 43908 0 537 2 0 0 0 537 ACTION 43909 1 61 32 0 0 0 2M AS ADDRESS 43910 1 61 32 0 0 0 43911 5 67 3 0 0 0 43912 0 61 41 0 0 0 MOD GROUP PARA 43913 5 67 2 0 0 0 43914 80 518 2 0 0 0 518 gO/P 43915 82 439 2 0 0 0 439 43906>43916 0 61 32 0 0 0 43917 5 61 2 0 0 0 TX MOD DIGITS 43918 0 537 2 0 0 0 537 ACTION+DISC 43919 80 506 2 0 0 0 506 MR>3 SR 43920 82 439 2 0 0 0 439 44000 PROCR 440 440 M/C ACTIONS 44001 NOTES RADIX B CALCULATE PARAMETERS, TEST 24/1/0 OR 27/D/M 37217>44002 10 0 0 0 t GROUP 13 37216>44003 11 0 0 0 t 12 37215>44004 11 0 0 0 t 11 37214>44005 12 0 0 0 1 10 44006 1 61 50 0 0 0 V+1 44007 3 61 0 0 0 0 ACTION 44008 12 0 0 0 17 23 44009 70 442 2 0 0 0 442 gACTION 23 44010 12 0 0 0 9 44011 72 443 2 0 0 0 443 g32,33 OR 34 44204>44012 66 6 0 0 0 REF PARA 0 OR 2C ROUTINE 44013 70 440 50 0 0 0 440 44014 3 61 35 0 0 0 44015 101 999 1 2 0 44016 71 440 37 0 0 0 440 gNOT REF 999 44017 543 44 1 0 0 543 CLEO'PARA WORD 44018 70 440 37 0 0 0 440 gNOT APPLICABLE 44019 32 0 0 0 6- 44020 70 440 24 0 0 0 440 gNOT FILE ID 44021 5 61 54 0 0 0 44022 80 499 2 0 0 0 499 gCALC PARA 44023 76 440 34 0 0 0 440 44020>44024 32 0 0 0 2 44025 70 440 30 0 0 0 440 gNOT MR PARA,HENCE TX AREA 44026 5 543 44 1 0 0 543 44027 0 61 41 0 0 0 MOD GROUP PARA 44028 1 543 44 2 0 0 543 44029 76 440 34 0 0 0 440 44025>44030 543 44 2 0 0 543 44031 5 66 6 0 0 0 SECTION NUMBER 44032 80 488 2 0 0 0 488 44033 11 0 0 0 1 44029> 44023>44034 5 66 8 1 0 0 ITEM 44035 5 66 6 1 0 0 CLEAR REF 44036 76 440 47 0 0 0 440 gPARA 2C 44018> 44016>44037 0 61 112 0 0 0 PROG IDENTITY 44038 30 0 0 0 2- 44039 12 0 0 0 90 44040 71 440 44 0 0 0 440 gNOT MASTER SUITE 44041 80 486 2 0 0 0 486 44042 31 0 0 0 1 FORM 2C' 44043 76 440 51 0 0 0 440 gSTORE PARA 44040>44044 80 486 2 0 0 0 486 gDET CHAP 44045 2 61 51 0 0 0 THIS CHAP 44046 71 440 50 0 0 0 440 - 44036>44047 61 51 0 0 0 44048 1 61 51 0 0 0 44049 76 440 51 0 0 0 440 - 44046> 44013>44050 10 0 0 0 0 44049> 44043>44051 5 61 34 0 0 0 PARA W/L 44052 0 66 10 0 0 0 DISC 44053 12 0 0 0 2 44054 71 440 58 0 0 0 440 gTAKE YOUR CHANCE 44055 10 0 0 0 1 44056 3 66 10 0 0 0 44057 4 66 8 1 0 0 ADJUST ITEM 44054>44058 61 0 0 0 0 ACTION 44059 3 418 2 0 0 0 418 44060 31 0 0 0 1 44061 34 543 2 0 0 0 543 BIT 1 44062 36 66 10 0 0 0 DISC 44063 31 0 0 0 2 44064 34 544 20 0 0 0 544 BITS 1+2 44065 36 66 12 0 0 0 MOD DIGITS 44066 31 0 0 0 1 44067 30 0 0 0 3 44068 3 61 0 0 0 0 COMBINED A/D/M 44069 30 0 0 0 5- 44070 70 440 78 0 0 0 440 gPOSITIVE ACTION 44071 61 0 0 0 0 44072 71 440 75 0 0 0 440 gNOT 'O-' 44073 10 0 0 0 2 44074 5 67 1 0 0 0 SET IND 44072>44075 10 0 0 0 0 44076 2 61 0 0 0 0 44077 5 61 0 0 0 0 NEGATE ACTION 44070>44078 5 66 10 1 0 0 44079 5 66 12 1 0 0 44080 61 0 0 0 0 44081 2 545 46 0 0 0 545 24/1/0 44082 70 441 2 0 0 0 441 gIS A SEQ CHANGE 44083 418 2 0 0 0 418 44084 12 0 0 0 1e TEST FOR 27/D/M 44085 71 441 6 0 0 0 441 gNO 44100 PROCR 441 441 M/C ACTIONS 44101 NOTES RADIX B 44082>44102 80 418 2 0 0 0 418 -S.C. S/R 44107> 44221>44103 80 531 2 0 0 0 531 -NEG NO S/R 42510> 41743>44104 80 532 2 0 0 0 532 - STACK 44105 76 382 10 0 0 0 382 - O/P GNB 44085>44106 66 14 0 0 0 LITERAL 44107 70 441 3 0 0 0 441 gNO 'M&P' 44108 30 0 0 0 1- 44109 80 537 2 0 0 0 537 gBIN 44110 5 66 12 0 0 0 SET EXTRA MOD DIGITS 44111 61 0 0 0 0 44112 80 356 2 0 0 0 356 gCOMPLEX O/PNON-ARITH 44113 76 362 2 0 0 0 362 gGNB 44200 PROCR 442 442 ACTION 123/0/0 44201 NOTES RADIX B 44009>44202 66 12 0 0 0 MOD 44203 34 66 10 0 0 0 DISC 44204 75 440 12 0 0 0 440 44205 5 61 34 0 0 0 SET PARA ZERO 44206 0 545 61 0 0 0 545 23/0/0 44207 5 61 0 0 0 0 44208 80 532 2 0 0 0 532 -STACK 44209 80 518 2 0 0 0 518 -O/P 44210 80 521 2 0 0 0 521 I/P INSTRUCTION 44211 66 6 0 0 0 44212 70 442 19 0 0 0 442 -ABS ADD 44213 5 61 35 0 0 0 44214 80 486 2 0 0 0 486 -DET CHAP 44215 3 61 34 0 0 0 44216 1 61 34 0 0 0 44217 70 442 19 0 0 0 442 gDON'T MAKE A PARA 1- 44218 12 0 0 0 1 44217> 44212>44219 5 61 34 0 0 0 44220 5 61 0 0 0 0 44221 76 441 3 0 0 0 441 44300 PROCR 443 443 CHEQUE-SORTER ACTIONS 132-134 44011>44302 80 534 2 0 0 0 534 gSUSPEND S/R 44303 76 387 5 0 0 0 387 38762>44304 80 535 2 0 0 0 535 gREPLACE S/R 44305 66 8 0 0 0 44306 5 66 6 1 0 0 >REF 44307 5 66 8 1 0 0 CLEAR ITEM 44308 5 66 10 1 0 0 &DISC 44309 5 66 12 1 0 0 &MOD 44310 80 534 2 0 0 0 534 gRE-SUSPEND S/R 44311 61 50 0 0 0 V+1 44312 12 0 0 0 3 44313 71 443 21 0 0 0 443 g133 OR 134 44427>44314 545 66 0 0 0 545 24/0/2 44315 80 356 2 0 0 0 356 gCOMPLEX O/P 44316 545 72 0 0 0 545 18/1/1 5- 44317 80 359 2 0 0 0 359 gO/P 44318 5 61 50 0 0 0 CLEAR 44319 80 397 2 0 0 0 397 g'TEST CONTINUATION LINE' 44320 76 396 40 0 0 0 396 g 44313>44321 12 0 0 0 1 44322 71 444 20 0 0 0 444 gACTION 134 44400 PROCR 444 444 CHEQUE-SORTER 44402 34 544 21 0 0 0 544 BITS 5-19 ACTION 133 44403 124 66 6 0 1 0 REF(EX-ITEM) 44404 36 70 0 0 0 0 44405 30 0 0 0 1- 44406 12 0 0 0 2 44407 1 545 13 0 0 0 545 BIT 18 44408 5 61 53 0 0 0 44409 5 61 52 0 0 0 CLEAR 44410 545 8 0 0 0 545 6/0/0 44411 80 357 2 0 0 0 357 gLONG NO O/P 44412 80 535 2 0 0 0 535 gREPLACE S/R 44413 545 65 0 0 0 545 28/0/0 44414 80 356 2 0 0 0 356 COMPLEX O/P NON-A 44415 66 14 1 0 0 LITERAL 44416 1 545 22 0 0 0 545 1/1/3 44417 80 359 2 0 0 0 359 gO/P 44418 545 72 0 0 0 545 18/1/1 5- 44419 80 359 2 0 0 0 359 gO/P 44322>44420 80 522 2 0 0 0 522 gI/P C-LINE S/R 44421 66 6 2 0 0 C-LINE REF 44422 80 537 2 0 0 0 537 gBIN 44423 5 66 6 1 0 0 44424 5 66 8 1 0 0 CLEAR ITEM, DISC, MOD DIGITS 44425 5 66 10 1 0 0 44426 5 66 12 1 0 0 44427 76 443 14 0 0 0 443 44500 PROCR 445 445 GROUP 14 44501 NOTES RADIX 37218>44502 5 66 10 1 0 0 CLEAR DISC 44503 85 381 2 0 0 0 381 44504 C 445 13 0 0 0 445 140 44505 C 445 17 0 0 0 445 141 44506 C 445 17 0 0 0 445 142 44507 C 445 17 0 0 0 445 143 44508 C 362 2 0 0 0 362 144 44509 C 445 17 0 0 0 445 145 44510 C 445 20 0 0 0 445 146 44511 C 445 23 0 0 0 445 147 44512 C 445 27 0 0 0 445 148 44504>44513 0 545 22 0 0 0 545 1/1/3/0 140 ACTION 44514 80 359 2 0 0 0 359 gO/P 44515 0 545 36 0 0 0 545 1/0/1/0. 44516 76 382 9 0 0 0 382 O/P AND GNB 44509> 44507> 44506> 44505>44517 124 61 50 0 0 0 VARIANT+1 141-3 +145 ACTIONS 44518 0 545 74 0 0 0 545 APPROXIMATE 30 ACTION. 44519 76 373 12 0 0 0 373 gCOMPLEX O/P+GNB 44510>44520 10 0 0 0 0 146 ACTION 44521 80 446 2 0 0 0 446 GRP 14 SR 44522 76 362 2 0 0 0 362 GNB 44511>44523 0 545 79 0 0 0 545 30/0/0/8 147 ACTION 44524 80 446 2 0 0 0 446 GRP 14 SR 44525 0 545 81 0 0 0 545 31/0/0/8 44526 76 361 8 0 0 0 361 gLN:2C+GNB 44512>44527 0 545 79 0 0 0 545 30/0/0/8 148 ACTION 44528 80 446 2 0 0 0 446 GRP 14 SR 44529 0 545 88 0 0 0 545 30/0/0 4 44530 80 361 2 0 0 0 361 gLN:2C SR 44531 0 545 81 0 0 0 545 31/0/0 8 44532 80 361 2 0 0 0 361 gLN:2C SR 44533 0 545 89 0 0 0 545 31/0/0 4 44534 76 361 8 0 0 0 361 gLN:2C+GNB 44600 PROCR 446 446 SR FOR GROUP 14 ACTIONS 44601 NOTES RADIX B 44602 81 446 2 0 0 0 446 44603 70 446 5 0 0 0 446 44604 80 361 2 0 0 0 361 gLN:2C SR 44603>44605 10 0 0 0 1 44606 5 66 10 1 0 0 SET DISC 44607 545 8 0 0 0 545 6/0/0 44608 80 358 2 0 0 0 358 gCOMPLEX O/P ARITH 44609 80 522 2 0 0 0 522 I/P CONT LINE SR 44610 10 0 0 0 1 44611 5 66 10 1 0 0 SET DISC 44612 545 14 0 0 0 545 9/0/0 44613 80 358 2 0 0 0 358 gCOMPLEX O/P ARITH 44614 82 446 2 0 0 0 446 44700 PROCR 447 447 GROUP 15 ACTIONS 44701 NOTES RADIX B 37219>44702 85 381 2 0 0 0 381 44703 C 447 12 0 0 0 447 150=OPTIONS 44704 C 451 2 0 0 0 451 151=UNLOAD 44705 C 450 2 0 0 0 450 152=OVERLAY 44706 C 449 2 0 0 0 449 153 44707 C 450 11 0 0 0 450 154=COMMENT IN LOG 44708 C 448 20 0 0 0 448 155=SELECT PROG SERIAL>A 44709 C 448 24 0 0 0 448 156=RELEASE ROUTE 44710 C 448 37 0 0 0 448 157=EXPAND 44711 C 448 47 0 0 0 448 158=COMPARE 44703>44712 66 14 1 0 0 44713 5 61 52 1 0 0 LITERAL=OPT NUMBER 44714 80 534 2 0 0 0 534 SUSPEND 44715 90 0 0 2 0 (TO STORE UP TO 10 LINES) 44716 C 0 0 0 20 44725>44717 80 397 2 0 0 0 397 TEST C-LINE FOLLOWS 44718 71 448 2 0 0 0 448 gNO 44719 66 6 1 0 0 44720 30 0 0 0 2 44721 1 66 8 1 0 0 ITEM 44722 5 61 54 0 2 0 44723 0 66 2 1 0 0 LINE SERIAL NUMBER 44724 5 61 55 0 2 0 44725 94 447 17 0 2 2 447 44800 PROCR 448 448 GROUP 15 44801 NOTES RADIX B 44718>44802 96 0 0 2 0 44803 3 66 22 1 0 0 W/L STORE MR2 44804 31 0 0 0 1- FORM NUMBER OF C-LINES 44805 5 61 23 0 0 0 NUMBER OF C-LINES 45010>44806 61 52 1 0 0 SUSPENDED LITERAL TEST OPTION NO. 44807 71 448 12 0 0 0 448 GIVEN IN A COMPARTME 44808 80 535 2 0 0 0 535 RESTORE FIRST LINE 44809 545 8 0 0 0 545 6/0/0 44810 80 358 2 0 0 0 358 gCOMPLEX O/P ARITH 44811 76 448 15 0 0 0 448 44807>44812 545 22 0 0 0 545 1/1/3 44813 1 61 52 0 0 0 LITERAL 44814 80 359 2 0 0 0 359 gO/P 44811>44815 0 61 23 0 0 0 NO OF C-LINES 44816 5 61 52 1 0 0 W/L FOR SN CONST S/R 44817 545 27 0 0 0 545 0/0/2 44818 80 357 2 0 0 0 357 gSHORT NO O/P S/R 44819 76 451 2 0 0 0 451 44708>44820 72 0 1 0 0 ALPHA SERIAL ACTION 155 44821 5 61 52 1 0 0 44822 545 8 0 0 0 545 6/0/0 44823 76 378 4 0 0 0 378 gO/P+GNB 44709>44824 80 508 2 0 0 0 508 g0/1/0.0/0/3 SR ACTION 156 44825 66 6 1 0 0 FILE ID 44826 5 61 54 0 0 0 44827 80 499 2 0 0 0 499 EXIT WITH(A)=ROUTE PARA 44828 1 545 8 0 0 0 545 6/0/0 44829 80 355 2 0 0 0 355 gO/P 44830 80 453 2 0 0 0 453 gO/P 25/1/1 4096,24/0/3 44831 10 0 0 0 900 9 IN Q3 44832 5 67 1 0 0 0 44833 545 60 0 0 0 545 23/0/2 44834 80 359 2 0 0 0 359 gO/P 44835 80 399 2 0 0 0 399 0/1/1 O/P 44836 76 362 2 0 0 0 362 gNEXT BLOCK 44710>44837 5 66 10 1 0 0 CLEAR DISC ACTION 157 44838 80 522 2 0 0 0 522 gSUSPEND, I/P C-LINE 44839 10 0 0 0 0 44840 5 66 10 1 0 0 CLEAR C-LINE DISC 44841 0 545 66 0 0 0 545 24/0/2 44842 80 356 2 0 0 0 356 gCOMPLEX O/P NON-A 44843 80 535 2 0 0 0 535 gRESTORE 44844 0 546 27 0 0 0 546 29/0/3 44845 80 356 2 0 0 0 356 gCOMPLEX O/P NON-A 44846 76 401 19 0 0 0 401 gJOIN UP WITH 51 ACTION 44711>44847 5 66 10 1 0 0 CLEAR DISC ACTION 158 44848 0 66 14 0 0 0 LITERAL 44849 70 448 51 0 0 0 448 g16/1/0 ORDER 44850 10 0 0 0 2000- (MAKE 16/1/1) 44849>44851 1 546 28 0 0 0 546 16/1/0 44852 76 403 12 0 0 0 403 gCOMPLEX O/P NON-A * GNB 44900 PROCR 449 449 ACTION 153=SELECT DATE, TIME 44901 NOTES 0 0 44706>44902 0 545 73 0 0 0 545 25/1/1 4096 44903 80 359 2 0 0 0 359 gO/P 44904 546 18 0 0 0 546 23/0/22 44905 80 498 2 0 0 0 498 gO/P INT SC 44906 546 13 0 0 0 546 24/1/0/7 44907 80 498 2 0 0 0 498 gO/P INT SC 44908 80 359 2 0 0 0 359 gO/P 0/0/0 (LINK) 44909 80 504 2 0 0 0 504 gO/P 24/0/3 0 44910 0 545 95 0 0 0 545 0/0/2 156 44911 80 359 2 0 0 0 359 gO/P 44912 80 504 2 0 0 0 504 gO/P 24/0/3 0 44913 0 545 93 0 0 0 545 6/1/0 138 44914 80 359 2 0 0 0 359 gO/P 44915 546 14 0 0 0 546 26/0/3/5- 44916 80 498 2 0 0 0 498 gO/P INT SC 44917 76 362 2 0 0 0 362 gGNB 45000 PROCR 450 450 GROUP 15 45001 NOTES RADIX B ACTIONS 152 AND 154 44705>45002 80 522 2 0 0 0 522 -I/P C-LINE S/R 45003 66 6 1 0 0 45004 5 61 35 0 0 0 45005 80 486 2 0 0 0 486 DETERMINE CHAPTER 45006 5 61 23 0 0 0 CORRECTED CHAP 45007 0 61 18 0 0 0 UNCORRECTED CHAPTER 45008 5 61 52 1 0 0 45009 80 508 2 0 0 0 508 -0/1/0 0/0/3 S/R 45010 76 448 6 0 0 0 448 - 44707>45011 5 66 10 1 0 0 CLEAR DISC 45012 5 66 12 1 0 0 HOD 45013 80 508 2 0 0 0 508 g0/1/0+0/0/3 45014 0 545 66 0 0 0 545 24/0/2 45015 80 356 2 0 0 0 356 gCOMPLEX O/P NON-A 45100 PROCR 451 451 GROUP 15 45101 NOTES RADIX B 44819> 44704>45102 80 453 2 0 0 0 453 -NON INTERRUPT S/R 45103 61 50 0 0 0 45104 12 0 0 0 3 45105 72 452 26 0 0 0 452 gACTIONS 152,154 45106 124 61 50 0 1 0 45107 0 545 95 0 0 0 545 45108 5 67 1 0 0 0 'SEQ CHANGE' IND 45109 0 545 63 0 0 0 545 26/0/2 45110 80 359 2 0 0 0 359 gO/P 45111 61 50 0 0 0 45112 12 0 0 0 2 45113 70 362 2 0 0 0 362 GNB IF 151 ACTION 45200 PROCR 452 452 GROUP 15 45201 NOTES RADIX B ACTION 150 45202 66 22 1 0 0 STORED VALUE OF MR2 45203 30 0 0 0 5 SET E.V. AT MODIFIERAND MODIFIER ZERO 45204 70 362 3 0 0 0 362 gGNB(NO C-LINES) 45205 91 0 0 3 0 45224>45206 34 61 54 0 3 0 DEST 45207 10 0 0 0 0 45208 32 0 0 0 8 45209 3 66 6 0 0 0 45210 5 61 35 0 0 0 45211 32 0 0 0 2 45212 5 66 8 0 0 0 45213 80 486 2 0 0 0 486 -DET CHAP 45214 3 61 34 0 0 0 PARA 45215 70 452 17 0 0 0 452 gDON'T MAKE PARA 1 45216 12 0 0 0 1 45215>45217 4 61 34 0 0 0 45218 0 61 55 0 3 0 SOURCE 45219 5 66 2 1 0 0 45220 5 61 0 0 0 0 CLEAR ACTION W/L 45221 80 418 2 0 0 0 418 S.C. S/R 45222 80 532 2 0 0 0 532 STACK 45223 80 518 2 0 0 0 518 O/P 45224 94 452 6 0 3 2 452 gNEXT C-LINE 45225 76 362 3 0 0 0 362 45105>45226 124 61 50 0 0 0 45227 0 545 89 0 0 0 545 SEQ CHANGE IND 45228 5 67 1 0 0 0 45229 0 545 60 0 0 0 545 23/0/2 45230 80 359 2 0 0 0 359 gO/P 45231 80 399 2 0 0 0 399 RESTORES ABC 45232 76 362 2 0 0 0 362 GNB 45300 PROCR 453 453 SET NON-INTERRUPTIBLE S/R 45301 NOTES RADIX B GROUPS 4 AND 15 BEFORE ENTER MASTER 45302 81 453 2 0 0 0 453 45303 545 73 0 0 0 545 25/1/1/4096 45304 80 359 2 0 0 0 359 gO/P 45305 80 504 2 0 0 0 504 gO/P 24/0/3 0 45306 82 453 2 0 0 0 453 45400 PROCR 454 454 CONSTANTS 45401 NOTES RADIX B 35205>45402 54 61 55 0 0 14 CLEAR W/LS 45403 80 463 2 0 0 0 463 -PREP S/R 45404 80 464 2 0 0 0 464 -GET NEXT CHAR S/R 45818>45405 10 0 0 0 0 45500 PROCR 455 455 CONSTANTS 45501 NOTES RADIX B 46132>45502 80 464 2 0 0 0 464 -GET NEXT CHAR 45503 10 0 0 0 1 45504 5 61 30 0 0 0 DEFN LINE IND 45505 5 61 98 1 0 0 45506 91 61 60 0 2 0 45507 61 24 0 0 0 THIS CHARACTER 45508 12 0 0 0 51 A 45509 70 456 6 0 0 0 456 45510 12 0 0 0 1 B 45511 70 456 3 0 0 0 456 45512 12 0 0 0 1 45513 71 455 16 0 0 0 455 g NOT 'C' 45514 10 0 0 0 10 16 45515 76 455 21 0 0 0 455 gSET AS SUBFIELD LENGTH 45513>45516 12 0 0 0 1 45517 70 456 4 0 0 0 456 45518 12 0 0 0 13 P 45519 70 456 5 0 0 0 456 45520 10 0 0 0 £ HENCE 'R' 45515>45521 5 61 55 0 2 0 SUBFIELD LENGTH 45600 PROCR 456 456 CONSTANTS 45601 NOTES RADIX 45602 10 0 0 0 1 R,C=5 45511>45603 11 0 0 0 1 B=4 45517>45604 11 0 0 0 1 45519>45605 11 0 0 0 1 45509>45606 11 0 0 0 1 45607 3 61 62 0 2 0 SWITCH SETTING 45608 84 458 2 0 0 0 458 45616>45609 80 464 2 0 0 0 464 GET NEXT CHAR 45610 12 0 0 0 7e 45611 70 457 2 0 0 0 457 45612 0 61 98 1 0 0 COLLECT * IN'(B*)' DIRECTIVE 45613 30 0 0 0 2 45614 1 61 24 0 0 0 THIS CHAR 45615 5 61 98 1 0 0 45616 76 456 9 0 0 0 456 LOOP UNTIL')'FOUND 45700 PROCR 457 457 CONSTANTS 45701 NOTES RADIX B 45611>45702 32 0 0 0 10 PRESERVE B DURING CURRENT 45703 5 61 96 1 0 0 45704 61 98 2 0 0 45705 80 537 2 0 0 0 537 CONVERT NO OF BITS FOR BIN CONSTANT 45706 73 457 8 0 0 0 457 gSAFETY DEVICE 45707 4 61 55 0 2 0 AUG SHIFT CONTROL 45706>45708 34 61 96 1 0 0 RESTORE B 46814> 46816> 46819>45709 10 0 0 0 0 45800 PROCR 458 458 CONSTANTS MAIN LOOP 45801 NOTES RADIX B 46711> 46909> 46918> 47008>45802 80 464 2 0 0 0 464 GET NEXT CHAR 46008> 46128> 47206>45803 12 0 0 0 7t 45804 70 458 15 0 0 0 458 gYES 45805 12 0 0 0 2 45806 70 460 2 0 0 0 460 45807 12 0 0 0 1 45808 70 461 2 0 0 0 461 gEND OF CONSTANT 45809 85 458 2 0 0 0 458 45810 C 467 2 0 0 0 467 ALPHA 45811 C 468 2 0 0 0 468 45812 C 469 2 0 0 0 469 45813 C 471 2 0 0 0 471 45814 C 473 2 0 0 0 473 45804>45815 10 0 0 0 1 45816 5 61 61 0 0 0 MIXED CONST IND 45817 80 459 2 0 0 0 459 gSHIFT UP PREVIOUS SUBFIELD 45818 76 454 5 0 0 0 454 gGET NEXT CHAR 45900 PROCR 459 459 CONSTANT S/R 45901 NOTES RADIX B ADD THIS SUBFIELD TO PREVIOUS ONES 45902 81 459 2 0 0 0 459 45903 0 61 26 1 0 0 CONSTANT TO DATE 45904 124 61 60 0 0 0 SUBFIELD CTR 45905 124 61 55 0 0 0 LENGTH OF SUBFIELD IN BITE 45906 31 0 0 0 0 ///// 45907 1 61 28 1 0 0 VALUE OF CURRENT SUBCONST 45908 5 61 26 1 0 0 45909 5 61 28 1 0 0 45910 10 0 0 0 1 45911 4 61 60 0 0 0 STEP SF CTR 45912 82 459 2 0 0 0 459 46000 PROCR 460 460 46001 NOTES RADIX B 45806>46002 80 464 2 0 0 0 464 gGET NEXT CHAR AFTER COMMA 46003 80 459 2 0 0 0 459 gADD IN SUBCONST PRECEDING COMMA 46126>46004 91 61 60 0 2 0 46005 84 458 2 0 0 0 458 46006 C 61 62 0 2 0 NET SUBFIELD TYPE 46007 61 24 0 0 0 NEXT CHAR AFTER COMMA 46008 76 458 3 0 0 0 458 46100 PROCR 461 461 46101 NOTES RADIX B 45808>46102 80 459 2 0 0 0 459 gADD IN FINAL SUBCONST 46103 61 32 0 0 0 NEG IND 46104 70 461 13 0 0 0 461 gCONSTANT IS POSITIVE 46105 61 47 0 0 0 CONST TYPE 46106 70 461 11 0 0 0 461 SHORT CONST 46107 10 0 0 0 0 46108 2 61 26 1 0 0 46109 5 61 26 1 0 0 46110 76 461 13 0 0 0 461 COMPLEMENT CONST LONG OR SHORT 46106>46111 2 61 26 0 0 0 46112 5 61 26 0 0 0 46319> 46110> 46104>46113 6 2 12 0 46114 5 61 31 0 0 0 SET END IND 46115 80 511 2 0 0 0 511 gPRINT 46116 80 462 2 0 0 0 462 gCONST O/P SR 46117 61 31 0 0 0 END IND 46118 71 362 2 0 0 0 362 gYES, GNB 46119 80 509 2 0 0 0 509 -I/P 46120 80 463 2 0 0 0 463 -PREP S/R 46121 10 0 0 0 0 CLEAR A FOR GET NEXT CHARACTER S/R 46122 80 464 2 0 0 0 464 -GET NEXT CHAR 46123 12 0 0 0 7t 122 46124 70 461 29 0 0 0 461 gTHIS IS A DIRECTIVE LINE 46125 61 61 0 0 0 46126 71 460 4 0 0 0 460 gTHIS IS A MIXED CONSTANT 46127 61 24 0 0 0 NEXT CHARACTER 46128 76 458 3 0 0 0 458 - 46124>46129 5 61 55 0 0 0 46130 5 61 56 1 0 0 46131 5 61 58 1 0 0 46132 76 455 2 0 0 0 455 gGET DIRECTIVE LETTER 46200 PROCR 462 462 46201 NOTES RADIX B 46202 81 462 2 0 0 0 462 46203 61 27 0 0 0 MOST SIG HALF LONG CONST 46204 5 67 3 0 0 0 46205 61 26 0 0 0 LEAST SIG HALF 46206 124 61 68 0 0 0 0 OR 2 46207 5 67 1 0 0 0 46208 61 47 0 0 0 CONST TYPE 46209 71 462 16 0 0 0 462 -LONG NO CONST 46210 61 31 0 0 0 NONZERO IF FINAL CONST IN SECTION 46211 71 462 16 0 0 0 462 - 46212 10 0 0 0 2 46213 2 61 68 0 0 0 46214 3 61 68 0 0 0 46215 71 462 23 0 0 0 462 gFIRST TIME THROUGH 46211> 46209>46216 61 26 1 0 0 46217 72 462 22 0 0 0 462 46218 61 27 0 0 0 46219 71 462 22 0 0 0 462 gMOST SIG HALF IS NOT MINUS ZERO 46220 10 0 0 0 80 B8 46221 4 67 2 0 0 0 PARAMETER 46219> 46217>46222 80 518 2 0 0 0 518 O/P 46215>46223 82 462 2 0 0 0 462 END 46300 PROCR 463 463 46301 NOTES RADIX B CONSTANTS PREP S/R 46302 81 463 2 0 0 0 463 46303 54 61 26 0 0 8 CLEAR W/L'S 46304 77 2 1 0 0 AMEND IND 46305 5 7 2 1 0 0 46306 77 4 1 0 0 LINE SERIAL 46307 5 7 6 1 0 0 46308 55 77 8 1 0 18 COPY CONSTANTS 46309 C 7 12 1 0 0 46310 77 26 1 0 0 PASS 1 REPORTS 46311 5 7 48 1 0 0 46312 55 77 28 1 0 16 COPY ANNOTATION 46313 C 7 32 1 0 0 46314 0 61 68 0 0 0 O/P IND 46315 71 463 17 0 0 0 463 gSECOND HALF OF SHORT CONST 46316 5 67 0 0 0 0 CLEAR THIS 46315>46317 7 46 1 0 0 46318 2 542 28 1 0 0 542 IGNORE TRANSLATION IND 46319 70 461 13 0 0 0 461 gYES, GO TO PRINT 46320 90 0 0 3 0 46321 C 0 0 0 10 46322 34 77 8 1 0 0 FIRST WORD OF CONSTANT 46323 10 0 0 0 2 46324 5 61 38 0 0 0 SET MOD CTR 46325 5 61 60 0 0 0 S/F MOD 46326 82 463 2 0 0 0 463 46400 PROCR 464 464 GET NEXT CHAR S/R 46401 NOTES RADIX B 46402 81 464 2 0 0 0 464 46403 32 0 0 0 2 46404 5 61 24 1 0 0 THIS CHAR W/L 46405 94 464 12 0 3 2 464 46406 124 61 38 0 0 0 46407 34 77 8 1 0 0 NEXT WORD 46408 10 0 0 0 2 46409 4 61 38 0 0 0 46410 90 0 0 3 0 46411 C 0 0 0 10 46405>46412 61 24 1 0 0 46413 82 464 2 0 0 0 464 46500 PROCR 465 465 TEST (,NE S/R 46501 NOTES RADIX B CONSTANTS 46502 81 465 2 0 0 0 465 46503 12 0 0 0 7t ( 46504 70 465 8 0 0 0 465 46505 12 0 0 0 2 , 46506 70 465 8 0 0 0 465 46507 12 0 0 0 1 NE 46506> 46504>46508 82 465 2 0 0 0 465 46600 PROCR 466 466 PUT THIS CHAR INTO O/P WORD S/R 46601 NOTES RADIX B 46602 81 466 2 0 0 0 466 46603 61 28 1 0 0 46604 30 0 0 0 1 46605 1 61 24 2 0 0 NEXT CHAR(BASIC ONLY) 46606 5 61 28 1 0 0 46607 82 466 2 0 0 0 466 46700 PROCR 467 467 ALPHA CONSTANTS 46701 NOTES RADIX B 45810>46702 61 30 0 0 0 DEFN LINE IND 46703 70 467 7 0 0 0 467 gNO 46704 10 0 0 0 8 46705 124 61 60 0 0 0 SF CTR 46706 4 61 55 0 0 0 AUG SF LENGTH BY 8 FOR EACH ALPHA CHAR 46703>46707 61 28 1 0 0 46708 30 0 0 0 2 46709 1 61 24 0 0 0 46710 5 61 28 1 0 0 ADD IN THIS CHAR TO SUBCONST 46711 76 458 2 0 0 0 458 46800 PROCR 468 468 BINARY PATTERNS 46801 NOTES RADIX B 45811>46802 0 61 24 0 0 0 THIS CHARACTER 46803 12 0 0 0 10 MINUS SIGN 46804 70 468 15 0 0 0 468 46805 0 61 30 0 0 0 46806 70 468 10 0 0 0 468 g NOT DEFINITION LINE 46807 10 0 0 0 1 46808 124 61 60 0 0 0 SF MOD 46809 4 61 55 0 0 0 AUG SF LENGTH BY 1 BIT PER CHAR 46806>46810 61 28 1 0 0 46811 1 61 28 1 0 0 46812 1 61 24 2 0 0 46813 5 61 28 1 0 0 ADD THIS BIT INTO SUBCONST 46814 76 457 9 0 0 0 457 46804>46815 0 61 60 0 0 0 TEST FIRST SUBFIELD 46816 71 457 9 0 0 0 457 46817 10 0 0 0 1 46818 5 61 32 0 0 0 NEG INDICATOR 46819 76 457 9 0 0 0 457 46900 PROCR 469 469 DECIMAL CONSTS (-VE) 46901 NOTES RADIX B 45812>46902 61 24 0 0 0 46903 12 0 0 0 10 NEG SIGN 46904 71 470 2 0 0 0 470 46905 61 60 0 0 0 S/F MOD 46906 71 469 10 0 0 0 469 NOT FIRST MOD 46907 10 0 0 0 1 46908 5 61 32 0 0 0 NEG IND 46909 76 458 2 0 0 0 458 46906>46910 10 0 0 0 1 BIT 1 46911 124 61 60 0 0 0 SF MOD 46912 124 61 55 0 0 0 SF LENGTH 46913 31 0 0 0 0 ///// 46914 60 0 0 0 0 46915 2 61 28 1 0 0 FORM N BIT 46916 5 61 28 1 0 0 DEC COMPT 46917 62 0 0 0 0 46918 76 458 2 0 0 0 458 47000 PROCR 470 470 DECIMAL CONSTANTS (+VE) 47001 NOTES RADIX B 46904>47002 61 30 0 0 0 47003 70 470 7 0 0 0 470 gNOT DIRECTIVE LINE 47004 10 0 0 0 4 47005 124 61 60 0 0 0 SF MOD 47006 4 61 55 0 0 0 AUG SF LENGTH BY 4 BITS PER CHAR 47003>47007 80 466 2 0 0 0 466 gADD THIS CHAR TO O/P WORD 47008 76 458 2 0 0 0 458 47100 PROCR 471 471 47101 NOTES RADIX B BINARY NO CONSTANTS 47111> 45813>47102 61 24 0 0 0 47103 12 0 0 0 10 -SIGN 47104 71 471 8 0 0 0 471 47105 10 0 0 0 1 47106 5 61 33 0 0 0 47107 76 471 9 0 0 0 471 47104>47108 80 466 2 0 0 0 466 -THIS CHAR SET UP O/P 47107>47109 80 464 2 0 0 0 464 -GET NEXT CHAR 47110 80 465 2 0 0 0 465 -TEST S/R 47111 71 471 2 0 0 0 471 47112 32 0 0 0 10 47113 5 61 34 1 0 0 PRESERVE B 47114 61 28 1 0 0 DEC VALUE OF CONST 47115 80 537 2 0 0 0 537 CONVERT 47116 5 61 28 1 0 0 47117 34 61 34 1 0 0 RESTORE B 47118 61 33 0 0 0 NEG IND FOR BIN CONSTS 47119 70 472 5 0 0 0 472 gNOT NEGATIVE 47120 61 60 0 0 0 S/F MOD 47121 70 472 2 0 0 0 472 gFIRST S/F 47122 10 0 0 0 1 47123 124 61 60 0 0 0 S/F MOD 47124 124 61 55 0 0 0 S/F LENGTH=N 47125 31 0 0 0 0 ///// 47126 2 61 28 1 0 0 FORM N-BIT COMPT 47127 5 61 28 1 0 0 47128 76 472 4 0 0 0 472 47200 PROCR 472 472 BINARY NO CONSTS 47201 NOTES RADIX 47121>47202 10 0 0 0 1 47203 5 61 32 0 0 0 NEG IND 47128>47204 5 61 33 0 0 0 BIN NO NEG IND 47432> 47119>47205 61 24 0 0 0 47206 76 458 3 0 0 0 458 - 47300 PROCR 473 473 47301 NOTES RADIX RELATIVE ADDRESS CONSTS 47310> 45814>47302 61 24 0 0 0 47303 12 0 0 0 4: 47304 70 474 2 0 0 0 474 gCOLON 47305 11 0 0 0 4: 47306 80 465 2 0 0 0 465 -TEST S/R 47307 70 474 24 0 0 0 474 47308 80 466 2 0 0 0 466 -THIS CHAR SET UP O/P 47309 80 464 2 0 0 0 464 -GET NEXT CHAR 47310 76 473 2 0 0 0 473 47400 PROCR 474 474 RELATIVE ADDRESS CONSTS 47401 NOTES RADIX B 47304>47402 32 0 0 0 10 47403 5 61 98 1 0 0 STORE REGISTER B 47404 61 28 1 0 0 47405 80 537 2 0 0 0 537 CONVERT 47406 5 61 35 0 0 0 47407 91 61 68 0 2 0 47408 80 486 2 0 0 0 486 -DET CHAP S/R 47409 3 67 0 0 2 0 PARA 47410 70 474 13 0 0 0 474 ABS ADD 47411 12 0 0 0 1 =2C-1 47412 4 67 0 0 2 0 47410>47413 61 35 0 0 0 REF 47414 30 0 0 0 2 47415 4 67 0 0 2 0 47416 10 0 0 0 0 47417 5 61 28 1 0 0 CLEAR FOR ITEM 47418 34 61 98 1 0 0 47423>47419 80 464 2 0 0 0 464 gGET NEXT CHAR 47420 80 465 2 0 0 0 465 gTEST S/R 47421 70 474 26 0 0 0 474 47422 80 466 2 0 0 0 466 gTHIS CHAR SET UP O/P 47423 76 474 19 0 0 0 474 47307>47424 91 61 68 0 2 0 47425 5 67 0 0 2 0 47421>47426 32 0 0 0 10 47427 5 61 34 1 0 0 STORE 2 47428 61 28 1 0 0 47429 80 537 2 0 0 0 537 CONVERT ITEM 47430 5 61 28 1 0 0 47431 34 61 34 1 0 0 REPLACE B 47432 76 472 5 0 0 0 472 47500 PROCR 475 475 TABLE ENTRIES 47501 NOTES RADIX B 35204>47502 50 77 2 0 0 0 47503 C 549 2 0 0 0 549 47504 52 7 2 0 0 0 EDIT TABLES 47505 C 549 2 0 0 0 549 47506 77 22 1 0 0 PASS 1 REPORTS 47507 5 7 48 1 0 0 47508 55 77 24 1 0 16 COPY ANNOTATION 47509 C 7 32 1 0 0 47510 80 511 2 0 0 0 511 PRINT 47600 PROCR 476 476 TABLE ENTRIES 47601 NOTES RADIX B 47602 90 0 0 2 0 47603 C 0 0 0 20 47607>47604 66 3 0 2 0 47605 80 537 2 0 0 0 537 CONVERT 47606 5 66 3 0 2 0 47607 94 476 4 0 2 1 476 47608 90 0 0 2 0 47609 C 0 0 0 4 47617>47610 66 16 0 2 0 47611 101 100 1 2 0 47612 73 476 17 0 0 0 476 gSECTION 47613 101 899 1 2 0 47614 72 476 17 0 0 0 476 g999 47615 10 0 0 0 2- 47616 4 66 17 0 2 0 REDUCE ITEM FOR CALCS 47614> 47612>47617 94 476 10 0 2 2 476 47618 10 0 0 0 0 47619 34 61 47 0 0 0 TYPE 47620 36 544 6 0 0 0 544 BIT 1 47621 71 476 28 0 0 0 476 NOT TYPES 2 OR 4 47622 0 66 19 0 0 0 SECOND ITEM 47623 71 476 27 0 0 0 476 g'LAST ITEM' GIVEN 47624 0 66 17 0 0 0 FIRST ITEM 47625 71 476 27 0 0 0 476 47626 0 545 8 0 0 0 545 SOMETHING INTO Q5 47625> 47623>47627 5 67 2 0 0 0 47621>47628 0 66 16 0 0 0 FIRST REF 47629 5 61 35 0 0 0 REF 47630 80 486 2 0 0 0 486 DET CHAP 47700 PROCR 477 477 TABLE ENTRIES 47701 NOTES RADIX 47702 3 67 0 0 0 0 47703 70 477 6 0 0 0 477 ABS ADD 47704 12 0 0 0 1 47705 4 67 0 0 0 0 47703>47706 61 35 0 0 0 REF 47707 30 0 0 0 2 47708 4 67 0 0 0 0 47709 0 66 3 0 0 0 SHORT/LONG/ALPHA 47710 70 477 15 0 0 0 477 47711 12 0 0 0 1 47712 70 477 14 0 0 0 477 47713 545 49 0 0 0 545 B17 47712>47714 1 545 13 0 0 0 545 B18 47710>47715 5 67 3 0 0 0 47716 66 13 0 0 0 SIGN 47717 70 478 2 0 0 0 478 47718 12 0 0 0 2 47719 70 477 21 0 0 0 477 47720 545 51 0 0 0 545 B20 47719>47721 1 545 9 0 0 0 545 B19 47722 4 67 3 0 0 0 47800 PROCR 478 478 TABLE ENTRIES 47801 NOTES RADIX B 47717>47802 0 66 4 0 0 0 SINGLE/BE 47803 70 478 6 0 0 0 478 47804 545 51 0 0 0 545 B20 47805 4 67 3 0 0 0 47803>47806 66 12 0 0 0 ZEROS 47807 30 0 0 0 1 47808 1 66 10 0 0 0 DISC 47809 30 0 0 0 1 47810 1 66 11 0 0 0 SPACES 47811 30 0 0 0 1 47812 1 66 5 0 0 0 NO OF CHARS 47813 4 67 3 0 0 0 47814 66 15 0 0 0 LTE 47815 70 479 4 0 0 0 479 47816 10 0 0 0 0 47817 2 67 3 0 0 0 47818 70 479 2 0 0 0 479 47819 5 67 3 0 0 0 47820 76 479 4 0 0 0 479 47900 PROCR 479 479 TABLE ENTRIES 47901 NOTES RADIX B 47818>47902 10 0 0 0 80 B8 47903 4 67 0 0 0 0 47820> 47815>47904 0 66 17 0 0 0 FIRST ITEM 47905 5 67 1 0 0 0 47906 66 14 0 0 0 STERLING INDICATOR 47907 70 479 16 0 0 0 479 47908 4 61 109 0 0 0 47909 0 61 109 0 0 0 47910 12 0 0 0 2 47911 71 479 16 0 0 0 479 47912 12 0 0 0 1 47913 5 61 109 0 0 0 SET CTR=1- 47914 545 49 0 0 0 545 B17 47915 4 67 1 0 0 0 47911> 47907>47916 0 66 15 0 0 0 LTE IND 47917 70 382 10 0 0 0 382 gNO,O/P+GNB 47918 5 61 109 0 0 0 47919 5 61 109 0 0 0 CLEAR STERLING CTR 47920 76 382 10 0 0 0 382 gO/P+GNB 48000 PROCR 480 480 VALUES 48001 NOTES RADIX 35209>48002 80 360 2 0 0 0 360 BULK CLEAR SEC 7 48003 8 2 12 0 48004 80 537 2 0 0 0 537 gTO BIN 48005 5 66 8 1 0 0 48006 6 2 12 0 48007 80 537 2 0 0 0 537 gTO BIN 48008 3 66 6 2 0 0 REF 48009 34 66 8 0 0 0 48010 74 480 28 0 0 0 480 gZERO REF,ITEM 48011 101 100 1 2 0 48012 73 480 15 0 0 0 480 gREF=SECTION 48013 10 0 0 0 2- 48014 4 66 8 1 0 0 REDUCE FOR CALCS 48012>48015 542 10 1 0 0 542 'NOTES' 48016 3 61 26 1 0 0 48017 5 61 28 1 0 0 48018 0 66 6 2 0 0 REF 48019 5 67 2 0 0 0 48020 0 66 8 1 0 0 ITEM 48021 5 67 3 0 0 0 48022 5 67 0 0 0 0 CLEAR 48023 80 517 2 0 0 0 517 O/P REF/ITEM UNIT(ALPHA O/P) 48024 0 77 6 1 0 0 48025 5 7 8 1 0 0 REF 48026 0 77 8 1 0 0 48027 5 7 10 1 0 0 ITEM 48010>48028 90 0 0 3 0 48029 C 0 0 0 32 48038>48030 77 12 2 3 0 48031 73 480 45 0 0 0 480 gNEG PARA=END OF LINE 48032 5 67 2 0 0 0 48033 77 10 2 3 0 48034 5 67 3 0 0 0 48035 52 7 12 0 3 0 48036 C 550 2 0 0 0 550 48037 80 518 2 0 0 0 518 O/P VALUE UNIT 48038 94 480 30 0 3 4 480 48039 77 6 0 0 0 REF 48040 5 7 8 0 0 0 48041 77 8 0 0 0 ITEM 48042 5 7 10 0 0 0 48048>48043 80 511 2 0 0 0 511 gPRINT 48044 76 362 2 0 0 0 362 GNB 48031>48045 10 0 0 0 55 'E' 48046 5 7 14 1 3 0 48047 5 7 12 1 3 0 48048 76 480 43 0 0 0 480 48100 PROCR 481 481 LONG NO CONST S/R 48101 NOTES RADIX B 48102 81 481 2 0 0 0 481 48103 91 61 12 0 3 0 48104 61 5 0 0 0 LONG NO SECT NO 48105 5 66 6 1 0 0 48106 10 0 0 0 1 48107 5 66 10 1 0 0 DISC 48108 80 482 2 0 0 0 482 TSL AND LONG NO S/R 48109 4 61 13 0 0 0 END VALUE 48110 82 481 2 0 0 0 481 48200 PROCR 482 482 LONG NO CONST & TSL S/R (1) 48201 NOTES RADIX B 48202 81 482 2 0 0 0 482 48203 94 482 5 0 3 0 482 ///// 48204 76 482 12 0 0 0 482 48211> 48203>48205 61 53 0 0 0 48206 2 62 1 0 3 0 COMPARE MOST SIG HALVES 48207 71 482 11 0 0 0 482 gNO CHANGE OF MATCH 48208 62 0 1 3 0 48209 2 61 52 1 0 0 48210 70 482 15 0 0 0 482 MATCH FOUND 48207>48211 94 482 5 0 3 2 482 NO MATCH 48204>48212 61 52 1 0 0 48213 5 62 0 1 3 0 48214 10 0 0 0 2 48210>48215 5 537 2 0 0 0 537 WL=CONVERT SR LINK 48216 96 0 0 3 0 MODIFIER 48217 12 0 0 0 e4 180 48218 73 482 21 0 0 0 482 g NOT TSL 48219 31 0 0 0 1- 48220 76 482 22 0 0 0 482 48218>48221 11 0 0 0 e4 180 48220>48222 5 66 8 1 0 0 48223 0 61 3 0 0 0 2C 48224 5 61 34 0 0 0 48225 5 66 12 1 0 0 MOD 48226 80 532 2 0 0 0 532 STACK 48227 80 518 2 0 0 0 518 O/P 48228 537 2 0 0 0 537 WL 48229 82 482 2 0 0 0 482 48300 PROCR 483 483 > GNB 48301 NOTES RADIX B 48302 81 483 2 0 0 0 483 48303 91 61 14 0 3 0 CTR OF SHORT NUMBERS TO DATE 48304 0 61 15 0 0 0 CTR 48305 70 483 10 0 0 0 483 NONE STORED YET 48309>48306 61 52 1 0 0 NUMBER TO BE OUTPUT 48307 2 63 0 0 3 0 NEXT NUMBER ALREADY OUTPUT 48308 70 483 17 0 0 0 483 g MATCH 48309 94 483 6 0 3 1 483 > TRY NEXT 48305>48310 61 52 1 0 0 STORE NEWCOMER 48311 5 63 0 0 3 0 IN NEXT FREE POSITION 48312 61 15 0 0 0 = RELATIVE POSITION IN LIST 48313 5 66 8 1 0 0 SET AS ITEM 48314 10 0 0 0 1 STEP ON FOR NEXT ITEM 48315 4 61 15 0 0 0 CTR OF NUMBERS IN LIST 48316 76 483 19 0 0 0 483 48308>48317 96 0 0 3 0 MODIFIER 48318 5 66 8 1 0 0 48316>48319 61 6 0 0 0 SN SECT NO 48320 5 66 6 1 0 0 REF 48321 5 66 10 1 0 0 DISC 48322 5 66 12 1 0 0 M 48323 61 3 0 0 0 2C 48324 5 61 34 0 0 0 PARA 48325 80 532 2 0 0 0 532 - STACK 48326 80 518 2 0 0 0 518 - O/P 48327 82 483 2 0 0 0 483 48400 PROCR 484 484 TSL S/R 48401 NOTES RADIX B 48402 81 484 2 0 0 0 484 48403 5 61 0 0 0 0 48404 66 6 1 0 0 REF 48405 5 61 35 0 0 0 48406 80 486 2 0 0 0 486 48407 3 61 52 0 0 0 CHAP 48408 12 0 0 0 1 48409 4 61 52 0 0 0 48410 0 61 28 1 0 0 48411 5 61 53 0 0 0 ITEM 48412 0 61 35 0 0 0 48413 30 0 0 0 2 48414 4 61 52 0 0 0 REF12C-1 48415 80 485 2 0 0 0 485 48416 82 484 2 0 0 0 484 48500 PROCR 485 485 48501 NOTES RADIX B 48502 81 485 2 0 0 0 485 48503 91 61 16 0 3 0 TSL COUNTER 48504 61 7 0 0 0 48505 5 66 6 1 0 0 48506 5 66 10 1 0 0 DISC 48507 80 482 2 0 0 0 482 TSL 7 LONG NO S/R 48508 4 61 17 0 0 0 END VALUE 48509 82 485 2 0 0 0 485 48600 PROCR 486 486 48601 NOTES RADIX B 48602 81 486 2 0 0 0 486 48603 61 35 0 0 0 REF 48604 70 486 18 0 0 0 486 ABS ADD 48605 12 0 0 0 64 100 48606 72 487 2 0 0 0 487 48607 35 0 0 0 1 Q1 48608 10 0 0 0 0 48609 124 61 35 0 0 0 48610 36 70 0 0 0 0 SECT DETS 48611 5 61 18 0 0 0 48612 34 545 51 0 0 0 545 820 48613 124 61 35 0 0 0 48614 36 70 0 0 0 0 SECT DETS 48714>48615 35 0 0 0 1 48616 124 61 18 0 0 0 UNCORRECTED CHAP 48617 36 92 9 0 0 0 CORRECTED CHAP IN Q1 48604>48618 82 486 2 0 0 0 486 48700 PROCR 487 487 48701 NOTES RADIX B 48606>48702 12 0 0 0 383 899 REF 999 48703 73 487 8 0 0 0 487 48704 71 487 10 0 0 0 487 g REF >999, CHEAT 48705 5 61 35 0 0 0 SET REF ZERO 48706 61 51 0 0 0 THIS CHAP 48707 82 486 2 0 0 0 486 48703>48708 11 0 0 0 3.7 999 48709 30 0 0 0 2 PROCR IN Q3-5 48704>48710 101 92 10 0 0 0 BIN LAST PROCRS IN CHAP 48711 32 0 0 0 10 48712 2 545 2 0 0 0 545 ABS ADDRESS 92/9 48713 5 61 18 0 0 0 UNCORR C NO 48714 76 486 15 0 0 0 486 48800 PROCR 488 488 48801 NOTES RADIX B 48802 81 488 2 0 0 0 488 48803 91 91 2 0 3 0 2(R+T):2R 48804 35 0 0 0 111- Q1-3 AND SIGN 48809>48805 10 0 0 0 0 48806 36 91 4 0 3 0 TA DETAILS 48807 2 66 6 0 0 0 REF 48808 70 488 10 0 0 0 488 48809 94 488 5 0 3 2 488 48808>48810 0 91 4 0 3 0 TA DETAILS 48811 30 0 0 0 3- 48812 82 488 2 0 0 0 488 48900 PROCR 489 489 START OF MOD AND PARAMETER SR 48901 NOTES 0 0 48902 81 489 2 0 0 0 489 48903 0 66 16 0 0 0 ITEM+' IND 48904 71 493 2 0 0 0 493 gYES 48905 0 66 6 0 0 0 REF 48906 101 1000 1 2 0 48907 72 495 2 0 0 0 495 gREF=1000+ 48908 0 66 6 0 0 0 48909 70 492 2 0 0 0 492 gABS ADDRESS 48910 5 61 35 0 0 0 48911 80 486 2 0 0 0 486 gDETERMINE CHAPTER SR 48912 32 0 0 0 1- 48913 71 494 2 0 0 0 494 gTRANSIT AREA 48914 32 0 0 0 1 48915 3 61 34 0 0 0 STORE CHAP OF REFERENCE 48916 2 61 51 0 0 0 THIS CHAP NUMBER 48917 71 491 2 0 0 0 491 gOTHER CHAP 49000 PROCR 490 490 DEAL WITH THIS CHAP-M&P 49001 NOTES 0 0 49002 0 61 2 0 0 0 MOD DIGITS 49003 70 490 17 0 0 0 490 gNORMAL 49004 12 0 0 0 4 49005 72 490 13 0 0 0 490 gMR>3 49006 0 61 1 0 0 0 49007 70 490 17 0 0 0 490 49008 0 545 20 0 0 0 545 MR1-3 NON-A 24/0/0 49009 2 61 41 0 0 0 MOD GROUP PARA 49010 2 61 2 0 0 0 49011 80 355 2 0 0 0 355 gO/P 49012 76 490 15 0 0 0 490 49005>49013 0 546 3 0 0 0 546 MR>3 24/0/1 49014 80 506 2 0 0 0 506 MR>3 SR 49012>49015 10 0 0 0 0 49016 5 61 2 0 0 0 CLEAR MOD DIGITS 49007> 49003>49017 0 61 3 0 0 0 49109>49018 5 61 34 0 0 0 SET PARAMETER=2C 49019 82 489 2 0 0 0 489 EXIT 49100 PROCR 491 491 M&P-DEAL WITH OTHER CHAPTER 49101 NOTES 0 0 48917>49102 80 497 2 0 0 0 497 TEST MODIFICATION 49103 71 491 10 0 0 0 491 gYES 49104 0 546 2 0 0 0 546 SIMPLE CASE 24/0/3 49105 2 61 34 0 0 0 OTHER CHAP NUMBER 49106 2 61 34 0 0 0 49107 11 0 0 0 1 49108 80 355 2 0 0 0 355 gO/P, CLEAR A 49109 76 490 18 0 0 0 490 gCLEAR PARA 49103>49110 80 508 2 0 0 0 508 COMPLEX CASE ->O/P 0/1/0+0/0/3 49111 0 545 8 0 0 0 545 6/0/0 49112 1 61 34 0 0 0 OTHER CHAP NUMBER 49113 1 61 34 0 0 0 49114 12 0 0 0 1 49115 80 355 2 0 0 0 355 SELECT START ADDRESS ->O/P 49116 76 496 2 0 0 0 496 gM&P COMPLEX END 49200 PROCR 492 492 M&P-DEAL WITH ABSOLUTE ADDRESS 49201 NOTES 0 0 48909>49202 0 61 2 0 0 0 MOD DIGITS 49203 70 492 38 0 0 0 492 gUNMODIFIED 49204 12 0 0 0 4 49205 72 492 25 0 0 0 492 gMR>3 49206 0 61 1 0 0 0 49207 70 492 36 0 0 0 492 gMR 1-3 ARITH 49208 0 66 8 1 0 0 ITEM 49209 73 492 15 0 0 0 492 49210 0 545 19 0 0 0 545 (1) POS ITEM 24/01/2002 49211 2 61 41 0 0 0 MOD GROUP PARA 49212 2 61 2 0 0 0 49213 80 355 2 0 0 0 355 gO/P 49214 76 492 29 0 0 0 492 49237> 49209>49215 80 508 2 0 0 0 508 gO/P 0/1/0+0/0/3 49216 80 505 2 0 0 0 505 (2) NEG ITEM O/P 24/0/3 0 49217 0 545 8 0 0 0 545 6/0/0 49218 1 61 2 0 0 0 MOD DIGITS 49219 1 61 2 0 0 0 49220 5 67 3 0 0 0 49221 0 61 41 0 0 0 MOD GROUP PARA 49222 5 67 2 0 0 0 49223 80 518 2 0 0 0 518 gO/P 49224 76 492 34 0 0 0 492 49205>49225 0 66 8 1 0 0 MR>3 ITEM 49226 73 492 31 0 0 0 492 (1) POSITIVE ITEM 49227 0 546 2 0 0 0 546 24/0/3 0 49228 80 506 2 0 0 0 506 gMR>3 SR 49214>49229 5 61 2 0 0 0 CLEAR MOD DIGITS 49230 76 496 29 0 0 0 496 gM&P END 49226>49231 80 508 2 0 0 0 508 gO/P 0/1/0+0/0/3 49232 0 545 8 0 0 0 545 (2) NEG ITEM 6/0/0 49233 80 506 2 0 0 0 506 gMR>3 SR 49224>49234 5 61 2 0 0 0 CLEAR MOD DIGITS 49235 76 496 2 0 0 0 496 gM&P COMPLEX END 49207>49236 0 66 8 1 0 0 SIMPLE CASE ITEM 49237 73 492 15 0 0 0 492 49203>49238 80 505 2 0 0 0 505 O/P 24/0/3 0 49239 76 496 29 0 0 0 496 g END 49300 PROCR 493 493 M&P-DEAL WITH 'ITEM+' 49301 NOTES 0 0 48904>49302 80 497 2 0 0 0 497 g TEST MODIFICATION 49303 71 493 6 0 0 0 493 gYES 49304 0 66 8 1 0 0 ITEM 49305 72 493 10 0 0 0 493 gNORMAL 49303>49306 80 508 2 0 0 0 508 COMPLEX CASE ->O/P 0/1/0+0/0/3 49307 0 545 8 0 0 0 545 6/0/0 49308 80 502 2 0 0 0 502 g'ITEM+' SR 49309 76 496 2 0 0 0 496 g M&P COMPLEX END 49305>49310 0 546 2 0 0 0 546 24/0/3 SIMPLE CASE 49311 80 502 2 0 0 0 502 g'ITEM +' SR 49312 76 496 29 0 0 0 496 M&P END 49400 PROCR 494 494 M&P DEAL WITH TRANSIT AREA REFERENCE 49401 NOTES 48913>49402 80 497 2 0 0 0 497 gTEST MODIFICATION 49403 71 494 6 0 0 0 494 gYES 49404 0 66 8 1 0 0 ITEM 49405 72 494 11 0 0 0 494 gNORMAL 49403>49406 80 508 2 0 0 0 508 gO/P 0/1/0+0/0/3 COMPLEX CASE 49407 80 500 2 0 0 0 500 gO/P 24/1/2 BY-(64+P) 49408 0 545 66 0 0 0 545 24/0/2 0 49409 80 359 2 0 0 0 359 gO/P 49410 76 496 2 0 0 0 496 gM&P COMPLEX END 49405>49411 80 500 2 0 0 0 500 gO/P 24/1/2 BY -(64+P) (SIMPLE CASE) 49412 76 496 29 0 0 0 496 gM&P END 49500 PROCR 495 495 M&P-DEAL WITH REFERENCE 1000+ 49501 NOTES 48907>49502 80 497 2 0 0 0 497 gTEST MODIFICATION 49503 71 495 6 0 0 0 495 gYES 49504 0 66 8 1 0 0 ITEM 49505 72 495 16 0 0 0 495 gNORMAL 49503>49506 80 508 2 0 0 0 508 gO/P 0/1/0 +0/0/3 COMPLEX CASE 49507 80 503 2 0 0 0 503 gTEST CHAP 49508 545 19 0 0 0 545 24/1/2 49509 2 66 6 0 0 0 49510 101 1000 1 1 0 49511 80 359 2 0 0 0 359 gO/P 49512 545 66 0 0 0 545 24/0/2 49513 80 359 2 0 0 0 359 gO/P ZERO REF ZERO PARA 49514 5 66 6 1 0 0 49515 76 496 2 0 0 0 496 gM&P COMPLEX END 49505>49516 80 503 2 0 0 0 503 gTEST CHAP 49517 545 19 0 0 0 545 24/1/2 49518 2 66 6 0 0 0 49519 101 1000 1 1 0 49520 80 359 2 0 0 0 359 gO/P 49521 5 66 6 1 0 0 49522 76 496 29 0 0 0 496 gM&P END 49600 PROCR 496 496 M&P-DEAL WITH ADDRESS CALCULATIONS+END ROUTINE 49601 NOTES 49515> 49410> 49309> 49235> 49116>49602 0 61 2 0 0 0 49603 70 496 17 0 0 0 496 gUNMODIFIED 49604 12 0 0 0 4 49605 72 496 15 0 0 0 496 gMR>3 49606 80 505 2 0 0 0 505 24/0/3 0 49607 0 545 9 0 0 0 545 4/0/0 49608 1 61 2 0 0 0 49609 1 61 2 0 0 0 49610 5 67 3 0 0 0 49611 0 61 41 0 0 0 MOD GROUP PARA 49612 5 67 2 0 0 0 49613 80 518 2 0 0 0 518 gO/P 49614 76 496 17 0 0 0 496 49605>49615 0 545 9 0 0 0 545 4/0/0 49616 80 506 2 0 0 0 506 gMR>3 SR 49614> 49603>49617 0 66 8 1 0 0 49618 72 496 22 0 0 0 496 gNOT NEGATIVE ITEM 49619 0 66 8 0 0 0 MODULUS 49620 1 545 24 0 0 0 545 1/1/2 0 49621 80 359 2 0 0 0 359 gO/P 49618>49622 5 66 8 1 0 0 CLEAR ITEM, MOD DIGITS 49623 5 61 2 0 0 0 49624 546 16 0 0 0 546 2/0/0/6 49625 80 361 2 0 0 0 361 gLN 2C SR 49626 80 399 2 0 0 0 399 g0/1/1 SR 49627 546 17 0 0 0 546 24/0/3/6 49628 80 361 2 0 0 0 361 gLN 2C SR 49522> 49412> 49312> 49239> 49230>49629 10 0 0 0 0 49630 5 61 34 0 0 0 CLEAR PARA, REF 49631 82 489 2 0 0 0 489 49700 PROCR 497 497 M&P-TEST INDIRECT MODIFICATION 49701 NOTES 49702 81 497 2 0 0 0 497 49703 0 61 2 0 0 0 MOD DIGITS 49704 70 497 8 0 0 0 497 gNO 49705 12 0 0 0 4 49706 72 497 9 0 0 0 497 gYES(MR>3) 49707 0 61 1 0 0 0 (NON-ZERO IF NON-ARITH) 49704>49708 82 497 2 0 0 0 497 49706>49709 10 0 0 0 1 49710 82 497 2 0 0 0 497 (A)=0 IF 'DIRECT' MODIFICATION 49800 PROCR 498 498 SR FOR INTERNAL SC'S TO MAKE REL TO PROCR STARTS 49801 NOTES 49802 81 498 2 0 0 0 498 49803 73 498 7 0 0 0 498 gNEGATIVE ACTIONS 49804 1 61 43 0 0 0 49805 2 61 11 0 0 0 START OF CURRENT PROCR 49806 76 498 9 0 0 0 498 49803>49807 2 61 43 0 0 0 49808 1 61 11 0 0 0 49806>49809 5 67 3 0 0 0 49810 0 61 10 0 0 0 CURRENT PROCR(IN THIS CHAPTER) 49811 30 0 0 0 2 49812 1 61 3 0 0 0 49813 5 67 2 0 0 0 PARA 49814 80 518 2 0 0 0 518 gO/P 49815 82 498 2 0 0 0 498 49900 PROCR 499 499 SET(A)=ROUTE PARA Q10B=FILE TYPE 49901 NOTES 49902 81 499 2 0 0 0 499 49903 91 91 0 0 3 0 2R:0 49910>49904 0 91 5 0 3 0 49905 70 499 11 0 0 0 499 gLIST EMPTY 49906 33 0 0 0 6- ROUTE TYPE 49907 1 545 27 0 0 0 545 BIT 15 TO RESTORE TOP CONTROL 49908 2 61 54 0 0 0 FILE ID 49909 70 499 13 0 0 0 499 gMATCH 49910 94 499 4 0 3 2 499 49905>49911 10 0 0 0 5: 49912 80 501 2 0 0 0 501 gREPORT'?????' 49909>49913 96 0 0 3 0 49914 31 0 0 0 1- 49915 1 92 29 0 0 0 NUMBER OF CHARS 49916 1 92 29 0 0 0 49917 11 0 0 0 1 49918 82 499 2 0 0 0 499 50000 PROCR 500 500 MODIFY BY ANNEX START SR 50001 NOTES RADIX B T.A.S. MR LESS THAN 3 50002 81 500 2 0 0 0 500 50003 80 488 2 0 0 0 488 FORM TA PARAM 50004 11 0 0 0 1 TO GIVE T2 50005 2 545 19 0 0 0 545 24/1/2 50006 5 67 3 0 0 0 50007 2 67 3 0 0 0 50008 80 355 2 0 0 0 355 gO/P 50009 5 66 6 0 0 0 CLEAR REF 50010 82 500 2 0 0 0 500 50100 PROCR 501 501 MISMATCH SR FOR MR>3, SWITCHES, ITEM+ 50101 NOTES 50102 81 501 2 0 0 0 501 (A)=+,M,S OR C 50103 32 0 0 0 2- 50104 1 542 28 1 0 0 542 '?????' 50105 32 0 0 0 2 50106 5 5 46 1 0 0 50107 0 546 20 0 0 0 546 50108 71 501 12 0 0 0 501 gPREVIOUS RI/P RECORD WAS PRINTED 50109 10 0 0 0 1 50110 5 545 99 0 0 0 545 50111 80 511 2 0 0 0 511 gPRINT LINE WE'RE REPORTING 50108>50112 80 530 2 0 0 0 530 gSECOND PRINT SR 50113 82 501 2 0 0 0 501 50200 PROCR 502 502 50201 NOTES RADIX B DEAL WITH ITEM + S.R. 50202 81 502 2 0 0 0 502 50203 5 61 58 0 0 0 ACTION 50204 91 98 0 0 3 0 50205 98 1 0 0 0 CTR 50206 70 502 13 0 0 0 502 gWRONG 50207 35 0 0 0 11 50212>50208 10 0 0 0 0 50209 36 98 2 0 3 0 50210 2 66 6 1 0 0 50211 70 502 15 0 0 0 502 gOK 50212 94 502 8 0 3 1 502 50206>50213 10 0 0 0 4+ ERROR + 50214 80 501 2 0 0 0 501 gMISMATCH SR 50211>50215 98 2 0 3 0 50216 80 507 2 0 0 0 507 50217 5 66 16 0 0 0 CLEAR ITEM+IND 50218 5 66 6 1 0 0 CLEAR REFERENCE 50219 82 502 2 0 0 0 502 50300 PROCR 503 503 TEST IF IN OTHER CHAPTER-M&P REF 1000+ 50301 NOTES 50302 81 503 2 0 0 0 503 50303 61 9 0 0 0 PROCR OF LAST 81 ACTION 50304 5 61 35 0 0 0 50305 80 486 2 0 0 0 486 gDETERMINE CHAP SR 50306 3 61 34 0 0 0 ADDRESSED CHAP 50307 2 61 51 0 0 0 THIS CHAP NO 50308 70 503 17 0 0 0 503 gTHIS CHAP 50309 61 34 0 0 0 50310 80 504 2 0 0 0 504 gO/P 24/0/3 50311 61 9 0 0 0 REF=PROCR 50312 30 0 0 0 2 50320>50313 5 67 2 0 0 0 PARA=0 50314 546 2 0 0 0 546 24/0/3 50315 80 359 2 0 0 0 359 gO/P 50316 82 503 2 0 0 0 503 50308>50317 61 9 0 0 0 50318 30 0 0 0 2 50319 1 61 3 0 0 0 2C 50320 76 503 13 0 0 0 503 50400 PROCR 504 504 OUTPUT 24/0/3 BY 0 OR 24/0/3 BY OTHER CHAP 15-BIT START 50401 NOTES 50402 81 504 2 0 0 0 504 50403 70 504 8 0 0 0 504 g24/0/3 BY 0 50404 5 67 3 0 0 0 50405 10 0 0 0 1 50406 2 67 3 0 0 0 50407 2 67 3 0 0 0 50403>50408 1 546 2 0 0 0 546 24/0/3 50409 80 355 2 0 0 0 355 gO/P 50410 82 504 2 0 0 0 504 50500 PROCR 505 505 OUTPUT 24/0/3 BY 0 50501 NOTES RADIX B 50502 81 505 2 0 0 0 505 50503 10 0 0 0 0 50504 80 504 2 0 0 0 504 50505 82 505 2 0 0 0 505 50600 PROCR 506 506 MR GREATER THAN 3 SR 50601 NOTES RADIX B M & P 50602 81 506 2 0 0 0 506 50603 5 61 58 0 0 0 ACTION WL 50604 91 71 0 0 3 0 50605 94 506 7 0 3 0 506 ///// 50606 76 506 13 0 0 0 506 gMISMATCH 50605>50607 35 0 0 0 11 50612>50608 10 0 0 0 0 50609 36 71 2 0 3 0 50610 2 61 2 0 0 0 MOD DIGITS 50611 70 506 15 0 0 0 506 gOK 50612 94 506 8 0 3 1 506 50606>50613 10 0 0 0 64 =M 50614 80 501 2 0 0 0 501 gMISMATCH SR 50611>50615 0 71 2 0 3 0 50616 80 507 2 0 0 0 507 50617 82 506 2 0 0 0 506 50700 PROCR 507 507 END ROUTINE FOR MR>3 AND ITEM+ SUBROUTINES 50702 81 507 2 0 0 0 507 50703 5 503 2 0 0 0 503 WL=SR LINK 50704 0 61 58 0 0 0 50705 70 507 15 0 0 0 507 gZERO ACTION=15-BIT ADDRESS NEEDED 50706 0 503 2 0 0 0 503 50707 30 0 0 0 4- ISOLATE CORRECTED CHAP 50708 2 61 51 0 0 0 50709 70 507 13 0 0 0 507 gTHIS CHAP 50710 1 61 51 0 0 0 50711 80 504 2 0 0 0 504 gO/P 24/0/3 BY OTHER CHAP START 50712 76 507 20 0 0 0 507 g(PARA=0) 50709>50713 0 61 3 0 0 0 2C 50714 76 507 20 0 0 0 507 50705>50715 0 503 2 0 0 0 503 50716 30 0 0 0 4- 50717 3 67 2 0 0 0 FORM PARA 2C'-1 50718 1 67 2 0 0 0 50719 12 0 0 0 1 50714> 50712>50720 5 67 2 0 0 0 50721 0 503 2 0 0 0 503 50722 32 0 0 0 4- 50723 101 1001 1 1 0 50724 30 0 0 0 2 50725 4 67 2 0 0 0 REF=1000+CHAP 50726 10 0 0 0 0 50727 32 0 0 0 2 CTR WAS IN Q3,4 50728 34 544 22 0 0 0 544 BITS 1-13 50729 36 61 58 0 0 0 50730 37 61 58 0 0 0 PACK WITH ACTION 50731 0 61 58 0 0 0 50732 80 359 2 0 0 0 359 gO/P 50733 82 507 2 0 0 0 507 50800 PROCR 508 508 0/1/0 AND 0/0/3 S/R 50801 NOTES RADIX B M&P 50802 81 508 2 0 0 0 508 50803 61 25 0 0 0 BIN INDICATOR 50804 70 508 6 0 0 0 508 50805 10 0 0 0 8 50804>50806 1 545 29 0 0 0 545 0/1/0 50807 80 361 2 0 0 0 361 gLN:2C SR 50808 61 25 0 0 0 BIN IND 50809 71 508 12 0 0 0 508 WE ALREADY HAVE BINARY SET 50810 545 28 0 0 0 545 0/0/3 50811 80 355 2 0 0 0 355 O/P 50809>50812 10 0 0 0 1 50813 4 61 25 0 0 0 50814 82 508 2 0 0 0 508 50900 PROCR 509 509 I/P SR 50901 NOTES RADIX 50902 81 509 2 0 0 0 509 50903 0 2 12 0 CURRENT RECORD LENGTH 50904 5 537 2 0 0 0 537 50905 97 537 2 0 12 0 537 50906 C 509 8 0 0 0 509 50907 80 539 2 0 0 0 539 gREAD 50906> 34505>50908 10 0 0 0 0 50909 35 0 0 0 1111 50910 36 2 1 12 0 AMENDED IMPLICITLY IND 50911 5 545 99 0 0 0 545 50912 37 2 1 12 0 CLEAR 2 CHARS 50913 54 77 0 1 0 44 BULK CLEAR 50914 55 0 1 12 0 50915 C 77 0 1 0 0 50916 C 0 2 12 0 50917 82 509 2 0 0 0 509 51000 PROCR 510 510 PRINT LINE AND RE-SITE AMEND IND 51001 NOTES 51002 81 510 2 0 0 0 510 51003 8 4 1 0 0 51004 5 8 2 1 0 0 51005 5 8 4 1 0 0 51006 80 511 2 0 0 0 511 gPRINT 51007 82 510 2 0 0 0 510 51100 PROCR 511 511 PRINT FROM SEC 5 OR 7 SR-TX AREA PARAS SET UP IN ADVANCE 51101 NOTES RADIX B 51102 81 511 2 0 0 0 511 51103 0 544 2 1 0 0 544 BEW 51104 5 7 50 1 0 0 51105 7 46 1 0 0 51106 80 515 2 0 0 0 515 gREPORT IF TOP 4 CHARS='?' 51107 70 511 12 0 0 0 511 gYES 51108 7 48 1 0 0 51109 70 511 44 0 0 0 511 gNO ERRORS 51110 80 515 2 0 0 0 515 gTEST FOR REPORT 51111 71 511 23 0 0 0 511 51107>51112 94 511 14 0 20 0 511 ///// 51113 76 511 42 0 0 0 511 gNO MORE ROOM 51112>51114 7 6 1 0 0 51115 70 511 42 0 0 0 511 gFILE HANDLING ERRORNO SERIAL 51116 30 0 0 0 8- 51117 12 0 0 0 5e 51118 70 511 42 0 0 0 511 gSECTION DESCRIPTION 51119 7 6 2 0 0 51120 5 40 0 0 20 0 51121 94 511 42 0 20 1 511 51122 76 511 42 0 0 0 511 51111>51123 7 32 1 0 0 FIRST 5 CHARS ANNOTATION 51124 12 0 0 0 7171717171 '/////' 51125 71 511 29 0 0 0 511 51126 35 0 0 0 111111 Q1-6 51127 37 7 48 1 0 0 51128 76 511 44 0 0 0 511 gDON'T COUNT 51125>51129 94 511 31 0 19 0 511 ///// 51130 76 511 39 0 0 0 511 gNO MORE ROOM 51129>51131 7 6 1 0 0 51132 70 511 39 0 0 0 511 gFILE HEADING ERROR NO SERIAL 51133 30 0 0 0 8- 51134 12 0 0 0 5e 51135 70 511 39 0 0 0 511 gSECTION DESCRIPTION ERROR 51136 7 6 2 0 0 51137 5 40 10 0 19 0 51138 94 0 0 19 1 51135> 51132> 51130>51139 86 514 2 0 0 0 514 51140 11 0 0 0 1 STEP CTR OF OTHER ERRORS 51141 84 514 2 0 0 0 514 51122> 51121> 51118> 51115> 51113>51142 10 0 0 0 1 (PRINT REPORTED LINES) 51143 5 545 99 0 0 0 545 51128> 51109>51144 0 23 46 1 0 0 PRINT PROCR '+' PRINT ALL ' INDS 51145 71 511 51 0 0 0 511 g PRINT 51146 0 545 99 0 0 0 545 IMPLICITLY AMENDED' 51147 70 511 56 0 0 0 511 g DONT PRINT 51148 0 546 20 0 0 0 546 > LAST RECORD PRINTED ? 51149 71 511 51 0 0 0 511 g YES 51150 80 512 2 0 0 0 512 g BLANK LINE 51149> 51145>51151 0 61 46 0 0 0 HEAD OF FORM, OR ZERO 51152 5 7 0 2 0 0 51153 80 513 2 0 0 0 513 gPRINT LINE 51154 10 0 0 0 1 51155 3 61 46 0 0 0 SET FOR NEXT TIME 51147>51156 5 546 20 0 0 0 546 SET/CLEAR IND 51157 82 511 2 0 0 0 511 51200 PROCR 512 512 PRINT BLANK LINE UNCONDITIIONALLY 51202 81 512 2 0 0 0 512 51203 999 16 1 0 0 COPY SEC 7 PARAS 51204 5 543 42 1 0 0 543 51205 0 999 8 0 0 0 PT ROUTE 51206 5 999 16 0 0 0 51207 2 999 8 0 0 0 51208 12 0 0 0 40 64 51209 5 999 17 0 0 0 CREATE R, - (64+R) 51210 5 7 0 1 0 0 51211 27 9 0 0 0 ON LINE ? 51212 70 512 15 0 0 0 512 g YES 51213 54 7 0 1 0 50 51214 76 512 17 0 0 0 512 g 'PRINT' 51212>51215 0 544 2 1 0 0 544 DEW 51216 5 7 2 1 0 0 51214>51217 80 513 2 0 0 0 513 g'PRINT EX SEC 7 51218 0 543 42 1 0 0 543 51219 5 999 16 1 0 0 RESTORE SEC 7 PARAS 51220 82 512 2 0 0 0 512 51300 PROCR 513 513 PRINT SEC 7 (OR SEC 5, OR PT ANNEX) 51302 81 513 2 0 0 0 513 51303 27 9 0 0 0 51304 70 513 9 0 0 0 513 g PRINTER 51305 55 7 0 1 0 50 51306 C 10 4 1 6 0 51307 80 540 2 0 0 0 540 g O/P> 51308 82 513 2 0 0 0 513 51304>51309 27 8 0 0 0 PRINTER TYPE 51310 12 0 0 0 9 51311 70 513 27 0 0 0 513 g SPECIAL 51312 545 51 0 0 0 545 BIT 20 51313 5 7 1 0 0 0 51314 124 999 17 1 2 0 SEC 7 51315 124 0 0 2 0 51316 124 999 13 1 2 0 SEC 10 51317 129 0 0 1 0 51318 10 0 0 0 4 51330>51319 30 0 0 0 5 51320 1 999 7 0 0 0 ROUTE 51321 34 999 12 0 0 0 51322 125 4096 1 1 0 51323 124 999 0 0 3 0 51324 123 160 0 2 0 51325 62 0 0 0 0 51326 82 513 2 0 0 0 513 51311>51327 55 7 0 1 0 54 51328 C 10 0 1 0 0 51329 10 0 0 0 9 51330 76 513 19 0 0 0 513 51400 PROCR 514 514 OUTPUT 9 > A6 51401 NOTES RADIX 51402 81 514 2 0 0 0 514 51403 43 A6 0 0 0 0 51404 C 9 0 0 0 0 51405 82 514 2 0 0 0 514 51500 PROCR 515 515 TEST FOR DIASTROUS ERROR CONDITION IN PRINTER 51501 NOTES 51502 81 515 2 0 0 0 515 51503 30 0 0 0 2- 51504 30 0 0 0 2 51505 11 0 0 0 5: 51506 2 542 28 1 0 0 542 ?????' 51507 71 515 11 0 0 0 515 g NOT DISASTROUS 51508 86 511 2 0 0 0 511 STEP DISASTER CTR 51509 11 0 0 0 1 51510 84 511 2 0 0 0 511 (CLEARS A) 51507>51511 82 515 2 0 0 0 515 51600 PROCR 516 516 O/P TYPE SR 51601 NOTES RADIX 51602 81 516 2 0 0 0 516 51603 91 61 44 0 2 0 51604 61 26 1 0 0 TYPE NO ALPHA 51605 1 542 18 1 0 0 542 TYPE (SPACE) 51606 05 9 4 1 2 0 51607 61 28 1 0 0 51608 05 9 6 1 2 0 51609 61 43 0 0 0 SPACE CTR 51610 05 9 8 2 2 0 51611 5 9 10 1 2 0 CLEAR 51612 76 519 2 0 0 0 519 51700 PROCR 517 517 ALPHA OUTPUT SR 51701 NOTES RADIX 51702 81 517 2 0 0 0 517 51703 91 61 44 0 2 0 51704 61 26 1 0 0 51705 5 9 4 1 2 0 51706 61 28 1 0 0 51707 5 9 6 1 2 0 51708 67 2 0 0 0 51709 5 9 8 2 2 0 51710 67 3 0 0 0 51711 5 9 10 2 2 0 51712 517 2 0 0 0 517 O/P ALPHA S/R LINK 51713 76 518 15 0 0 0 518 51800 PROCR 518 518 51801 NOTES RADIX B O/P S/R 51802 81 518 2 0 0 0 518 51803 61 42 0 0 0 51804 4 61 43 0 0 0 AUGMENT LOCATION COUNTER 51805 91 61 44 0 2 0 51806 67 0 0 0 0 SERIAL NO FOR INSTUCTIONS 51807 5 9 4 2 2 0 51808 67 1 0 0 0 SC INDICATOR FOR INSIONS 51809 5 9 6 2 2 0 51810 67 2 0 0 0 PARAMETER 51811 5 9 8 2 2 0 51812 67 3 0 0 0 51813 5 9 10 2 2 0 51814 518 2 0 0 0 518 LINK 51713>51815 5 516 2 0 0 0 516 O/P TYPE S/R LINK 51900 PROCR 519 519 O/P S/R 51901 NOTES RADIX B 51612>51902 94 519 8 0 2 8 519 52008>51903 544 2 1 0 0 544 BE WORD 51904 5 9 4 1 2 0 51905 80 514 2 0 0 0 514 PREP STAGE OP 51906 90 0 0 2 0 51907 C 0 0 0 144 51902>51908 95 0 0 2 0 51909 5 61 44 1 0 0 51910 5 67 1 0 0 0 CLEAR S67 51911 5 67 2 1 0 0 51912 82 516 2 0 0 0 516 52000 PROCR 520 520 OP REMAINING DETAILS SR 52001 NOTES RADIX B 52002 81 520 2 0 0 0 520 52003 0 61 44 0 0 0 52004 70 520 9 0 0 0 520 NOTHING TO O/P 52005 91 61 44 0 2 0 OP CTR 52006 0 520 2 0 0 0 520 LINK 52007 5 516 2 0 0 0 516 O/P TYPE S/R LINK 52008 76 519 3 0 0 0 519 52004>52009 82 520 2 0 0 0 520 52100 PROCR 521 521 I/P INSTRUCTION SR 52101 NOTES RADIX B 52102 81 521 2 0 0 0 521 52103 80 509 2 0 0 0 509 - I/P 52104 10 0 0 0 1 52105 5 61 99 0 0 0 NON I/P IND 52106 80 522 2 0 0 0 522 - I/P C-LINE S/R 52107 82 521 2 0 0 0 521 52200 PROCR 522 522 I/P C-LINE S/R 52201 NOTES RADIX B 52202 81 522 2 0 0 0 522 52203 61 99 0 0 0 NON I/P IND 52204 71 522 10 0 0 0 522 52205 80 534 2 0 0 0 534 SUSPEND 52206 80 509 2 0 0 0 509 INPUT 52207 6 1 12 0 52208 2 542 26 1 0 0 542 C,-,-,-,-, 52209 71 362 3 0 0 0 362 -G.N.B. 52204>52210 50 77 2 0 0 0 52211 C 548 2 0 0 0 548 52212 52 7 2 0 0 0 EDIT INSTRUCTIONS 52213 C 548 2 0 0 0 548 52214 77 20 1 0 0 PREVIOUS PROCR NO 52215 5 7 28 1 0 0 52216 77 22 1 0 0 PASS 1 REPORTS 52217 5 7 48 1 0 0 52218 55 77 24 1 0 16 COPY ANOTATION 52219 C 7 32 1 0 0 52220 0 66 4 1 0 0 ACTION ALPHA 52221 2 542 26 1 0 0 542 52222 70 526 2 0 0 0 526 gTHIS IS A C-LINE 52235> 36908>52223 10 0 0 0 0 52224 5 61 20 1 0 0 52225 94 522 27 0 1 0 522 ///// 52226 76 525 2 0 0 0 525 gNO UNMATCHED SEQ CHS BACK 52225>52227 1 0 1 0 (R1 ABS) SC BACK DEST 52228 2 66 2 1 0 0 SERIAL THIS ORDER 52229 70 524 2 0 0 0 524 gTHIS IS A DESTINATION 52230 72 525 2 0 0 0 525 gNOW TRY SEQ CH FWD LIST 52231 542 28 1 0 0 542 ????? 52232 5 61 20 1 0 0 52233 80 523 2 0 0 0 523 gSTORE 'ADDRESS'=CURRENT SPACE CTR 52542>52234 80 529 2 0 0 0 529 PRINT ENTRY POINT S/PRINT WRONG ENTRY PO 52235 76 522 23 0 0 0 522 52300 PROCR 523 523 52301 NOTES 0 0 52302 81 523 2 0 0 0 523 52303 0 0 1 0 SOURCE OF SC BACK 52304 3 61 0 0 0 0 52305 5 1 0 1 0 OVERWRITE DEST 52306 0 61 20 1 0 0 52307 71 523 15 0 0 0 523 gIGNORED 52308 35 0 0 0 11 52309 36 66 2 0 0 0 52310 12 0 0 0 2 52311 71 523 15 0 0 0 523 gNOT TO PROCR START 52312 96 0 0 1 0 52313 80 421 2 0 0 0 421 gCONTRACT SC BACK LIST 52314 76 523 20 0 0 0 523 gSTEP R1 52311> 52307>52315 0 61 10 0 0 0 CURRENT PROCR 52316 31 0 0 0 10 52317 1 61 43 0 0 0 SPACE CTR 52318 2 61 11 0 0 0 PROCR START 52319 5 0 0 1 0 STORE PROCR+ADDRESS IN PROCR I th th 52314>52320 94 523 21 0 1 2 523 STEP 52320>52321 82 523 2 0 0 0 523 52400 PROCR 524 524 I/P C-LINE S/R 52401 NOTES RADIX B STORE ABS DEST FOR MATCHED SC'S BACK 52407> 52229>52402 80 523 2 0 0 0 523 g t e e 52403 0 0 1 0 1 0 (R1 IS ABS) NEXT DEST 52404 2 66 2 0 0 0 THIS SERIAL 52405 71 525 43 0 0 0 525 gTRY SC FWD 52406 80 529 2 0 0 0 529 52407 76 524 2 0 0 0 524 gTHERE MAY BE MORE 52500 PROCR 525 525 I/P C-LINE S/R 52501 NOTES RADIX B TRY MATCH WITH SEQ CHS FWD 52230> 52226>52502 0 61 117 0 0 0 CTR OF SEC 20 LENGTH 52503 70 526 2 0 0 0 526 gEMPTY 52504 0 20 0 0 0 0 SMALLEST DEST OF SC FWD 52505 70 526 2 0 0 0 526 gLIST EMPTY,SKIP TO END 52506 2 66 2 1 0 0 THIS SERIAL 52507 70 525 11 0 0 0 525 gIS DEST OF SEQ CH FWD 52508 72 526 2 0 0 0 526 gEARLIER THAN EARLIEST DEST 52509 0 542 28 1 0 0 542 52510 5 61 20 1 0 0 SEQ CHS FORWARD 52554> 52556> 52507>52511 20 2 0 0 0 52512 30 0 0 0 6 52513 30 0 0 0 1- 52514 70 525 19 0 0 0 525 gSC TO PROCR START 52515 99 0 1 1 0 52516 72 525 19 0 0 0 525 gOK 52517 10 0 0 0 79 52518 80 501 2 0 0 0 501 gREPORT SR 52516> 52514>52519 0 20 1 0 0 0 52520 5 61 0 0 0 0 52521 0 20 2 0 0 0 52522 70 525 32 0 0 0 525 gSC TO PROCR START 52523 30 0 0 0 4- 52524 5 523 2 0 0 0 523 FLIPFLOP 52525 0 61 43 0 0 0 SPACE CTR 52526 2 61 11 0 0 0 CURRENT PROCR START 52527 34 544 26 0 0 0 544 BITS 1-10 52528 124 523 2 0 1 0 523 0 OR 10 52529 33 0 0 0 0 ///// 52530 124 20 2 0 3 0 ABS LOCN Q1-4 52531 114 0 0 0 0 PACK NEXT ENTRY->SEC 18 52522>52532 0 61 117 0 0 0 52533 12 0 0 0 3 52534 3 61 117 0 0 0 REDUCE NO OF SC'S IN TRANSIT 52535 71 525 38 0 0 0 525 gLIST NOT EMPTY 52536 5 20 0 0 0 0 52537 76 525 41 0 0 0 525 gTEST IF LAST SC WAS WRONG 52535>52538 124 20 3 0 2 0 52539 1 61 116 1 0 0 LENGTH IN 61/117 52540 128 20 0 0 0 0 UP 3 LOCNS 52537>52541 61 20 1 0 0 52542 71 522 34 0 0 0 522 gWAS A WRONG ENTRY POINT 52405>52543 61 117 0 0 0 CTR OF SECN 20 LENGTH 52544 70 525 57 0 0 0 525 gPRINT LINE 52545 66 2 0 0 0 52546 2 20 0 0 0 0 NEXT SCFWD 52547 70 525 55 0 0 0 525 gPRINT ENTRY POINT 52548 73 525 57 0 0 0 525 gPRINT LINE 52549 61 0 0 0 0 LIST 52550 70 525 52 0 0 0 525 52551 80 529 2 0 0 0 529 PRINT ENTRY POINT 52550>52552 542 28 1 0 0 542 ????? 52553 5 61 20 1 0 0 52554 76 525 11 0 0 0 525 52547>52555 80 529 2 0 0 0 529 52556 76 525 11 0 0 0 525 gMOVE LIST UP,TRY AGAIN 52548> 52544>52557 52 7 2 0 0 0 EDIT ENTRY POINT 52558 C 551 8 0 0 0 551 52600 PROCR 526 526 I/P C LINE S/R 52601 NOTES RADIX B 52508> 52505> 52503> 52222>52602 10 0 0 0 0 52603 34 66 6 1 0 0 52604 80 533 2 0 0 0 533 RT ALIGN S/R 52605 5 66 6 1 0 0 52606 5 66 16 0 0 0 CLEAR INDICATOR 52607 35 0 0 0 1 QUARTET ONE. 52608 36 66 8 1 0 0 ITEM 52609 12 0 0 0 + 52610 71 527 2 0 0 0 527 gNOT 'ITEM+' 52611 10 0 0 0 1 52612 5 66 16 0 0 0 IF IT IS SET 52613 66 8 1 0 0 INDICATOR 52614 30 0 0 0 1- AND REMOVE + 52615 72 526 17 0 0 0 526 52616 11 0 0 0 1 TO MAKE COMPLEMENT CORRECT 52615>52617 5 66 8 1 0 0 52700 PROCR 527 527 I/P C-LINE S/R 52701 NOTES RADIX B 52610>52702 77 38 1 0 0 IGNORE'IND 52703 2 542 28 1 0 0 542 52704 3 61 98 1 0 0 52705 70 527 31 0 0 0 527 52706 77 24 1 0 0 FIRST 5 CHARS ANNOTATION 52707 12 0 0 0 7369515355 TRACE' 52708 71 527 31 0 0 0 527 gNO 52709 66 4 1 0 0 52710 2 542 26 1 0 0 542 52711 70 528 49 0 0 0 528 gA C-LINE 52712 66 5 0 0 0 52713 12 0 0 0 48300 52714 70 528 49 0 0 0 528 g80 ACTION 52715 12 0 0 0 150 52716 70 528 49 0 0 0 528 g85 52717 12 0 0 0 ££0 52718 70 528 49 0 0 0 528 g94 52719 12 0 0 0 30 52720 70 528 49 0 0 0 528 g97 52721 0 25 0 0 0 0 52722 101 40 1 2 0 52723 72 528 49 0 0 0 528 gLIST FULL 52724 61 43 0 0 0 SPACESTR 52725 30 0 0 0 5 52726 1 66 2 0 0 0 LINE SERIAL 52727 124 25 0 0 1 0 52728 5 25 2 1 0 0 52729 10 0 0 0 2 52730 4 25 0 0 0 0 52853> 52708> 52705>52731 80 511 2 0 0 0 511 PRINT 52732 66 6 2 0 0 DEC REF 52733 12 0 0 0 100 52734 73 527 41 0 0 0 527 gSECTION 52735 12 0 0 0 899 52736 72 527 41 0 0 0 527 g999 OR 1000+ 52737 60 0 0 0 0 52738 10 0 0 0 2- 52739 4 66 8 1 0 0 REDUCE ITEM 52740 62 0 0 0 0 52736> 52734>52741 66 4 1 0 0 52742 2 542 26 1 0 0 542 C. . . . . 52743 70 528 6 0 0 0 528 52744 34 66 4 1 0 0 52745 80 533 2 0 0 0 533 RT ALIGN S/R 52746 5 66 4 1 0 0 52747 66 4 2 0 0 ACTION 52748 32 0 0 0 1- 52749 5 61 110 0 0 0 GROUP 52750 32 0 0 0 1 52751 11 0 0 0 1 52752 5 61 50 0 0 0 VARIANT +1 52800 PROCR 528 528 52801 NOTES RADIX B 52802 0 61 110 0 0 0 52803 80 537 2 0 0 0 537 CONVERT 52804 11 0 0 0 1 52805 5 61 110 0 0 0 GROUP+1 52743>52806 61 98 1 0 0 W/L 52807 71 528 10 0 0 0 528 52808 5 61 110 0 0 0 CLEAR GROUP WHEN 'IGNORE' IND SET 52809 76 362 2 0 0 0 362 gGNB 52807>52810 124 543 22 0 2 0 543 52811 112 66 8 1 0 0 52812 5 66 8 1 0 0 ITEM TO BIN 52813 124 543 22 0 2 0 543 52814 112 66 12 1 0 0 52815 5 66 12 1 0 0 MOD DIGITS TO BIN 52816 0 61 110 0 0 0 52817 12 0 0 0 2 52818 70 528 44 0 0 0 528 gGROUP 1 52819 12 0 0 0 3 52820 70 528 47 0 0 0 528 gGROUP 4 52821 12 0 0 0 2 52822 70 528 44 0 0 0 528 gGROUP 6 52823 12 0 0 0 1 52824 70 528 44 0 0 0 528 gGROUP 7 52825 12 0 0 0 3 52826 73 528 41 0 0 0 528 gGROUPS,0,2,3,5,8,9 52827 12 0 0 0 3 52828 73 528 44 0 0 0 528 gGROUPS 10-12 52829 70 528 36 0 0 0 528 gGROUP13 52830 12 0 0 0 1 52831 70 528 44 0 0 0 528 gGROUP 14 52832 61 50 0 0 0 VARIANT+1 52833 12 0 0 0 7 52834 70 528 47 0 0 0 528 g156,DON'T CONVERT REFF 52835 76 528 44 0 0 0 528 52829>52836 61 50 0 0 0 52837 12 0 0 0 3 52838 73 528 44 0 0 0 528 gACTION 130 OR 131 52839 10 0 0 0 0 52840 76 528 47 0 0 0 528 gACTION 132-134, DON'T CONVERT REF 52826>52841 124 543 22 0 2 0 543 52842 112 66 14 1 0 0 52843 5 66 14 1 0 0 LITERAL TO BIN 52838> 52835> 52831> 52828> 52824> 52822> 52818>52844 124 543 22 0 2 0 543 52845 112 66 7 1 0 0 52846 5 66 6 1 0 0 52840> 52834> 52820>52847 5 61 99 0 0 0 52848 82 522 2 0 0 0 522 52723> 52720> 52718> 52716> 52714> 52711>52849 10 0 0 0 65 N' REPORT 'TRACE' 52850 35 0 0 0 11000 52851 30 0 0 0 3 52852 37 7 49 0 0 0 52853 76 527 31 0 0 0 527 52900 PROCR 529 529 PRINT SEQ CHANGE ENTRY POINT ON SEPARATE LINE 52901 NOTES RADIX B 52902 81 529 2 0 0 0 529 52903 0 61 20 1 0 0 52904 71 529 7 0 0 0 529 gPRINT REPORTED SC 52905 0 23 46 1 0 0 'PRINT UNCONDITIONALLY' INDS 52906 70 529 12 0 0 0 529 gDON'T PRINT SEPARATE SC 52904>52907 52 5 2 0 0 0 52908 C 551 2 0 0 0 551 52909 0 61 20 1 0 0 '?????'OR ZERO 52910 5 5 46 1 0 0 52911 80 530 2 0 0 0 530 52906>52912 10 0 0 0 0 52913 5 61 0 0 0 0 CLEAR LIST 52914 82 529 2 0 0 0 529 53000 PROCR 530 530 SECOND PRINT S/R 53001 NOTES RADIX B 53002 81 530 2 0 0 0 530 53003 0 544 2 1 0 0 544 BEW 53004 5 5 50 1 0 0 53005 0 999 14 1 0 0 SEC 5 PARAS 53006 5 999 16 1 0 0 CORRUPT SEC 7 PARAS 53007 80 511 2 0 0 0 511 gPRINT SR(WHICH WILL USE SEC 5) 53008 0 999 30 1 0 0 53009 5 999 16 1 0 0 RESTORE SEC 7 PARAS EX WL 53010 54 5 2 1 0 48 53011 82 530 2 0 0 0 530 53100 PROCR 531 531 NEG NO S/R 53101 NOTES RADIX B 53102 81 531 2 0 0 0 531 53103 10 0 0 0 0 53104 2 66 8 1 0 0 ITEM 53105 70 531 17 0 0 0 531 DO NOT SET INDICATOR FOR ZERO ITEM 53106 73 531 17 0 0 0 531 53107 5 66 8 1 0 0 53108 10 0 0 0 80 B8 53109 4 61 34 0 0 0 PARA W/L 53110 66 10 1 0 0 53111 12 0 0 0 2 53112 71 531 17 0 0 0 531 53113 12 0 0 0 1 53114 4 66 8 1 0 0 53115 10 0 0 0 1 53116 5 66 10 1 0 0 53112> 53106> 53105>53117 82 531 2 0 0 0 531 53200 PROCR 532 532 STACK S/R 53201 NOTES RADIX B 53202 81 532 2 0 0 0 532 53203 0 61 0 0 0 0 ACTION 53204 5 67 3 0 0 0 53205 66 6 1 0 0 REF 53206 30 0 0 0 2 53207 1 61 34 0 0 0 PARAM 53208 5 67 2 0 0 0 53209 66 10 1 0 0 53210 70 532 16 0 0 0 532 gDISC 0 53211 12 0 0 0 2 53212 71 532 15 0 0 0 532 gNOT DISC 2 53213 10 0 0 0 1 STEP ITEM 53214 4 66 8 1 0 0 53212>53215 545 29 0 0 0 545 B16 53210>53216 124 66 12 0 1 0 MOD DIGITS 53217 1 545 25 0 0 0 545 BITS IN B14 POSITION 53218 1 66 8 0 0 0 ITEM 53219 35 0 0 0 1111 53220 36 67 3 0 0 0 53221 37 67 3 0 0 0 PACK WITH ACTION 53222 10 0 0 0 0 CLEAR A 53223 82 532 2 0 0 0 532 53300 PROCR 533 533 RT ALIGN S/R 53301 NOTES RADIX B 53302 81 533 2 0 0 0 533 53303 10 0 0 0 0 53304 5 61 18 1 0 0 53308>53305 0 61 18 1 0 0 53306 32 0 0 0 2 53307 5 61 18 1 0 0 53308 75 533 5 0 0 0 533 53309 0 61 18 1 0 0 53310 82 533 2 0 0 0 533 53400 PROCR 534 534 SUSPEND S/R 53401 NOTES RADIX B 53402 81 534 2 0 0 0 534 53403 55 66 6 1 0 8 53404 C 61 26 1 0 0 53405 66 16 0 0 0 ITEM + IND 53406 5 66 17 0 0 0 ITEM + IND (STORE) 53407 82 534 2 0 0 0 534 53500 PROCR 535 535 REPLACE S/R 53501 NOTES RADIX B 53502 81 535 2 0 0 0 535 53503 55 61 26 1 0 8 53504 C 66 6 1 0 0 53505 66 17 0 0 0 ITEM + IND (STORE) 53506 5 66 16 0 0 0 ITEM + IND 53507 82 535 2 0 0 0 535 53600 PROCR 536 536 OP INST S/R 53601 NOTES RADIX B 53602 81 536 2 0 0 0 536 53603 66 12 1 0 0 MOD DIGITS 53604 5 61 2 0 0 0 53605 80 489 2 0 0 0 489 gMOD AND PARAMETER 53606 61 2 0 0 0 53607 5 66 12 1 0 0 53608 0 66 8 1 0 0 53609 72 536 11 0 0 0 536 gNOT NEGATIVE ITEM 53610 80 531 2 0 0 0 531 NEG NO 53609>53611 80 532 2 0 0 0 532 STACK 53612 80 518 2 0 0 0 518 OP 53613 82 536 2 0 0 0 536 53700 PROCR 537 537 CONVERT (A) TO BINARY 53701 NOTES RADIX B 53702 81 537 2 0 0 0 537 53703 5 543 42 1 0 0 543 53704 62 0 0 0 0 53705 124 543 22 0 2 0 543 53706 112 543 42 1 0 0 543 53707 82 537 2 0 0 0 537 53800 PROCR 538 538 CONVERT (A) TO DECIMAL 53801 NOTES 53802 81 538 2 0 0 0 538 53803 5 543 42 1 0 0 543 53804 60 0 0 0 0 53805 124 543 2 0 2 0 543 53806 112 543 42 1 0 0 543 53807 82 538 2 0 0 0 538 53900 PROCR 539 539 A2>B 53902 81 539 2 0 0 0 539 53903 42 A2 0 0 0 0 53904 C 8 0 0 0 0 53905 59 8 6 0 12 0 53906 C 8 4 2 0 0 53907 82 539 2 0 0 0 539 54000 PROCR 540 540 O/P>A9 54002 81 540 2 0 0 0 540 54003 94 540 9 0 6 50 540 FORM UP MULTIRECORD BLOCK 54004 544 2 1 0 0 544 BEW 54005 5 10 306 1 0 0 54006 80 541 2 0 0 0 541 54007 90 0 0 6 0 SET UP MOD 54008 C 0 0 0 300 54003>54009 82 540 2 0 0 0 540 54100 PROCR 541 541 WRITE A9 54102 81 541 2 0 0 0 541 54103 10 0 0 0 800000 54104 34 999 12 0 0 0 SEC 10 54105 125 4096 1 1 0 54106 1 999 7 0 0 0 D1/A9 54107 124 999 0 0 3 0 54108 123 160 0 2 0 54109 82 541 2 0 0 0 541 54200 CONST 542 542 1 ALPHA CONSTANTS 54202 (A)VALUE; 54204 TABLE; 54206 CONST; 54208 PROCR; 54210 (A)NOTES; 54212 END ; END 54214 DUMPS; 54216 FILES; 54218 TYPE ; 54220 FIEND; 54222 > ; (R ght - CK) 54224 TYPE.; 54226 C ; 54228 ?????; 54230 TYPE£; 54232 (B)1; CONVERT LITERALS OF 35 ACTION 54234 2; 54236 4; 54238 8; 54240 16; 54242 32; 54244 64; 54246 128; 54248 256; 54250 512; 54300 CONST 543 543 1 CONVERT TABLES 54302 (D)1; 54304 16; 54306 256; 54308 4096; 54310 65536; 54312 1048576; 54314 16777216; 54316 268435456; 54318 4294967296; 54320 ££££££££££; 54322 1; DEC->BIN 54324 t; 54326 64; 54328 3.8; 54330 2710; 54332 186t0; 54334 £4240; 54336 989680; 54338 5£5.100; 54340 3e9t+t00; 54342 0; (A)WL 54344 0; CLEO'PARA WORD 54400 CONST 544 544 0 DECIMAL CONSTANTS 54402 (D)7.; B.E. 54403 7.000; WORD 54404 0; 0:48 MR SETTING 54405 90; MR NOW 0:144 54406 1; FUNCTIONS WORDS 54407 45; TYPES IN ALPHA 54408 45; 54409 44; 54410 4; 54411 4; 54412 2; 54413 (R)62:0; LONG NO SECT 54414 63:0; SHORT NO SECT 54415 62:0; T.DS.L. SECT 54416 18:2499; FOR SEQUENCE CHANGES 54417 18:0; 54418 (B)180; FOR TSL STORAGE 54419 180; 54420 (D)3; 54421 7£££0; B5-19 54422 1£££; B1-13 54423 66666; DEC RADIX 54424 66.64; ST RADIX 54425 66666; DEC RADIX 54426 3££; BITS 1-10 54427 01000; BIT 13 54428 3£; BITS 1-6 54500 CONST 545 545 0 INSTRUCTIONS 54502 (R)92:9; 54503 (D)t8006; 10/1/0 6 54504 +8006; 12/1/0 6 54505 7; 54506 £££££; THIS ISN'T A DUMMY 54507 £££££; 54508 (D)60000; 6 54509 40000; 4 B19 54510 50000; 5 54511 30000; 3 54512 70000; 7 54513 20000; 2 B18 54514 90000; 9 54515 t0000; 10 54516 e0000; 11 54517 :0000; 13 54518 2t001-; 18/1/1/0/1 54519 8+000-; 24/1/2 54520 80000-; 24/0/0 54521 0t000; 0/1/1 54522 1.000; 1/1/3 54523 1t000; 1/1/1 54524 1+000; 1/1/2 54525 0; 0/0/0 54526 02000; 0/0/1 B14 54527 04000; 0/0/2 B15 54528 06000; 0/0/3 B14-15 54529 08000; 0/1/0 B16 54530 28000; 2/1/0 54531 38000; 3/1/0 54532 22000-; 18/0/1 54533 26000-; 18/0/3 54534 2t000-; 18/1/1 54535 2.000-; 18/1/3 54536 12000; 1/0/1 54537 £0000; 15 54538 .0000; 14 54539 14000; 1/0/2 54540 e0000-; 27/0/0 54541 e2000-; 27/0/1 54542 e4000-; 27/0/2 54543 e6000-; 27/0/3 54544 e8000-; 27/1/0 54545 et000-; 27/1/1 54546 88000-; 24/1/0 54547 t0000-; 26/0/0 54548 t2000-; 26/0/1 54549 10000; 1/0/0 B17 54550 2t00t-; 18/1/1/0/10 54551 80000; 8/0/0 B20 54552 88000; 8/1/0 54553 1.001; 1/1/3/0/1 54554 48000; 4/1/0 54555 2t005-; 18/1/1/0/5 54556 t8000-; 26/1/0 54557 68000; 6/1/0 54558 +0000; 12 54559 90000-; 25/0/0 54560 74000-; 23/0/2 54561 70000-; 23/0/0 54562 2e016-; 18/1/1/0/10 (18/1/1/4096+22) 54563 t4000-; 26/0/2 54564 2e017-; 18/1/1/0/9- (18/1/1/4096+23) 54565 +0000-; 28/0/0 54566 84000-; 24/0/2 54567 :2000-; 29/0/1 54568 +4000-; 28/0/2 54569 +6000-; 54570 ++000-; 54571 +.000-; 54572 2e01e-; 54573 9e000-; 54574 (R)18:2496; 54575 (D)1; 54576 £0000-; 54577 £8000-; 54578 .8000-; 54579 .0008-; 54580 .0000-; 54581 £0008-; 54582 40000-; 54583 48000-; 54584 58000-; 54585 40008-; 54586 50000-; 54587 60000-; 54588 .0004-; 54589 £8004-; 54590 68000-; 54591 407+; 54592 400; 54593 6808t; 54594 500; 54595 0409+; 54596 200; 54597 300; 54598 t6000-; 54599 ; 54600 CONST 546 546 0 54602 (D)86000-; 54603 82000-; 54604 28006; 54605 38006; 54606 e8002-; 54607 1t002; 54608 22005-; 54609 06004; 54610 20001; 54611 88001-; 54612 e4002-; 54613 88007-; 54614 t5££e-; 54615 t1££t-; 54616 20006; 54617 86006-; 54618 74002-; 54619 0; 54620 0; 54621 8+006-; 54622 1t00t; 54623 30002; 54624 1t014; 54625 04002; 54626 88005-; 54627 :6000-; 54628 8000-; 54629 +t000-; 54630 1.001; 1/1/3 1 54700 TABLE 547 547 1 TRIAL DATA HEADING BLOCK 'FILES' 54701 NOTES 54800 TABLE 548 548 1 INSTRUCTIONS 54801 NOTES 54802 66 0 0 0 2 0 5 0 0 0 0 0 0 AM IND 54804 66 2 0 0 1 0 5 5 5 0 0 0 0 S. NO 54806 66 4 0 0 2 0 5 0 4 0 0 0 0 ACTION 54808 66 6 0 0 2 0 5 0 3 0 0 0 0 REF 54810 66 8 0 0 1 0 5 5 0 4 2 0 0 ITEM 54812 66 10 0 0 1 0 2 8 1 1 0 0 0 DISC 54814 66 12 0 0 1 0 3 7 0 2 0 0 0 MOD 54816 66 14 0 0 1 0 10 0 5 9 2 0 0 LITERAL 54818 543 44 0 0 2 0 5 0 0 0 0 0 1 CLEO' PARA WORD 54900 TABLE 549 549 1 TABLES 54901 NOTES 54902 66 0 0 0 2 0 5 0 0 0 0 0 0 AM IND 54904 66 2 0 0 0 0 5 0 5 0 0 0 0 S NO 54906 66 16 0 0 0 0 5 0 1 4 0 0 0 FIRST REF 54908 66 17 0 0 0 0 5 0 1 4 0 0 0 FIRST ITEM 54910 66 18 0 0 0 0 5 0 1 4 0 0 0 SECOND REF 54912 66 19 0 0 0 0 5 0 1 4 0 0 0 SECOND ITEM 54914 66 3 0 0 0 0 2 3 1 1 0 0 0 S/L/ALPHA 54916 66 4 0 0 0 0 3 2 0 2 0 0 0 SINGLE/BE 54918 66 5 0 0 0 0 2 3 2 1 0 0 0 NO OF CHARS 54920 66 10 0 0 0 0 3 2 1 2 0 0 0 DISC 54922 66 11 0 0 0 0 2 3 2 1 0 0 0 SPACES 54924 66 12 0 0 0 0 3 2 1 2 0 0 0 ZEROS 54926 66 13 0 0 0 0 1 4 2 0 0 0 0 SIGN 54928 66 14 0 0 0 0 2 3 1 1 0 0 0 STERLING 54930 66 15 0 0 0 0 2 3 1 1 0 0 1 LTE 55000 TABLE 550 550 1 VALUE 55001 NOTES 55002 67 3 0 0 0 0 5 0 1 4 1 0 0 VALUE 55004 67 2 0 0 0 0 4 1 0 3 0 0 1 PARA 55100 TABLE 551 551 1 ENTRY PT ADJUSTMENT PM POINTS 55101 NOTES 55102 61 20 0 0 2 0 3 2 0 0 0 0 0 ??? OR ZERO 55104 61 0 0 0 0 0 5 0 1 0 0 0 0 ENTRY POINT 55106 542 22 0 0 2 0 1 0 0 0 0 0 1 '+' 55108 66 0 0 0 2 0 3 0 0 0 0 0 0 AMEND IND 55110 61 0 0 0 0 0 5 0 1 0 0 0 0 ENTRY PT 55112 542 22 0 0 2 0 1 0 0 0 0 0 1 g 55200 CONST 552 552 1 DUMMY FOR INSERTING M/C MODS 55300 PROCR 553 553 START OF PASS 3 55301 NOTES RADIX PREP STAGE 56720>55302 152 152 4 0 0 0 152 55303 C 680 2 0 0 0 680 55304 55 9 0 1 0 100 55305 C 15 0 1 0 0 55306 55 91 0 0 0 36 55307 C 24 0 0 0 0 55308 27 4 0 0 0 COMPILER? 55309 70 553 13 0 0 0 553 gNO 55310 46 A6 10 0 0 0 REALIGN TO 'INDEX' 55311 C 0 0 0 4 55312 76 553 14 0 0 0 553 55309>55313 40 A6 0 0 0 1 INPUT EX PASS 2 55312>55314 54 16 0 0 0 40 55315 54 5 0 0 0 50 CLEAR PRINTER ANNEX 55316 10 0 0 0 0 CLEAR DETAILS 55317 5 94 0 0 0 0 OF SECTION 0 55318 55 72 3 0 0 14 55319 C 16 5 0 0 0 55320 54 72 3 0 0 14 55321 90 0 0 3 0 55322 C 0 0 0 0 ///// 55323 92 0 0 0 0 CHAPTERS CODED +1 55324 30 0 0 0 5 55325 11 0 0 0 1 55326 91 0 0 1 0 55411>55327 10 0 0 0 0 55328 35 0 0 0 1 55329 36 92 9 0 1 0 55330 5 16 2 0 0 0 CORRECTED CHAP 55331 96 0 0 1 0 55332 5 16 1 0 0 0 UNCORR CHAP 55333 10 0 0 0 10 BIT 5 55334 32 0 0 0 10- 55335 36 92 9 0 1 0 UNIQUENESS IND Q2 55336 32 0 0 0 2- (CLEAR A) 55337 75 553 40 0 0 0 553 gCHAP NOT UNIQUE 55338 124 16 2 0 1 0 CORR CHAP 55339 16 4 0 0 0 SW SEC LENGTH 55337>55340 1 72 18 0 3 0 CHAP LENGTH (CODING ONLY) 55341 5 16 3 0 0 0 START OF FIRST SEC IN UNCORR CHAP 55342 5 16 4 0 0 0 CLEAR FOR TOT LENGTHS ALL SECS IN CHAP 55400 PROCR 554 554 UPDATE SEC INDEX, SWITCH PROCR STARTS 55401 NOTES 55402 80 555 2 0 0 0 555 gDEAL WITH SECTIONS, ANNEXES 55403 16 3 0 0 0 UNCORR CHAP LENGTH 55404 1 16 4 0 0 0 55405 124 16 2 0 1 0 CORR CHAP 55406 2 72 2 0 0 0 55407 73 554 10 0 0 0 554 55408 124 16 2 0 1 0 55409 4 72 2 0 0 0 FORM MAX CORR CHAP LENGTH 55407>55410 94 554 11 0 3 1 554 55410>55411 94 553 27 0 1 1 553 gNEXT UNCORR CHAP 55412 91 92 28 0 1 0 COUNT CORR CHAPS 55413 90 0 0 2 0 55414 C 0 0 0 0 ///// 55424>55415 10 0 0 0 10 BIT 5 55416 32 0 0 0 10- 55417 36 92 10 0 1 0 55418 70 554 23 0 0 0 554 gCHAP IS UNIQUE 55419 0 72 3 0 1 0 55420 5 72 18 0 2 0 SWITCH PROCR START-END OF SECTIONS 55421 0 16 5 0 1 0 55422 4 72 3 0 1 0 UPDATE CHAPTER LENGTH 55418>55423 94 554 24 0 2 1 554 55423>55424 94 554 15 0 1 1 554 gNEXT CHAP 55425 0 61 100 0 0 0 BASIC SPECIAL CHAP LENGTH 55426 5 16 3 0 0 0 55427 5 16 1 0 0 0 ZERO UNCORR CHAP 55428 0 92 29 0 0 0 55429 5 16 2 0 0 0 CORR CHAP=SPEC CHAP 55430 5 16 4 0 0 0 CLEAR SUBTOTAL 55431 80 555 2 0 0 0 555 gDEAL WITH SPECIAL CHAP 55432 0 16 3 0 0 0 55433 1 16 4 0 0 0 FORM SPECIAL CHAP LENGTH 55434 5 72 2 0 1 0 55435 101 214 1 3 0 55436 2 72 2 0 1 0 55437 73 554 39 0 0 0 554 55438 4 72 2 0 1 0 55437>55439 101 220 1 3 0 FIRST CHAP MIN LENGTH=220 55440 2 72 3 0 0 0 55441 73 554 43 0 0 0 554 gOK 55442 4 72 3 0 0 0 55441>55443 54 16 0 0 0 40 CLEAR W/L'S 55444 0 92 29 0 0 0 55445 12 0 0 0 7 55446 73 554 48 0 0 0 554 gOK 55447 10 0 0 0 0 55446>55448 11 0 0 0 7 MAX VALUE=7 55449 5 92 29 0 0 0 SPECIAL CHAP NUMBER 55450 80 574 2 0 0 0 574 READ ALIGN BLOCK A6 NORMAL RUN, PREP STA 55451 80 574 2 0 0 0 574 READ SECOND INDEX BLOXK 55452 80 574 2 0 0 0 574 READ PROG DETAILS BLOCK 55453 0 9 4 2 0 0 PROG ID 55454 5 16 2 0 0 0 55455 0 9 6 2 0 0 PROG SERIAL 55456 5 16 3 0 0 0 55457 54 13 0 0 0 14 55458 46 A2 10 0 0 1 BACK TO ALIGN BLOCK 55459 C 0 0 0 6 55460 48 A2 0 0 0 0 (STEP SO AS TO OVERWRITE IT) 55461 C 0 0 0 1 55462 583 60 1 0 0 583 ALIGN MARKS 55463 5 8 4 1 0 0 55464 584 4 1 0 0 584 'INDEX' 55465 5 8 6 1 0 0 55466 583 60 2 0 0 583 55467 5 8 8 2 0 0 55468 10 0 0 0 3 INDEX IDENTIFIER 55469 5 8 10 1 0 0 55470 80 577 2 0 0 0 577 gWRITE 55471 80 556 2 0 0 0 556 gWRITE DETAILS 55472 76 557 2 0 0 0 557 55500 PROCR 555 555 PLACE SECTIONS AND ANNEXES IN UNCORRECTED CHAPTER SR 55502 81 555 2 0 0 0 555 55503 90 0 0 2 1 55504 C 0 0 0 100 55518>55505 0 15 0 0 2 0 55506 70 555 18 0 0 0 555 gSECTION NOT USED 55507 30 0 0 0 9 55508 30 0 0 0 9- ISOLATE CHAP NUMBER Q1 55509 2 16 1 0 0 0 55510 71 555 18 0 0 0 555 gNOT IN THIS UNCORR CHAP 55511 0 16 3 0 0 0 55512 4 94 0 0 2 0 UPDATE SEC START 55513 10 0 0 0 0 55514 34 15 0 0 2 0 55515 36 587 10 0 0 0 587 BITS 5-18 55516 30 0 0 0 1- 55517 4 16 4 0 0 0 AUG SEC LENGTHS IN CHAP 55510> 55506>55518 94 555 5 0 2 1 555 gNEXT SECTION 55519 91 91 0 0 2 0 2R:0 55520 0 91 1 0 0 0 2R 55521 70 555 62 0 0 0 555 gNO FILES 55561>55522 10 0 0 0 0 55523 35 0 0 0 1000 55524 36 91 4 0 2 0 UNCORR CHAP 55525 30 0 0 0 3- 55526 2 16 1 0 0 0 CURRENT UNCORR CHAP 55527 71 555 61 0 0 0 555 gNOT IN IT 55528 34 587 5 0 0 0 587 BITS 1-6 55529 36 91 5 0 2 0 ROUTE TYPE 55530 12 0 0 0 3 55531 70 555 37 0 0 0 555 gGP 55532 12 0 0 0 1 55533 70 555 37 0 0 0 555 gGP 55534 12 0 0 0 £ 55535 71 555 52 0 0 0 555 gNOT ROUTE 19 55536 76 555 61 0 0 0 555 (DON'T INCLUDE ANNEX LENGTHS) 55533> 55531>55537 91 4 0 2 0 55538 30 0 0 0 4- GR CTR 55539 1 91 1 0 0 0 2R 55540 92 0 0 4 0 55541 35 0 0 0 111 55542 36 91 4 0 2 0 LENGTH OF GP ANNEX Q7-10 55543 30 0 0 0 1 55544 1 16 2 0 0 0 CHAP NUMBER (CORRECTED) Q6 55545 5 91 5 0 4 0 OVERWRITE DETAILS 55546 36 91 4 0 2 0 ANNEX LENGTH 55547 1 16 3 0 0 0 55548 1 16 4 0 0 0 55549 5 556 2 0 0 0 556 WL=SR LINK 55550 2 556 2 0 0 0 556 STORE NEGATIVELY 55551 5 91 4 0 4 0 STORE GP TX AREA START Q1-3 55535>55552 16 2 0 0 0 CORRECTED CHAP 55553 30 0 0 0 4 55554 1 16 3 0 0 0 UNCORR CHAP LENGTH 55555 1 16 4 0 0 0 ALL SECTIONS+ANNEXES TO DATE 55556 5 91 5 0 2 0 55557 35 0 0 0 111 HALF-LENGTH Q1-3 55558 36 91 4 0 2 0 55559 31 0 0 0 1 FORM FULL ANNEX LENGTH 55560 4 16 4 0 0 0 55536> 55527>55561 94 555 22 0 2 2 555 55521>55562 82 555 2 0 0 0 555 55600 PROCR 556 556 SR TO WRITE 'INDEX' DATA 55601 NOTES 55602 81 556 2 0 0 0 556 55603 16 2 0 0 0 PROG ID 55604 3 8 4 2 0 0 55605 5 8 12 2 0 0 55606 0 16 3 0 0 0 PROG SERIAL 55607 3 8 6 2 0 0 55608 5 8 14 2 0 0 55609 10 0 0 0 2 55610 5 8 10 2 0 0 PASS 1 IDENTIFIER 55611 10 0 0 0 3 55612 3 8 18 2 0 0 IDENTIFIER 55613 10 0 0 0 2 55614 1 27 12 0 0 0 0/2=PTS NO/YES 55615 5 8 16 2 0 0 PASS IND 55616 583 60 2 0 0 583 £££££ 55617 5 8 20 2 0 0 55618 80 577 2 0 0 0 577 gWRITE TO TAPE 55619 82 556 2 0 0 0 556 55700 PROCR 557 557 HEADING BLOCK 55701 NOTES RADIX B PREP STAGE 55472>55702 54 5 0 1 0 50 55703 90 0 0 1 0 55704 C 0 0 0 10 55706>55705 80 576 2 0 0 0 576 gPRINT SPACERS 55706 94 557 5 0 1 1 557 55707 91 3 0 0 0 2(R+T) 55708 2 91 2 0 0 0 55709 31 0 0 0 1- 55710 5 576 2 0 0 0 576 NO OF TX AREAS 55711 91 2 0 0 0 55712 31 0 0 0 1- 55713 5 577 2 0 0 0 577 NO OF FILES 55714 10 0 0 0 80 HEAD OF FORM 55715 5 587 9 0 0 0 587 55716 52 5 0 0 0 0 EDIT FIRST LINE 55717 C 593 2 0 0 0 593 55718 27 12 0 0 0 55719 70 557 22 0 0 0 557 gNO PTS 55720 55 584 12 1 0 6 584 'PTS INCLUDED' 55721 C 5 40 1 0 0 55719>55722 80 576 2 0 0 0 576 gPRINT SPACERS 55723 80 576 2 0 0 0 576 gSPACER 55724 0 583 60 2 0 0 583 55725 5 8 4 2 0 0 55726 10 0 0 0 55 55727 5 8 6 2 0 0 55728 16 2 0 0 0 PROG ID 55729 5 8 8 2 0 0 55730 16 3 0 0 0 PROG SERIAL 55731 5 8 10 2 0 0 55732 0 583 70 1 0 0 583 'PASS 3' 55733 5 8 12 1 0 0 55734 80 577 2 0 0 0 577 gWRITE 55735 124 673 2 0 2 0 673 55736 91 0 0 3 0 FOR PARAMETERS 55737 124 604 2 0 2 0 604 55738 91 0 0 2 0 FOR ORDERS 55739 124 679 2 0 2 0 679 55740 91 0 0 1 0 SECOND LEVEL PARAS 55741 90 0 0 5 0 55742 C 0 0 0 6 55743 90 0 0 8 0 SECOND LEVEL PARAS 55744 C 0 0 0 3 55745 673 2 0 0 0 673 55746 31 0 0 0 2 55747 5 598 11 0 0 0 598 55748 679 2 0 0 0 679 55749 31 0 0 0 2 55750 5 598 17 0 0 0 598 55751 80 596 2 0 0 0 596 gWRITE 'UNLOADER' 55752 80 596 2 0 0 0 596 gWRITE 'ALLOC STORE' 55753 95 0 0 1 0 55754 5 593 2 1 0 0 593 55755 95 0 0 2 0 55756 5 593 4 1 0 0 593 55757 80 574 2 0 0 0 574 gREAD 55758 55 9 4 1 0 10 55759 C 11 0 1 0 0 55760 91 3 0 0 0 2(R+T) 55761 2 91 2 0 0 0 2R 55762 31 0 0 0 1- FORM T 55763 5 11 12 2 0 0 NO OF TX AREAS FOR ALLOCATOR 55764 0 91 2 0 0 0 2R 55765 31 0 0 0 1- R 55766 5 11 10 2 0 0 NO OF ROUTES 55767 10 0 0 0 0 55768 3 11 14 2 0 0 NO OF DISCFILES 55769 4 11 10 2 0 0 55800 PROCR 558 558 OUTPUT SECOND HEADING BLOCK 55801 NOTES RADIX PREP STAGE 55802 55 11 0 1 0 16 55803 C 8 4 1 0 0 55804 5 92 28 0 0 0 CLEAR 55805 92 6 0 0 0 2ND HEADING BLOCK 55806 5 8 20 2 0 0 55807 92 8 0 0 0 CHAPTER 55808 5 8 22 2 0 0 55809 91 92 28 0 2 0 55810 90 0 0 1 0 55811 C 0 0 0 14 55825>55812 0 72 3 0 2 0 CHAP LENGTH 55813 71 558 16 0 0 0 558 55814 583 92 1 0 0 583 100,000 IN BIN 55815 3 72 3 0 2 0 SET RIDICULOUS LENGTH 55813>55816 5 8 24 2 1 0 55817 10 0 0 0 20 BIT 6 55818 32 0 0 0 10- 55819 36 92 10 0 2 0 55820 70 558 24 0 0 0 558 gNORMAL 55821 10 0 0 0 0 55822 2 8 24 2 1 0 55823 5 8 24 2 1 0 SET IND THAT IN ANOTHER STORE 55820>55824 94 0 0 1 2 55825 94 558 12 0 2 1 558 55826 0 16 2 0 0 0 55827 5 8 38 2 0 0 PROG ID 55828 0 16 3 0 0 0 55829 5 8 40 2 0 0 PROG SERIAL 55830 10 0 0 0 5163636653 'ALLOC' 55831 5 8 42 1 0 0 55832 24 0 1 0 0 55833 70 558 89 0 0 0 558 gNO FILES 55834 91 24 0 0 1 0 55835 90 0 0 2 0 55836 C 0 0 0 8 55888>55837 10 0 0 0 0 55838 34 587 5 0 0 0 587 BITS 1-6 55839 36 24 5 0 1 0 ROUTE TYPE 55840 101 19 1 2 0 55841 71 558 88 0 0 0 558 gNOT 19 55842 24 4 0 1 0 OP TX AREA CTR 55843 32 0 0 0 4- 55844 1 24 1 0 0 0 2R 55845 5 577 2 0 0 0 577 WL 55846 35 0 0 0 1000 55847 124 577 2 0 1 0 577 55848 36 24 4 0 0 0 CHAPTER NUMBER 55849 70 558 57 0 0 0 558 gNO CHOICE 55850 30 0 0 0 3- 55851 2 92 29 0 0 0 CHAPS IN PROGM 55852 70 558 56 0 0 0 558 gOK 55853 73 558 56 0 0 0 558 gOK 55854 10 0 0 0 0 55855 76 558 57 0 0 0 558 gEX RANGE=NO CHOICE 55853> 55852>55856 1 92 29 0 0 0 55855> 55849>55857 5 576 2 0 0 0 576 TX AREA CHAPTER 55858 36 24 4 0 1 0 55859 30 0 0 0 3- 55860 70 558 67 0 0 0 558 gNO CHOICE 55861 2 92 29 0 0 0 55862 70 558 66 0 0 0 558 gOK 55863 73 558 66 0 0 0 558 gOK 55864 10 0 0 0 0 55865 76 558 67 0 0 0 558 gEX RANGE=NO CHOICE 55863> 55862>55866 1 92 29 0 0 0 55865> 55860>55867 5 596 2 0 0 0 596 ANNEX CHAPTER 55868 35 0 0 0 111 55869 36 24 4 0 1 0 GP HALF-LENGTH 55870 32 0 0 0 3- 55871 0 596 2 0 0 0 596 55872 31 0 0 0 3 55873 1 576 2 0 0 0 576 55874 33 0 0 0 13 55875 5 8 44 2 2 0 55876 35 0 0 0 111 55877 124 577 2 0 1 0 577 55878 36 24 4 0 0 0 SPECIAL HALF-LENGTH 55879 11 0 0 0 2 (FOR GUARD WORD) 55880 32 0 0 0 3- 55881 0 596 2 0 0 0 596 55882 31 0 0 0 3 55883 1 576 2 0 0 0 576 55884 33 0 0 0 13 55885 5 8 46 2 2 0 55886 94 558 88 0 2 4 558 55887 76 558 89 0 0 0 558 gEND AFTER 2 FILES 55886> 55841>55888 94 558 37 0 1 2 558 55887> 55833>55889 80 577 2 0 0 0 577 gWRITE 55900 PROCR 559 559 SECOND HEADING LINE 55901 NOTES RADIX B 55902 91 593 2 0 1 0 593 55903 91 593 4 0 2 0 593 55904 80 596 2 0 0 0 596 gWRITE 'ALLOC ROUTES' 55905 95 0 0 1 0 55906 5 593 2 1 0 0 593 55907 95 0 0 2 0 55908 5 593 4 1 0 0 593 55909 90 0 0 2 0 SET MOD REGISTERS 55910 C 0 0 0 4 55917>55911 11 0 2 2 0 SELECT DETAIL 55912 70 559 15 0 0 0 559 OUT IF ZERO 55913 583 4 1 0 0 583 ELSE SELECT 55914 76 559 16 0 0 0 559 YES 55912>55915 583 6 1 0 0 583 SELECT NO 55914>55916 5 13 0 1 2 0 STORE YES OR NO 55917 94 559 11 0 2 2 559 REPEAT 55918 0 92 6 0 0 0 55919 80 578 2 0 0 0 578 TO DEC 55920 5 92 6 0 0 0 55921 62 0 0 0 0 RESET BINARY 55922 52 5 2 0 0 0 55923 C 592 2 0 0 0 592 EDIT AND OUTPUT 55924 80 576 2 0 0 0 576 gPRINT FP, MOD GP, ENTRY ETC 55925 80 576 2 0 0 0 576 gSPACER 55926 11 8 2 0 0 >SPACER 55927 5 13 2 1 0 0 56000 PROCR 560 560 THIRD HEADING LINE 56001 NOTES RADIX B PREP STAGE 56002 11 10 2 0 0 STORE 56003 5 16 8 0 0 0 NO. OF FILES 56004 0 11 8 2 0 0 NUMBER OF CHAPTERS INITIALLY 56005 5 16 9 0 0 0 NO. OF CHAPTERS 56006 54 13 0 0 0 14 CLEAR WL'S 56007 91 92 28 0 2 0 56024>56008 10 0 0 0 20 BIT 6 56009 32 0 0 0 10- 56010 36 92 10 0 2 0 56011 70 560 15 0 0 0 560 gFIRST STORE 56012 10 0 0 0 0 56013 2 72 3 0 2 0 NEGATE FOR SECOND STORE 56014 76 560 16 0 0 0 560 56011>56015 72 3 0 2 0 56014>56016 80 578 2 0 0 0 578 TO DEC 56017 5 13 0 0 2 0 STORE CHAPTER LENGTHS 56018 62 0 0 0 0 56019 72 3 0 2 0 56020 12 0 0 0 2001 8193 INBIN 56021 73 560 24 0 0 0 560 gOK 56022 10 0 0 0 1 56023 3 13 10 0 0 0 56021>56024 94 560 8 0 2 1 560 56025 0 13 1- 0 2 0 LAST CHAP LENGTH(DEC) 56026 5 585 4 1 0 0 585 56027 0 585 4 0 0 0 585 MODULUS 56028 12 0 0 0 506 56029 72 560 34 0 0 0 560 gOK 56030 10 0 0 0 506 56031 5 585 4 0 0 0 585 56032 0 585 4 1 0 0 585 (PRESERVES ORIGINAL SIGN) 56033 5 13 1- 0 2 0 PRINT SPECIAL CHAP AS MIN LENGTH 506 56029>56034 13 10 0 0 0 56035 70 560 46 0 0 0 560 gOK 56036 86 511 2 0 0 0 511 CTR DISATROUS ERROR 56037 11 0 0 0 1 56038 84 511 2 0 0 0 511 AUGMENT 56039 10 0 0 0 5:5:5:5:5: '?????' 56040 90 0 0 2 0 56041 C 0 0 0 10 56043>56042 3 5 40 1 2 0 25 QUESTION MARKS 56043 94 560 42 0 2 2 560 56044 10 0 0 0 1 SET INDICATOR FOR *07 56045 76 560 47 0 0 0 560 56035>56046 10 0 0 0 0 OK-CLEAR INDICATOR 56045>56047 5 27 5 0 0 0 56048 52 5 2 0 0 0 EDIT AND OUTPUT 56049 C 591 2 0 0 0 591 56050 80 576 2 0 0 0 576 PRINT 56051 80 576 2 0 0 0 576 SPACER 56052 52 5 2 0 0 0 56053 C 590 2 0 0 0 590 EDIT FILE DETAILS HEADING 56054 80 576 2 0 0 0 576 PRINT 56055 54 13 0 0 0 31 56100 PROCR 561 561 FILE DETAILS 56101 NOTES RADIX B PREP STAGE 56102 0 91 0 1 0 0 56103 70 562 20 0 0 0 562 gNO FILES 56104 91 0 0 4 0 2R:0 56218>56105 90 0 0 1 0 SET MOD REGISTER A 56106 C 0 0 0 48 56107 80 574 2 0 0 0 574 READ FILE DETAILS ON A6 56216>56108 55 9 4 1 1 12 FILE DETAIL 56109 C 11 0 1 0 0 56110 0 11 2 2 0 0 ROUTE TYPE 02 56111 3 583 2 0 0 0 583 WL 56112 12 0 0 0 20 56113 70 561 54 0 0 0 561 gBIN CARD O/P 56114 12 0 0 0 80 56115 70 561 53 0 0 0 561 gBIN CARD I/P 56116 12 0 0 0 60 56117 70 561 51 0 0 0 561 gNON-STD PT O/P(16) 56118 12 0 0 0 10 56119 70 561 40 0 0 0 561 gRT 17 56120 12 0 0 0 10 56121 70 561 42 0 0 0 561 gRT 18 56122 12 0 0 0 10 56123 70 561 44 0 0 0 561 56124 12 0 0 0 10 56125 70 561 38 0 0 0 561 56126 12 0 0 0 20 56127 71 561 30 0 0 0 561 gNOT RT 22 56128 10 0 0 0 +0 56129 76 561 55 0 0 0 561 gRT 22 56127>56130 12 0 0 0 20 56131 71 561 34 0 0 0 561 gNOT RT 24 56132 10 0 0 0 50 56133 76 561 55 0 0 0 561 56131>56134 12 0 0 0 10 56135 71 561 56 0 0 0 561 gNOT RT 25 56136 10 0 0 0 .0 56137 76 561 55 0 0 0 561 56125>56138 10 0 0 0 20 DT 56139 76 561 55 0 0 0 561 gRT 2 56119>56140 10 0 0 0 e0 56141 76 561 55 0 0 0 561 56121>56142 10 0 0 0 :0 56143 76 561 55 0 0 0 561 SET=13 56123>56144 10 0 0 0 80 56145 5 11 10 2 0 0 ALT ROUTE IND 56146 5 11 6 1 0 0 ZERO START 56147 5 11 8 1 0 0 56148 12 0 0 0 1 56149 5 11 4 2 0 0 56150 76 561 70 0 0 0 561 gSET ZERO START 56117>56151 10 0 0 0 10 56152 76 561 55 0 0 0 561 56115>56153 10 0 0 0 30 56113>56154 11 0 0 0 30 56152> 56143> 56141> 56139> 56137> 56133> 56129>56155 5 11 2 2 0 0 FIB TO M/R 56135>56156 11 10 2 0 0 TEST ALTERNATE 56157 70 561 61 0 0 0 561 ROUTE IF 0,SET 56158 10 0 0 0 0 =80: IF 1.SET=0 56159 5 11 10 2 0 0 56160 76 561 63 0 0 0 561 56157>56161 10 0 0 0 80 56162 5 11 10 2 0 0 56160>56163 35 0 0 0 10000 56164 36 91 5 0 4 0 56165 30 0 0 0 4- 56166 31 0 0 0 1 DOUBLE CORR CHAP NO 56167 5 11 4 2 0 0 56168 35 0 0 0 1111 56169 36 91 5 0 4 0 56150>56170 5 11 8 2 0 0 START LOCATION 56171 52 8 4 0 1 0 EDIT IN 56172 C 597 16 0 0 0 597 56173 90 0 0 2 0 56174 C 0 0 0 10 CONVERT FILE DETAILS 56178>56175 0 11 2 2 2 0 56176 80 578 2 0 0 0 578 TO DEC 56177 5 13 0 0 2 0 56178 94 561 75 0 2 2 561 56179 583 2 0 0 0 583 56180 30 0 0 0 1- 56181 80 578 2 0 0 0 578 CONVERT ROUTE TYPE TO DEC 56182 30 0 0 0 1 56183 5 583 2 0 0 0 583 56184 62 0 0 0 0 RESET BINARY 56200 PROCR 562 562 FILE DETAILS FOR PRINTOUT - BIT 20 56201 NOTES RADIX B 56202 13 8 0 0 0 56203 70 562 6 0 0 0 562 56204 583 6 1 0 0 583 56205 76 562 7 0 0 0 562 56203>56206 583 4 1 0 0 583 56205>56207 5 13 8 1 0 0 56208 0 11 4 2 0 0 56209 31 0 0 0 1- 56210 5 13 2 0 0 0 56211 52 5 2 0 0 0 56212 C 594 2 0 0 0 594 56213 80 576 2 0 0 0 576 g PRINT 56214 94 562 16 0 4 2 562 56215 76 562 19 0 0 0 562 g ALL FILES PROCESSED 56214>56216 94 561 8 0 1 12 561 > NEXT FILE THIS BLOCK 56217 80 577 2 0 0 0 577 g WRITE 56218 76 561 5 0 0 0 561 g READ NEW BLOCK 56215>56219 80 577 2 0 0 0 577 g WRITE FINAL FILES BLOCK 56103>56220 52 5 2 0 0 0 EDIT HEADING & OUTPUT 56221 C 594 14 0 0 0 594 HEADING BLOCK 56222 80 576 2 0 0 0 576 PRINT TX AREA HEADING 56300 PROCR 563 563 TRANSIT AREA 56301 NOTES RADIX B 56302 91 91 2 0 2 0 2 (R+T) :2R 56303 94 563 5 0 2 0 563 ///// 56304 76 565 2 0 0 0 565 g ND TX AREAS 56426> 56303>56305 90 0 0 1 0 SET O/P MR 56306 C 0 0 0 48 56424>56307 91 91 0 0 4 0 2R:0 56308 34 587 5 0 0 0 587 BITS 1 - 6 56324>56309 10 0 0 0 0 56310 36 24 5 0 4 0 ROUTE TYPE 56311 12 0 0 0 13 56312 71 563 24 0 0 0 563 g NOT 19 56313 24 4 0 4 0 GP T, AREA CTR 56314 30 0 0 0 4- 56315 1 24 1 0 0 0 2R 56316 99 0 0 2 0 -R2 MODIFIER 56317 71 563 24 0 0 0 563 gWE ARE NOT DEALING WITH RT 19 TX AREA 56318 12 0 0 0 1 56319 5 13 2 2 0 0 NEG CHAP NUMBER 56320 5 13 4 2 0 0 ZERO LENGTH 56321 5 596 2 0 0 0 596 CLEAR FOR PRINT 56322 5 13 0 0 0 0 ZERO START 56323 76 564 2 0 0 0 564 56317> 56312>56324 94 563 9 0 4 2 563 > TRY AGAIN 56325 0 91 4 0 2 0 56326 72 563 29 0 0 0 563 g NOT GP TX AREA 56327 0 91 4 1 2 0 (LOSES SIGN) 56328 76 563 35 0 0 0 563 56326>56329 30 0 0 0 8 56330 30 0 0 0 8- CLEAR Q3 - 10 56331 3 13 0 0 0 0 56332 5 583 2 0 0 0 583 SEC NUMBER FOR PRINT 56333 124 13 0 0 1 0 56334 0 94 0 0 0 0 SELECT SECTION START 56328>56335 5 13 0 0 0 0 56336 0 91 5 0 2 0 56337 32 0 0 0 1- 56338 5 13 4 2 0 0 TX AREA LENGTH 56339 32 0 0 0 1 56340 3 596 2 0 0 0 596 CHAP 56341 31 0 0 0 1 56342 5 13 2 2 0 0 TWICE CHAP FOR MT 56400 PROCR 564 564 OUTPUT TRANSIT AREA DETAILS 56401 NOTES RADIX B 56323>56402 52 8 4 0 1 0 EDIT 56403 C 591 24 0 0 0 591 TRANSIT AREA DTLS 56404 0 13 0 0 0 0 56405 80 578 2 0 0 0 578 TO DEC 56406 5 13 0 0 0 0 TO BINARY 56407 0 13 4 2 0 0 56408 80 578 2 0 0 0 578 TO DEC 56409 5 13 4 0 0 0 56410 0 583 2 0 0 0 583 56411 80 578 2 0 0 0 578 TO DEC 56412 5 583 2 0 0 0 583 SEC NUMBER 56413 62 0 0 0 0 RESET BINARY 56414 52 5 2 0 0 0 EDIT FOR PRINT 56415 C 594 26 0 0 0 594 56416 0 91 4 0 2 0 56417 72 564 20 0 0 0 564 g NOT GP TX AREA 56418 10 0 0 0 5767 'GP' 56419 5 5 4 1 0 0 56417>56420 80 576 2 0 0 0 576 g PRINT 56421 94 564 24 0 2 2 564 > MORE DETAILS YET 56422 80 577 2 0 0 0 577 WRITE TX BLOCK 56423 76 565 2 0 0 0 565 56421>56424 94 563 7 0 1 6 563 56425 80 577 2 0 0 0 577 WRITE TX BLOCK 56426 76 563 5 0 0 0 563 g RESET MR1 & START NEXT BLOCK 56500 PROCR 565 565 O/P LAST TWO CHUNKS AND WRITE COMPATIBILTY DATA 56501 NOTES 56423> 56304>56502 91 593 2 0 1 0 593 56503 91 593 4 0 2 0 593 56504 80 596 2 0 0 0 596 g O/P 'ALLOC FP/TAG' 56505 80 596 2 0 0 0 596 g O/P 'SET UP PQ' 56506 80 596 2 0 0 0 596 g O/P 'LOAD PROGRAM' 56507 76 566 2 0 0 0 566 56600 PROCR 566 566 PRINT SECTION START POINTS 56601 NOTES RADIX 56507>56602 583 62 1 0 0 583 'SEC' 56603 05 5 2 1 0 0 56604 583 64 1 0 0 583 'TION' 56605 05 5 4 1 0 0 56606 0 583 84 1 0 0 583 56607 05 5 6 1 0 0 56608 90 0 0 1 1 SELECT 94/1 - 94/99 56609 C 0 0 0 100 56610 80 576 2 0 0 0 576 gPRINT 56611 90 0 0 2 0 56612 C 0 0 0 48 56627>56613 94 0 0 1 0 56614 70 566 27 0 0 0 566 gSEC NOT USED 56615 80 578 2 0 0 0 578 TO DEC 56616 5 583 3 0 0 0 583 SEC START 56617 96 0 0 1 0 56618 80 578 2 0 0 0 578 TO DEC 56619 5 583 2 0 0 0 583 SEC NUMBER 56620 52 5 2 0 2 0 56621 C 595 2 0 0 0 595 56622 62 0 0 0 0 BIN 56623 94 566 27 0 2 4 566 56624 80 576 2 0 0 0 576 PRINT 56625 90 0 0 2 0 56626 C 0 0 0 48 56623> 56614>56627 94 566 13 0 1 1 566 >NEXT SECTION 56628 80 576 2 0 0 0 576 PRINT LAST LINE 56629 76 569 2 0 0 0 569 gPRINT SWITCHES 56700 PROCR 567 567 PRINT LOCNS OF MOD REGISTERS 4-20 56701 NOTES 56806> 56817>56702 52 5 2 0 0 0 56703 C 595 8 0 0 0 595 56704 80 576 2 0 0 0 576 gPRINT HEADING 56705 90 0 0 1 0 PRINT CONTROL 56706 C 0 0 0 48 56707 90 0 0 2 0 56708 C 0 0 0 17 SEARCH SEC 71 56713>56709 34 71 2 0 2 0 56710 74 567 13 0 0 0 567 gNOT USED 56711 80 570 2 0 0 0 570 gDECODE 56712 80 571 2 0 0 0 571 gEDIT+PRINT 56710>56713 94 567 9 0 2 1 567 >NEXT MR 56714 80 576 2 0 0 0 576 gPRINT LAST LINE 56715 90 0 0 12 2499 56716 C 0 0 0 0 56717 90 0 0 5 0 56718 C 0 0 0 40 56719 91 0 0 1 0 CLEAR R1 56720 76 553 2 0 0 0 553 CALL PASS 4 56800 PROCR 568 568 PRINT LOCATIONS OF ITEM+ COUNTERS 56801 NOTES 56909> 56925>56802 52 5 2 0 0 0 56803 C 595 12 0 0 0 595 56804 80 576 2 0 0 0 576 gPRINT HEADING 56805 34 98 1 0 0 0 56806 74 567 2 0 0 0 567 gNONE 56807 90 0 0 1 0 PRINT CONTROL 56808 C 0 0 0 48 56809 90 0 0 2 0 56810 C 0 0 0 10 TO SEARCH SEC 98 56815>56811 34 98 2 0 2 0 56812 74 568 15 0 0 0 568 gNOT USED? 56813 80 570 2 0 0 0 570 gDECODE 56814 80 571 2 0 0 0 571 gEDIT AND PRINT 56812>56815 94 568 11 0 2 1 568 56816 80 576 2 0 0 0 576 gPRINT LAST LINE 56817 76 567 2 0 0 0 567 gPRINT MOD REGISTERS 56900 PROCR 569 569 PRINT LOCATION OF SWITCHES 56901 NOTES 56629>56902 52 5 2 0 0 0 56903 C 595 16 0 0 0 595 56904 80 576 2 0 0 0 576 gPRINT HEADING 56905 90 0 0 1 0 56906 C 0 0 0 48 56907 91 95 0 0 2 0 56908 94 569 10 0 2 0 569 ///// 56909 76 568 2 0 0 0 568 gPRINT ITEM+ 56908>56910 10 0 0 0 0 56923>56911 34 584 8 0 0 0 584 BITS 1-10 56912 36 95 2 0 2 0 56913 70 569 23 0 0 0 569 gSTEP R2 56914 5 583 4 0 0 0 583 56915 95 2 0 2 0 56916 32 0 0 0 4- 56917 5 583 2 0 0 0 583 CHAP OF SWITCH 56918 33 0 0 0 6 CTR IN PROCR 56919 124 583 2 0 1 0 583 56920 1 72 17 0 0 0 PROCR START 56921 5 583 3 0 0 0 583 56922 80 571 2 0 0 0 571 gEDIT AND PRINT 56913>56923 94 569 11 0 2 1 569 >NEXT SWITCH 56924 80 576 2 0 0 0 576 gPRINT LAST LINE 56925 76 568 2 0 0 0 568 gPRINT ITEM+ 57000 PROCR 570 570 TO SORT OUT MR>3 AND ITEM+ COUNTERS 57001 NOTES 57002 81 570 2 0 0 0 570 57003 32 0 0 0 6 57004 5 583 2 0 0 0 583 CHAP 57005 32 0 0 0 2 CTR IN PROCR 57006 124 583 2 0 1 0 583 57007 1 72 17 0 0 0 PROCR START 57008 5 583 3 0 0 0 583 57009 32 0 0 0 2 57010 5 583 4 0 0 0 583 SEC NO/MOD REG WAS Q1.2 57011 82 570 2 0 0 0 570 57100 PROCR 571 571 EDIT AND OUTPUT DETAIL FOR TRANSLATOR'S WORKING SECTIONS 57101 NOTES RADIX 57102 81 571 2 0 0 0 571 57103 0 583 2 0 0 0 583 57104 80 578 2 0 0 0 578 TO DEC 57105 5 583 2 0 0 0 583 57106 0 583 3 0 0 0 583 57107 80 578 2 0 0 0 578 57108 5 583 3 0 0 0 583 57109 0 583 4 0 0 0 583 57110 80 578 2 0 0 0 578 57111 5 583 4 0 0 0 583 57112 62 0 0 0 0 BIN 57113 52 5 2 0 1 0 57114 C 595 20 0 0 0 595 57115 94 571 19 0 1 6 571 >LINE NOT FULL 57116 80 576 2 0 0 0 576 gPRINT 57117 90 0 0 1 0 57118 C 0 0 0 48 57115>57119 82 571 2 0 0 0 571 57200 PROCR 572 572 READ A2 57201 NOTES 57202 81 572 2 0 0 0 572 57203 42 A2 0 0 0 0 57204 C 8 0 0 0 0 57205 82 572 2 0 0 0 572 57300 PROCR 573 573 INPUT OFF PASS 2 57301 NOTES RADIX B SUB ROUTINE 57302 81 573 2 0 0 0 573 57303 94 573 7 0 2 8 573 STANDARD INCREMENT 57304 80 574 2 0 0 0 574 READ A6->SEC 9 57305 90 0 0 2 0 57306 C 0 0 0 144 57303>57307 82 573 2 0 0 0 573 57400 PROCR 574 574 INPUT 57401 NOTES RADIX B SUB ROUTINE 57402 81 574 2 0 0 0 574 57403 42 A6 0 0 0 0 57404 C 9 0 0 0 0 57405 82 574 2 0 0 0 574 57500 PROCR 575 575 WRITE ON WORKING TAPE 57501 NOTES 57502 81 575 2 0 0 0 575 57503 55 8 4 1 0 50 COPY ANNEXES 57504 C 9 4 1 0 0 57505 0 583 56 1 0 0 583 BEW 57506 5 9 52 1 0 0 57507 43 A6 0 0 0 0 57508 C 9 0 0 0 0 57509 54 9 0 0 0 52 57510 82 575 2 0 0 0 575 57600 PROCR 576 576 PRINT 57601 NOTES RADIX B SUB ROUTINE 57602 81 576 2 0 0 0 576 57603 62 0 0 0 0 57604 583 56 1 0 0 583 57605 5 5 52 1 0 0 BEW 57606 587 9 0 0 0 587 HEAD OF FORM OR TRAC1 57607 5 5 0 1 0 0 FUNCTION WORD 57608 10 0 0 0 1 57609 5 587 9 0 0 0 587 57610 27 9 0 0 0 57611 70 576 16 0 0 0 576 gPRINTER 57612 55 5 0 1 0 50 57613 C 10 4 1 6 0 57614 80 580 2 0 0 0 580 gWRITE ON A9 57615 76 576 38 0 0 0 576 57611>57616 27 8 0 0 0 PRINTER TYPE 57617 12 0 0 0 9 57618 70 576 34 0 0 0 576 gSPECIAL 57619 10 0 0 0 80000 57620 5 5 1 0 0 0 BIT 40 57621 124 999 15 1 2 0 SEC 5 57622 124 0 0 2 0 57623 124 999 13 1 2 0 SEC 10 57624 129 0 0 1 0 57625 10 0 0 0 4 57637>57626 30 0 0 0 5 57627 1 999 7 0 0 0 ROUTE 57628 34 999 12 0 0 0 57629 125 4096 1 1 0 57630 124 999 0 0 3 0 57631 123 160 0 2 0 57632 62 0 0 0 0 57633 76 576 38 0 0 0 576 57618>57634 55 5 0 1 0 54 57635 C 10 0 1 0 0 57636 10 0 0 0 9 57637 76 576 26 0 0 0 576 57633> 57615>57638 54 5 0 0 0 50 57639 5 16 1 0 0 0 CLEAR INDICATOR 57640 82 576 2 0 0 0 576 57700 PROCR 577 577 OUTPUT ON A2 57701 NOTES RADIX B SUB ROUTINE 57702 81 577 2 0 0 0 577 57703 583 56 1 0 0 583 BEW 57704 5 8 52 1 0 0 57705 43 A2 0 0 0 0 OUTPUT 57706 C 8 0 0 0 0 57707 54 8 0 0 0 52 CLEAR 57708 82 577 2 0 0 0 577 57800 PROCR 578 578 CONVERT (A) TO DECIMAL 57801 NOTES 57802 81 578 2 0 0 0 578 57803 5 585 4 1 0 0 585 57804 60 0 0 0 0 57805 124 586 22 0 2 0 586 57806 112 585 4 1 0 0 585 57807 82 578 2 0 0 0 578 57900 PROCR 579 579 CONVERT (A) TO BIN 57901 NOTES 57902 81 579 2 0 0 0 579 57903 5 585 4 1 0 0 585 57904 62 0 0 0 0 57905 124 586 2 0 2 0 586 57906 112 585 4 1 0 0 585 57907 82 579 2 0 0 0 579 58000 PROCR 580 580 O/P>A9 58002 81 580 2 0 0 0 580 58003 94 580 9 0 6 50 580 58004 583 56 1 0 0 583 BEW 58005 5 10 306 1 0 0 58006 80 581 2 0 0 0 581 58007 90 0 0 6 0 58008 C 0 0 0 300 58003>58009 82 580 2 0 0 0 580 58100 PROCR 581 581 WRITE A9 58102 81 581 2 0 0 0 581 58103 10 0 0 0 800000 58104 34 999 12 0 0 0 SEC 10 58105 125 4096 1 1 0 58106 1 999 7 0 0 0 D1/A9 58107 124 999 0 0 3 0 58108 123 160 0 2 0 58109 82 581 2 0 0 0 581 58200 CONST 582 582 1 PASS 3 BLISTER SPACE 58202 (D)0; 58204 0; 58206 0; 58208 0; 58210 0; 58212 0; 58214 0; 58216 0; 58218 0; 58220 0; 58222 0; 58224 0; 58226 0; 58228 0; 58230 0; 58232 0; 58234 0; 58236 0; 58238 0; 58240 0; 58242 0; 58244 0; 58246 0; 58248 0; 58250 0; 58252 0; 58254 0; 58256 0; 58258 0; 58260 0; 58262 0; 58264 0; 58266 0; 58268 0; 58270 0; 58272 0; 58274 0; 58276 0; 58278 0; 58280 0; 58282 0; 58284 0; 58286 0; 58288 0; 58290 0; 58292 0; 58294 0; 58296 0; 58298 0; 58300 CONST 583 583 1 58302 (A)F.PT.; 58304 YES; 58306 NO; 58308 MOD.; 58310 GP.; 58312 PRIOR; 58314 ITY; 58316 FIRST; 58318 LOCN.; 58320 CHAPT; 58322 TYPE£; 58324 FILES; 58326 TRAN.; 58328 AREAS; 58330 ALT.R; 58332 OUTES; 58334 PROGR; 58336 AMME; 58338 SERIA; 58340 ID.; 58342 RTE.; 58344 TYPE; 58346 ST.OF; 58348 BLOCK; 58350 SIZE; 58352 SIT; 58354 PREND; 58356 (D)7.0000007.; 58358 (A)= CH/; 58360 (D)6£6£6£6£6£; 58362 (A)SEC; 58364 TION.; 58366 PROC; 58368 EDURE; 58370 PASS3; 58372 (A)MR'S ; 58374 4-20 ; 58376 ITEM+; 58378 CTRS; 58380 SWITC; 58382 HES ; 58384 (A)START; 58386 NOTES; 58388 SPOOL; 58390 ENTRY; 58392 (B)100000; 100,000 58400 CONST 584 584 1 58402 (D)5.5.; 58404 (A)INDEX; 58406 CHAIN; 58408 (D)7£££0003££; BITS 5-19+1-10 58410 (A)08000; 58412 PTS I; 58414 NCLUD; 58416 ED ; 58500 CONST 585 585 1 CONVERT TABLE 58502 (D)1; BIN>DEC 58504 0; (A) WL 58600 CONST 586 586 1 COMPLIER'S CONVERT TABLES 58602 (D)1; DEC>BIN 58604 t; 58606 64; 58608 3.8; 58610 2710; 58612 186t0; 58614 £4240; 58616 989680; 58618 5£5.100; 58620 3e9t+t00; 58622 1; BIN>DEC 58624 16; 58626 256; 58628 4096; 58630 65536; 58632 1048576; 58634 16777216; 58636 268435456; 58638 4294967296; 58640 ££££££££££; 58700 CONST 587 587 0 58702 (D)7; 58703 80000; 58704 0; THIS IS A 0/1 FLIPFLOP FOR SC'S FWD 58705 3£; BITS 1-6 58706 £0000; £ IN Q5 58707 7£; 58708 80; HEAD OF FORM 58709 0; IND FOR HEAD OF FORM 58710 3£££0; BITS 5-18 58800 TABLE 588 588 1 TRIAL DATA HEADING+T/W COMMENT 58801 NOTES 58900 TABLE 589 589 1 PRINT HEADING DATA 58901 NOTES 58902 583 20 0 0 2 0 4 0 1 0 0 0 0 58904 583 38 0 0 2 0 1 0 0 0 0 0 0 58906 11 8 0 0 2 0 1 4 2 0 0 0 0 58908 583 24 0 0 2 0 5 0 3 0 0 0 0 58910 11 10 0 0 0 0 2 3 2 1 0 0 0 58912 583 26 0 0 2 0 5 0 7 0 0 0 0 58914 583 28 0 0 2 0 5 0 2 0 0 0 0 58916 11 12 0 0 0 0 2 3 2 1 0 0 0 58918 583 56 0 0 2 0 5 0 6 0 0 0 1 58920 13 4 0 0 0 0 5 0 0 0 0 0 0 58922 13 3 0 0 0 0 5 0 0 0 0 0 0 58924 13 0 0 0 0 0 5 0 0 0 0 0 0 58926 13 2 0 0 0 0 5 0 0 0 0 0 1 59000 TABLE 590 590 1 PRINT 59001 NOTES G LINE 59002 583 24 0 0 2 0 4 0 1 0 0 0 0 59004 583 40 0 0 2 0 3 2 2 0 0 0 0 FILE 10. 59006 583 42 0 0 2 0 4 1 6 0 0 0 0 59008 583 44 0 0 2 0 4 1 2 0 0 0 0 RTE. TYPE 59010 583 84 0 0 2 0 5 0 6 0 0 0 0 59012 583 18 0 0 2 0 5 0 2 0 0 0 0 START LOCN. 59014 583 30 0 0 2 0 5 0 6 0 0 0 0 59016 583 32 0 0 2 0 5 0 0 0 0 0 0 ALT. ROUTES 59018 583 48 0 0 2 0 5 0 4 0 0 0 0 59020 583 50 0 0 2 0 5 0 1 0 0 0 0 'BLOCK SIZE' 59022 583 20 0 0 2 0 5 0 10 0 0 0 1 CHAPT 59100 TABLE 591 591 1 59101 NOTES 59102 583 50 0 0 2 0 5 0 3 0 0 0 0 LGTH.OF CHAPS 59104 583 46 0 0 2 0 2 3 2 0 0 0 0 59106 583 20 0 0 2 0 4 0 2 0 0 0 0 59108 583 38 0 0 2 0 1 0 0 0 0 0 0 59110 13 0 0 0 0 0 5 0 2 4 2 0 0 59112 13 1 0 0 0 0 5 0 2 4 2 0 0 59114 13 2 0 0 0 0 5 0 2 4 2 0 0 59116 13 3 0 0 0 0 5 0 2 4 2 0 0 59118 13 4 0 0 0 0 5 0 2 4 2 0 0 59120 13 5 0 0 0 0 5 0 2 4 2 0 0 59122 13 6 0 0 0 0 5 0 2 4 2 0 1 59124 13 0 0 0 0 0 5 0 0 0 0 0 0 TX AREA DETAILS MT 59126 13 2 0 0 2 0 5 0 0 0 0 0 0 59128 13 4 0 0 2 0 5 0 0 0 0 0 1 59200 TABLE 592 592 1 59201 NOTES 59202 583 2 0 0 2 0 5 0 4 0 0 0 0 F.PT. 59204 13 0 0 0 2 0 3 2 2 0 0 0 0 XXX 59206 583 8 0 0 2 0 4 1 7 0 0 0 0 59208 583 10 0 0 2 0 3 2 2 0 0 0 0 MOD. GP. 59210 13 2 0 0 2 0 3 2 2 0 0 0 0 XXX 59212 583 12 0 0 2 0 5 0 7 0 0 0 0 59214 583 14 0 0 2 0 3 2 0 0 0 0 0 PRIORITY 59216 11 4 0 0 2 0 1 4 2 0 0 0 0 XXX 59218 583 90 0 0 2 0 5 0 7 0 0 0 0 'ENTRY' 59220 583 58 0 0 2 0 4 0 0 0 0 0 0 '= CH' 59222 92 8 0 0 0 0 1 4 0 0 0 0 0 CHAP NUMBER 59224 583 58 0 0 2 0 1 4 0 0 0 0 0 '/' 59226 92 6 0 0 0 0 4 1 0 3 0 0 1 LOCN IN CHAP 59300 TABLE 593 593 1 59301 NOTES 59302 587 8 0 0 0 0 5 0 0 4 0 0 0 CALL HEAD OF FORM 59304 583 34 0 0 2 0 5 0 1 0 0 0 0 59306 583 36 0 0 2 0 4 1 0 0 0 0 0 59308 16 2 0 0 0 0 5 0 3 0 0 0 0 PROG IDENTITY 59310 583 38 0 0 2 0 5 0 3 0 0 0 0 'SERIA- 59312 583 18 0 0 2 0 1 0 0 0 0 0 0 '-L' 59314 16 3 0 0 0 0 5 0 3 4 0 0 0 PROG SERIAL 59316 583 20 0 0 2 0 4 0 15 0 0 0 0 'CHAP-' 59318 583 38 0 0 2 0 1 0 0 0 0 0 0 -S' 59320 92 29 0 0 0 0 1 4 2 0 0 0 0 NUMBER OF CHAPS 59322 583 24 0 0 2 0 5 0 3 0 0 0 0 'FILES' 59324 577 2 0 0 0 0 1 4 2 0 0 0 0 NUMBER OF FILES 59326 583 26 0 0 2 0 5 0 6 0 0 0 0 'TRAN' 59328 583 28 0 0 2 0 5 0 2 0 0 0 0 AREAS' 59330 576 2 0 0 0 0 1 4 2 0 0 0 1 NUMBER OF TX AREAS 59400 TABLE 594 594 1 59402 11 0 0 0 2 0 5 0 6 0 0 0 0 FILE ID 59404 583 2 0 0 0 0 4 0 12 3 0 0 0 ROUTE TYPE 59406 13 6 0 0 0 0 4 1 13 3 0 0 0 START LOCATION 59408 13 8 0 0 2 0 3 2 11 0 0 0 0 ALT ROUTE 59410 13 4 0 0 0 0 4 1 12 3 0 0 0 LENGTH 59412 13 2 0 0 0 0 4 1 12 3 0 0 1 CHAPT' 59414 583 26 0 0 2 0 5 0 1 0 0 0 0 59416 583 28 0 0 2 0 5 0 2 0 0 0 0 59418 583 84 0 0 2 0 5 0 2 0 0 0 0 59420 583 18 0 0 2 0 5 0 2 0 0 0 0 59422 583 20 0 0 2 0 5 0 7 0 0 0 0 59424 583 50 0 0 2 0 5 0 6 0 0 0 1 LGTH 59426 583 2 0 0 0 0 5 0 5 5 0 0 0 SEC NO 59428 13 0 0 0 0 0 4 1 11 3 0 0 0 START 59430 596 2 0 0 0 0 1 4 13 0 0 0 0 CHAPTER 59432 13 4 0 0 0 0 4 1 7 3 0 0 1 LENGTH 59434 11 0 0 0 2 0 5 0 0 0 0 0 0 SENTINEL MARK 59436 11 2 0 0 2 0 5 0 0 0 0 0 0 SENTINEL TYPE 59438 11 4 0 0 2 0 5 0 0 0 0 0 0 PROG ID NO 59440 11 6 0 0 2 0 5 0 0 0 0 0 1 SERIAL NO 59500 TABLE 595 595 1 59502 583 2 0 0 0 0 2 3 3 1 0 0 0 SEQ NO 59504 583 58 0 0 2 0 1 0 0 0 0 0 0 =' 59506 583 3 0 0 0 0 4 1 0 3 0 0 1 SECTION START 59508 583 72 0 0 2 0 5 0 0 0 0 0 0 MR'S 4-20 59510 583 74 0 0 2 0 5 0 0 0 0 0 1 59512 583 76 0 0 2 0 5 0 0 0 0 0 0 ITEM+COUNTERS 59514 583 78 0 0 2 0 5 0 0 0 0 0 1 59516 583 80 0 0 2 0 5 0 0 0 0 0 0 SWITCHES 59518 583 82 0 0 2 0 5 0 0 0 0 0 1 59520 583 4 0 0 0 0 5 0 0 4 0 0 0 SW/MR/SEC 59522 583 58 0 0 2 0 4 0 0 0 0 0 0 =CH' 59524 583 2 0 0 0 0 1 4 0 0 0 0 0 CHAP NO 59526 583 58 0 0 2 0 1 4 0 0 0 0 0 /' 59528 583 3 0 0 0 0 4 1 0 3 0 0 1 POSITION 59600 PROCR 596 596 COPY CHUNK FROM STORE S/R 59602 81 596 2 0 0 0 596 59603 96 0 0 2 0 STORE CHUNK START FOR PARAS 1 AND 5 59604 5 598 2 0 0 0 598 59605 124 598 2 0 1 0 598 59606 101 0 1 3 0 59607 5 598 6 0 0 0 598 CHUNK START 59673>59608 124 999 19 1 2 0 SEC 8 59609 124 0 0 2 0 59610 3 577 2 0 0 0 577 WL 59611 11 0 0 0 30 48 59612 30 0 0 0 5 59613 1 577 2 0 0 0 577 59614 91 0 0 4 0 59671>59615 124 598 4 0 3 0 598 STORE WORD 59616 106 0 0 2 0 59617 5 598 7 0 0 0 598 STORE WORD 59631>59618 34 598 10 1 0 0 598 FIRST LEVEL PARA WORD 59619 33 0 0 0 3 NEXT ONE TO A 59620 100 598 8 1 0 0 598 STORE (A) (B) (C) 59621 94 596 29 0 5 1 596 TEST END OF PARA WORD 59622 90 0 0 5 0 SET UP MR FOR 59623 C 0 0 0 6 NEXT PARA WORD 59624 124 598 4 0 3 0 598 STORE PARA WORD 59625 106 1 0 3 0 STORE PARA WORD 59626 33 0 0 0 2 RIGHT ALIGN WORD 59627 5 598 11 0 0 0 598 59628 94 596 29 0 3 1 596 STEP PARAS MR 59628> 59621>59629 598 8 0 0 0 598 TEST DUMMY PARA 59630 12 0 0 0 6 59631 70 596 18 0 0 0 596 gYES 59632 12 0 0 0 1 TEST SECOND LEVEL REQD 59633 71 596 57 0 0 0 596 gNO 59647>59634 34 598 16 1 0 0 598 SECOND LEVEL PARA WORD 59635 33 0 0 0 6 NEXT ONE TO A 59636 100 598 14 1 0 0 598 STORE (A) (B) (C) 59637 94 596 45 0 8 1 596 TEST END OF PARA WORD 59638 90 0 0 8 0 SET UP MR FOR 59639 C 0 0 0 3 NEXT PARA WORD 59640 124 598 4 0 3 0 598 STORE PARA WORD 59641 106 1 0 1 0 59642 33 0 0 0 2 RIGHT ALIGN WORD 59643 5 598 17 0 0 0 598 59644 94 596 45 0 1 1 596 STEP PARAS MR 59644> 59637>59645 598 14 0 0 0 598 TEST SECOND LEVEL 59646 101 63 1 2 0 PARA=63(DUMMY) 59647 70 596 34 0 0 0 596 gYES 59648 101 1 1 1 0 TEST END SIGN(62) 59649 71 596 55 0 0 0 596 gNO 59650 598 4 1 0 0 598 STORE END SIGN 59651 5 4 1 4 0 END SIGN 59652 5 6 1 4 0 59653 80 577 2 0 0 0 577 gWRITE LAST BLOCK 59654 82 596 2 0 0 0 596 gLEAVE S/R 59649>59655 598 14 1 0 0 598 STORE ACTUAL PARA 59656 5 598 8 1 0 0 598 VALUE 59633>59657 598 8 0 0 0 598 TEST PARA=1 59658 12 0 0 0 1 59659 70 596 62 0 0 0 596 gYES 59660 12 0 0 0 4 59661 71 596 66 0 0 0 596 gNO 59659>59662 35 0 0 0 1111 ADJUST ORDER BY 59663 36 598 7 0 0 0 598 CHUNK START 59664 2 598 6 0 0 0 598 59665 37 598 7 0 0 0 598 59661>59666 598 7 0 0 0 598 59667 5 6 2 4 0 59668 598 8 0 0 0 598 59669 5 4 2 4 0 59670 94 596 71 0 2 1 596 WORD MR 59670>59671 94 596 15 0 4 4 596 gNEXT WORD 59672 80 577 2 0 0 0 577 gWRITE 59673 76 596 8 0 0 0 596 gNEXT BLOCK 59700 TABLE 597 597 3 59702 16 16 0 0 0 0 5 0 0 0 0 0 0 59704 587 2 0 0 0 0 5 0 0 0 0 0 0 59706 16 2 0 0 0 0 5 0 0 0 0 0 0 59708 16 3 0 0 0 0 5 0 0 0 0 0 0 SERIAL 59710 583 20 0 0 2 0 5 0 0 0 0 0 1 'CHAPT' 59712 583 28 0 0 2 0 5 0 0 0 0 0 0 59714 16 16 0 0 0 0 5 0 3 4 0 0 1 59716 11 0 0 0 2 0 5 0 0 0 0 0 0 FILE IDENTITY 59718 11 2 0 0 2 0 4 0 1 0 0 0 0 ROUTE TYPE 59720 11 8 0 0 2 0 5 0 0 0 0 0 0 START LOCATION 59722 11 4 0 0 2 0 5 0 0 0 0 0 0 TWICE CHAP 59724 11 6 0 0 2 0 5 0 0 0 0 0 0 MAX BLOCK LENGTH 59726 11 10 0 0 2 0 5 0 0 0 0 0 1 ALT ROUTE 59800 CONST 598 598 1 CONSTANTS 59802 (D)0; 59804 (A)£ ; 59806 0; CHUNK START/ORDER 59808 0; 59810 0; 59812 0; 59814 0; 59816 0; 59818 0; 59900 PROCR 599 599 DUMMY 60000 PROCR 600 600 60100 PROCR 601 601 60200 PROCR 602 602 60300 PROCR 603 603 60400 PROCR 604 604 PREPARATORY STAGE 60401 NOTES RADIX 60402 10 0 0 0 0 (29)TEST UNSUITABLE MASTER 60403 127 604 51 0 0 0 604 gYES(REJECT G) 60404 124 611 6 0 2 0 611 SET UP IND MODS 60405 5 604 28 0 0 0 604 AT 15 BIT 60406 124 611 8 0 2 0 611 ADDRESS 60407 5 604 31 0 0 0 604 60408 124 611 12 0 2 0 611 60409 5 604 47 0 0 0 604 60410 12 0 0 0 4 60411 4 611 5 0 0 0 611 TO ALLOW ROOM 60412 4 611 13 0 0 0 611 FOR 'A' AND 'B' 60413 10 0 0 0 0 (31)TEST 2 STORES 60414 70 604 16 0 0 0 604 gNO 60415 76 604 18 0 0 0 604 60414>60416 611 5 0 0 0 611 SET UP MR FOR 60417 5 611 3 0 0 0 611 ONE STORE AREA 60429> 60415>60418 124 611 6 0 3 0 611 60419 106 0 0 0 0 NEXT PROG IDENTITY 60420 70 605 2 0 0 0 605 gUNLOAD THIS PROGRAM 60421 10 0 0 0 2 STEP CTR 60422 4 611 8 0 0 0 611 60423 124 611 6 0 3 0 611 MOVE DETAIL DOWN 60424 106 0 1 0 0 60425 124 611 8 0 3 0 611 60426 102 0 1 0 0 61036>60427 123 2 0 0 0 (REENTRY AFTER UNLOAD) 60428 100 611 6 0 0 0 611 60429 76 604 18 0 0 0 604 60437>60430 123 2 0 0 0 gNEXT ENTRY 60431 100 611 8 0 0 0 611 60432 76 604 34 0 0 0 604 60433 76 604 38 0 0 0 604 gLAST ENTRY 60432>60434 611 10 1 0 0 611 SET 10X£ IN REMAINING 60435 124 611 8 0 3 0 611 PQ LOCNS 60436 102 0 1 0 0 60437 76 604 30 0 0 0 604 60448> 60433>60438 124 611 12 0 3 0 611 FIND SUFFICIENT STORE 60439 106 1 0 0 0 AREA FOR NEXT CHAP(500 LOCNS) 60440 2 611 10 0 0 0 611 £££££ 60441 70 604 46 0 0 0 604 gSKIP END SIGNS, TRUST MR 60442 1 611 10 0 0 0 611 60443 118 0 0 0 0 DUMMY 60444 101 516 1 2 0 60445 72 604 54 0 0 0 604 60441>60446 123 2 0 0 0 60447 100 611 12 0 0 0 611 60448 76 604 38 0 0 0 604 60449 10 0 0 0 0 60450 12 0 0 0 4 C COMMENT 60403>60451 11 0 0 0 57 G COMMENT 60452 124 611 14 0 3 0 611 60453 124 0 1 0 0 (14)->REJECT 60445>60454 124 611 12 0 3 0 611 60455 106 0 0 0 0 15-BIT START 60456 124 611 14 0 3 0 611 60457 103 28 0 0 0 R2 MODIFIER 60458 124 611 14 0 3 0 611 60459 103 0 0 0 0 PLANT S/R LINK 60460 34 611 19 0 0 0 611 BITS 1-13 60461 114 611 19 0 0 0 611 60462 611 19 0 0 0 611 CHUNK START PARA 60463 124 611 14 0 3 0 611 60464 102 1 0 0 0 60465 101 0 1 3 0 60466 124 611 14 0 3 0 611 SECOND ORDER 60467 124 1 1 0 0 gLOAD CHAP S/R 60500 PROCR 605 605 UPDATE PREVIOUS SWITCH,UNLOAD FP/MG/TAG 60501 NOTES RADIX 60420>60502 35 0 0 0 1111 Q1-4B,A CLEAR 60503 124 611 6 0 3 0 611 60504 115 1 0 0 0 START OF SWITCH 60505 5 604 2 1 0 0 604 60506 124 604 2 0 3 0 604 60507 106 37 0 0 0 SI+37 60508 5 611 18 0 0 0 611 SPECIAL CHAPTER START 60509 124 611 8 0 3 0 611 60510 106 1 0 0 0 SWITCH START OF PROC ABOVE THIS 60511 124 611 14 0 3 0 611 60512 102 30 1 0 0 SET R3 60513 126 604 2 1 2 0 604 THIS SWITCH STARTS>R2 60514 124 611 14 0 3 0 611 60515 126 0 0 0 0 >'UPDATE SWITCH' S/R 60516 124 611 18 0 3 0 611 60517 106 0 0 0 0 FP USED 60518 70 605 28 0 0 0 605 gNO 60519 126 611 14 1 2 0 611 6/0 60527>60520 101 14 1 3 0 60521 124 611 14 0 3 0 611 60522 123 128 1 2 0 TAG 14 60523 10 0 0 0 0 60524 124 611 14 0 3 0 611 60525 102 128 1 2 0 CLEAR 60526 125 2 0 2 0 60527 76 605 20 0 0 0 605 60518>60528 124 611 18 0 3 0 611 60529 106 1 0 0 0 MOD GROUP 60530 70 605 39 0 0 0 605 gNOT USED 60531 31 0 0 0 3 60532 5 604 2 0 0 0 604 STORE 8M 60533 126 611 14 1 2 0 611 6/0 60534 101 14 1 3 0 60538>60535 124 604 2 0 3 0 604 60536 123 2 1 2 0 TAG 14 INTO MOD GROUP 60537 125 2 0 2 0 60538 76 605 35 0 0 0 605 60530>60539 124 611 18 0 3 0 611 SPECIAL CHAP START 60540 106 10 0 0 0 ALLOCATED TAG 60541 3 604 2 0 0 0 604 W/L 60542 32 0 0 0 1- TAG TO Q10B 60543 124 604 2 0 3 0 604 60544 118 0 1 0 0 SHIFT TAGX TO QXA 60545 124 611 14 0 3 0 611 ZERO 60546 107 0 1 0 0 AUG TAG AVAILABILITY LOCN 60547 124 611 18 0 3 0 611 SPECIAL CHAP 60548 126 18 1 2 0 2X(R+T) 60549 126 611 14 1 3 0 611 6:0 FLIP FLOP 60550 125 3 0 3 0 60641>60551 125 3 0 3 0 60552 76 606 4 0 0 0 606 60553 126 611 14 1 3 0 611 06:00 60554 124 611 18 0 3 0 611 NEXT ROUTE DETAIL 60555 106 34 1 2 0 60556 72 606 4 0 0 0 606 60557 125 3 0 3 0 >NOT DEALLOCATED BY PROGRAM 60600 PROCR 606 606 UNLOAD ROUTES AND PSEUDO ROUTES 60601 NOTES RADIX 103 60602 125 1 0 2 0 60603 76 606 40 0 0 0 606 gALREADY DEALLOCATED 60556> 60552>60604 124 611 18 0 3 0 611 60605 106 34 0 2 0 NEXT DETAIL 60606 32 0 0 0 4- 60607 5 604 13 0 0 0 604 Q5=ROUTE TYPE 60608 32 0 0 0 2 60609 10 0 0 0 0 60610 32 0 0 0 2 Q1,2=ROUTE 60611 70 606 40 0 0 0 606 60612 101 128 1 2 0 (32)TEST ALT ROUTE 60613 70 606 40 0 0 0 606 gYES 60614 101 128 1 1 0 (32) 60615 3 604 14 0 0 0 604 ROUTE 60616 32 0 0 0 1- 60617 33 0 0 0 1 STORE 8XCHANNEL 60618 118 3 0 3 0 60619 5 604 15 0 0 0 604 60620 33 0 0 0 3 60621 5 604 16 0 0 0 604 STORE RTE NO MOD 8 60622 604 13 0 0 0 604 ROUTE TYPE 60623 71 606 25 0 0 0 606 60624 611 16 0 0 0 611 0££££ 60623>60625 124 604 14 0 3 0 604 60626 102 64 0 0 0 60627 124 604 15 0 3 0 604 UPDATE ASSEMBLER TABLE 60628 106 0 0 0 0 (12) 60629 2 604 14 0 0 0 604 60630 71 606 34 0 0 0 606 gNOT THIS ROUTE 60631 611 10 0 0 0 611 SET £££££ 60632 124 604 15 0 3 0 604 60633 102 0 1 0 0 (12) 60630>60634 101 1 0 1 0 60635 101 0 1 3 0 60636 124 604 16 0 3 0 604 ROUTE IN CHANNEL 60637 118 0 1 0 0 60638 124 604 15 0 3 0 604 60639 114 2 1 0 0 (12) 60613> 60611> 60603>60640 125 1 0 2 0 60641 76 605 51 0 0 0 605 gALT ROUTE OR NEXT ROUTE 60700 PROCR 607 607 UNLOAD STORAGE, CLEAR/SET TAG 14 60701 NOTES RADIX 104 PREP STAGE 60702 124 611 18 0 3 0 611 SPECIAL CHAP START 60703 126 16 1 2 0 (2XCHAPS):0 61035>60704 124 611 18 0 3 0 611 60705 106 20 1 2 0 60706 5 604 2 1 0 0 604 END/START NEXT CHAP 60707 126 604 2 1 3 0 604 60708 101 14 1 3 0 60712>60709 124 611 14 0 3 0 611 60710 123 0 1 3 0 STACK TAG 14 EVERY WHERE 60711 125 2 0 3 0 60712 76 607 9 0 0 0 607 60713 126 604 2 1 3 0 604 START/END NEXT CHAP 60714 604 2 0 0 0 604 START 60715 2 611 18 0 0 0 611 SPECIAL CHAP START 60716 71 607 20 0 0 0 607 gNOT SP CHAP 60717 125 500 0 3 0 DON'T CLEAR FIRST 500 60718 76 607 20 0 0 0 607 60719 76 608 2 0 0 0 608 gNONE TO CLEAR 60718> 60716>60720 10 0 0 0 0 60724>60721 124 611 14 0 3 0 611 60722 102 0 1 3 0 60723 125 2 0 3 0 60724 76 607 21 0 0 0 607 60800 PROCR 608 608 60801 NOTES RADIX 105 60719>60802 10 0 0 0 0 (31) TEST 2 STORES 60803 70 608 9 0 0 0 608 gNO 60804 0 604 2 0 0 0 604 CHAP START 60805 2 610 37 0 0 0 610 CONST=DIV 4/0 60806 73 608 9 0 0 0 608 gCHAP IN FIRST STORE 60807 0 611 22 1 0 0 611 FOR SECOND 60808 76 608 10 0 0 0 608 60806> 60803>60809 0 611 20 1 0 0 611 FOR FIRST 60808>60810 5 604 16 1 0 0 604 60811 126 604 16 1 1 0 604 SET UP MRS 60935>60812 126 604 16 1 3 0 604 60923>60813 124 611 14 0 3 0 611 NEXT STRIP 60814 106 0 1 3 0 60900 PROCR 609 609 UNLOAD NEXT CHAP-LOOK FOR JOINS 60901 NOTES RADIX 106 60902 05 604 12 1 0 0 604 W/L 60903 00 604 12 0 0 0 604 NEXT STRIP START 60904 70 609 22 0 0 0 609 gDUMMY, STEP R3 60905 2 611 10 0 0 0 611 £££££ 60906 70 609 36 0 0 0 609 gLIST END 60907 00 604 12 0 0 0 604 STRIP START 60908 01 604 13 0 0 0 604 STRIP LENGTH 60909 5 604 15 0 0 0 604 =STRIP END 60910 34 611 19 0 0 0 611 BITS1-13 60911 36 604 12 0 0 0 604 STRIP START 60912 70 609 17 0 0 0 609 gSTART IS DIVISION BOUNDARY 60913 00 604 12 0 0 0 604 STRIP START 60914 2 604 3 0 0 0 604 CHAP END 60915 70 609 24 0 0 0 609 gJOINS UP 60916 10 0 0 0 0 60912>60917 36 604 15 0 0 0 604 60918 70 609 22 0 0 0 609 gSTRIP END IS DIVISION BOUNDARY 60919 604 15 0 0 0 604 STRIP END 60920 2 604 2 0 0 0 604 CHAP START 60921 70 609 28 0 0 0 609 gJOINS UP 60918> 60904>60922 125 2 0 3 0 60923 76 608 13 0 0 0 608 gNEXT STRIP 60915>60924 604 2 0 0 0 604 CHAP START 60925 32 0 0 0 5- 60926 1 604 15 0 0 0 604 STRIP END 60927 76 609 31 0 0 0 609 60921>60928 00 604 12 0 0 0 604 STRIP START 60929 32 0 0 0 5- 60930 1 604 3 0 0 0 604 CHAP END 60927>60931 32 0 0 0 5 60932 5 604 2 1 0 0 604 STORE SUPERCHAP 60933 124 611 14 0 3 0 611 CLEAR STRIP DETAIL 60934 102 0 1 3 0 60935 76 608 12 0 0 0 608 gLOOP AGAIN 60906>60936 2 604 2 0 0 0 604 START 60937 4 604 3 0 0 0 604 CHANGE END OF LENGTH 61000 PROCR 610 610 SORT NEXT ITEM INTO STORAGE LIST 61001 NOTES RADIX 107 61027>61002 124 604 16 0 3 0 604 CTR 61003 106 0 1 0 0 61004 3 611 24 1 0 0 611 W/L 61005 70 610 25 0 0 0 610 gDUMMY STEP CTR 61006 2 611 10 1 0 0 611 £X10 61007 70 610 28 0 0 0 610 gEND ROUTINE 61008 611 24 1 0 0 611 61009 2 604 2 1 0 0 604 DETAIL TO INSERT 61010 73 610 17 0 0 0 610 gNOT YET 61011 604 2 1 0 0 604 61012 124 611 14 0 3 0 611 61013 102 0 1 1 0 WRITE INTO LIST 61014 611 24 1 0 0 611 61015 5 604 2 1 0 0 604 INSERT OVERWRITTEN ITEM NEXT TIME 61016 76 610 20 0 0 0 610 61010>61017 611 24 1 0 0 611 WRITE ITEM BACK 61018 124 611 14 0 3 0 611 61019 102 0 1 1 0 61016>61020 125 2 0 1 0 STEP MR1 61021 76 610 25 0 0 0 610 61022 10 0 0 0 51 TOO MANY STRIPS 61023 124 611 14 0 3 0 611 INTERNAL IMPOSSIBILITY 61024 124 0 1 0 0 (13)>XXXA 61021> 61005>61025 10 0 0 0 2 STEP CTR 61026 4 604 16 0 0 0 604 61027 76 610 2 0 0 0 610 gNEXT STRIP 61007>61028 604 2 1 0 0 604 INSERT FINAL DETAILS 61029 124 611 14 0 3 0 611 61030 102 0 1 1 0 61031 611 10 1 0 0 611 61032 124 611 14 0 3 0 611 61033 102 2 1 1 0 61034 125 2 0 2 0 STEP MR2 61035 76 607 4 0 0 0 607 gUNLOAD NEXT CHAP 61036 76 604 27 0 0 0 604 gUNLOAD NEXT PROGR 61037 100 0 1 0 0 CONSTANT=DIV 4/0 61038 604 2 0 0 0 604 61039 10 0 0 0 0 DUMMY 61100 CONST 611 611 0 108 61102 (D)0; (30)START FIRST TABLE 61103 0; (31)START LAST TABLE 61104 0; (31)DO 61105 0; (3)END+4 OF LAST AREA 61106 2; (29)START PQ 61107 0; (30)END PQ 61108 0; (29)END PQ 61109 0; (20)START PQ 61110 £££££; 61111 £££££; 61112 0; (30)START FIRST AREA 61113 0; (3)END+4 OF LAST AREA 61114 0; 61115 6; 61116 ££££; 61117 £0000; 61118 0; 61119 1£££; 61120 0; (30)FIRST STORE 61121 0; 61122 0; (31)SECOND STORE 61123 0; 61124 0; W/L FOR STRIP DETAIL 61125 0; 61126 0; BLISTER SPACE 61127 0; 61200 PROCR 612 612 DUMMY PROCEDURE START OF ALLOC STORAGE 61201 NOTES RADIX 201 61300 PROCR 613 613 SET UP 1 OR 2 STORE AREAS 61301 NOTES RADIX 202 STORE FOR CHAP DETAILS 61302 101 0 1 3 0 (31)TEST 2 STORES 61303 70 613 14 0 0 0 613 g1 AREA 61304 10 0 0 0 0 61305 12 0 0 0 1 61306 4 621 6 0 0 0 621 SET SWITCH=2 61307 10 0 0 0 0 61308 2 613 17 0 0 0 613 61309 4 622 30 0 0 0 622 (71>73 ORDER) 61310 101 0 1 3 0 (31)FORM FIRST TABLE LENGTH 61311 101 0 1 2 0 (30) 61312 4 614 20 0 0 0 614 ADJUST MR SETTING 61313 4 621 23 0 0 0 621 ADJUST ORDERS 61303>61314 124 613 26 0 3 0 613 61315 126 0 0 0 0 (7)>READ BLOCK 61316 76 616 2 0 0 0 616 61317 100 0 0 2 0 CONSTANT 61318 100 1 0 0 0 COLLATION CONST 61319 100 0 0 0 0 INIT CHAP COLL CONST 61320 100 0 0 0 0 TOT CHAPS FOR ALLOCATION 61321 100 0 0 0 0 ? 61322 100 0 0 0 0 ? 61323 100 0 0 0 0 VBLE BIT PATTERN 61324 100 0 0 0 0 START OF ALLOC IN STRIP 61325 100 0 0 0 0 ZERO CONST) 61326 100 0 0 0 0 )R1 WL 61327 100 0 0 0 0 TOTAL LENGTH COUNTER 61328 100 0 0 0 0 W/L FOR ALLOC CHAPS 61329 100 0 0 0 0 COLLATION CONSTANT 61330 100 1 0 0 0 MIN WASTAGE BIT PATTERN 61331 100 0 0 0 0 61400 PROCR 614 614 STORE CARRIED FORWARD DETAILS 61401 NOTES RADIX 203 62931>61402 124 614 20 0 3 0 614 BULK COPY TO 61403 128 250 0 0 0 MIDDLE OF SPECIAL CHAP 61404 124 614 20 0 3 0 614 61405 124 250 1 0 0 >NEW POSITION OF NEXT ORDER 62935>61406 106 614 18 1 0 0 614 COPY 40 LOCNS STORAGE TABLE TO CHAP 1/80 61407 124 614 42 0 3 0 614 61408 128 80 0 0 0 61409 106 614 16 1 0 0 614 COPY 54 LOCNS MISC TO START OF EXTRA CHA 61410 124 614 20 0 3 0 614 61411 128 0 0 0 0 61412 101 0 1 3 0 PARA TABLE START 61413 124 614 15 0 3 0 614 61414 124 1 1 0 0 (6)>LOAD CHAP 61415 100 0 0 0 0 ZERO 61416 100 16 0 0 0 TABLE ENTRIES 61417 100 54 0 0 0 61418 100 70 0 0 0 61419 100 40 0 0 0 61420 100 0 0 0 0 W/L'S FOR BEGIN/END 61421 100 0 0 0 0 OF STORE AREAS 61500 CONST 615 615 0 204 DUMMY PROCEDURE FOR OVERWRITE 61502 (B)64-; (11)MASTER PSEUDO 61503 0; 61600 PROCR 616 616 INPUT CD DEAL WITH ANNEXES W/L'S 61601 NOTES RADIX 205 61316>61602 124 615 2 1 2 0 615 UNPACK ALPHA->NUMERIC 61603 124 25 0 2 0 CHAP DETAILS 61604 32 0 0 0 5- 61605 101 28 1 3 0 61606 32 0 0 0 5 61607 128 612 3 1 0 0 612 61608 124 615 2 1 2 0 615 UNPACK ALPHA->NUMERIC 61609 124 5 0 2 0 GENERAL DETAILS 61610 32 0 0 0 5- 61611 101 20 1 3 0 61612 32 0 0 0 5 61613 128 615 2 1 0 0 615 61614 612 10 1 0 0 612 TRANSFER PROG 61615 5 615 14 1 0 0 615 SERIAL AND IDENTITY 61616 101 612 2 1 3 0 612 TEST IF PTS REQD ALLOC COMMENT 61617 33 0 0 0 3 61618 32 0 0 0 1- STORE PARAS FOR 61619 5 615 12 0 0 0 615 ALLOC ROUTES 61620 33 0 0 0 1 61621 3 615 13 0 0 0 615 STORE'TRIALS ALLOC'IND 61622 70 616 30 0 0 0 616 gNOT TRIALS ALLOCATED 61623 101 0 1 3 0 (28)PTS IN MASTER? 61624 70 616 30 0 0 0 616 gYES 61625 3 615 3 0 0 0 615 RESERVE MOD GROUP 61626 0 619 14 0 0 0 619 61627 5 617 21 0 0 0 617 (TO STEP CTR IF PTS CHAP NEEDED) 61628 101 1500 1 3 0 PTS SIZE 61629 4 620 10 0 0 0 620 AUGMENT SPECIALSIZE 61624> 61622>61630 124 615 6 0 1 0 615 FIRST SPECIAL CHAP (CHAPS INITIALLY) 61631 103 612 3 0 0 0 612 61632 124 615 6 0 1 0 615 STORE PRINT S/R START 61633 106 612 2 0 0 0 612 (SPEC CHAP LENGTH) 61634 102 615 17 0 0 0 615 61635 615 6 0 0 0 615 2XCHAPS 61636 1 615 6 0 0 0 615 61637 5 615 19 0 0 0 615 61638 124 615 19 0 0 0 615 61639 102 615 22 1 0 0 615 CLEAR PTS DETAILS 61640 101 0 1 3 0 PARA TABLE START 61641 5 615 34 0 0 0 615 FOR TRANSLATOR 61642 35 0 0 0 1 61643 124 613 26 0 3 0 613 61644 115 27 0 0 0 (3)MACHINE PRINTER TYPE 61645 101 9 1 2 0 61646 103 615 16 0 0 0 615 STORE INDICATOR 61647 71 617 2 0 0 0 617 gRTE TYPE 4 61648 10 0 0 0 1 61649 4 617 22 0 0 0 617 61650 4 617 25 0 0 0 617 61651 106 619 12 0 0 0 619 61652 102 619 9 0 0 0 619 61700 PROCR 617 617 FORM UP DETAILS FOR PRINTERS 61701 NOTES RADIX 206 61647>61702 615 19 0 0 0 615 SET UP MRS 2C:0 61703 5 613 20 0 0 0 613 FOR LIST OF CHAPS 61704 615 6 0 0 0 615 61705 3 613 22 0 0 0 613 61706 101 4 1 1 0 AND LIST OF LENGTHS 61707 5 613 23 0 0 0 613 61708 126 613 20 1 1 0 613 MR 2C: 0 61709 126 613 22 1 3 0 613 2(C+2) : 0 61710 5 615 24 1 1 0 615 ENSURE NO PRINT S/R UNLESS DESIRED 61711 101 0 1 3 0 (28) IS THIS ISSUE 6+MASTER? 61712 70 617 20 0 0 0 617 gNO 61713 101 0 1 3 0 (48)BONUS TO SPECIAL CHAP FOR CMR 61714 34 620 2 0 0 0 620 61715 124 615 6 0 1 0 615 61716 36 612 2 0 0 0 612 61717 124 615 6 0 1 0 615 61718 37 612 2 0 0 0 612 61719 10 0 0 0 0 DUMMY 61712>61720 612 14 0 0 0 612 TEST ANY RT 19 PRINTERS 61721 70 617 54 0 0 0 617 *FORMED ORDER*->NONE 61722 0 612 13 0 0 0 612 *1 ADDED FOR SPECIAL PRINTER* 61723 80 619 2 0 0 0 619 gBREAK UP DETAILS S/R 61724 125 2 0 1 0 61725 0 612 15 0 0 0 612 *1 ADDED FOR SPECIAL PRINTER* 61726 80 619 2 0 0 0 619 gBREAK UP DETAILS S/R 61746>61727 615 23 0 1 0 615 61728 71 617 33 0 0 0 617 gCHAP CHOSEN 61729 615 22 0 1 0 615 ANNEXE LENGTH 61730 615 22 0 1 0 615 DUMMY 61731 4 620 10 0 0 0 620 AUGMENT SPECIAL TOTAL 61732 76 617 43 0 0 0 617 61728>61733 5 613 20 0 0 0 613 61734 615 22 0 1 0 615 ANNEXE LENGTH 61735 34 620 2 0 0 0 620 61736 124 613 20 0 1 0 613 CHAP LENGTH ALLOWING 61737 36 612 2 0 0 0 612 FOR NEG CHAP LENGTH 61738 124 613 20 0 1 0 613 61739 37 612 2 0 0 0 612 61740 615 23 0 1 0 615 DOUBLE CHAP NO 61741 4 615 23 0 1 0 615 61742 101 0 1 3 0 CLEAR CHAP LENGTH 61732>61743 5 612 4 0 3 0 612 61744 125 2 0 1 0 61745 125 1 0 3 0 61746 76 617 27 0 0 0 617 61747 106 615 16 0 0 0 615 TEST RTE TYPE 9 61748 70 617 52 0 0 0 617 gYES 61749 101 1 1 3 0 61750 4 618 21 0 0 0 618 ADJUST ORDERS FOR PRINT S/R LENGTH 61751 10 0 0 0 2 (+5 IF GP) 61748>61752 11 0 0 0 2 (+3 IF SPECIAL) 61914>61753 11 0 0 0 1 (+1 IF TRIALS ALLOC) 61721>61754 1 615 6 0 0 0 615 CHAPS INITIALLY 61755 5 613 20 0 0 0 613 CHAPS FOR ALLOCATION 61756 34 620 2 1 0 0 620 Q1=10 61757 124 615 6 0 1 0 615 INITIAL CHAPS X 61758 118 0 1 3 0 FORM BITS 1-X 61759 5 613 19 0 0 0 613 61760 124 613 20 0 1 0 613 TOT CHAPS Y 61761 118 0 1 3 0 FORM BITS 1-Y 61762 5 613 21 0 0 0 613 61763 91 614 20 0 3 0 614 R3 SCANS STORE AREA 61764 5 614 20 0 0 0 614 CLEAR 61765 0 613 20 0 0 0 613 TOT CHAPS 61766 2 615 6 0 0 0 615 INIT CHAPS 61767 70 618 2 0 0 0 618 gNO SPECIAL CHAPS 61768 0 613 20 0 0 0 613 61769 5 613 27 0 0 0 613 61770 91 613 26 0 1 0 613 CHAPS:0 61771 34 613 30 0 0 0 613 BIT 1 61778>61772 0 612 3 0 1 0 612 NEXT CHAP LENGTH 61773 71 617 76 0 0 0 617 gUSED 61774 36 620 2 0 0 0 620 Q1-5(IE B-> A) 61775 4 619 13 0 0 0 619 STEP'CHAPS ALLOCATED' 61773>61776 33 0 0 0 1 SHIFT MARKER 61777 125 1 0 1 0 61778 76 617 72 0 0 0 617 61779 10 0 0 0 0 CLEAR 61780 2 619 13 0 0 0 619 61781 4 613 21 0 0 0 613 ADJUST'CHAPS UNALLOCATED' 61800 PROCR 618 618 STORE STORAGE TABLE & ROUND UP SP CH 61801 NOTES RADIX 207 61767>61802 615 6 0 0 0 615 MR1=0:C 61803 5 613 27 0 0 0 613 61804 91 613 26 0 1 0 613 61805 34 613 30 0 0 0 613 BIT 1 61806 101 8190 1 3 0 FORM MAXIMUM SIZE 61807 2 620 10 0 0 0 620 FOR MATE OF SPECIALS 61808 5 620 10 0 0 0 620 61816>61809 612 3 0 1 0 612 TEST CHAP SMALL ENOUGH 61810 2 620 10 0 0 0 620 TO MATE WITH SPECIALS 61811 72 618 14 0 0 0 618 gNO 61812 620 4 0 0 0 620 PACK BITS INTO 61813 37 620 11 0 0 0 620 MATES PATTERN 61811>61814 33 0 0 0 1 61815 125 1 0 1 0 61816 76 618 9 0 0 0 618 gNEXT CHAP 61817 612 14 0 0 0 612 61818 34 620 2 0 0 0 620 61819 70 618 24 0 0 0 618 gNO RT 19 PRINTERS 61820 10 0 0 0 0 CLEAR 61821 76 618 23 0 0 0 618 *FORMED ORDER*(1 SUBTRACTED IF RT 4) 61822 101 34 1 3 0 50=GP PRINT LENGTH 61821>61823 101 16 1 1 0 16=SP PRINT S/R LENGTH 61819>61824 124 615 6 0 1 0 615 61825 36 612 2 0 0 0 612 PRESENT SPECIAL CHAP LENGTH 61826 101 506 1 2 0 61827 72 618 29 0 0 0 618 61828 10 0 0 0 0 61827>61829 101 506 1 1 0 61830 124 615 6 0 1 0 615 61831 37 612 2 0 0 0 612 LENGTH AT LEAST 506 61832 101 40 1 3 0 BULK COPY STORE 61833 30 0 0 0 5 AVAILABILITY TABLE 61834 101 0 1 1 0 (30) 61835 128 615 56 0 0 0 615 61836 0 620 2 1 0 0 620 INSERT END SIGN 61837 5 615 54 1 0 0 615 61838 76 621 2 0 0 0 621 61900 PROCR 619 619 BREAK UP DETAILS S/R 61901 NOTES RADIX 208 61902 81 619 2 0 0 0 619 (A)=PRINTER(CHAPS*LENGTH) 61903 32 0 0 0 4- 61904 5 615 25 0 1 0 615 FIRST CHAP 61905 33 0 0 0 3 61906 5 615 29 0 1 0 615 SECOND CHAP 61907 33 0 0 0 1 61908 32 0 0 0 3 61909 3 615 24 0 1 0 615 *FORMED*('TRANSFER'IF SPECIAL) LENGTH 61910 5 615 28 0 1 0 615 61911 82 619 2 0 0 0 619 61912 5 615 24 0 1 0 615 LENGTH 61913 100 0 0 0 0 BIT PATTERN FOR TOT CHAPS ALLOCATED TO D 61914 70 617 53 0 0 0 617 ORDER CONST IN PROCR 205 61915 10 0 0 0 0 DUMMY 62000 CONST 620 620 0 209 CONSTANTS 62002 (D)£££££; 62003 £££££; DIV BDRY COLL CONST 62004 1£££; 62005 1-; 62006 0; 62007 8; 62008 0; 62009 t; 62010 2-; TOTAL SPECIAL SIZE 62011 0; MATES PATTERN 62100 PROCR 621 621 PREPARE TO ALLOCATE NEXT STRIP 62101 NOTES RADIX 210 62257> 62629> 61838>62102 620 2 0 0 0 620 TABLE END SIGN £X5 TEST IF LAST STRIP 62103 3 613 18 0 0 0 613 SET UP MIN WASTAGE 62104 2 615 56 0 3 0 615 NEXT STRIP LENGTH 62105 71 621 32 0 0 0 621 gNOT END 62114>62106 76 621 7 0 0 0 621 *SWITCH* 62106>62107 76 621 11 0 0 0 621 (1) ALLOCATING IN 1 STORE ONLY ->REJECT 62108 76 621 15 0 0 0 621 (2)2 STORES:END OF NEG->SECOND STORE 62109 76 621 23 0 0 0 621 (3)2 STORES:END OF BOTH->FIRSTSTORE 62110 76 621 11 0 0 0 621 (4)2 STORES:END OF BOTH->SECOND STORE 62128> 62110> 62107>62111 10 0 0 0 53 ALLOC FAILED 62112 124 613 26 0 3 0 613 CODE LETTER C 62113 124 0 1 0 0 (14)->REJECT ALLOCATION 62114 76 621 6 0 0 0 621 ORDER CONST 62108>62115 10 0 0 0 0 RESET MR3 62116 124 613 26 0 3 0 613 62117 102 30 1 0 0 CLEAR 62118 12 0 0 0 1 62119 4 621 6 0 0 0 621 SET SWITCH=3 62120 0 613 17 0 0 0 613 62121 4 622 30 0 0 0 622 (73->71 ORDER) 62122 76 621 32 0 0 0 621 62109>62123 10 0 0 0 0 *FORMED*SET R3 TO ADDRESS SECOND TABLE 62124 124 613 26 0 3 0 613 62125 102 30 0 0 0 62126 00 615 56 0 3 0 615 TEST NO ROOM IN 62127 2 620 2 0 0 0 620 2ND STORE 62128 70 621 11 0 0 0 621 gYES 62129 10 0 0 0 0 62130 12 0 0 0 1 62131 4 621 6 0 0 0 621 SET SWITCH=4 62122> 62105>62132 10 0 0 0 1 SET UP BIT PATTERN 62133 5 613 24 1 0 0 613 AND ALLOC CONST 62134 613 20 0 0 0 613 SET UP MR1 SETTING 62135 5 613 27 0 0 0 613 62200 PROCR 622 622 ALLOCATE STRIP FOR MINIMUM WASTAGE 62201 NOTES RADIX 211 62253>62202 10 0 0 0 0 CLEAR 62203 34 613 24 0 0 0 613 VBLE PATTERN 62204 36 619 13 0 0 0 619 ALLOC TO DATE'PATTERN 62205 71 622 49 0 0 0 622 gDISCARD,SOME CHAP ALREADY USED 62206 0 613 19 0 0 0 613 INITIAL CHAPS'PATTERN 62207 2 613 21 0 0 0 613 CHAPS UNALLOCATED'PATTERN 62208 72 622 23 0 0 0 622 gALL SPECIAL CHAPS ALLOCATED 62209 10 0 0 0 0 62210 36 613 19 0 0 0 613 INITIAL'PATTERN 62211 70 622 49 0 0 0 622 gDISCARD CONTAINS SPECIALS ON 62212 10 0 0 0 0 VBLE=OUTSTANDING 62213 613 21 0 0 0 613 UNALLOC 62214 2 613 24 0 0 0 613 VARIABLE 62215 5 615 98 0 0 0 615 FUTURE PATTERN 62216 34 620 11 0 0 0 620 SUITABLE MATES PATTERN 62217 36 615 98 0 0 0 615 ANY LEFT? 62218 71 622 23 0 0 0 622 gYES,ACCEPTABLE PATTERN 62219 34 613 19 0 0 0 613 INITIAL 62220 36 615 98 0 0 0 615 FUTURE PATTERN 62221 2 615 98 0 0 0 615 FUTURE PATTERN 62222 71 622 49 0 0 0 622 gDISCARD,COULD USE UP SUITABLES 62218> 62208>62223 10 0 0 0 0 62224 5 613 28 1 0 0 613 CLEAR WL 62225 100 613 30 0 2 0 613 BIT 1=DECODER 62226 126 613 26 1 1 0 613 CHAPS:0 62240>62227 36 613 24 0 0 0 613 VBLE PATTERN 62228 70 622 38 0 0 0 622 gCHAP NOT IN COMBINATION 62229 612 3 0 1 0 612 LENGTH 62230 71 622 34 0 0 0 622 (73 FIRST TIME 2 STORES)->USE 62231 101 0 1 3 0 62232 36 620 2 0 0 0 620 Q1-5(DECODER->A) 62233 76 622 50 0 0 0 622 gSKIP SOME COMBINATIONS 62230>62234 5 615 98 1 0 0 615 62235 615 98 0 0 0 615 MODULUS OF LENGTH 62236 4 613 28 0 0 0 613 TOTAL FOR STRIP 62237 10 0 0 0 0 CLEAR A 62228>62238 33 0 0 0 1 SHIFT COLLATOR 62239 125 1 0 1 0 TEST LAST CHAP 62240 76 622 27 0 0 0 622 gNO 62241 615 57 0 3 0 615 STRIP LENGTH 62242 2 613 28 0 0 0 613 TOTAL CHAP LENGTHS 62243 73 622 49 0 0 0 622 gDISCARD,TOO BIG 62244 2 613 18 0 0 0 613 MIN WASTAGTE 62245 72 622 49 0 0 0 622 gNO IMPROVEMENT 62246 4 613 18 0 0 0 613 UPDATE MIN WASTAGE 62247 0 613 24 0 0 0 613 VBLE PATTERN 62248 5 613 31 0 0 0 613 STORE PATTERN GIVING BEST FIT 62245> 62243> 62222> 62211> 62205>62249 10 0 0 0 1 STEP BIT PATTERN 62233>62250 4 613 24 0 0 0 613 62251 0 613 21 0 0 0 613 CHAPS UNALLOCATED'PATTERN 62252 2 613 24 0 0 0 613 VBLE PATTERN 62253 72 622 2 0 0 0 622 gTRY AGAIN 62254 125 2 0 3 0 TEST STRIP UNTOUCHED STEP MR3 62255 613 18 0 0 0 613 WASTAGE 62256 2 620 2 0 0 0 620 £££££ 62257 70 621 2 0 0 0 621 gYES 62258 615 55 0 3 0 615 LENGTH OF NEW STRIP 62259 2 613 18 0 0 0 613 62260 5 613 28 0 0 0 613 62261 2 613 31 0 0 0 613 62262 4 613 21 0 0 0 613 UPDATE'CHAPS UNALLOCATED' 62263 0 613 31 0 0 0 613 62264 4 619 13 0 0 0 619 UPDATE'CHAPS ALLOCATED' 62265 10 0 0 0 0 CLEAR A 62300 PROCR 623 623 SET UP DETAILS OF REDUCED STRIP+START OF 62301 NOTES RADIX 212 ALLOC IN STRIPS 62302 100 620 4 0 2 0 620 62303 36 615 54 0 3 0 615 62304 70 623 11 0 0 0 623 gSTRIP BEGIN=DIV BEGIN 62305 1 615 55 0 3 0 615 TEST STRIP END 62306 2 620 4 0 0 0 620 IS DIV END 62307 73 623 11 0 0 0 623 gNO,ALLOC FROM STRIP START 62308 613 18 0 0 0 613 MIN WASTAGE 62309 5 613 25 0 0 0 613 62310 76 623 12 0 0 0 623 INDICATOR 62307> 62304>62311 613 28 0 0 0 613 STORE NEW STRIP LENGTH 62310>62312 1 615 54 0 3 0 615 START AND END STRIP START 62313 5 615 98 0 0 0 615 NEW STRIP START 62314 613 18 0 0 0 613 62315 5 615 99 0 0 0 615 STRIP LENGTH 62316 613 25 0 0 0 613 STORE ALLOC START MIN WASTAGE OR 0 62317 1 615 54 0 3 0 615 62318 5 613 25 0 0 0 613 ALLOC START 62319 10 0 0 0 0 DUMMY 62400 PROCR 624 624 ALLOCATE CHAPS IN THIS STRIP 62401 NOTES RADIX 213 62402 126 613 26 1 1 0 613 CHAPS 0 62403 126 614 20 1 2 0 614 NEVER RUNS OUT 62404 100 613 30 0 2 0 613 BIT 1=DECODER 62424>62405 36 613 31 0 0 0 613 PATTERN=MOST FAVOURABLE ALLOC IN STRIP 62406 70 624 21 0 0 0 624 gTHIS CHAP NOT IN STRIP 62407 00 612 3 0 1 0 612 LENGTH(+-) 62408 5 615 96 1 0 0 615 62409 613 25 0 0 0 613 62410 3 615 22 0 2 0 615 CHAP START 62411 1 615 96 0 0 0 615 MODULUS OF CHAP LENGTH 62412 3 615 23 0 2 0 615 CHAP END 62413 5 613 25 0 0 0 613 NEW ALLOC START 62414 124 613 26 0 3 0 613 62415 106 28 0 0 0 R2 MODIFER=CHAP-2 62416 2 615 19 0 0 0 615 CHAPS INITIALLY 62417 72 624 26 0 0 0 624 gTHIS IS A SPECIAL CHAPTER 62418 1 615 19 0 0 0 615 62419 102 613 29 0 0 0 613 (MAX NORMAL CHAP IN STRIP)-2 62433>62420 5 612 3 0 1 0 612 CLEAR CHAP DETAILS 62406>62421 33 0 0 0 1 SHIFT DECODER BIT 62422 125 2 0 2 0 62423 125 1 0 1 0 62424 76 624 5 0 0 0 624 gNEXT CHAP 62425 76 626 2 0 0 0 626 gNOW SORT REMAINDER OF STRIP 62417>62426 612 3 0 1 0 612 SPECIAL CHAP LENGTH(ALWAYS>0) 62427 124 613 29 0 0 0 613 62428 107 615 23 0 0 0 615 STEP END OF LAST NORMAL CHAP STRIP 62429 5 615 22 0 2 0 615 CHAP 62430 613 29 0 0 0 613 62431 101 2 1 1 0 62432 5 615 23 0 2 0 615 STORE ASSOC CHAP FOR THIS SPECAIL 62433 76 624 20 0 0 0 624 gNEXT CHAP 62500 PROCR 625 625 ADJUST NO OF CHAPS 62501 NOTES RADIX 214 62600 PROCR 626 626 SORT REDUCED STRIP AVAILABILITY,TEST ALL ALLOC 62601 NOTES RADIX 215 62425>62602 124 613 26 0 3 0 613 SET MR2 62603 106 30 0 0 0 NEVER RUNS OUT 62604 124 613 26 0 3 0 613 62605 102 28 1 0 0 TEST NEW STRIP 62606 615 99 0 0 0 615 OF LENGTH ZERO 62607 71 626 17 0 0 0 626 gNO 62608 125 4098 0 3 0 62609 76 626 11 0 0 0 626 gIN CASE IT RUNS OUT 62610 10 0 0 0 0 DUMMY 62616> 62609>62611 615 56 1 2 0 615 MOVE NEXT ITEM DOWN 62612 3 615 54 1 2 0 615 62613 2 620 2 1 0 0 620 TEST END 62614 70 626 28 0 0 0 626 gYES 62615 125 2 0 2 0 STEP MR2 62616 76 626 11 0 0 0 626 gNEXT ITEM 62625> 62607>62617 615 52 1 2 0 615 FIND CORECT PLACE INSERT NEW STRIP 62618 2 615 98 1 0 0 615 IN CORRECT PLACE 62619 73 626 26 0 0 0 626 gFOUND 62620 1 615 98 1 0 0 615 62621 3 615 54 1 2 0 615 62622 2 620 2 1 0 0 620 TEST END 62623 70 626 26 0 0 0 626 gYES 62624 125 4098 0 2 0 62625 76 626 17 0 0 0 626 62623> 62619>62626 615 98 1 0 0 615 INSERT NEW ITEM 62627 5 615 54 1 2 0 615 62614>62628 0 613 21 0 0 0 613 CHARS UNALLOCATED'PATTERN 62629 71 621 2 0 0 0 621 gTRY AGAIN 62630 10 0 0 0 0 62631 5 615 18 0 0 0 615 CLEAR W/L 62700 PROCR 627 627 ALLOCATION SUCCESSFUL-CALC RELATIVE START OF SPECIAL CHAPS 62701 NOTES RADIX 216 AND STORE PARAS FOR PTS 62702 615 19 0 0 0 615 62703 4 620 9 0 0 0 620 62704 4 620 8 0 0 0 620 62705 126 615 18 1 1 0 615 R1=INIT CHAPS:0 62722>62706 126 620 8 1 3 0 620 R3=10+INIT CHAPS:INIT CHAPS 62707 106 615 23 0 1 0 615 CHAP END 62708 105 615 22 0 1 0 615 CHAP START 62709 102 613 19 0 0 0 613 =CHAP LENGTH 62720>62710 106 615 23 0 3 0 615 2X CHAP OF NEXT SPECIAL 62711 124 613 26 0 3 0 613 62712 105 26 0 0 0 -R1 MODIFIER 62713 101 2 1 2 0 62714 71 627 19 0 0 0 627 gNEXT SPEC CHAP NOT WITH THIS CHAP 62715 106 613 19 0 0 0 613 FORM SPECAL CHAPS 62716 105 615 22 0 3 0 615 RELATIVE START 62717 3 613 19 0 0 0 613 RESET CHAP END SIGN 62718 102 615 32 0 3 0 615 REL START THIS SPECIAL CHAP 62714>62719 125 2 0 3 0 STEP MR3 62720 76 627 10 0 0 0 627 gNEXT SPEC CHAP 62721 125 2 0 1 0 STEP MR1 62722 76 627 6 0 0 0 627 gNEXT CHAP 62723 106 615 13 0 3 0 615 2X CHAP OF PTS=FIRST SPECIAL CHAP 62724 70 628 2 0 0 0 628 gNO PTS 62725 103 613 19 0 0 0 613 62726 30 0 0 0 4 62727 124 613 26 0 3 0 613 STORE CH NO IN PARAMETER 45 62728 102 43 0 0 0 PARAMETER 62729 124 613 19 0 1 0 613 62730 106 615 20 0 0 0 615 FORM CHAP START 62731 104 615 22 0 3 0 615 FOR PTS 62732 124 613 19 0 0 0 613 62733 103 615 21 0 0 0 615 STORE NEW CHAP END 62734 124 613 26 0 3 0 613 STORE PTS CHAP START 62735 107 43 0 0 0 62800 PROCR 628 628 PREPARE TO CALL NEXT CHUNK 62801 NOTES RADIX 62724>62802 124 615 19 0 1 0 615 START OF SPECIAL CHAP 62803 106 615 20 0 0 0 615 CHAP 62804 3 614 20 0 0 0 614 62805 101 54 1 1 0 SP CHAP START+52 62806 124 614 21 0 3 0 614 62807 103 28 0 0 0 SET HR2 62808 124 614 21 0 3 0 614 62809 103 5 0 0 0 SET PARAS 9 62810 124 614 21 0 3 0 614 62811 102 0 0 0 0 (6)LOAD CHAP SR LINK 62812 124 614 20 0 3 0 614 62813 101 0 1 3 0 62814 124 614 21 0 3 0 614 62815 103 2 0 0 0 CHAP START PARA 62816 101 54 1 1 0 62817 124 614 21 0 3 0 614 CHUNK START PARA 62818 102 1 0 0 0 62819 10 0 0 0 0 DUMMY 62900 PROCR 629 629 PREPARE 1 OR 2 MOVES 62901 NOTES RADIX 218 X=TABLE Y=SPEC Z=1ST CHAP STARTS 62902 124 615 96 0 2 0 615 END OF ALL DATA 62903 2 614 20 0 0 0 614 SPECIAL CHAP START 62904 73 629 7 0 0 0 629 g OK PROVISIONALLY ) SPECIAL STARTS TOO 62905 101 170 1 2 0 (PROBABLY 164 OK) 62906 73 629 12 0 0 0 629 g DOUBLE MOVE NEEDED 62904>62907 124 615 96 0 2 0 615 DATA END 62908 2 615 22 0 0 0 615 CHAP 1 START 62909 73 629 32 0 0 0 629 g OK, SINGLE MOVE 62910 101 156 1 2 0 62911 72 629 32 0 0 0 629 g OK, SINGLE MOVE 62906>62912 101 250 1 3 0 ADJUST ORDERS 62913 34 620 4 0 0 0 620 62914 36 614 20 0 0 0 614 62915 101 614 6 1 2 0 614 62916 4 614 6 0 0 0 614 TO WORK IN MIDDLE 62917 4 614 9 0 0 0 614 OF SPECIAL GROUP 62918 5 629 4 0 0 0 629 62919 2 629 4 0 0 0 629 62920 4 614 7 0 0 0 614 ADJUST NEGATIVE ORDERS 62921 4 614 10 0 0 0 614 62922 4 614 13 0 0 0 614 62923 614 20 0 0 0 614 ADJUST T/E 62924 101 250 1 1 0 62925 4 614 16 0 0 0 614 62926 4 614 18 0 0 0 614 62927 124 614 6 0 2 0 614 FORM BULK COPY T/E 62928 32 0 0 0 5- 62929 101 110 1 1 0 AMOUNT OF DATA 62930 32 0 0 0 5 > MORE DETAILS YET 62931 76 614 2 0 0 0 614 62911> 62909>62932 124 614 6 0 2 0 614 ADJUST ORDERS TO 62933 4 614 16 0 0 0 614 PRODUCE 15 BIT T/E' 62934 4 614 18 0 0 0 614 62935 76 614 6 0 0 0 614 62936 100 0 0 0 0 62937 100 0 0 0 0 62938 100 0 0 0 0 62939 100 0 0 0 0 62940 100 0 0 0 0 62941 100 0 0 0 0 62942 100 0 0 0 0 62943 100 0 0 0 0 63000 PROCR 630 630 300 START OF ALLOC ROUTES 63001 NOTES RADIX FIRST LOCN=54 OF SPECIAL CHAP 63002 106 10 0 0 0 ALLOC COMMAND 63003 32 0 0 0 2- 63100 PROCR 631 631 63101 NOTES RADIX 302 63102 12 0 0 0 1 63103 71 631 8 0 0 0 631 g NO ALT RTES 63104 35 0 0 0 11 63105 37 645 8 0 0 0 645 EAR 63106 37 636 24 0 0 0 636 ORM 63107 37 638 3 0 0 0 638 FORM 1/1/1 63103>63108 101 0 1 3 0 (32) 63109 71 631 16 0 0 0 631 g MORE THAN 8 CHANNELS 63110 645 28 1 0 0 645 63111 5 645 16 1 0 0 645 63112 641 9 0 0 0 641 SET S/R FOR 63113 5 641 6 0 0 0 641 8 CHANNELS 63114 645 12 1 0 0 645 M/R CONSTANTS 63115 5 645 10 1 0 0 645 63109>63116 101 2 1 3 0 63117 32 0 0 0 10- 63118 115 10 0 0 0 63119 70 631 27 0 0 0 631 gFORWARD ALLOC 63120 645 10 1 0 0 645 RESET MRS 63121 5 645 4 1 0 0 645 63122 645 12 1 0 0 645 63123 5 645 6 1 0 0 645 63124 101 4096 1 2 0 ADJUST STEP MR 63125 4 642 7 0 0 0 642 VALUE 63126 76 631 29 0 0 0 631 gLEAVE R IN COMMENT 63119>63127 35 0 0 0 1100 63128 37 645 8 1 0 0 645 CLEAR R 63126>63129 106 11 0 0 0 63130 71 631 33 0 0 0 631 gTRIALS 63131 35 0 0 0 110000 LETE 63132 37 645 8 1 0 0 645 FOR NO TRIALS 63130>63133 106 12 1 0 0 PROG ID >SERIAL 63134 5 630 2 1 0 0 630 >WL 63135 76 635 2 0 0 0 635 63200 CONST 632 632 1 303 CONSTANTS 63202 (A)ALLOC; 63204 (D)5.7:000000; LE + NE 63206 1; 63208 16; 63210 256; 63212 4096; 63214 65536; 63300 PROCR 633 633 DUMMY PROCEDURE 970 63301 NOTES RADIX 304 63400 PROCR 634 634 EDIT TABLE 63401 NOTES RADIX 305 63402 100 635 7 0 0 0 635 63403 100 5 0 2 0 DIV NO 63404 100 635 2 0 0 0 635 63405 116 4101 0 0 0 1/0/0/5 ADDRESS IN DIVISION 63406 100 632 2 0 0 0 632 ALLOC 63407 101 5 0 0 0 63408 100 630 2 0 0 0 630 PROG ID 63409 100 53 0 0 0 63410 100 630 3 0 0 0 630 PROG SERIAL 63411 100 21 0 0 0 63412 100 0 0 0 0 (29) RUN NUMBER 63413 100 21 0 0 0 63414 100 645 8 0 0 0 645 M 63415 101 305 0 0 0 63416 100 645 8 0 0 0 645 T/N/R 63417 117 563 0 0 0 2/3/3 63500 PROCR 635 635 FORM ALLOC COMMENT 63501 NOTES RADIX 306 63135>63502 101 0 1 3 0 63503 101 1 1 2 0 63504 4 634 12 0 0 0 634 63505 124 634 6 0 2 0 634 TABLE START 63506 124 20 0 3 0 63507 128 0 1 2 0 63508 101 16 1 3 0 CHAP 1 LOCATION 63509 104 20 0 0 0 63510 5 633 14 0 0 0 633 63511 126 16 1 1 0 CHAPS:0 63529>63512 100 645 14 0 3 0 645 63513 106 20 0 1 0 BREAK UP CHAP 63514 32 0 0 0 4- START INTO 63515 33 0 0 0 3 DIV NO AND 63516 5 635 7 0 0 0 635 START WITHIN DIV 63517 33 0 0 0 13 63518 5 635 2 0 0 0 635 63519 124 632 6 0 2 0 632 CONVERT CHAP START 63520 112 635 2 0 0 0 635 TO DECIMAL 63521 102 635 2 0 0 0 635 W/L 63522 124 634 2 0 2 0 634 63523 124 633 14 0 3 0 633 DEST IN CHAP 1 63524 128 0 1 2 0 EDIT CHAP START 63525 100 632 4 0 3 0 632 RESET BINARY 63526 101 4 1 3 0 63527 4 633 14 0 0 0 633 63528 125 2 0 1 0 63529 76 635 12 0 0 0 635 gNEXT CHAP 63530 101 7805 1 3 0 TRANSFER L/E 63531 124 20 0 3 0 AND N/E TO 63532 103 14 1 0 0 63533 124 633 14 0 3 0 633 AND SECOND 63534 102 0 1 0 0 LINES 63535 124 633 6 0 2 0 633 SET UP IND MODS 63536 5 638 24 0 0 0 638 AT 15 BIT ADDRESS 63537 5 633 2 0 0 0 633 63538 124 633 18 0 2 0 633 63539 5 642 8 0 0 0 642 63540 80 641 2 0 0 0 641 SET ASL'S POSITIVE S/R 63541 124 20 0 2 0 COPY 30 LOCNS FROM START OF CHAP 1 63542 104 17 0 0 0 63543 32 0 0 0 5- 63544 101 30 1 1 0 63545 32 0 0 0 5 63546 128 633 20 0 0 0 633 BULK COPY SPEC CHAPS 63547 106 11 0 0 0 TRIALS ALLOC' IND 63548 70 635 53 0 0 0 635 gNO 63549 10 0 0 0 0 (28)PTS IN MASTER? 63550 70 635 53 0 0 0 635 gYES 63551 10 0 0 0 0 (26)PTS PRINTS ON-LINE? 63552 71 635 55 0 0 0 635 gYES(ALLOW SEARCH) 63550> 63548>63553 635 52 0 0 0 635 SET INDICATOR 63554 5 645 15 0 0 0 645 NON ZERO 63552>63555 633 23 0 0 0 633 ROUTE 19'INDICCATOR 63556 124 20 0 3 0 (2) 63557 103 122 0 0 0 SET IND IN CHAP 1 63558 70 636 2 0 0 0 636 gPRINT SR NOT NEEDED 63559 101 8191 1 3 0 63560 32 0 0 0 10- 63561 106 15 0 0 0 63562 124 17 0 1 0 LOCATION OF PRINT S/R 63563 115 18 0 0 0 63564 124 633 2 0 3 0 633 63565 102 5 0 0 0 63600 PROCR 636 636 MAIN LOOP DEAL WITH TX AND FILES 63601 NOTES RADIX 307 63558>63602 126 633 2 1 1 0 633 SET MRS 0/0 63603 101 8 1 3 0 63604 5 633 3 0 0 0 633 63605 126 633 2 1 3 0 633 SET MR3 FOR SPECIAL CHAPS 63606 106 5 0 0 0 TEST NO OF ROUTES 63860>63607 70 638 22 0 0 0 638 gNO ROUTES 63608 5 633 3 0 0 0 633 63609 126 633 2 1 2 0 633 0/NO OF ROUTES 63826>63610 124 645 3 1 2 0 645 FORM INDIRECT 63611 124 4 0 2 0 MODIFIER FOR 63612 3 633 6 0 0 0 633 UNPACKING ALLOC 63613 101 48 1 1 0 ROUTES CD 63614 5 633 7 0 0 0 633 63615 124 633 2 0 3 0 633 63616 126 0 0 0 0 (7)>READ NEXT BLOCK 63825>63617 101 12 1 3 0 UNPACK NEXT PIECE FORM T/E 63618 30 0 0 0 5 63619 1 633 6 0 0 0 633 63620 11 0 0 0 1 63621 128 633 8 1 0 0 633 UNPACK DETAIL 63846>63622 80 640 2 0 0 0 640 FIND ASL FOR ROUTE >SEARCH ASL'S S/R 63623 125 1 0 1 0 STEP MR1 63624 101 128 1 3 0 (1/1/3 0 IF ALT ALLOC) 63625 1 633 13 0 0 0 633 REQD AND ALLOWED 63626 71 637 2 0 0 0 637 gNO ROUTES 63627 80 640 2 0 0 0 640 FIND ASL FOR ALT ROUTE >SEARCH ASL'S S/R 63628 76 637 9 0 0 0 637 gFORM FILE DETAIL 63700 PROCR 637 637 MAIN LOOP PART 2 FILE DETAILS AND COMMENT 63701 NOTES RADIX 308 63626>63702 633 9 0 0 0 633 TEST PSEUDO RTE 63703 02 645 2 0 0 0 645 63704 71 637 7 0 0 0 637 gNO 63705 103 34 0 1 0 CLEAR TOP HALF 63706 76 638 12 0 0 0 638 gDEAL WITH TX AREAS FROM UP FILE DETAIL 63704>63707 101 128 1 3 0 (32) 63708 102 34 0 1 0 ALT ROUTE 63628>63709 35 0 0 0 11 PLACE ALT RTE 63710 115 34 0 1 0 IN Q3,4 63711 32 0 0 0 2 63712 114 33 0 1 0 63713 35 0 0 0 11 FORM COMMENT 63714 10 0 0 0 0 CLEAR A 63715 115 33 0 1 0 IN CHAPTER 1 63716 102 633 3 0 0 0 633 STORE FOR PRINTER 63717 106 633 9 0 0 0 633 IF PRINTER RTE TYPE 63718 101 4 1 2 0 63719 70 637 22 0 0 0 637 gPRINTER 63720 101 5 1 2 0 63721 71 637 24 0 0 0 637 gNOT PRINTER 63719>63722 106 633 3 0 0 0 633 STORE RTE NO 63723 103 645 15 0 0 0 645 63721>63724 106 633 3 0 0 0 633 63725 80 644 2 0 0 0 644 gCHANNEL/ROUTE S/R 63726 102 633 52 1 0 0 633 RTES 63727 124 633 6 0 3 0 633 STORE FILE IDENTITY 63728 106 0 1 0 0 63729 102 633 54 1 0 0 633 FILE IDENTITY 63730 101 3 0 1 0 63731 115 34 0 1 0 63732 80 644 2 0 0 0 644 gCHANNEL RTE S/R 63733 30 0 0 0 0 ///// DUMMY ORDER 63734 5 633 56 1 0 0 633 EDIT RTE DETAIL 63735 35 0 0 0 1111 PACK FILE IDENT 63736 106 633 54 1 0 0 633 INTO FILE DETAIL 63737 114 34 0 1 0 63738 101 0 1 1 0 DUMMY ORDER 63739 124 646 2 0 2 0 646 63740 124 633 14 0 3 0 633 63741 128 2 1 2 0 63800 PROCR 638 638 MAIN LOOP PART 3 SET UP TX AND ANNEXES 63801 NOTES RADIX 309 63802 633 13 0 0 0 633 63803 101 128 1 1 0 (1/1/1/ 0 IF ALT ALLOC) 63804 70 638 10 0 0 0 638 gALT RTES REQD 63805 10 0 0 0 65 63806 30 0 0 0 2 63807 35 0 0 0 111111 63808 124 633 14 0 3 0 633 63809 114 4 1 0 0 63804>63810 10 0 0 0 4 63811 4 633 14 0 0 0 633 63706>63812 124 633 11 0 1 0 633 63813 106 18 0 0 0 CHAP START 63814 1 633 10 0 0 0 633 ANNEXE START 63815 103 65 0 1 0 63816 12 0 0 0 2 63817 1 633 12 0 0 0 633 ANNEXE LENGTH 63818 102 66 0 1 0 63819 125 1 0 1 0 STORE LOCATION 64022>63820 125 1 0 2 0 NO OF ROUTES 63821 76 638 23 0 0 0 638 gNEXT ROUTE 63607>63822 76 638 27 0 0 0 638 *SWITCH*DO TX AREAS NEXT, OR END 63821>63823 123 12 0 0 0 *STEP BY 12=ROUTES, 6=TX AREAS* 63824 100 633 6 0 0 0 633 63825 76 636 17 0 0 0 636 gUNPACK NEXT PIECE 63826 76 636 10 0 0 0 636 gREAD NEXT BLOCK 63822>63827 633 21 0 0 0 633 TEST RTE 7 REQUIRED 63828 70 638 47 0 0 0 638 gNO 63829 645 16 1 0 0 645 SYNTHETIC ALLOC DETAILS FOR PTS ROUTE 63830 102 34 1 1 0 STORE LOCATION 63831 102 66 1 1 0 CLEAR ASL START/END 63832 125 2 0 1 0 63833 645 15 0 0 0 645 63834 71 638 61 0 0 0 638 gPRINTER FOUND 63835 106 14 0 0 0 SET UP PRINTER ROUTE TYPE 63836 11 0 0 0 9 63837 3 633 9 0 0 0 633 63838 5 633 13 0 0 0 633 AND ALT ROUTE DETAIL 63839 10 0 0 0 1 STEP 63840 107 5 0 0 0 63841 125 4097 0 2 0 PREPARE TO ENTER MAIN LOOP AGAIN 63842 124 646 8 0 2 0 646 ADDRESS OF CONST 'PTS' 63843 5 633 6 0 0 0 633 63844 638 65 0 0 0 638 ARRANGE EXIT AFTER 63845 5 638 22 0 0 0 638 ALLOCATING ROUTES 63846 76 636 22 0 0 0 636 g 63863> 63828>63847 10 0 0 0 6 PREPARE FOR TX AREAS 63848 4 638 23 0 0 0 638 CHANGE STEP ACTION 63849 101 12 1 2 0 63850 4 636 17 0 0 0 636 CHANGE UNPACK ACTION 63851 11 0 0 0 4 63852 4 636 21 0 0 0 636 CHANGE END SEQUENCE ADDRESS 63853 638 64 0 0 0 638 63854 5 638 22 0 0 0 638 SET UP PSEUDO ROUTE 63855 645 2 0 0 0 645 SET UP PSEUDO 63856 3 633 9 0 0 0 633 ROUTE AND ALT ROUTE 63857 5 633 13 0 0 0 633 DUMMY 63858 10 0 0 0 0 63859 106 6 0 0 0 63860 76 636 7 0 0 0 636 gTX AREAS 63865> 63834>63861 10 0 0 0 1 63862 107 5 0 0 0 63863 76 638 47 0 0 0 638 gPREPARE FOR TX'S 63864 76 639 2 0 0 0 639 gAFTER FINISHING TX'S 63865 76 638 61 0 0 0 638 63900 PROCR 639 639 END ROUTINE 63901 NOTES RADIX 310 63864>63902 106 5 0 0 0 FORM 2*(TX+FILES) 63903 104 6 0 0 0 63904 30 0 0 0 5 63905 70 640 67 0 0 0 640 gREJECT D 63906 103 18 1 0 0 63907 107 18 1 0 0 63908 124 98 0 2 0 63909 124 633 2 0 3 0 633 63910 103 28 1 0 0 R2 63911 124 633 2 0 3 0 633 (6)SR LINK 63912 103 0 0 0 0 63913 101 44 1 3 0 63914 124 633 2 0 3 0 633 63915 107 1 0 0 0 (3)STEP PARA 1 63916 10 0 0 0 1.1. 63917 124 633 14 0 3 0 633 63918 102 2 1 0 0 63919 101 0 1 3 0 (3)PARA TABLE START 63920 124 633 2 0 3 0 633 63921 124 1 1 0 0 (6)>LOAD NEXT CHAPTER 64000 PROCR 640 640 SEARCH ASL'S ALLOWING FOR FUNNY ROUTE TYPES 64001 NOTES RADIX 311 64002 81 640 2 0 0 0 640 64003 00 642 13 0 0 0 642 PREPARE FOR SEARCH 64004 05 642 5 0 0 0 642 ASL'S S/R 64005 00 633 11 0 0 0 633 TEST RTE TYPE 19 64006 72 640 31 0 0 0 640 gNO 64007 633 9 0 0 0 633 TEST PSEUDO ROUTE 64008 2 645 2 0 0 0 645 64009 70 640 13 0 0 0 640 64010 106 14 0 0 0 SET UP PRINTER RTE 64011 101 9 1 1 0 TYPE 64012 5 633 9 0 0 0 633 64016> 64009>64013 633 22 0 3 0 633 64014 71 640 23 0 0 0 640 CHAP DETAILS 64015 125 2 0 3 0 64016 76 640 13 0 0 0 640 64017 125 4098 0 3 0 NO MORE TX'S 64018 101 1 1 2 0 64019 102 34 1 1 0 64020 102 66 1 1 0 64021 125 2 0 1 0 64022 76 638 20 0 0 0 638 64014>64023 5 633 12 0 0 0 633 LENGTH 64024 633 23 0 3 0 633 64025 5 633 11 0 0 0 633 CHAP 64026 633 32 0 3 0 633 64027 5 633 10 0 0 0 633 ANNEXE START 64028 125 2 0 3 0 64029 76 640 51 0 0 0 640 gTRY AND ALLOC 64030 76 640 51 0 0 0 640 64006>64031 106 633 9 0 0 0 633 64032 101 14 1 2 0 TEST RTE TYPE 14 64033 71 640 37 0 0 0 640 gNO 64034 106 14 0 0 0 SET UP PRINTER 64035 101 9 1 1 0 RTE TYPE OF 64036 5 633 9 0 0 0 633 MACHINE 64033>64037 633 9 0 0 0 633 TEST RTE TYPE 15 64038 101 15 1 2 0 64039 71 640 54 0 0 0 640 gNO 64040 101 5 1 3 0 (33)PREFERRED ROUTE 5/6 64041 03 633 9 0 0 0 633 64042 103 15 0 0 0 STORE RTE TYPE 64043 12 0 0 0 5 STOP ALT ROUTE 64044 70 640 46 0 0 0 640 IF RTE TYPE 6 64045 05 633 13 0 0 0 633 64044>64046 80 641 2 0 0 0 641 gSEARCH ASL'S S/R 64047 101 6 1 3 0 TRY OTHER RTE 64048 101 0 1 2 0 (33)0/1 64049 03 633 9 0 0 0 633 64050 103 15 0 0 0 STORE RTE TYPE 64030> 64029>64051 12 0 0 0 5 STOP ALT RTE 64052 70 640 54 0 0 0 640 IF RTE TYPE 6 64053 05 633 13 0 0 0 633 64052> 64039>64054 80 641 2 0 0 0 641 SEARCH ASL'S 64055 633 9 0 0 0 633 TEST RTE TYPES 7,8,11 64056 80 643 2 0 0 0 643 gTEST S/R 64057 71 640 61 0 0 0 640 gNO 64058 642 12 0 0 0 642 SEARCH FOR 7,8,11 64059 5 642 5 0 0 0 642 64060 80 641 2 0 0 0 641 gSEARCH ASL'S S/R 64057>64061 633 9 0 0 0 633 TEST PSEUDO ROOT 64062 2 645 2 0 0 0 645 64063 71 640 67 0 0 0 640 gNO 64064 642 11 0 0 0 642 SEARCH ALL ASL'S 64065 5 642 5 0 0 0 642 64066 80 641 2 0 0 0 641 gSEARCH ASL'S 64063> 63905>64067 642 14 0 0 0 642 64068 5 642 5 0 0 0 642 64069 80 641 2 0 0 0 641 64070 10 0 0 0 54 'D' 64071 124 633 2 0 3 0 633 64072 124 0 1 0 0 (14)>REJECT ALLOCATION 64206>64073 124 633 18 0 3 0 633 SETUP DETAIL 64074 106 0 0 0 0 64075 2 645 2 0 0 0 645 STORE RTE TYPE 0 64076 70 640 78 0 0 0 640 IF A PSEUDO ROUTE 64077 1 645 2 0 0 0 645 RTE TYPE 64076>64078 30 0 0 0 4 IN QS 64079 1 633 18 0 0 0 633 RTE NO IN Q1,2 64080 101 64 1 2 0 64081 102 34 0 1 0 64082 124 633 18 0 3 0 633 SET ASL NEGATIVE 64083 105 0 0 0 0 64084 124 633 18 0 3 0 633 64085 102 0 0 0 0 64086 82 640 2 0 0 0 640 64100 PROCR 641 641 SEARCH ASL'S S/R 64101 NOTES RADIX 312 64102 81 641 2 0 0 0 641 64103 645 4 1 0 0 645 SET UP INDIRECT 64104 5 633 18 1 0 0 633 MODIFIER 64-128 64105 80 642 2 0 0 0 642 gSEARCH ASL'S 64106 645 6 1 0 0 645 SET UP INDIRECT 64107 5 633 18 1 0 0 633 MODIFIER 192-240 64108 80 642 2 0 0 0 642 gSEARCH ASL'S 64109 82 641 2 0 0 0 641 64200 PROCR 642 642 SEARCH ASL'S S/R 64201 NOTES RADIX 313 64202 81 642 2 0 0 0 642 64209>64203 124 633 18 0 3 0 633 SELECT ASL 64204 106 0 0 0 0 64205 76 642 15 0 0 0 642 *****SWITCH ORDER 64206 70 640 73 0 0 0 640 gFOUND 64215> 64220>64207 123 1 0 0 0 STEP IND MOD 64208 100 633 18 0 0 0 633 64209 76 642 3 0 0 0 642 64210 82 642 2 0 0 0 642 gLEAVE S/R 64211 30 0 0 0 1- TEST RTE TYPES <15 64212 80 643 2 0 0 0 643 TEST 7,8,11 64213 2 633 9 0 0 0 633 TEST REQUIRED TYPE 64214 76 642 15 0 0 0 642 64214> 64205>64215 72 642 7 0 0 0 642 MAKE ASL POSITIVE 64216 5 633 54 0 0 0 633 IF NEGATIVE 64217 2 633 54 0 0 0 633 64218 124 633 18 0 3 0 633 64219 102 0 0 0 0 64220 76 642 7 0 0 0 642 gNEXT ASL 64300 PROCR 643 643 TEST 7,8,11 S/R 64301 NOTES RADIX 314 64302 81 643 2 0 0 0 643 64303 12 0 0 0 7 TEST 7,8,11 S/R 64304 70 643 8 0 0 0 643 gYES 64305 12 0 0 0 1 TEST 8 64306 70 643 8 0 0 0 643 gYES 64307 12 0 0 0 3 TEST 11 64306> 64304>64308 82 643 2 0 0 0 643 LEAVE S/R 64400 PROCR 644 644 CHANNEL/ROUTE S/R 64401 NOTES RADIX 315 64402 81 644 2 0 0 0 644 64403 32 0 0 0 1- DIVIDE BY 8 64404 33 0 0 0 1 64405 101 10 1 2 0 CONVERT CHANNEL 64406 73 644 8 0 0 0 644 BINARY>DECIMAL 64407 101 6 1 1 0 64406>64408 101 10 1 1 0 64409 118 1 0 3 0 SPLIT UP CHANNEL 64410 33 0 0 0 3 AND ROUTE 64411 82 644 2 0 0 0 644 gLEAVE S/R 64500 CONST 645 645 0 316 MAIN LOOP CONSTANTS 64502 (D)££££; 64503 (B)64-; 64504 64; 64505 128; 64506 192; 64507 240; 64508 (D)36965; ' MTRN' 64509 647; 64510 (B)240; 64511 192; 64512 128; 64513 64; 64514 (D)66666; 64515 ; 64516 74000; (24)SYNTHETIC ALLOC DETAILS FOR PROG TAP 64517 70740-; 64518 ; 64519 ; 64520 ; 64521 ; 64522 ; 64523 ; 64524 ; 64525 ; 64526 ; 64527 ; 64528 78000; 64529 70780-; (24)SYNTHETIC ALLOC DETAILS FOR PROG TAP 64600 PROCR 646 646 MORE EDIT TABLES IN DISGUISE 64602 100 633 54 0 0 0 633 FILE IDENTITY 64603 101 515 0 0 0 2/0/3 64604 100 633 52 0 0 0 633 RTE NO 64605 100 4627 0 0 0 1/2/1/3 64606 100 633 56 0 0 0 633 ALT RTE 64607 116 4611 0 0 0 1/2/0/3 64608 107 4978 0 3 0 )CONST 'PTS' 64609 100 6 0 0 0 ) 64700 PROCR 647 647 DUMMY PROCEDURE 64701 NOTES RADIX 401 64800 PROCR 648 648 ALLOC TAG/FP/MG 64801 NOTES RADIX 402 FIRST LOCN=98 OF SPECIAL CHAPTER 64802 35 0 0 0 0 CLEAR B 64803 124 20 0 1 0 (2) 64804 101 0 1 3 0 13-BIT START CHAP 1 64805 4 655 19 0 0 0 655 GET ADDRESS CORRECT 64806 4 656 53 0 0 0 656 65641>64807 5 648 2 0 0 0 648 WL 64808 2 648 2 0 0 0 648 64809 4 655 17 0 0 0 655 64810 4 655 20 0 0 0 655 64811 4 655 22 0 0 0 655 64812 4 656 51 0 0 0 656 64813 4 656 54 0 0 0 656 64814 4 656 56 0 0 0 656 64815 10 0 0 0 0 DUMMY 64816 101 2 1 3 0 (4)TEST>5 TAGS 64817 101 0 1 2 0 (29) 64818 70 648 22 0 0 0 648 gNO 64819 124 657 2 0 3 0 657 SELECT AND SHIFT 64820 106 1 0 0 0 LAST 5 TAGS 64821 30 0 0 0 5 64818>64822 124 657 2 0 3 0 657 FORMER TAG AVAILABILITY 64823 104 0 0 0 0 64824 05 657 18 1 0 0 657 64825 106 9 0 0 0 FORM INITIAL ENTRY 64826 104 9 0 0 0 POINT 64827 107 648 28 0 0 0 648 =INITIAL CHAP 64828 106 18 0 0 0 START+RELATIVE 64829 104 8 0 0 0 ENTRY POINT 64830 102 8 0 0 0 64835>64831 657 18 1 0 0 657 64832 70 648 63 0 0 0 648 gNO TAG AVAILABLE 65646>64833 32 0 0 0 1- 64834 05 657 18 1 0 0 657 64835 74 648 31 0 0 0 648 gTAG NOT FOUND YET 64836 32 0 0 0 1 65645>64837 103 10 0 0 0 ALLOC TAG 64838 657 18 1 0 0 657 RESIDUE 64839 124 10 0 0 0 ALLOC TAG 64840 118 0 0 0 0 64841 05 657 18 1 0 0 657 NEW TAG AVAILABILITY WORD 64842 106 0 0 0 0 FP WANTED 64843 70 648 48 0 0 0 648 gNO 64844 124 657 2 0 3 0 657 64845 123 128 0 3 0 A*TAG 64846 101 14 1 2 0 65643>64847 71 648 61 0 0 0 648 gNOT AVAILABLE 64843>64848 126 657 16 1 3 0 657 24:0 64849 106 1 0 0 0 MOD GROUP REQUIRED 64850 71 648 54 0 0 0 648 gYES 64851 124 20 0 3 0 START OF CHAP 1 64852 102 10 1 0 0 CLEAR M IN ALLOC COMMENT 64853 76 648 74 0 0 0 648 64860> 64850>64854 124 657 2 0 3 0 657 64855 124 30 0 3 0 R3 MODIFIER 64856 123 10 0 3 0 R2 TAG FOR EACH MOD GROUP 64857 101 14 1 2 0 64858 70 648 67 0 0 0 648 gAVAILABLE 64859 125 8 0 3 0 64860 76 648 54 0 0 0 648 64847>64861 101 0 1 3 0 64862 101 1 1 2 0 A=NO FP/MG 64832>64863 101 3 1 2 0 B=NO TAB 65216>64864 101 85 1 1 0 E=NO 90K MATCH 64865 124 657 2 0 3 0 657 (14)>REJECT ALLOCATION 64866 124 0 1 0 0 >REJECT ALLOCATION 64858>64867 124 657 2 0 3 0 657 64868 106 30 0 0 0 R3 MODIFIER 64869 31 0 0 0 1 64870 30 0 0 0 1- DIVIDE BY 8 64871 11 0 0 0 1 64872 124 20 0 3 0 START OF CH 1 64873 107 10 1 0 0 SET MOD GROUP IN ALLOC COMMENT 64853>64874 102 1 0 0 0 64875 106 10 0 0 0 AUGMENT TAG TO 64876 101 64 1 1 0 COMMENT 64877 118 6 0 0 0 64878 124 20 0 3 0 64879 107 10 1 0 0 64880 101 0 1 3 0 DUMMY 64900 PROCR 649 649 45/90K CHUNK 64901 NOTES RADIX 403 64902 106 5 0 0 0 FILES 64903 31 0 0 0 1 64904 5 657 3 0 0 0 657 2*FILES 64905 657 9 0 0 0 657 64906 70 650 2 0 0 0 650 gTHIS IS A 45K INSTALLATION 64907 124 649 10 1 1 0 649 RESET MG 3 64908 124 647 2 0 2 0 647 64909 3 657 6 0 0 0 657 FORM TABLE ENTRY 64910 101 126 1 3 0 '----BE' 64911 124 657 13 1 2 0 657 -64+R FOR CONTROL DATA PSEUDOROUTE 64912 102 16 0 0 0 AS EMERGENCY STOP 64913 657 4 1 0 0 657 64914 128 647 2 1 1 0 647 CLEAR 16 LOCNS AS WORKING SPACE 64915 124 657 6 0 2 0 657 TSL FOR UNPACKING 64916 124 657 13 1 2 0 657 -64+R FOR CONTROL DATA PSEUDO-ROUTE 64917 128 0 0 3 0 65000 PROCR 650 650 45/90K CHUNK 65001 NOTES RADIX 404 REARRANGE SPEC CHAP ROUTE DETAIL 64906>65002 126 657 2 1 1 0 657 2*ROUTES:0 65209>65003 106 34 1 1 0 65004 73 652 8 0 0 0 652 gRTE 7 DETAIL 65005 101 0 1 1 0 DUMMY ORDER 65006 32 0 0 0 10- 65007 32 0 0 0 1 65008 5 657 5 0 0 0 657 ALT RTE TYPE 65009 32 0 0 0 4 65010 5 657 8 0 0 0 657 FILE IDENTITY 65011 32 0 0 0 1 65012 5 657 4 0 0 0 657 ROUTE TYPE 65013 32 0 0 0 2 65014 5 657 7 0 0 0 657 ALT ROUTE NO 65015 32 0 0 0 2 65016 5 657 6 0 0 0 657 MAIN ROUTE NO 65017 657 9 0 0 0 657 INDICATOR 65018 70 652 2 0 0 0 652 65100 PROCR 651 651 45/90K CHUNK 65101 NOTES RADIX 405 SET INDICATOR IF REQUIRED 65102 657 4 0 0 0 657 ROUTE TYPE 65103 12 0 0 0 7 65104 70 651 9 0 0 0 651 gMAG TAPE FILE 65105 12 0 0 0 1 65106 70 651 9 0 0 0 651 gMAG TAPE FILE 65107 12 0 0 0 3 65108 71 652 2 0 0 0 652 gNOT A MAG TAPE FILE 65106> 65104>65109 126 657 10 1 2 0 657 SET MR2 AT 16:0 65114>65110 647 2 1 2 0 647 65111 2 657 8 0 0 0 657 FILE IDENTITY 65112 70 651 16 0 0 0 651 gMATCH SET IND=0 FOR 45K 65113 125 2 0 2 0 65114 76 651 10 0 0 0 651 65115 101 1 1 3 0 SET IND=1 FOR 90K IF NO MATCH 65112>65116 124 657 6 0 3 0 657 ROUTE NO 65117 103 0 0 0 0 (21)SET MASTER IND 65118 32 0 0 0 1- 65119 657 7 0 0 0 657 ALT ROUTE NO 65120 101 128 1 2 0 (32) (>8 CHANNELS) 65121 70 651 26 0 0 0 651 gALT ROUTE NOT USED 65122 101 0 1 3 0 DRAIN 65123 32 0 0 0 1 65124 124 657 7 1 2 0 657 ALT ROUTE NO 65125 102 0 0 0 0 (22)SET MASTER IND 65121>65126 5 647 2 1 2 0 647 CLEAR ENTRY FROM 65200 PROCR 652 652 90K/45K CHUNK 65201 NOTES RADIX 406 65108> 65018>65202 657 5 0 0 0 657 ALT ROUTE TYPE 65203 30 0 0 0 2 65204 1 657 6 0 0 0 657 MAIN ROUTE NO 65205 30 0 0 0 2 65206 1 657 7 0 0 0 657 ALT ROUTE NO 65207 102 35 0 1 0 SECOND M OF ROUTE DETAIL 65004>65208 125 2 0 1 0 65209 76 650 3 0 0 0 650 gNEXT ROUTE 65210 657 9 0 0 0 657 65211 70 653 2 0 0 0 653 g45K INSTALLATION 65212 126 657 10 1 2 0 657 16:0 65218>65213 647 2 1 2 0 647 65214 70 652 17 0 0 0 652 65215 101 0 1 3 0 UNMATCHED ENTRY IN LIST 65216 76 648 64 0 0 0 648 gREJECT E 65214>65217 125 2 0 2 0 65218 76 652 13 0 0 0 652 65219 101 0 1 1 0 DUMMY ORDER 65300 PROCR 653 653 ARRANGE FOR SPECIAL, GP, OR NEITHER S/R 65301 NOTES RADIX 407 65211>65302 124 20 0 3 0 CHAP 1 65303 106 122 0 0 0 TEST FOR PRINTER 65304 70 653 37 0 0 0 653 gNO PRINTER 65305 124 0 0 2 0 SPECIAL CHAP DIVISION0 65306 101 0 1 2 0 65307 3 655 26 0 0 0 655 STORE AS PARA FOR 65308 5 656 60 0 0 0 656 PRINT S/R'S 65309 106 20 0 0 0 FORM AND STORE 65310 04 655 24 0 0 0 655 CHAP 1 PARA FOR 65311 04 656 58 0 0 0 656 PRINT S/RS 65312 10 0 0 0 0 65313 101 8 1 2 0 65314 30 0 0 0 4 65315 35 0 0 0 10000 65316 36 654 11 0 0 0 654 65317 70 653 19 0 0 0 653 65318 37 656 49 0 0 0 656 65317>65319 10 0 0 0 0 65320 35 0 0 0 1 65321 36 654 11 0 0 0 654 65322 101 4 1 2 0 65323 70 653 31 0 0 0 653 g 65324 124 655 2 0 2 0 655 FORM T/E FOR 65325 32 0 0 0 5- BULK COPYING 65326 101 26 1 3 0 SP PRINTER S/R 65327 32 0 0 0 5 TO CHAP 65328 124 20 0 3 0 65329 128 154 0 0 0 TO CHAP 1 65330 76 653 37 0 0 0 653 65323>65331 124 656 2 0 2 0 656 FORM T/E FOR 65332 32 0 0 0 5- BULK COPYING 65333 101 62 1 3 0 GP PRINTER S/R 65334 32 0 0 0 5 CHAP 1 65335 124 20 0 3 0 65336 128 120 0 0 0 65330> 65304>65337 102 16 0 0 0 65338 124 647 2 0 2 0 647 RESET PARA 5 65339 124 657 2 0 3 0 657 65340 102 5 0 0 0 65400 PROCR 654 654 FINAL CHUNK 65401 NOTES RADIX 408 65402 126 657 18 1 1 0 657 W/L FOR NEW TAG AVAILABILITY WORD 65403 124 98 0 2 0 65404 124 657 2 0 3 0 657 65405 103 28 1 0 0 MR2 65406 124 657 2 0 3 0 657 65407 102 0 0 0 0 (6)SET SR LINK 65408 101 0 1 3 0 PARAS TABLE START 65409 124 657 2 0 3 0 657 65410 124 1 1 0 0 (6)>SECOND ORDER 'LOAD CHAPT' SR 65411 100 0 0 0 0 (27) 65500 PROCR 655 655 SPECIAL PRINTER S/R 65501 NOTES RADIX 409 65502 100 0 0 0 0 LINK 65503 101 0 1 3 0 FORM PSUEDOROUTE IN B FOR SPECIAL PRINTE 65504 101 64 1 2 0 65505 124 647 2 0 3 0 647 S/R LINK 65506 105 2 0 0 0 65507 32 0 0 0 10- 65508 10 0 0 0 9 ROUTE TYPE 65509 30 0 0 0 5 65510 124 647 2 0 3 0 647 65511 104 1 0 0 0 PRINTER ROUTE 65512 125 4096 1 1 0 65513 124 647 11 0 3 0 647 65514 123 159 0 2 0 ENTER MASTER 65515 126 647 2 0 1 0 647 RETURN TO MAIN PROGRAM 65516 100 0 0 0 0 DUMMY 65517 124 178 0 3 0 65518 128 214 0 0 0 CLEAR SPECIAL CHAP 65519 106 176 1 0 0 65520 124 178 0 3 0 65521 128 647 2 0 0 0 647 COPY TO SPECIAL CHAP 65522 124 178 0 3 0 65523 124 204 1 0 0 >REENTER FINAL CHUNK 65524 100 154 0 0 0 ABS START THIS SR IN CHAP 1 65525 100 14 0 0 0 65526 100 0 0 0 0 SPECIAL CHAPTER 65600 PROCR 656 656 G.P. PRINTER S/R 65601 NOTES RADIX 410 65602 100 0 0 0 0 LINK 65603 124 647 2 0 3 0 647 STORE DATA 65604 124 2 1 2 0 65605 124 0 0 2 0 65606 102 647 50 0 0 0 647 65607 106 647 48 1 0 0 647 PACK COLUMNS BIT 65608 100 647 48 1 2 0 647 INTO FUNCTION 65609 124 647 50 0 3 0 647 65610 114 0 1 0 0 65611 124 647 2 0 3 0 647 FORM T/E 65612 106 4 0 0 0 65613 118 5 0 0 0 65614 124 647 2 0 3 0 647 BULK CLEAR G.P. TRANSIT 65615 124 3 1 2 0 AREA BEFORE EDIT 65616 128 0 1 1 0 65617 106 647 50 0 0 0 647 65618 124 647 2 0 3 0 647 EDIT INTO G.P. TRANSIT AREA 65619 124 3 1 2 0 65620 129 0 0 1 0 65621 102 647 50 0 0 0 647 65622 101 64 1 2 0 FORM PSEUDOROUTE IN B FOR G.P.PRINTER 65623 124 647 2 0 3 0 647 65624 105 3 0 0 0 65625 32 0 0 0 10- 65626 10 0 0 0 4 ROUTE TYPE 65627 30 0 0 0 5 65628 124 647 2 0 3 0 647 ROUTE NO 65629 104 1 0 0 0 65630 125 4096 1 1 0 65631 124 647 48 0 3 0 647 65632 123 160 0 2 0 ENTER MASTER 65633 124 647 50 0 3 0 647 65634 100 0 1 2 0 65635 10 0 0 0 2 STEP MODIFIER 65636 4 647 50 0 0 0 647 65637 33 0 0 0 2 SELECT NEXT CHARACTER 65638 10 0 0 0 0 65639 33 0 0 0 6 65640 12 0 0 0 1. TEST L/E 65641 70 648 7 0 0 0 648 gYES 65642 12 0 0 0 20 TEST B/E 65643 70 648 47 0 0 0 648 gYES 65644 10 0 0 0 0 65645 75 648 37 0 0 0 648 gNEXT CHARACTER 65646 76 648 33 0 0 0 648 gNEXT WORD 65647 126 647 2 0 1 0 647 >LEAVE 65648 100 0 0 0 0 ZERO 65649 100 0 0 0 0 FN WORD 65650 100 0 0 0 0 MODIFIER 65651 124 178 0 3 0 65652 128 214 0 0 0 CLEAR SPECIAL CHAP 65653 106 176 1 0 0 65654 124 178 0 3 0 65655 128 647 2 0 0 0 647 COPY TO SPECIAL CHAP 65656 124 178 0 3 0 65657 124 204 1 0 0 >REENTER FINAL CHUNK 65658 100 120 0 0 0 ABS START THIS SR IN CHAP 1 65659 100 48 0 0 0 65660 100 0 0 0 0 SPECIAL CHAPTER 65700 CONST 657 657 0 411 CONSTS FOR 45/90K CHUNK 65702 (D)0; ZERO 65703 0; 2*FILES 65704 0; ROUTE TYPE/BULK CLEAR T 65705 20010; ALT RTE TYPE/BULK CLEAR T 65706 0; ROUTE NO/UNPACK TABLE 65707 30000-; ALT RTE NO/UNPACK TABLE 65708 0; FILE IDENTITY 65709 0; (21)NONZERO IF 90K INSTALLATION 65710 0; 65711 10; MOD REGISTER CONSTANT 65712 40-; (24) -(64+R) FOR PROGM ROUTE 65713 40-; (23)=LOCN OF 45K ROUTES LIST 65714 0; LAST BLOCK SERIAL 65715 0; ON PROGM TAPE 65716 0; 65717 (B)24; MR 24:0 65718 0; 65719 ; W/L 65720 ; 65721 ; 65722 ; 65723 ; 65724 ; 65725 ; 65800 PROCR 658 658 SET UP PROG IN PQ 65801 NOTES RADIX 501 FIRST LOCN=98 OF SPECIAL CHAPTER 65802 124 668 2 0 3 0 668 NEW TAG AVAILABILITY 65803 106 26 1 0 0 65804 05 668 26 1 0 0 668 65805 101 2 1 2 0 ADJUST MR SETTING 65806 4 668 14 0 0 0 668 65807 4 668 15 0 0 0 668 65808 10 0 0 0 0 DUMMY ORDER 65809 106 15 0 0 0 65810 102 14 0 0 0 65811 106 2 0 0 0 PRIORITY CLASS 65812 30 0 0 0 4 Q5 65813 100 10 0 2 0 TAG T 65814 110 668 9 0 0 0 668 65815 1 668 9 0 0 0 668 48(T+1) 65816 124 668 2 0 3 0 668 65817 104 2 0 0 0 MR SWITCH START 65818 30 0 0 0 5 65819 104 12 0 0 0 PROG IDENTITY 65820 5 668 12 1 0 0 668 65821 126 668 14 1 1 0 668 SCAN PQ BACKWARDS 65822 35 0 0 0 10000 Q5 65835>65823 124 668 2 0 3 0 668 65824 115 1 0 1 0 P CLASS NEXT ENTRY 65825 2 668 16 0 0 0 668 £0000 65826 70 658 34 0 0 0 658 gSTEP R1 65827 1 668 16 0 0 0 668 £0000 65828 2 668 13 0 0 0 668 65829 73 658 38 0 0 0 658 gINSERT NOW 65830 124 668 2 0 3 0 668 65831 106 0 1 1 0 65832 124 668 2 0 3 0 668 65833 102 2 1 1 0 65826>65834 125 4098 0 1 0 2- 65835 76 658 23 0 0 0 658 65836 111 7 0 3 0 CONST>27/0/3 65837 108 7 1 0 0 CONST>24/1/0 65829>65838 125 4096 1 1 0 SET NON-INT 65839 668 12 1 0 0 668 65840 124 668 2 0 3 0 668 65841 102 2 1 1 0 65842 35 0 0 0 1111 Q1-4 65843 36 668 13 0 0 0 668 SWITCH START 65844 124 668 2 0 3 0 668 65845 103 30 1 0 0 R3 MODIFIERS 65846 4 658 36 0 0 0 658 AUG CONSTANTS 65847 4 658 37 0 0 0 658 65848 5 668 8 0 0 0 668 65849 124 668 2 0 3 0 668 START OF SWITCH ABOVE 65850 106 1 0 1 0 65851 124 668 2 0 3 0 668 65852 102 28 1 0 0 R2 MODIFIER 65853 101 4 1 2 0 65854 4 660 28 0 0 0 660 ADJUST ORDERS 65855 4 660 33 0 0 0 660 65856 04 660 20 0 0 0 660 65900 PROCR 659 659 UPDATE PREVIOUS SWITCH, FORM SWITCH ORDERS 65901 NOTES RADIX 502 65902 124 668 2 0 3 0 668 65903 126 0 0 0 0 (8)>UPDATE SWITCH 65904 10 0 0 0 0 65905 2 658 36 0 0 0 658 27/0/3>SI+7 65906 124 668 2 0 3 0 668 65907 102 20 0 2 0 IN SJ+20 OF PREVIOUS SWITCH 65908 124 668 2 0 3 0 668 65909 106 9 0 2 0 SJ+9 65910 124 668 2 0 3 0 668 65911 105 7 0 2 0 SJ+7 65912 71 659 16 0 0 0 659 gSWITCH NOT AT 2 65913 2 658 37 0 0 0 658 24/1/0>SI+7 65914 124 668 2 0 3 0 668 65915 102 7 0 2 0 TO SJ+7 65912>65916 10 0 0 0 0 65917 2 658 37 0 0 0 658 65918 124 668 2 0 3 0 668 65919 102 9 0 2 0 SET 24/1/0 IN SI+9 ALSO 66000 PROCR 660 660 PLACE CONSTANT IN SWITCH 66001 NOTES RADIX 503 66002 106 1 0 0 0 MOD GROUP 66003 31 0 0 0 13 66004 124 668 2 0 3 0 668 66005 102 29 0 3 0 SI+29 66006 106 10 0 0 0 TAG 66007 30 0 0 0 4 66008 104 8 0 0 0 ABS ENTRY 66009 124 668 2 0 3 0 668 66010 102 44 1 3 0 SET LINK CLEAR 45 66011 124 0 0 2 0 SPECIAL CHAPTER START 66012 124 668 2 0 3 0 668 66013 102 37 0 3 0 SI+37 66014 106 12 0 0 0 PROG IDENTITY 66015 124 668 2 0 3 0 668 66016 102 39 0 3 0 SI+39 66017 124 668 2 0 3 0 668 66018 102 46 1 3 0 CLEAR THIS SI+46,47 66019 124 668 2 0 3 0 668 66020 106 3 0 0 0 (29)RUN NUMBER 66021 103 15 0 0 0 TO SPEC CHAP 66022 124 668 2 0 3 0 668 66023 102 40 0 3 0 TO SI+40 66024 101 0 1 3 0 (15) 'ROUTE CLOSED' ENTRY 66025 124 668 2 0 3 0 668 66026 102 42 0 3 0 SI+42 66027 124 668 2 0 3 0 668 66028 106 1 0 0 0 MOST SIG HALF OF A 66029 30 0 0 0 3- 66030 12 0 0 0 7. 66031 70 660 35 0 0 0 660 gSET (AB)=ZERO 66032 124 668 2 0 3 0 668 66033 100 0 1 1 0 VALUES>A&B,RUBBISH>C 66034 76 660 36 0 0 0 660 66031>66035 35 0 0 0 0 AB CLEAR 66034>66036 100 668 17 0 3 0 668 SET DECIMAL 66037 124 668 2 0 3 0 668 66038 124 30 0 3 0 R3 66039 100 30 1 0 0 SET ABC INITIAL ENTRY SI+30>34 66100 PROCR 661 661 UPDATE MASTER AVAILABILITY FOR FP/MG/TAG/STORE/ROUTE 66101 NOTES RADIX 504 CLEAR ALLOC MOD REGISTERS 66102 100 668 2 0 3 0 668 BINARY 66103 106 0 0 0 0 FP IND 66104 70 661 11 0 0 0 661 gNOT USED 66105 106 10 0 0 0 PROG TAG 66106 126 668 6 1 3 0 668 6/0 66110>66107 124 668 2 0 3 0 668 ZERO 66108 123 128 1 3 0 66109 125 2 0 3 0 66110 76 661 7 0 0 0 661 66104>66111 106 1 0 0 0 MOD GROUP 66112 70 661 32 0 0 0 661 gNOT USED 66113 31 0 0 0 3 66114 5 668 5 0 0 0 668 8M 66115 106 10 0 0 0 TAG 66116 126 668 6 1 3 0 668 6/0 66120>66117 124 668 5 0 3 0 668 8M 66118 123 2 1 3 0 66119 125 2 0 3 0 66120 76 661 17 0 0 0 661 66121 106 1 0 0 0 MOD GROUP 66122 12 0 0 0 3 66123 126 668 6 1 3 0 668 6/0 66124 70 661 28 0 0 0 661 gMG3 66125 668 5 0 0 0 668 8M 66126 11 0 0 0 2 OVER 'START OF COPY OF MG3' ADDRESS 66127 5 668 4 0 0 0 668 66131> 66124>66128 124 668 4 0 3 0 668 LOCN OF MR1 OF MOD GROUP 66129 102 0 1 3 0 66130 125 2 0 3 0 66131 76 661 28 0 0 0 661 66112>66132 101 0 1 3 0 (3)FORM QTTY TO COPY 66133 101 0 1 2 0 (30) 66134 12 0 0 0 4 66135 30 0 0 0 5 66136 101 80 1 1 0 66137 104 20 0 0 0 66138 124 668 2 0 3 0 668 66139 128 0 1 1 0 (30)UPDATE STORAGE 66200 PROCR 662 662 SET ASL'S 66201 NOTES RADIX 505 66202 0 668 26 1 0 0 668 UPDATE TAG AVAILABILITY 66203 124 668 2 0 3 0 668 66204 102 0 1 0 0 66205 126 18 1 3 0 2X(R+T):0 66250>66206 35 0 0 0 11- 66207 115 34 1 3 0 ALLOC ROUTE 66208 73 662 48 0 0 0 662 gNEGATIVE IGNORE 66209 5 668 5 0 0 0 668 W/L 66210 106 10 0 0 0 TAG 66211 30 0 0 0 4 66212 104 66 0 3 0 START 66213 124 668 5 0 3 0 668 ROUTE 66214 102 64 0 0 0 66215 106 35 0 3 0 FILE ID Q1=4 66216 70 662 48 0 0 0 662 gTRANSIT AREA 66217 106 34 0 3 0 RT IN Q5 66218 30 0 0 0 4- 66219 12 0 0 0 7 TEST IF M/T 66220 70 662 25 0 0 0 662 IE RTE TYPES 66221 12 0 0 0 1 7,8,11 66222 70 662 25 0 0 0 662 66223 12 0 0 0 3 66224 71 662 29 0 0 0 662 66222> 66220>66225 124 668 5 0 3 0 668 66226 102 0 0 0 0 (16)CLEAR REEL CTR 66227 76 662 37 0 0 0 662 66228 102 0 0 0 0 (35)CLEAR BLOCK COUNTER FOR MT ROUTE 66224>66229 11 0 0 0 5 TEST CARD INPUT 66230 70 662 33 0 0 0 662 g80-COL CARDS(6) 66231 12 0 0 0 7 66232 71 662 37 0 0 0 662 gNOT 40-COL CARDS(15) 66230>66233 124 668 5 0 3 0 668 66234 106 64 0 0 0 ASL FOR EVEN ROUTE 66235 124 668 5 0 3 0 668 66236 102 65 0 0 0 COPY FOR ODD ROUTE 66232> 66227>66237 106 34 0 3 0 66238 30 0 0 0 6 ALT ROUTE Q3,4 66239 30 0 0 0 8- 66240 12 0 0 0 80 (32) 66241 70 662 48 0 0 0 662 gNOT USED 66242 11 0 0 0 80 (32) 66243 5 668 5 0 0 0 668 66244 106 10 0 0 0 TAG 66245 30 0 0 0 4 66246 124 668 5 0 3 0 668 66247 102 64 0 0 0 SET IND THAT NOT AVAILABLE 66241> 66216> 66208>66248 10 0 0 0 0 CLEAR A 66249 125 2 0 3 0 66250 76 662 6 0 0 0 662 gNEXT ROUTE 66251 5 668 12 1 0 0 668 CLEAR THIS 66252 124 668 2 0 3 0 668 66253 102 5 0 0 0 CLEAR PARAMETER 5 66254 125 0 1 2 0 DUMMY 66300 PROCR 663 663 SET UP CHAP PARAS ROUTE PARAS TX AREA PARAS 66301 NOTES RADIX 506 MOD GROUP PARAS AND SPECIAL PARAS 66302 126 668 12 1 1 0 668 CLEAR 66303 126 16 1 2 0 2XCHAPS:0 66311>66304 34 668 11 0 0 0 668 BITS 1-13 66305 106 20 0 2 0 NEXT START 66306 102 99 0 1 0 15 BIT 66307 115 20 0 2 0 66308 102 100 0 1 0 66309 125 2 0 1 0 66310 125 2 0 2 0 66311 76 663 4 0 0 0 663 gNEXT CHAP 66312 102 98 0 0 0 CLEAR PARA 0 66313 106 5 0 0 0 FILES 66314 104 5 0 0 0 66315 30 0 0 0 5 66316 124 668 2 0 3 0 668 66317 102 28 1 0 0 R2=2XROUTES:0 66318 35 0 0 0 11- 66327>66319 115 34 1 2 0 NEXT ROUTE 66320 72 663 24 0 0 0 663 PARA 66322>66321 125 2 0 2 0 END OF ROUTES 66322 76 663 21 0 0 0 663 gSTEP UP MR TO END 66323 76 663 28 0 0 0 663 gEND 66320>66324 102 99 0 1 0 66325 125 1 0 1 0 66326 125 2 0 2 0 66327 76 663 19 0 0 0 663 gNEXT ROUTE 66323>66328 106 19 0 0 0 66329 124 668 2 0 3 0 668 66330 102 29 0 0 0 ADJUST END VALUE 66331 35 0 0 0 11 66339>66332 115 34 0 2 0 TX AREA 66333 102 99 0 1 0 66334 105 99 0 1 0 66335 101 64 1 2 0 66336 102 100 0 1 0 66337 125 2 0 1 0 66338 125 2 0 2 0 66339 76 663 32 0 0 0 663 gNEXT TX AREA 66340 106 1 0 0 0 MOD GROUP 66341 31 0 0 0 3 66342 102 99 0 1 0 BM 66343 105 99 0 1 0 66344 101 2 1 2 0 66345 103 100 0 1 0 -(8M+2)=R1 66346 101 2 1 2 0 66347 103 101 0 1 0 -(8M+4)=R2 66348 101 2 1 2 0 66349 102 102 0 1 0 -(8M+6)=R3 66350 106 14 0 0 0 CONTROL DATA 66351 102 103 0 1 0 ROUTE TYPE 66352 124 668 2 1 1 0 668 MOD GROUP 0 66353 124 668 2 0 3 0 668 66354 126 0 0 0 0 (17)->REQUEST T/W 66355 124 668 2 0 3 0 668 RI MODIFIER 66356 106 26 0 0 0 66357 11 0 0 0 5 66358 102 14 0 0 0 STORE(PARAS+1)FOR PTS 66400 PROCR 664 664 TYPE DATE TIME AND ALLOC COMMENT 66401 NOTES RADIX 507 66402 12 0 0 0 2 66403 4 668 21 0 0 0 668 SET TRUE ANNEX START 66404 124 669 2 0 2 0 669 66405 124 668 21 0 3 0 668 66406 128 0 1 2 0 66407 668 20 0 0 0 668 PARA 25 66408 73 664 14 0 0 0 664 gMASTER TYPES PAGE HEADINGS ANYWAY 66409 71 664 13 0 0 0 664 gCLOCK WORKING 66410 10 0 0 0 1.1. 66411 124 668 21 0 3 0 668 66412 102 6 1 0 0 PREMATURE END 66409>66413 80 667 2 0 0 0 667 gTYPE 66408>66414 124 668 2 0 3 0 668 66415 126 0 0 0 0 (17)->REQUEST T/W 66416 101 76 1 3 0 ANNEX LENGTH 66417 30 0 0 0 5 66418 104 20 0 0 0 CHAP 1 START 66419 124 668 2 0 3 0 668 66420 128 0 1 1 0 (18)->MR T/W ANNEX 66421 124 668 2 0 3 0 668 66422 126 0 0 0 0 (19)EDIT TIME SR 66423 80 667 2 0 0 0 667 gTYPE 66500 PROCR 665 665 CLEAR STORE STACK NEW TAG 66501 NOTES RADIX 508 66502 124 668 17 1 1 0 668 SET MOD GROUP 3 66503 126 16 1 1 0 2XCHAPS:0 66529>66504 106 20 1 1 0 66505 5 668 12 1 0 0 668 START/END NEXT CHAP 66506 124 0 0 2 0 66507 2 668 12 0 0 0 668 66508 126 668 12 1 2 0 668 TAG STACKER 66509 126 668 12 1 3 0 668 CLEARER 66510 71 665 15 0 0 0 665 gNOT SPECIAL CHAP 66511 125 200 0 2 0 66512 125 500 0 3 0 66513 76 665 15 0 0 0 665 66514 76 665 23 0 0 0 665 gNONE TO CLEAR 66513> 66510>66515 125 180 0 3 0 STOP 180 CHAP 1 66516 10 0 0 0 0 66517 106 665 16 0 0 0 665 CORRECTION AFTER 66518 102 665 15 0 0 0 665 CHAP 1 66522>66519 124 668 2 0 3 0 668 66520 102 0 1 3 0 CLEAR STORE 66521 125 2 0 3 0 66522 76 665 19 0 0 0 665 66514>66523 106 10 0 0 0 TAG 66527>66524 124 668 2 0 3 0 668 66525 123 0 1 2 0 STACK AG 66526 125 2 0 2 0 66527 76 665 24 0 0 0 665 66528 125 2 0 1 0 66529 76 665 4 0 0 0 665 gNEXT CHAPTER 66530 101 0 1 3 0 (28) 66531 70 666 2 0 0 0 666 gPTS PART OF MASTER 66532 106 11 0 0 0 66533 70 666 2 0 0 0 666 gNOT TRIALS ALLOCATED 66534 124 668 2 0 3 0 668 Q5 OF PARA 43=2X CHAP CONTAINING PTS 66535 106 43 0 0 0 66536 30 0 0 0 4- 66537 4 665 39 0 0 0 665 66538 101 1500 1 3 0 ADD PTS SIZE TO CHAP 66539 107 19 0 0 0 66600 PROCR 666 666 LOAD FINAL CHUNK 66601 NOTES RADIX 509 66533> 66531>66602 668 8 0 0 0 668 SWITCH START SET RI FOR ENTRY 66603 32 0 0 0 5- TO PROGRAM 66604 124 0 0 2 0 SPECIAL CHAP START 66605 32 0 0 0 5 66606 124 668 2 0 3 0 668 66607 102 26 1 0 0 RI 66608 124 146 0 2 0 66609 124 668 2 0 3 0 668 66610 102 28 1 0 0 R2 MODIFIER 66611 101 146 1 3 0 SET PARA 1 VALUE 66612 124 668 2 0 3 0 668 13 BIT ADDRESS OF LOCN 140 66613 102 1 0 0 0 66614 101 0 1 3 0 PARA TABLE START 66615 124 668 2 0 3 0 668 66616 126 0 0 0 0 (6)->LOAD CHAP SR 66617 668 8 0 0 0 668 66618 124 214 1 0 0 66700 PROCR 667 667 TYPEWRITER S/R 66701 NOTES RADIX 511 66702 81 667 2 0 0 0 667 MOD GROUP=0 66703 124 668 2 0 3 0 668 66704 106 35 0 1 0 (SM+35) 66705 11 0 0 0 2 66706 124 668 2 0 3 0 668 66707 102 7 0 1 0 gSM+7 66708 124 667 13 0 2 0 667 66709 124 668 2 0 3 0 668 66710 102 42 0 1 0 RETURN ADDRESS 66711 124 668 2 0 3 0 668 66712 124 0 1 0 0 (20)->TYPE 66713 101 0 1 3 0 (15)ROUTE CLOSED'LINK 66714 124 668 2 0 3 0 668 66715 103 7 0 1 0 gSM+7 66716 124 668 2 0 3 0 668 66717 102 42 0 1 0 gSM+42 66718 82 667 2 0 0 0 667 66800 CONST 668 668 0 512 66802 (B)0; ZERO 66803 20; BULK COPY TE 66804 0; (10)LOCN OF (MG3) 66805 0; W/L 66806 0; MOD REGISTER 66807 6; 66808 0; W/L 66809 48; 66810 0; NEW TAG AVAILABILITY WRD 66811 8191; BITS 1-13 66812 0; LONG W/L 66813 0; 66814 ; (30)PQ START 66815 ; (29)PQ END 66816 (D)£0000; 66817 66666; DEC RADIX 66818 35.5.; 66819 517; 66820 0; (25)CLOCK PARA 66821 0; (18)T/W ASL 66822 35500; 66823 54517; 66824 0; (43)PTS START+CHAP 66825 0; 66826 0; 66827 ; 66900 PROCR 669 669 EDIT TABLE IN DISGUISE 66901 NOTES RADIX 513 66902 100 668 22 0 0 0 668 DATE 66903 103 5 0 0 0 66904 100 138 0 0 0 DAY Q5,6 66905 102 1026 0 0 0 4/0/2 66906 100 138 0 0 0 MONTH Q5,4 66907 102 1554 0 0 0 66908 100 138 0 0 0 YEAR Q1,2 66909 102 2066 0 0 0 66910 100 668 18 0 0 0 668 'AT' 66911 103 290 0 0 0 66912 100 156 0 0 0 TIME 66913 100 20 0 0 0 0/1/4 66914 100 668 18 0 0 0 668 DOUBLE LINE END 66915 119 786 0 0 0 66916 100 0 0 0 0 66917 100 0 0 0 0 66918 100 0 0 0 0 66919 100 0 0 0 0 67000 PROCR 670 670 FINAL CHUNK=LOAD PROGRAM START=LOCN 146 OF SPECIAL CHAP 67001 NOTES RADIX 601 67049>67002 128 670 6 1 1 0 670 CLEAR 150-197 OF SPECIAL CHAPTER 67003 124 670 6 0 3 0 670 67004 124 0 1 0 0 (9)>REENTER MASTER 67005 101 0 1 3 0 67006 100 0 0 0 0 T/E FOR CLEARING 67007 102 48 0 0 0 FINAL CHUNK 67023> 67204>67008 124 16 0 1 0 67009 106 20 0 0 0 NEXT CHAP START 67030>67010 124 670 6 0 3 0 670 67011 102 28 1 0 0 R2 67017>67012 124 670 6 0 3 0 670 67013 126 0 0 0 0 (7)>READ BLOCK 67014 124 671 2 1 2 0 671 -64+R 67015 106 12 1 0 0 67016 2 671 4 1 0 0 671 'CHAPT' 67017 71 670 12 0 0 0 670 gNOT AT CHAP HEADING 67018 124 98 0 2 0 PARA TABLE START 67019 124 670 6 0 3 0 670 67020 126 0 0 0 0 (6)>LOAD CHAP 67021 123 2 0 0 0 67022 100 16 0 0 0 (ABSOLUTE ADDRESS FORMED IN 603) 67023 76 670 8 0 0 0 670 gNEXT CHAPTER 67024 76 670 31 0 0 0 670 *FORMED ORDER*(1/1/3 IF PTS TO BE LOADED 67025 5 670 18 0 0 0 670 67026 101 23 1 2 0 67027 4 670 23 0 0 0 670 STEP LOOP EXIT 67028 4 671 4 0 0 0 671 (CHAPT)>(CHAP') 67029 106 200 0 0 0 67030 76 670 10 0 0 0 670 67024>67031 126 18 1 2 0 STACK GUARD WORDS 67039>67032 106 67 0 2 0 67033 70 670 38 0 0 0 670 67034 5 670 8 0 0 0 670 67035 101 15 1 3 0 67036 124 670 8 0 3 0 670 67037 123 0 1 0 0 TAG 15 GUARD WORD 67033>67038 125 2 0 2 0 67039 76 670 32 0 0 0 670 67040 671 3 0 0 0 671 24/1/0 23 67041 101 0 1 2 0 -(SWITCH START) 67042 124 670 6 0 3 0 670 67043 103 35 0 1 0 24/1/0 SI*23 IN SI*35 67044 124 670 6 0 3 0 670 67045 102 7 0 1 0 TO SI+7 67046 102 16 0 0 0 CLEAR MODIFIERS 67047 124 670 6 1 1 0 670 MG 0 67048 106 670 6 1 0 0 670 67049 76 670 2 0 0 0 670 gCLEAR AND ENTER 67100 CONST 671 671 0 602 PARA FOR LOAD CHAPTER 67102 (B)64-; (11)PROG PSEUDOROUTE 67103 (D)88017-; 67104 (D)16773; 67105 53585; 67106 ; 67107 ; 67200 PROCR 672 672 603 ARRANGE PTS LOADING LOCATION 200 OF SPECIAL CHAP 67202 100 0 0 0 0 67212>67203 128 204 1 1 0 CLEAR 204-214 OF 67204 124 670 8 1 0 0 670 SPECIAL CHAP 67255>67205 128 214 1 1 0 CLEAR 214-END OF SPECIAL CHAP 67206 106 670 7 0 0 0 670 67207 101 152 1 1 0 CLEAR FIRST 200 67208 30 0 0 0 5 OF CHAPTER 1 67209 124 20 0 3 0 67210 128 0 1 1 0 67211 106 672 14 1 0 0 672 67212 124 672 3 1 0 0 672 67213 100 0 0 0 0 67214 100 0 0 0 0 BULK CLEAR CONSTANT 67215 102 10 0 0 0 67216 107 670 41 0 0 0 670 FORM 'SUBTRACT SWITCH START' 67217 124 16 0 2 0 FORM ABS ADDRESS INDIREST MOD REGISTER 67218 5 670 22 0 0 0 670 67219 124 670 6 0 3 0 670 SET UP 64 AND 67220 106 64 0 0 0 (24)124 FOR USE 67221 102 198 0 0 0 67222 124 670 6 0 3 0 670 67223 106 124 0 0 0 67224 102 199 0 0 0 67225 106 11 0 0 0 TEST PROGRAM TRIALS ALLOCATED 67226 70 672 46 0 0 0 672 gNO 67227 101 0 1 3 0 (28)TEST PTS IN MASTER CODING 67228 70 672 46 0 0 0 672 gYES 67229 672 56 0 0 0 672 ARRANGE FOR PTS 67230 102 670 24 0 0 0 670 LOADING PROCEDURE 67231 35 0 0 0 1111 COLLATION CONST 67232 36 672 58 0 0 0 672 PTS BEGINNING AND 67233 124 670 6 0 3 0 670 SET UP PARA 2 67234 103 2 0 0 0 15 BIT START PTS 67235 102 200 0 0 0 END FOR LOADING 67236 124 200 0 3 0 SET UP PARA 1 67237 101 0 1 3 0 13 BIT START PTS 67238 124 670 6 0 3 0 670 67239 102 1 0 0 0 67240 124 20 0 3 0 PARA 47 15 BIT 67241 105 165 0 0 0 START OF PRINT S/R 67242 1 672 59 0 0 0 672 67243 101 0 1 2 0 67244 124 670 6 0 3 0 670 67245 106 47 0 0 0 67228> 67226>67246 124 20 0 3 0 TEST PRINT S/R 67247 106 122 0 0 0 REQUIRED 67248 70 672 53 0 0 0 672 gNO 67249 106 672 57 0 0 0 672 SELECT BULK CLEAR 67250 30 0 0 0 5 TABLE ENTRY 67251 124 20 0 3 0 67252 124 169 1 0 0 >ENTER 'LOAD PRINT SR' IN CHAP 1 67248>67253 106 672 57 0 0 0 672 67254 30 0 0 0 5 67255 124 672 5 1 0 0 672 >LOAD CHAPS 67256 106 670 5 0 0 0 670 67257 102 286 0 0 0 67258 100 0 0 0 0 43 67259 126 0 0 1 0 67300 CONST 673 673 0 FIRST LEVEL PARAS FOR UNLOADER 67302 (B5)7(B3)1(B3)1(B3)1(B6)9; 101/1 START OF PG 67303 1,1,0,1,15; START OF 2ND ST TB 67304 1,1,1,1,54; 67305 1,0,1,0,9; 67306 0,1,0,0,9; 67307 0,1,1,1,9; 67308 0,1,1,0,9; 67309 1,0,0,1,54; 67310 0,1,1,0,0; 67311 1,7,1,0,8; REJ ALLOC COMM 67312 1,7,1,1,9; LOAD NEXT CHAP 67313 3,3,1,7,1; 102/5 LOAD NEXT CHAP 67314 0,1,1,0,9; 67315 0,1,0,1,15; UPDATE SWITCH S/R 67316 1,0,1,1,1; 67317 0,0,1,0,1; 67318 1,0,1,0,9; 67319 0,1,0,0,9; 67320 0,1,0,1,1; 67321 4,1,0,1,0; 67322 1,1,1,0,8; 67323 0,1,1,0,1; 103/1 67324 0,0,0,1,55; CD RTE TYPE 67325 1,7,6,1,0; 67326 0,1,0,1,9; 67327 1,1,0,1,57; USE OF ASS TABLE 67328 1,1,1,7,0; USE OF ASS TABLE 67329 1,0,1,7,1; USE OF ASS TABLE 67330 1,0,1,0,9; 104/1 67331 0,1,0,0,9; 67332 1,1,1,0,9; 67333 0,1,0,0,15; 105/6 67334 1,1,1,1,9; 67335 1,1,1,1,54; 67336 1,0,1,1,9; 106/3 67337 1,1,1,1,9; 67338 1,1,1,1,1; 67339 1,1,1,1,1; 67340 1,0,1,1,8; 67341 1,0,1,1,1; 67342 1,1,1,0,9; 107/3 67343 1,1,1,1,9; 67344 1,0,1,1,9; 67345 1,0,0,1,1; 67346 7,0,1,1,9; XXX COMMENT 67347 0,1,1,0,1; 67348 1,0,1,0,63; 108/5 STRT OF STRE TB 67349 7,3,7,7,63; PRTY AND STR TAB STRT 67350 0,0,7,3,0; STORE TAB START 67351 0,0,0,0,56; 67352 7,0,0,0,0; 67353 7,6,6,6,54; 67400 CONST 674 674 0 FIRST LEVEL PARAS FOR ALLO STORAGE 67402 (B5)7(B3)1(B3)0(B3)6(B6)1; 202/1 67403 0,1,1,6,63; 67404 1,1,6,6,54; 67405 1,7,1,0,0; READ NEXT BLOCK S/R 67406 0,0,0,0,0; 67407 0,0,0,0,0; 67408 1,0,1,0,9; 203/1 67409 0,1,1,0,25; 67410 7,0,0,0,0; LOAD NEXT CHAP S/R 67411 0,0,7,0,8; 204/3 205/5 RTE 0 PSDO RT 67412 0,0,0,1,8; 67413 0,0,0,1,9; 67414 5,0,0,1,1; 67415 1,7,1,1,9; 67416 0,1,1,1,9; 67417 1,1,1,1,9; 67418 6,3,1,6,54; 67419 0,1,3,0,9; 67420 0,1,1,1,9; 206/6 67421 1,1,1,0,9; 67422 1,1,7,1,57; 67423 1,1,1,1,1; 67424 1,1,1,0,9; 67425 1,1,1,1,9; 67426 1,1,1,1,9; 67427 1,1,1,0,8; 67428 0,1,1,1,1; 67429 0,6,6,6,54; 67430 0,0,1,1,9; 67431 0,1,6,1,1; 67432 1,1,1,1,9; 67433 1,1,1,1,9; 67434 1,0,0,1,1; 67435 1,1,1,1,8; 207/2 67436 1,1,1,1,9; 67437 1,0,0,1,9; 67438 1,6,6,6,54; 67439 0,1,0,0,9; 67440 0,1,0,0,9; 67441 0,0,7,1,9; 67442 1,0,0,1,1; 208/2 67443 0,0,1,1,9; 67444 0,1,0,6,0; 209/5 67445 0,0,0,0,0; 67446 0,0,1,1,9; 210/3 67447 1,1,1,1,54; 67448 1,0,1,7,8; REJECT ALLO COMM 67449 1,0,0,1,9; 67450 1,0,6,6,54; 67451 1,0,1,1,8; 67452 6,6,0,1,1; 67453 6,6,6,6,54; 67454 1,1,0,1,9; 211/3 67455 1,1,1,0,9; 67456 0,1,1,1,9; 67457 1,1,1,1,8; 67458 1,1,1,6,9; 67459 1,1,0,1,9; 67460 1,1,0,0,1; 67461 1,1,1,1,9; 67462 1,1,0,1,9; 67463 1,0,1,1,9; 67464 1,1,1,1,9; 67465 0,6,1,1,9; 212/3 67466 1,1,1,1,9; 67467 1,1,1,1,9; 67468 1,0,6,6,54; 67469 6,1,1,1,9; 213/2 67470 1,1,1,1,9; 67471 1,1,0,1,9; 67472 1,1,0,0,1; 67473 1,1,1,1,9; 67474 0,1,1,1,1; 214/4 215/4 67475 0,1,1,0,8; 67476 1,1,1,1,6; 67477 1,1,1,1,9; 67478 1,1,0,1,9; 67479 1,1,0,1,9; 216/5 67480 1,1,1,1,9; 67481 1,1,0,0,9; 67482 1,1,1,0,8; 67483 1,1,1,1,1; 67484 3,1,1,1,9; 67485 1,3,6,6,9; 217/5 67486 1,0,1,0,11; 67487 1,7,1,0,11; LOAD CHAP S/R 67488 0,1,3,0,54; 67489 1,1,1,0,9; 218/1 67490 1,1,0,1,1; 67491 1,6,6,6,54; 67492 1,1,1,1,9; 67493 1,1,1,0,9; 67494 1,0,0,0,9; 67495 1,1,1,0,0; 67496 0,0,0,0,6; 67497 7,6,6,6,54; 67500 CONST 675 675 0 FIRST LEVEL PARAS FOR ALLOC 67502 (B5)2(B3)0(B3)0(B3)1(B6)1; 301/0 302/3 67503 1,1,7,1,9; 67504 1,1,1,1,0; 67505 2,1,1,1,9; 67506 0,1,1,0,10; 67507 1,0,1,2,9; 67508 0,0,6,6,54; 303/1 67509 0,0,0,0,0; 67510 0,0,0,0,0; 67511 5,0,5,0,40; 304/1 67512 5,0,5,0,56; RUN NUMBER 67513 5,0,5,0,0; 306/5 67514 1,1,2,0,2; 67515 1,2,1,2,0; 67516 1,0,1,1,9; 67517 1,1,0,1,1; 67518 0,1,0,2,1; 67519 0,1,1,1,9; 67520 1,2,2,0,0; 67521 1,2,1,7,15; 67522 1,1,1,1,16; 67523 1,0,0,2,18; 67524 1,3,1,0,9; 307/3 67525 2,1,1,1,8; 67526 1,0,1,1,56; READ NEXT BLOCK 67527 6,6,6,6,1; 67528 0,1,1,0,1; 308/4 67529 1,1,1,1,9; 8 OR MORE CH 67530 2,1,7,2,2; 67531 0,2,6,6,54; 67532 0,0,2,1,8; 67533 1,0,1,1,9; 67534 1,1,1,0,8; 67535 2,1,0,1,1; 67536 2,0,1,1,54; 67537 0,1,0,1,0; 309/2 67538 0,1,0,0,9; 67539 2,1,2,0,10; 67540 0,0,1,1,1; 67541 1,1,1,1,10; 67542 2,0,1,1,16; 67543 1,1,0,2,1; 67544 1,1,1,1,1; 67545 0,1,0,1,9; 67546 1,1,1,0,54; 67547 2,1,0,2,9; 67548 1,2,2,0,10; 310/2 67549 2,2,1,0,54; 67550 1,7,0,1,24; LOAD NEXT CHAP 67551 1,0,3,1,56; 311/6 67552 1,1,1,1,9; 67553 1,2,0,1,9; 67554 0,1,0,0,18; 67555 0,1,1,1,9; 67556 1,0,1,1,8; 67557 1,2,0,1,8; 67558 1,7,1,2,1; OD RTE TYPE 67559 1,1,0,7,10; CD RTE TYPE 67560 0,1,1,1,9; 67561 1,1,1,1,9; 67562 1,1,1,1,9; 67563 1,0,1,7,8; REJ ALLOC COMM 67564 1,1,1,0,8; 67565 2,1,0,1,1; 67566 0,1,1,1,9; 312/1 67567 1,1,0,1,1; 313/3 67568 1,0,1,1,8; 67569 1,1,1,1,9; 67570 1,0,1,0,1; 314/4 67571 0,1,0,1,0; 315/5 67572 0,0,1,0,0; 67573 0,1,0,7,0; 316/3 PROG RTE NO 67574 0,0,0,0,0; 67575 0,0,0,0,56; PROG RTE NO 67576 0,0,0,0,0; 67577 0,0,0,0,56; PROG RTE NO 67578 5,0,5,0,40; 67579 0,0,7,6,54; 67600 CONST 676 676 0 FIRST LEVEL PARAS FOR ALLOC F/P TAG 67602 (B5)0(B3)2(B3)0(B3)1(B6)9; 402/1 67603 1,1,1,1,9; 67604 1,0,4,7,54; 67605 1,1,4,0,12; 67606 1,2,2,1,18; 67607 2,1,1,0,9; 67608 0,2,1,2,1; 67609 2,1,1,0,1; 67610 1,2,1,2,1; 67611 1,0,0,0,8; 67612 1,0,0,0,1; 67613 7,1,0,0,0; REJ ALLOC COMMENT 67614 2,0,2,2,0; 67615 2,0,0,2,1; 67616 1,1,1,1,8; 67617 1,0,1,1,9; 67618 0,1,2,1,54; 67619 0,0,0,1,1; 67620 0,1,0,1,1; 67621 1,1,1,0,8; 405/3 67622 1,0,1,1,9; 67623 1,0,1,0,15; 45/90K 67624 0,1,7,1,0; 67625 1,7,1,1,1; 406/4 45/90K IND 67626 0,1,2,0,9; 67627 1,1,1,1,1; 67628 0,1,0,6,54; 67629 2,0,1,2,17; 407/1 67630 1,2,1,1,0; 67631 0,0,6,6,54; 67632 1,1,1,0,1; 67633 6,0,1,1,0; 67634 0,2,0,1,8; 67635 0,0,2,0,17; 67636 1,3,6,6,54; 67637 6,6,1,2,8; 408/3 PRINT RT 67638 1,7,3,1,63; LOAD NEXT CHAP 67639 0,0,0,5,0; 409/1 67640 0,0,5,0,5; 67641 0,5,0,6,54; 67642 6,6,0,2,0; 67643 5,0,2,0,0; 67644 0,5,0,0,45; 410/1 67645 5,5,0,5,6; 67646 0,5,0,0,45; 67647 0,0,5,0,40; 67648 0,0,0,5,0; 67649 5,0,5,0,5; 67650 0,0,0,0,40; 67651 5,0,5,5,40; 67652 0,0,6,6,54; 67653 0,2,0,0,40; 410 ENDS ODD'COS 409 ENDS EVEN 67654 2,0,0,0,0; 411/5 67655 0,0,0,0,7; 67656 0,0,7,7,0; 67657 0,0,0,0,0; 67658 0,0,0,0,62; 67659 1,0,1,0,9; 501/1 67700 CONST 677 677 0 FIRST LEVEL PARAS FOR SET UP PQ 67702 (B5)0(B3)6(B3)6(B3)6(B6)50; 67703 2,2,0,2,9; 67704 1,0,0,2,9; 67705 0,1,0,1,9; 67706 1,1,1,0,8; 67707 0,1,0,0,1; 67708 1,6,6,6,54; 67709 0,0,1,1,1; 67710 1,1,1,0,8; 67711 0,1,1,1,15; 502/5 UPDATE SWITCH S/R 67712 0,1,1,0,8; 67713 1,0,1,1,8; 67714 0,1,1,0,16; 503/5 67715 1,0,2,0,17; 67716 0,2,1,0,17; 67717 0,1,0,1,58; 67718 1,0,7,1,1; START OF PRIORITY TAB 67719 3,0,0,1,11; ROUTE CLOSED LINK 67720 1,0,1,1,0; 67721 1,2,1,2,9; 504/1 67722 0,0,1,2,8; 67723 1,2,1,1,0; 67724 1,2,0,1,9; 67725 0,1,1,0,1; 67726 3,7,0,0,2; 67727 1,7,1,1,34; 505/3 67728 0,2,1,1,16; 67729 2,1,0,2,10; 67730 0,0,1,0,8; 67731 1,1,7,1,56; 67732 1,0,6,6,54; 67733 1,1,0,1,2; 67734 0,0,7,1,57; 67735 2,0,1,0,0; 67736 1,1,1,3,6; 67737 1,2,1,2,18; 506/1 67738 2,0,0,1,18; 67739 2,0,1,0,2; 67740 1,0,1,6,54; 67741 1,2,0,0,10; 67742 1,0,0,2,18; 67743 0,2,0,0,10; 67744 0,2,2,0,16; 67745 2,0,2,2,17; 67746 1,7,1,0,2; REQUEST T/W S/R 67747 6,6,6,6,1; 507/5 67748 1,1,0,1,9; 67749 0,1,0,1,15; REQUEST T/W S/R 67750 0,0,2,1,57; T/W ANNEXE 67751 7,1,1,2,17; 508/3 EDIT TIME SR 67752 2,1,1,1,8; 67753 0,1,1,0,1; 67754 1,1,0,0,10; 67755 1,0,0,1,1; 67756 7,1,2,1,11; PTS IN MASTER? 67757 0,1,0,2,8; 509/5 67758 2,0,1,0,54; 67759 2,1,0,2,11; 67760 3,1,7,1,16; 510/6 LOAD CHAP S/R 67761 1,0,0,1,1; 67762 1,0,1,7,57; LOG ROUTINE/RTE CLSD LK 67763 0,1,0,1,0; 511/5 67764 0,6,6,6,54; 67765 6,6,6,6,54; 67766 7,0,0,0,0; MOD GRP 3 STORE 67767 0,0,0,0,63; PRRTY AND STRE TABS 67768 0,0,0,0,63; CLOCK IND/T/W ANNEXE 67769 0,0,7,0,0; PTS CHAP START 67770 5,0,0,0,0; 513/1 67771 0,0,5,0,0; 67772 5,0,0,0,0; 67773 7,6,6,6,54; 67800 CONST 678 678 0 FIRST LEVEL PARAS OF FINAL CHUNK 67802 (B5)1(B3)1(B3)7(B3)3(B6)0; 601/1 RETURN AFTER PLS 67803 6,2,2,1,1; 67804 7,1,0,1,10; READ NEXT BLOCK 67805 1,7,0,2,9; LOAD CHAP S/R 67806 1,0,1,1,17; 67807 2,2,1,1,1; 67808 0,0,1,1,1; 67809 0,1,0,2,9; 67810 1,7,0,0,0; 67811 0,0,2,1,17; 67812 0,0,2,0,9; 603/1 67813 0,0,0,6,54; 67814 1,2,1,1,58; 67815 1,0,2,2,15; PTS IN MASTER 67816 1,1,1,0,9; 67817 3,2,2,0,11; 67818 2,0,1,2,11; 67819 2,0,1,1,2; 67820 0,1,0,1,8; 67821 7,0,7,6,54; PTS CHAP START 67900 CONST 679 679 0 SECOND LEVEL PARAS 67902 (B8)29(B6)31(B6)14; UNLOADER 67903 6,6,8; 67904 32,32,12; 67905 12,12,31; 67906 13,63,63; 67907 30,31,31; 67908 29,30,29; 67909 30,30,30; 67910 31,62,31; 2/ALLOC STORAGE 67911 31,30,7; 67912 6,11,28; 67913 28,48,30; 67914 14,6,62; 67915 32,29,28; 1/ALLOC ROUTES 67916 26,7,63; 67917 63,63,32; 67918 6,6,33; 67919 33,14,24; 67920 24,63,63; 67921 24,62,29; 3/ALLOC F/P 67922 14,22,32; 67923 22,63,63; 67924 63,6,6; 67925 27,63,63; 67926 21,24,23; 67927 62,8,29; 2/SET UP PQ 67928 15,30,30; 67929 16,35,32; 67930 32,63,63; 67931 63,63,63; DUMMY WORD 67932 17,17,18; 67933 19,28,6; 67934 20,15,10; 67935 30,29,25; 67936 18,43,62; 67937 9,7,6; 1/LOAD CHAP 67938 11,24,28; 67939 43,62,63; 68000 PROCR 680 680 START OF PASS 4=READ/STORE PROCR START INDEX 68774> 71172>68002 152 152 2 0 0 0 152 68003 C 776 2 0 0 0 776 CALL PASS 5 68004 0 27 13 0 0 0 68005 70 680 8 0 0 0 680 gNOT 'TRAMDING' 68006 0 94 0 1 0 0 68007 5 16 2 1 0 0 68005>68008 52 5 0 0 0 0 TYPE 'PROG OUT' 68009 C 736 14 0 0 0 736 68010 0 27 12 0 0 0 68011 70 680 18 0 0 0 680 gNO PTS 68012 10 0 0 0 4+677372 '+PTS' 68013 5 5 12 1 0 0 68014 0 732 24 1 0 0 732 DOUBLE LE 68015 5 5 14 1 0 0 68016 35 0 0 0 1111 68017 37 5 10 1 0 0 68011>68018 154 5 0 0 0 0 68019 54 5 0 1 0 50 68020 0 27 13 0 0 0 68021 71 690 2 0 0 0 690 g'TRAMDING' 68022 54 26 0 1 0 1080 68023 90 0 0 8 0 68024 C 0 0 0 48 FOR PROCR STARTS 68040>68025 90 0 0 2 0 68026 C 0 0 0 144 68027 80 722 2 0 0 0 722 READ A6>SEC 9 68028 55 9 4 2 0 8 68029 C 11 0 2 0 0 68030 5 18 0 0 0 0 CLEAR CTR 68031 11 0 1 0 0 68032 32 0 0 0 2- TEST TYPE AS EXPECTED 68033 2 731 8 1 0 0 731 68034 70 680 41 0 0 0 680 gOK 68035 10 0 0 0 900000 68036 1 27 9 0 0 0 68037 91 0 0 3 0 FOR REENTRY 68038 150 0 0 0 8 68039 C 100 2 0 0 0 100 RE-ENTER PASS 0 68040 C 680 25 0 0 0 680 >READ NEXT BLOCK 68034>68041 9 0 2 0 0 68042 5 712 2 0 0 0 712 CURRENT BLOCK SERIAL WL 68065>68043 90 0 0 2 0 68044 C 0 0 0 144 68063>68045 9 4 1 2 0 68046 32 0 0 0 2- 68047 2 731 8 1 0 0 731 'TYPE' 68048 71 680 63 0 0 0 680 gSTEP R2 68049 32 0 0 0 2 68050 12 0 0 0 46 68051 70 680 63 0 0 0 680 g6=C-PROCR 68052 12 0 0 0 1 68053 70 680 63 0 0 0 680 g7=VALUES 68054 73 680 58 0 0 0 680 gTYPE 1-5 68055 12 0 0 0 8 68056 70 680 66 0 0 0 680 gEND OF PROGM 68057 76 680 63 0 0 0 680 68054>68058 9 6 2 2 0 68059 5 26 0 0 0 0 68060 9 8 2 2 0 START 68061 124 26 0 0 1 0 68062 5 26 0 0 0 0 68057> 68053> 68051> 68048>68063 94 680 45 0 2 8 680 68064 80 722 2 0 0 0 722 gREAD 68065 76 680 43 0 0 0 680 68071> 68056>68066 46 A6 4 0 0 1 68067 C 0 0 0 £££££ 68072>68068 80 722 2 0 0 0 722 gREAD 68069 712 2 0 0 0 712 68070 2 9 0 2 0 0 68071 73 680 66 0 0 0 680 gRUN BACK FURTHER 68072 71 680 68 0 0 0 680 gGET TO REQUIRED BLOCK 68073 55 94 0 1 0 100 SECTION START ADDRESSES 68074 C 26 0 1 0 0 68075 101 204 1 3 0 68076 5 26 1000 0 0 0 CONVERT TABLE START 68077 124 92 29 0 1 0 68078 26 1001 0 0 0 68079 124 92 29 0 1 0 68080 5 72 17 0 0 0 (TO PRESERVE IT IN COPY) 68081 55 72 18 0 0 0 SWITCH PROCR STARTS 68082 C 26 1002 0 0 0 68083 C 92 29 0 0 0 (CHAPS INITIALLY) 68084 124 92 29 0 1 0 68085 72 2 0 0 0 SPECIAL CHAP LENGTH 68086 5 26 1001 0 0 0 SET START OF PRINT SR 68087 5 27 7 0 0 0 CLEAR 68100 PROCR 681 681 SET UP BLOCKS FOR PTS 68102 16 2 0 0 0 PROG ID 68103 5 8 6 2 0 0 68104 16 3 0 0 0 PROG SERIAL 68105 5 8 8 2 0 0 68106 732 12 1 0 0 732 'FIEND' 68107 5 8 4 1 0 0 68108 80 727 2 0 0 0 727 WRITE'FIEND'BLOCK 68109 90 0 0 2 0 68110 C 0 0 0 48 68111 90 0 0 1 0 68112 C 0 0 0 1000 68115>68113 0 26 0 0 1 0 PROCR START INDEX 68114 80 692 2 0 0 0 692 gOUT 68115 94 681 13 0 1 1 681 68116 90 0 0 1 0 68117 C 0 0 0 14 FOR CHAPTER ENDS ETC 68120>68118 92 10 0 1 0 68119 80 692 2 0 0 0 692 gOUT 68120 94 681 18 0 1 1 681 68121 90 0 0 1 0 68122 C 0 0 0 40 FOR TRACE POINTS 68125>68123 25 2 0 1 0 68124 80 692 2 0 0 0 692 gOUT 68125 94 681 23 0 1 1 681 68126 90 0 0 1 0 68127 C 0 0 0 100 FOR SECTIONS 68130>68128 15 0 0 1 0 68129 80 692 2 0 0 0 692 gOUT 68130 94 681 28 0 1 1 681 68131 90 0 0 1 0 68132 C 0 0 0 36 FOR FILES AND TX AREAS 68135>68133 24 0 0 1 0 68134 80 692 2 0 0 0 692 gOUT 68135 94 681 33 0 1 1 681 68136 80 727 2 0 0 0 727 WRITE FINAL BLOCK 68200 PROCR 682 682 CHAPTER HEADING BLOCK - THE FIRST ONE 68202 90 0 0 1 0 68203 C 0 0 0 48 68204 10 0 0 0 1 68205 5 16 16 0 0 0 68206 52 8 4 0 0 0 68207 C 738 2 0 0 0 738 68208 80 727 2 0 0 0 727 WRITE CHAP HEADING BLOCK 68209 52 5 2 0 0 0 68210 C 738 12 0 0 0 738 68211 10 0 0 0 2 68212 3 16 16 0 0 0 68213 80 724 2 0 0 0 724 gPRINT CHAP HEADING 68214 90 0 0 2 0 68215 C 0 0 0 144 68216 76 683 3 0 0 0 683 gDEAL WITH FIRST'TYPE'BLOCK 68300 PROCR 683 683 ENTRY POINT 68301 NOTES RADIX B MAIN LOOP 68406> 68418> 68422> 68519> 69815> 70117> 70119> 70505> 70537> 70539> 70634> 70712> 70720> 70818> 70827> 70831>68302 80 721 2 0 0 0 721 gGET NEXT ITEM 68216>68303 80 728 2 0 0 0 728 68744>68304 11 0 1 0 0 68305 32 0 0 0 2- 68306 2 731 8 1 0 0 731 'TYPE' 68307 71 695 2 0 0 0 695 gSWITCH NOT A 'TYPE' UNIT 68308 32 0 0 0 2 68309 12 0 0 0 48 68310 72 686 2 0 0 0 686 (MUST BE 14=CHAP END) 68311 11 0 0 0 8 68312 84 695 2 0 0 0 695 68313 00 11 4 2 0 0 68314 05 16 23 0 0 0 SPACE CTR FOR USE WITH VALUES 68315 11 2 2 0 0 68316 80 729 2 0 0 0 729 TO DEC 68317 3 16 17 0 0 0 68318 5 733 6 0 0 0 733 STORE CURRENT PROCR 68319 62 0 0 0 0 RESET BINARY 68400 PROCR 684 684 PRINT HEADING FOR INSTRUCTIONS 68401 NOTES RADIX B MAIN LOOP 68402 85 100 2 0 0 0 100 68403 C 684 23 0 0 0 684 >PRINT 68404 C 684 5 0 0 0 684 >DON'T PRINT 68404>68405 0 11 2 2 0 0 PROCR 68406 70 683 2 0 0 0 683 gDON'T PRINT 68407 0 11 4 2 0 0 PROCR START 68408 80 729 2 0 0 0 729 TO DEC 68409 62 0 0 0 0 68410 5 16 36 0 0 0 PROCR START 68411 52 5 2 0 8 0 68412 C 738 16 0 0 0 738 68413 86 695 2 0 0 0 695 TYPE 68414 12 0 0 0 6 68415 71 684 18 0 0 0 684 68416 10 0 0 0 537354 'CTD' 68417 5 5 2 1 8 0 68415>68418 94 683 2 0 8 4 683 68419 80 724 2 0 0 0 724 gPRINT 68420 90 0 0 8 0 68421 C 0 0 0 48 68422 76 683 2 0 0 0 683 68403>68423 95 0 0 5 0 68424 5 731 38 1 0 0 731 68425 0 16 1 0 0 0 LINE PRINTED? 68426 70 684 28 0 0 0 684 gYES 68427 80 712 2 0 0 0 712 gO/P LINE 68426>68428 91 731 38 0 5 0 731 RESET R5 68429 5 16 37 0 0 0 CLEAR SUBCTR 68430 86 695 2 0 0 0 695 TEST TYPE 1 68431 12 0 0 0 1 68432 71 685 2 0 0 0 685 IF NOT GO TO 728 68433 0 731 28 1 0 0 731 SET UP'PROCEDURE' 68434 34 731 30 1 0 0 731 68435 76 685 15 0 0 0 685 68500 PROCR 685 685 PRINT OTHER HEADINGS 68501 NOTES RADIX B MAIN LOOP 68432>68502 12 0 0 0 5 68503 71 685 7 0 0 0 685 gNOT TYPE 6 68504 10 0 0 0 5366657354 'CONTD' 68512>68505 5 5 2 1 0 0 68506 76 685 18 0 0 0 685 gPRINT 68503>68507 12 0 0 0 1 68508 71 685 13 0 0 0 685 gNOT TYPE 7 68509 90 0 0 8 0 (FOR SPECIAL PRINTING) 68510 C 0 0 0 40 68511 10 0 0 0 7551637455 'VALUE' 68512 76 685 5 0 0 0 685 68508>68513 0 731 32 1 0 0 731 68514 34 731 34 1 0 0 731 68435>68515 100 16 18 1 0 0 68516 52 5 2 0 0 0 68517 C 738 42 0 0 0 738 HEADING BLOCK 68506>68518 80 724 2 0 0 0 724 68519 76 683 2 0 0 0 683 68600 PROCR 686 686 CHAPTER END 68601 NOTES RADIX B MAIN LOOP 68610> 68310>68602 80 721 2 0 0 0 721 GET NEXT ITEM 68603 80 728 2 0 0 0 728 68604 11 0 1 0 0 68605 2 731 20 1 0 0 731 BEW 68606 70 721 4 0 0 0 721 gREAD BLOCK, SR LINK STILL SET 68607 11 0 1 0 0 68608 30 0 0 0 2- 68609 2 731 8 1 0 0 731 'TYPE' 68610 71 686 2 0 0 0 686 gLOOP 68904> 68955>68611 735 10 0 0 0 735 £ IN Q5 68612 5 8 4 2 1 0 =PARAMETER 68613 5 8 6 1 1 0 68614 80 727 2 0 0 0 727 gWRITE 68615 90 0 0 1 0 68616 C 0 0 0 48 68617 0 16 1 0 0 0 68618 70 687 2 0 0 0 687 68619 80 712 2 0 0 0 712 gO/P LINE 68700 PROCR 687 687 NEW CHAPTER HEADING 68701 NOTES RADIX B MAIN LOOP 68618>68702 10 0 0 0 0 68703 5 16 28 0 0 0 68704 5 16 37 0 0 0 CLEAR SERIAL SUB-CTR 68705 52 8 4 0 0 0 EDIT 68706 C 738 2 0 0 0 738 68707 0 16 16 0 0 0 68708 80 730 2 0 0 0 730 gTO BIN 68709 5 8 4 2 0 0 BIN CHAP NUMBER ON MT 68710 85 100 2 0 0 0 100 68711 C 687 16 0 0 0 687 >PRINT 68712 C 687 13 0 0 0 687 >DON'T PRINT 68712>68713 80 724 2 0 0 0 724 g PRINT PROCR START LINE 68714 90 0 0 8 0 68715 C 0 0 0 48 68711>68716 52 5 2 0 0 0 68717 C 738 12 0 0 0 738 68718 90 0 0 5 0 68719 C 0 0 0 40 68720 60 0 0 0 0 68721 10 0 0 0 1 68722 4 16 16 0 0 0 STEP CHAP NUMBER (DEC) 68723 62 0 0 0 0 68724 16 16 0 0 0 THIS CHAP (DEC) 68725 12 0 0 0 1 68726 2 92 29 0 0 0 SPECIAL CHAP (DEC) 68727 71 687 35 0 0 0 687 68728 55 732 2 1 0 6 732 'EXTRA CHAPTER' 68729 C 5 10 1 0 0 68730 101 202 1 3 0 68731 5 16 28 0 0 0 SET LINE SERIAL 68732 80 724 2 0 0 0 724 PRINT CHAP HEADING 68733 80 727 2 0 0 0 727 g WRITE CHAP HEADING 68734 76 688 2 0 0 0 688 g GENERATE SP CHAP 68727>68735 11 0 1 0 0 'TYPE (SOMETHING) ' 68736 2 731 4 1 0 0 731 'TYPE£' 68737 90 0 0 1 0 68738 C 0 0 0 0 ///// 68739 70 687 45 0 0 0 687 g END 68740 90 0 0 1 0 68741 C 0 0 0 48 68742 80 724 2 0 0 0 724 g PRINT NEW CHAP HEADING 68743 80 727 2 0 0 0 727 g WRITE NEW 68744 76 683 4 0 0 0 683 g TEST WHICH TYPE 68739>68745 27 7 0 0 0 CTR NEG ADDRESSES 68746 70 687 71 0 0 0 687 g NONE 68747 30 0 0 0 5 68748 91 0 0 3 0 68749 54 5 2 1 0 46 68750 80 724 2 0 0 0 724 68751 80 724 2 0 0 0 724 68752 80 724 2 0 0 0 724 3 BLANK LINES 68753 10 0 0 0 6955560000 'REF' 68754 5 5 4 1 0 0 68755 10 0 0 0 6769665369 'PROCR' 68756 5 5 6 1 0 0 68757 80 724 2 0 0 0 724 g HEADING 68767>68758 18 3 0 3 0 REF 68759 80 729 2 0 0 0 729 g DEC 68760 5 729 2 0 0 0 729 68761 18 2 0 3 0 DEC PROCR 68762 5 724 2 0 0 0 724 68763 62 0 0 0 0 68764 52 5 4 0 0 0 68765 C 736 10 0 0 0 736 68766 80 724 2 0 0 0 724 g PRINT 68767 94 687 58 0 3 2 687 68768 80 724 2 0 0 0 724 g BLANKS 68769 80 724 2 0 0 0 724 68770 80 724 2 0 0 0 724 69165> 68746>68771 55 26 0 1 0 1000 PROCR START INDEX FOR 08005 68772 C 18 1000 1 0 0 68773 27 12 0 0 0 68774 70 680 2 0 0 0 680 g PTS NOT NEEDED. CALL PASS 5 68775 76 711 2 0 0 0 711 68800 PROCR 688 688 GENERATE START OF SPECIAL CHAPTER 68734>68802 10 0 0 0 £00 68803 5 13 0 2 0 0 PARA 68804 101 202 1 3 0 68805 5 13 2 2 0 0 68806 80 714 2 0 0 0 714 g O/P 68807 10 0 0 0 14 20 68808 92 0 0 5 0 68809 10 0 0 0 0 68810 5 13 0 2 0 0 68811 5 13 2 2 0 0 68812 80 710 2 0 0 0 710 68813 80 710 2 0 0 0 710 O/P LOCNS 202 203 BLANK 68900 PROCR 689 689 CALCULATE CONVERT TABLE 68902 92 7 0 0 0 68903 30 0 0 0 5 68904 70 686 11 0 0 0 686 g NO TABLES 68905 91 0 0 3 0 68954>68906 99 0 1 3 0 NEXT OLD/NEW RADIX PAIR 68907 5 70 30 1 0 0 68908 95 0 0 3 0 68909 5 70 6 1 0 0 WL 68910 10 0 0 0 1 68911 5 70 8 1 0 0 FIRST TABLE ENTRY 68912 100 70 30 0 3 0 NEW RADIX 68913 12 0 0 0 1 68914 32 0 0 0 10- 68915 10 0 0 0 0 68916 32 0 0 0 10 68917 5 70 0 1 0 0 LARGEST NUMBER IN NEW RADIX 68918 100 70 31 0 3 0 OLD RADIX 68919 12 0 0 0 1 68920 62 0 0 0 0 BIN 68921 5 70 2 1 0 0 > COMPLEMENT 68922 0 70 31 0 0 0 OLD RADIX 68923 5 70 2 0 0 0 68924 34 70 2 1 0 0 (8) = 10QTTS OF OLD EXCESS CONSTS 68925 90 0 0 4 0 68926 C 0 0 0 18 CALC 9 TE'S 68943>68927 36 735 13 0 0 0 735 Q1 68928 5 70 4 0 0 0 EC Q1 - FORM 16-EC:0 68929 2 70 4 0 0 0 FOR MR 68930 11 0 0 0 10 68931 30 0 0 0 5 68932 5 70 2 1 0 0 68933 91 70 2 0 3 0 68934 100 70 30 0 3 0 SET NEW RADIX 68935 2 70 0 1 0 0 LARGEST NO IN NEW RADIX 68938>68936 1 70 8 1 4 0 68937 72 689 56 0 0 0 689 g WILL GET O'FLOW 68938 94 689 36 0 3 1 689 68939 1 70 0 1 0 0 68957>68940 5 70 10 1 4 0 STORE NEXT TE 68941 62 0 0 0 0 SET BINARY 68942 32 0 0 0 1- FOR NEXT QTT OF OLD RADIX 68943 94 689 27 0 4 2 689 68944 90 0 0 3 0 68945 C 0 0 0 20 68952>68946 0 70 8 0 3 0 68947 5 13 2 2 0 0 68948 80 710 2 0 0 0 710 68949 0 70 9 0 3 0 68950 5 13 2 2 0 0 68951 80 710 2 0 0 0 710 68952 94 689 46 0 3 2 689 68953 91 70 6 0 3 0 RESTORE R3 68954 94 689 6 0 3 2 689 >NEXT CONVERT TABLE 68955 76 686 11 0 0 0 686 gFINISH THE EXTRA CHAPTER 68937>68956 0 734 40 1 0 0 734 ALL THE £'S 68957 76 689 40 0 0 0 689 gSTORE INFINITY AS TABLE ENTRY 69000 PROCR 690 690 DIRECTORY ENTRY FROM PASS 5-DEAL WITH END OF INTERCODE*PLS 68021>69002 16 2 0 0 0 GENERATE INDEX DETAILS 69003 3 8 4 2 0 0 69004 5 8 12 2 0 0 69005 16 3 0 0 0 69006 3 8 6 2 0 0 69007 5 8 14 2 0 0 69008 10 0 0 0 2 69009 5 8 10 2 0 0 PASS 1 IDENTIFIER 69010 10 0 0 0 3 69011 5 8 18 2 0 0 PASS 3 IDENTIFIER 69012 10 0 0 0 4 69013 5 8 16 2 0 0 69014 734 40 0 0 0 734 '£££££' 69015 5 8 20 2 0 0 69016 80 727 2 0 0 0 727 gWRITE 69020> 69024>69017 80 694 2 0 0 0 694 A1-7 69018 7 4 2 0 0 TEST 'SENTINEL5' 69019 2 734 40 0 0 0 734 '£££££' 69020 71 690 17 0 0 0 690 gNO 69021 35 0 0 0 1 69022 36 7 6 2 0 0 69023 12 0 0 0 5 69024 71 690 17 0 0 0 690 gNO 69025 16 3 0 0 0 69026 5 7 10 2 0 0 PROG SERIAL 69031>69027 80 704 2 0 0 0 704 gWRITE 69028 80 694 2 0 0 0 694 gREAD 69029 7 42 1 0 0 69030 12 0 0 0 5163636653 'ALLOC' 69031 71 690 27 0 0 0 690 69032 7 12 2 0 0 CHAPS INITIALLY 69033 3 92 9 0 0 0 69034 5 92 29 0 0 0 69035 16 3 0 0 0 69036 5 7 40 2 0 0 NEW PROG SERIAL 69041>69037 80 704 2 0 0 0 704 gWRITE 69038 80 694 2 0 0 0 694 gREAD 69039 7 4 1 0 0 69040 2 732 12 1 0 0 732 'FIEND' 69041 71 690 37 0 0 0 690 gNOT YET 69042 16 3 0 0 0 69043 5 7 8 2 0 0 69044 80 704 2 0 0 0 704 69100 PROCR 691 691 STORE 08005 DATA,ALIGN FILES,COPY M/CODE PROGRAM 69102 90 0 0 2 0 TRICK 69103 C 0 0 0 2 69104 90 0 0 1 0 FOR PROCR START INDEX 69105 C 0 0 0 1000 69108>69106 80 693 2 0 0 0 693 gGET 69107 5 26 0 0 1 0 69108 94 691 6 0 1 1 691 69109 90 0 0 1 0 FOR CHAP DETAILS 69110 C 0 0 0 14 69113>69111 80 693 2 0 0 0 693 gGET 69112 5 92 10 0 1 0 69113 94 691 11 0 1 1 691 69114 90 0 0 1 0 FOR TRACE POINTS 69115 C 0 0 0 40 69118>69116 80 693 2 0 0 0 693 gGET 69117 5 25 2 0 1 0 69118 94 691 16 0 1 1 691 69119 90 0 0 1 0 FOR SECTIONS 69120 C 0 0 0 100 69123>69121 80 693 2 0 0 0 693 gGET 69122 5 15 0 0 1 0 69123 94 691 21 0 1 1 691 69124 90 0 0 1 0 FOR FILES AND TX AREAS 69125 C 0 0 0 36 69128>69126 80 693 2 0 0 0 693 gGET 69127 5 24 0 0 1 0 69128 94 691 26 0 1 1 691 69161>69129 80 694 2 0 0 0 694 gREAD A1 69130 7 12 1 0 0 69131 2 731 2 1 0 0 731 'CHAPT' 69132 70 691 58 0 0 0 691 gHEADING BLOCK 69133 7 4 1 0 0 69134 2 731 2 1 0 0 731 'CHAPT' 69135 70 691 62 0 0 0 691 gTRIAL DATA START 69136 1 731 2 1 0 0 731 69137 2 731 6 1 0 0 731 'FILES' 69138 70 691 62 0 0 0 691 gPM POINTS START 69139 1 731 6 1 0 0 731 69140 12 0 0 0 55 'E' 69141 70 691 55 0 0 0 691 gYES 69142 7 12 1 0 0 69143 12 0 0 0 535851675+ (PTS HEADING) 69144 71 691 60 0 0 0 691 gNO 69154>69145 80 694 2 0 0 0 694 (DRAIN OLD PTS PART ONE) 69146 7 4 1 0 0 69147 2 731 2 1 0 0 731 'CHAPT' 69148 70 691 62 0 0 0 691 69149 1 731 2 1 0 0 731 69150 2 731 6 1 0 0 731 'FILES' 69151 70 691 62 0 0 0 691 69152 1 731 6 1 0 0 731 69153 12 0 0 0 55 'E' 69154 71 691 45 0 0 0 691 69141>69155 5 27 3 0 0 0 SET'NO B/FWD TRIAL DATA' 69156 41 A1 0 0 0 1 CLOSE I/P 69157 76 691 64 0 0 0 691 69132>69158 16 3 0 0 0 69159 5 7 10 2 0 0 69144>69160 80 704 2 0 0 0 704 gWRITE 69161 76 691 29 0 0 0 691 69151> 69148> 69138> 69135>69162 10 0 0 0 1 69163 5 27 3 0 0 0 SET'DATA PRESENT' 69157>69164 40 A6 0 0 0 1 69165 76 687 71 0 0 0 687 69200 PROCR 692 692 WRITE PTS BLOCK TO A2 69202 81 692 2 0 0 0 692 69203 5 8 4 2 2 0 69204 94 692 8 0 2 2 692 69205 80 727 2 0 0 0 727 WRITE->A2 69206 90 0 0 2 0 69207 C 0 0 0 48 69204>69208 82 692 2 0 0 0 692 69300 PROCR 693 693 READ/STORE NEXT'FIEND'ITEM 69302 81 693 2 0 0 0 693 69303 94 693 8 0 2 2 693 69304 80 694 2 0 0 0 694 READ A1-7 69305 80 704 2 0 0 0 704 COPY 7->8->A2 69306 90 0 0 2 0 69307 C 0 0 0 48 69303>69308 7 4 2 2 0 69309 82 693 2 0 0 0 693 69400 PROCR 694 694 READ A1-7 69402 81 694 2 0 0 0 694 69403 42 A1 0 0 0 0 69404 C 7 0 0 0 0 69405 82 694 2 0 0 0 694 69500 PROCR 695 695 'TYPE'SWITCH 69501 NOTES RADIX B MAIN LOOP 68307>69502 85 695 2 0 0 0 695 69503 C 696 2 0 0 0 696 INSTRUCTIONS 69504 C 702 2 0 0 0 702 TABLE ENTRIES 69505 C 706 2 0 0 0 706 PROGRAMME CONSTS 69506 C 706 2 0 0 0 706 TABLE STARTS 69507 C 707 2 0 0 0 707 FORMED CONST 69508 C 696 2 0 0 0 696 6=C-PROCR 69509 C 708 2 0 0 0 708 7=VALUES 69600 PROCR 696 696 TEST FOR SEQUENCE CHANGE 69601 NOTES RADIX B INSTRUCTIONS 69508> 69503>69602 11 4 2 0 0 69603 32 0 0 0 2- 69604 5 16 18 0 0 0 REF 69605 33 0 0 0 1 69606 5 16 24 0 0 0 NEG ITEM IND 69607 33 0 0 0 7 69608 5 13 0 2 0 0 PARA 69609 34 11 6 2 0 0 ADM+ITEM 69610 11 2 2 0 0 TEST FOR SEQUENCE CHANGE 69611 70 697 2 0 0 0 697 gNOT SEQ CHANGE OR MR ENTRY 69612 12 0 0 0 1 69613 70 699 2 0 0 0 699 gIS SEQ CHANGE 69614 12 0 0 0 1 69615 71 696 27 0 0 0 696 gNOT ACTION 16/0/0 69616 36 735 3 0 0 0 735 BITS 1-13 69617 5 16 19 0 0 0 MODULUS OF ITEM 69618 34 16 24 0 0 0 69619 74 696 22 0 0 0 696 gPOSITIVE ITEM 69620 1 16 19 0 0 0 69621 76 696 23 0 0 0 696 69619>69622 2 16 19 0 0 0 69621>69623 124 16 18 0 1 0 REF 69624 2 26 0 0 0 0 69625 5 13 2 2 0 0 69626 76 698 12 0 0 0 698 gO/P 69615>69627 0 11 2 2 0 0 69628 5 13 0 2 0 0 COPY IND AS PARA 69700 PROCR 697 697 INSTRUCTIONS 69701 NOTES RADIX B INSTRUCTIONS 69611>69702 36 735 3 0 0 0 735 BITS 1-13 69703 5 16 19 0 0 0 MODULUS OF ITEM 69704 11 6 2 0 0 69705 5 13 2 2 0 0 69706 34 16 24 0 0 0 69707 74 697 10 0 0 0 697 gNOT NEGATIVE ITEM 69708 2 16 19 0 0 0 69709 5 16 19 0 0 0 (SET SIGN) 69707>69710 16 19 0 0 0 69711 124 16 18 0 1 0 69712 1 26 0 0 0 0 PROCR START 69713 73 698 2 0 0 0 698 gREPORT 69714 34 735 3 0 0 0 735 BITS 1-13 69715 37 13 2 2 0 0 69716 76 698 12 0 0 0 698 69800 PROCR 698 698 REPORT ACTION WITH NEGATIVE ITEM 69801 NOTES RADIX B ACTION DETAILS 69713>69802 10 0 0 0 78000- 23/1/0 ACTION FOR LOCKOUT 69803 5 13 2 2 0 0 69804 5 13 0 2 0 0 69805 91 27 7 0 3 0 CTR 69806 16 18 0 0 0 THIS REF 69807 30 0 0 0 5 69808 1 733 6 0 0 0 733 CURRENT PROCR 69809 5 18 2 1 3 0 69810 10 0 0 0 2 69811 4 27 7 0 0 0 STEP CTR 69922> 69924> 69716> 69626>69812 80 714 2 0 0 0 714 EDIT+WRITE INSTRUCTION 69813 85 100 2 0 0 0 100 69814 C 700 2 0 0 0 700 >PRINT 69815 C 683 2 0 0 0 683 >DON'T PRINT 69900 PROCR 699 699 SEQUENCE CHANGES 69901 NOTES RADIX B INSTRUCTIONS 69613>69902 0 735 15 0 0 0 735 FLIPFLOP 69903 70 699 7 0 0 0 699 BOTTOM 10 BITS 69904 0 18 0 0 12 0 69905 31 0 0 0 10- 69906 76 699 9 0 0 0 699 69903>69907 34 735 14 0 0 0 735 BITS 1-10 69908 36 18 0 0 12 0 69906>69909 124 16 18 0 1 0 ITEM WITHIN PROCR IN A 69910 1 26 0 0 0 0 69911 5 16 18 0 0 0 =SEQ CHANGE ADDRESS 69912 34 11 6 2 0 0 69913 36 735 4 0 0 0 735 BITS 14-20+SIGN 69914 73 699 17 0 0 0 699 69915 1 16 18 0 0 0 69916 76 699 18 0 0 0 699 69914>69917 2 16 18 0 0 0 69916>69918 5 13 2 2 0 0 69919 10 0 0 0 1 69920 2 735 15 0 0 0 735 69921 3 735 15 0 0 0 735 REVERSE FLIPFLOP 69922 71 698 12 0 0 0 698 gNOW ADDRESSES TOP 10 BITS 69923 94 0 0 12 1- 69924 76 698 12 0 0 0 698 gSAFETY 70000 PROCR 700 700 DECODE INSTRUCTION FOR PRINTING 70001 NOTES RADIX B INSTRUCTIONS 69814>70002 34 13 2 2 0 0 (A IS CLEAR) 70003 32 0 0 0 6 70004 5 16 21 0 0 0 ACTION 70005 33 0 0 0 1 70006 5 16 25 0 0 0 DISC 70007 33 0 0 0 2 70008 5 16 26 0 0 0 MOD 70009 33 0 0 0 13 70010 5 16 24 0 0 0 ADDRESS 70011 0 13 2 2 0 0 70012 72 701 2 0 0 0 701 gPOSITIVE ACTION 70013 10 0 0 0 10 16 70014 4 16 21 0 0 0 70100 PROCR 701 701 CONVERT FOR PRINT 70101 NOTES RADIX B INSTRUCTIONS 70012>70102 0 13 0 2 0 0 PARA 70103 80 729 2 0 0 0 729 gCONVERT TO DEC 70104 5 13 4 0 0 0 70105 0 16 24 0 0 0 ADDRESS 70106 80 729 2 0 0 0 729 TO DEC 70107 5 13 2 1 0 0 70108 0 16 21 0 0 0 ACTION 70109 80 729 2 0 0 0 729 TO DEC 70110 5 13 0 1 0 0 70111 62 0 0 0 0 RESET BINARY 70112 52 5 4 0 5 0 70113 C 739 2 0 0 0 739 70114 10 0 0 0 1 70115 4 16 37 0 0 0 AUG SUBCTR 70116 5 16 1 0 0 0 70117 94 683 2 0 5 10 683 70118 80 712 2 0 0 0 712 gO/P LINE 70119 76 683 2 0 0 0 683 70200 PROCR 702 702 FORM ADDRESS 70201 NOTES RADIX B 69504>70202 11 0 2 0 0 70203 32 0 0 0 2- SELECT REFERENCE 70204 5 16 18 0 0 0 70205 33 0 0 0 1 70206 5 16 21 0 0 0 NEW ITEM IND 70207 33 0 0 0 7 70208 3 13 0 2 0 0 70209 5 13 4 2 0 0 PARAMETER 70300 PROCR 703 703 DEAL WITH 2ND ITEM FOR CONDENSE 70301 NOTES RADIX B 70302 11 6 1 0 0 70303 5 13 6 1 0 0 STORE Q'S AND I'S 70304 11 4 2 0 0 70305 70 703 26 0 0 0 703 g NOT CONDENSE/UNPACK TABLE 70306 124 16 18 0 1 0 REF 70307 0 26 0 0 0 0 70308 35 0 0 0 1111 70309 36 11 4 2 0 0 (POSITIVE) ITEM 70310 5 16 22 0 0 0 PROVISIONAL ADDRESS 70311 0 13 6 2 0 0 Q + I 70312 72 703 15 0 0 0 703 g NORMAL 70313 2 16 22 0 0 0 70314 76 703 16 0 0 0 703 70312>70315 1 16 22 0 0 0 70314>70316 5 13 6 2 0 0 SET SECOND ADDRESS + LTE 70317 34 16 21 0 0 0 '-0' IND 70318 74 703 27 0 0 0 703 g NO, CALC FIRST ADDRESS 70319 2 13 6 2 0 0 70320 70 703 24 0 0 0 703 70321 5 13 6 2 0 0 (SET SIGN BIT) 70322 5 16 21 0 0 0 70323 76 703 27 0 0 0 703 70320>70324 5 16 21 0 0 0 CLEAR THIS 70325 0 735 8 0 0 0 735 £ IN Q4 (MINUS ZERO) 70305>70326 5 13 4 2 0 0 CLEAR PARA - FIXED FIELD 70323> 70318>70327 124 16 18 0 1 0 REF 70328 0 26 0 0 0 0 70329 1 11 2 2 0 0 FIRST ITEM (ALWAYS > 0) 70330 5 13 2 2 0 0 70331 0 16 21 0 0 0 '-0' IND 70332 70 703 35 0 0 0 703 g NO 70333 0 735 8 0 0 0 735 £ IN Q4 70334 5 13 4 2 0 0 SET SECOND PARA 70332>70335 80 714 2 0 0 0 714 g O/P MT 70336 0 13 0 2 0 0 PARA 70337 80 729 2 0 0 0 729 TO DEC 70338 5 16 22 0 0 0 70339 34 13 2 2 0 0 70340 32 0 0 0 6 DELETE B17 70341 10 0 0 0 0 (STERLING INDICATOR) 70342 32 0 0 0 4 70343 80 729 2 0 0 0 729 TO DEC 70344 5 16 30 0 0 0 70345 62 0 0 0 0 RESET BINARY 70346 35 0 0 0 10000 Q5 70347 36 13 2 2 0 0 STERLING IND 70348 4 16 22 0 0 0 STORE WITH PARA 70349 13 4 1 0 0 SET UP SECOND HALF OF 70350 5 13 0 1 0 0 DETAILS FOR 70351 13 6 1 0 0 OUTPUT 70352 5 13 2 1 0 0 70353 80 714 2 0 0 0 714 gO/P SECOND HALF 70354 76 705 2 0 0 0 705 70400 PROCR 704 704 WRITE SEC 7->A2 70402 81 704 2 0 0 0 704 70403 55 7 4 1 0 50 70404 C 8 4 1 0 0 70405 80 727 2 0 0 0 727 WRITE 8->A2 70406 82 704 2 0 0 0 704 70500 PROCR 705 705 70501 NOTES RADIX 70354>70502 35 0 0 0 1111 Q1-4 0F INDS/QTTS 70503 85 100 2 0 0 0 100 70504 C 705 6 0 0 0 705 gPRINT 70505 C 683 2 0 0 0 683 gDONT PRINT 70504>70506 36 13 2 2 0 0 70507 80 729 2 0 0 0 729 TO DEC 70508 62 0 0 0 0 ITEM FOR 70509 5 731 38 0 0 0 731 CONDENSE 70510 5 13 22 0 0 0 CLEAR'LAST TE'IND 70511 13 2 2 0 0 QTTS+INDS 70512 73 705 16 0 0 0 705 g LAST TE 70513 13 0 2 0 0 SECOND PARA 70514 30 0 0 0 3- TEST Q 4 NON-ZERO 70515 70 705 18 0 0 0 705 g NOT LTE 70512>70516 10 0 0 0 1 70517 5 13 22 0 0 0 SET LTE IND 70515>70518 90 0 0 3 0 70519 C 0 0 0 5 70520 34 13 2 2 0 0 QTTS 70521 32 0 0 0 6 70524>70522 5 13 0 0 3 0 70523 32 0 0 0 1 70524 94 705 22 0 3 1 705 STORE Q5-1 IN 13/0-4 70525 90 0 0 3 0 70526 C 0 0 0 5 70530>70527 00 13 0 0 3 0 70528 80 729 2 0 0 0 729 TO DECIMAL 70529 05 13 0 0 3 0 70530 94 705 27 0 3 1 705 70531 62 0 0 0 0 70532 52 5 4 0 5 0 70533 C 738 22 0 0 0 738 70637>70534 10 0 0 0 2 70535 4 16 37 0 0 0 AUG SUBCTR 70536 5 16 1 0 0 0 70537 94 683 2 0 5 20 683 70538 80 712 2 0 0 0 712 g O/P LINE 70539 76 683 2 0 0 0 683 70600 PROCR 706 706 70601 NOTES RADIX B DEAL WITH PROGRAMME CONSTANTS AND FORMED TSL'S 69506> 69505>70602 90 0 0 4 0 70603 C 0 0 0 8 70631>70604 11 0 2 4 0 70605 32 0 0 0 2- 70606 5 16 18 0 0 0 REF 70607 32 0 0 0 2 70608 5 13 0 2 0 0 PARA 70609 34 735 11 0 0 0 735 BIT 8 70610 36 13 0 2 0 0 70611 70 706 14 0 0 0 706 gNOT MINUS ZERO 70612 735 8 0 0 0 735 £ IN Q4 70613 5 13 0 2 0 0 70611>70614 86 695 2 0 0 0 695 70615 12 0 0 0 3 70616 71 706 22 0 0 0 706 gTABLE START 70617 0 11 2 2 4 0 PROGRAM CONST 70618 72 706 23 0 0 0 706 gPOSITIVE ITEM 70619 124 16 18 0 1 0 70620 2 26 0 0 0 0 PROCR START 70621 76 706 25 0 0 0 706 70616>70622 0 11 2 2 4 0 70618>70623 124 16 18 0 1 0 70624 1 26 0 0 0 0 70621>70625 5 13 2 2 0 0 70626 80 714 2 0 0 0 714 gO/P 70627 0 13 2 2 0 0 CONST 70628 5 13 4 0 4 0 STORE FOR PRINT 70629 0 13 0 2 0 0 PARA 70630 5 13 6 0 4 0 70631 94 706 4 0 4 4 706 70632 85 100 2 0 0 0 100 70633 C 706 35 0 0 0 706 >PRINT 70634 C 683 2 0 0 0 683 >DON'T PRINT 70633>70635 52 5 4 0 5 0 70636 C 737 6 0 0 0 737 70637 76 705 34 0 0 0 705 gVIA TABLE ENTRIES 70700 PROCR 707 707 DEAL WITH TRANSLATOR'S FORMED LONG/SHORT CONSTS 70701 NOTES RADIX B FORMED CONSTS 69507>70702 90 0 0 4 0 4 CONSTANTS PER ITEM 70703 C 0 0 0 8 70704 10 0 0 0 0 CLEAR PARA 70705 5 13 0 2 0 0 70709>70706 0 11 0 1 4 0 70707 5 13 2 1 0 0 70708 80 714 2 0 0 0 714 70709 94 707 6 0 4 2 707 70710 85 100 2 0 0 0 100 70711 C 707 13 0 0 0 707 >PRINT 70712 C 683 2 0 0 0 683 >DON'T PRINT 70711>70713 90 0 0 4 0 70714 C 0 0 0 8 70719>70715 0 11 0 2 4 0 70716 5 13 4 0 0 0 70717 5 13 6 0 0 0 70718 80 709 2 0 0 0 709 70719 94 707 15 0 4 2 707 70720 76 683 2 0 0 0 683 70800 PROCR 708 708 VALUES 70801 NOTES RADIX B 69509>70802 11 0 1 0 0 70803 2 731 24 1 0 0 731 NOTES' 70804 71 708 32 0 0 0 708 gNOT NEW REF/ITEM 70805 11 4 2 0 0 REF 70806 5 16 18 0 0 0 70807 11 6 2 0 0 ITEM 70808 124 16 18 0 0 0 70809 1 26 0 0 0 0 70810 02 16 23 0 0 0 CURRENT VALUE OF STACKER 70811 03 13 2 2 0 0 >DELTA 70812 04 16 23 0 0 0 >NEW VALUE OF STACKER 70813 10 0 0 0 £00 70837>70814 5 13 0 2 0 0 PARA FOR DELTA 70815 80 714 2 0 0 0 714 WRITE 70816 85 100 2 0 0 0 100 70817 C 708 19 0 0 0 708 >PRINT 70818 C 683 2 0 0 0 683 >DON'T PRINT 70817>70819 0 13 0 2 0 0 PARA 70820 5 13 6 0 0 0 70821 0 13 2 2 0 0 VALUE 70822 5 13 4 0 0 0 70823 10 0 0 0 1 70824 5 16 1 0 0 0 SET PRINT IND 70825 52 5 4 0 8 0 70826 C 737 2 0 0 0 737 70827 94 683 2 0 8 10 683 70828 80 724 2 0 0 0 724 gPRINT 70829 90 0 0 8 0 70830 C 0 0 0 40 70831 76 683 2 0 0 0 683 70804>70832 10 0 0 0 1 70833 04 16 23 0 0 0 AUGMENT LOCN COUNTER 70834 00 11 6 2 0 0 70835 5 13 2 2 0 0 VALUE 70836 11 4 2 0 0 PARA FOR VALUE 70837 76 708 14 0 0 0 708 70900 PROCR 709 709 PRINT CONVERT TABLES+TRANSLATOR'S CONSTS 70902 81 709 2 0 0 0 709 70903 10 0 0 0 1 70904 4 16 37 0 0 0 70905 5 16 1 0 0 0 70906 52 5 4 0 5 0 70907 C 737 2 0 0 0 737 70908 94 709 10 0 5 10 709 70909 80 712 2 0 0 0 712 gO/P LINE 70908>70910 82 709 2 0 0 0 709 71000 PROCR 710 710 71002 81 710 2 0 0 0 710 71003 80 714 2 0 0 0 714 gWRITE 71004 13 2 2 0 0 71005 5 13 4 0 0 0 71006 5 13 6 0 0 0 71007 85 100 2 0 0 0 100 71008 C 710 10 0 0 0 710 >PRINT 71009 C 710 11 0 0 0 710 >DON'T PRINT 71008>71010 80 709 2 0 0 0 709 gPRINT 71009>71011 82 710 2 0 0 0 710 71100 PROCR 711 711 GENERATE PTS(1) 68775>71102 10 0 0 0 535851675+ (CHAP') 71103 5 8 12 1 0 0 71104 80 727 2 0 0 0 727 gWRITE 71105 124 741 2 0 2 0 741 ORDERS 71106 91 0 0 2 0 71107 124 716 2 0 2 0 716 FIRST LEVEL PARAS 71108 91 0 0 3 0 71109 124 720 2 0 2 0 720 SECOND LEVEL PARAS 71110 91 0 0 1 0 71111 0 716 2 0 0 0 716 71112 31 0 0 0 2 71113 5 713 11 0 0 0 713 71114 0 720 2 0 0 0 720 71115 31 0 0 0 2 71116 5 713 17 0 0 0 713 71117 90 0 0 5 0 71118 C 0 0 0 6 71119 90 0 0 8 0 71120 C 0 0 0 3 71121 96 0 0 2 0 STORE CHUNK START FOR PARAS 1 AND 5 71122 5 713 2 0 0 0 713 71123 124 713 2 0 1 0 713 71124 101 0 1 3 0 71125 5 713 6 0 0 0 713 CHUNK START 71197>71126 124 999 19 1 2 0 SEC 8 71127 124 0 0 2 0 71128 3 712 2 0 0 0 712 WL 71129 101 48 1 1 0 71130 30 0 0 0 5 71131 1 712 2 0 0 0 712 WL 71132 91 0 0 4 0 71195>71133 124 713 4 0 3 0 713 STORE WORD 71134 106 0 0 2 0 71135 5 713 7 0 0 0 713 STORE WORD 71149>71136 34 713 10 1 0 0 713 FIRST LEVEL PARA WORD 71137 33 0 0 0 3 NEXT ONE TO A 71138 100 713 8 1 0 0 713 STORE (A) (B) 71139 94 711 47 0 5 1 711 TEST END OF PARA WORD 71140 90 0 0 5 0 SET UP MR FOR 71141 C 0 0 0 6 NEXT PARA WORD 71142 124 713 4 0 3 0 713 STORE PARA WORD 71143 106 1 0 3 0 STORE PARA WORD 71144 33 0 0 0 2 RIGHT ALIGN WORD 71145 5 713 11 0 0 0 713 71146 94 711 47 0 3 1 711 STEP PARAS MR 71146> 71139>71147 713 8 0 0 0 713 TEST DUMMY PARA 71148 12 0 0 0 6 71149 70 711 36 0 0 0 711 gYES 71150 12 0 0 0 1 TEST SECOND LEVEL REQD 71151 71 711 75 0 0 0 711 gNO 71165>71152 34 713 16 1 0 0 713 SECOND LEVEL PARA WORD 71153 33 0 0 0 6 NEXT ONE TO A 71154 100 713 14 1 0 0 713 STORE (A) (B) 71155 94 711 63 0 8 1 711 TEST END OF PARA WORD 71156 90 0 0 8 0 SET UP MR FOR 71157 C 0 0 0 3 NEXT PARA WORD 71158 124 713 4 0 3 0 713 STORE PARA WORD 71159 106 1 0 1 0 71160 33 0 0 0 2 RIGHT ALLIGN WORD 71161 5 713 17 0 0 0 713 71162 94 711 63 0 1 1 711 STEP PARAS MR 71162> 71155>71163 713 14 0 0 0 713 TEST SECOND LEVEL 71164 101 63 1 2 0 PARA = 63(DUMMY) 71165 70 711 52 0 0 0 711 gYES 71166 101 1 1 1 0 TEST END SIGN(62) 71167 71 711 73 0 0 0 711 gNO 71168 713 4 1 0 0 713 STORE END SIGN 71169 5 4 1 4 0 71170 5 6 1 4 0 71171 80 727 2 0 0 0 727 gWRITE LAST BLOCK 71172 76 680 2 0 0 0 680 gCALL PASS 5 71167>71173 713 14 1 0 0 713 STORE ACTUAL PARA 71174 5 713 8 1 0 0 713 VALUE 71151>71175 713 8 0 0 0 713 TEST PARA=1 71176 12 0 0 0 1 71177 70 711 80 0 0 0 711 gYES 71178 12 0 0 0 1 71179 71 711 90 0 0 0 711 gNO 71177>71180 101 8191 1 3 0 71181 32 0 0 0 10- ADJUST ORDER BY 71182 36 713 7 0 0 0 713 CHUNK START 71183 2 713 6 0 0 0 713 71184 72 711 89 0 0 0 711 gTHIS CHAP 71185 35 0 0 0 11111 ADJUST ORDER IN 71186 10 0 0 0 0 PASS 1 OR 2 WHICH 71187 36 713 7 0 0 0 713 REFERS TO COMMON 71188 101 757 2 1 2 0 757 CODING START 71184>71189 37 713 7 0 0 0 713 71179>71190 713 7 0 0 0 713 71191 5 6 2 4 0 VALUE 71192 713 8 0 0 0 713 71193 5 4 2 4 0 PARA 71194 94 711 95 0 2 1 711 WORD MR 71194>71195 94 711 33 0 4 4 711 >NEXT WORD 71196 80 727 2 0 0 0 727 gWRITE 71197 76 711 26 0 0 0 711 gNEXT BLOCK 71200 PROCR 712 712 PRINT LINE WHEN FULL,STEP SERIAL 71201 NOTES RADIX B SUB ROUTINE 71202 81 712 2 0 0 0 712 71203 0 16 28 0 0 0 SERIAL AT STARTOF LINE 71204 80 729 2 0 0 0 729 gTO DEC 71205 5 731 40 0 0 0 731 WL 71206 52 5 2 0 0 0 EDIT SERIAL 71207 C 738 52 0 0 0 738 71208 80 724 2 0 0 0 724 gPRINT 71209 62 0 0 0 0 71210 0 16 37 0 0 0 INCREMENT THIS LINE 71211 4 16 28 0 0 0 UPDATE FOR NEXT 71212 10 0 0 0 0 71213 5 16 37 0 0 0 71214 90 0 0 5 0 71215 C 0 0 0 40 71216 82 712 2 0 0 0 712 71300 CONST 713 713 1 CONSTANTS 71302 (D); 71304 (A)£ ; 71306 (D)0; CHUNK START/ORDER 71308 0; A 71310 0; B 71312 0; C 71314 0; A 71316 0; B 71318 0; C 71400 PROCR 714 714 GENERAL MAG-TAPE EDIT & OUTPUT 71401 NOTES RADIX B SUB ROUTINE 71402 81 714 2 0 0 0 714 71403 0 13 0 1 0 0 QUICKER THAN EDIT 71404 5 8 4 1 1 0 71405 0 13 2 1 0 0 71406 5 8 6 1 1 0 71407 94 714 11 0 1 4 714 71408 80 727 2 0 0 0 727 gWRITE BLOCK 71409 90 0 0 1 0 71410 C 0 0 0 48 71407>71411 82 714 2 0 0 0 714 71500 PROCR 715 715 READ A2 71501 NOTES 71502 81 715 2 0 0 0 715 71503 42 A2 0 0 0 0 71504 C 8 0 0 0 0 71505 82 715 2 0 0 0 715 71600 CONST 716 716 0 FIRST LEVEL PARAS,GENERAL CODING 71602 (B5)1(B3)1(B3)1(B3)1(B6)9; 1000/0 71603 1,1,1,1,0; 1001/5 71604 0,0,0,0,0; 71605 0,0,0,0,0; 71606 0,0,0,0,0; 71607 0,0,0,0,0; 71608 0,0,0,0,0; 71609 0,0,0,0,0; 71610 0,0,0,0,0; 71611 0,0,0,0,0; 71612 0,0,0,0,0; 1002/5 71613 0,0,0,0,0; 71614 0,0,0,0,0; 71615 0,0,0,0,0; 71616 0,0,0,0,0; 71617 0,0,0,0,0; 71618 0,0,0,0,0; 71619 0,0,0,0,0; 71620 0,0,0,0,0; 71621 0,0,0,0,1; 1003/5 71622 1,0,0,1,54; 71623 7,0,1,0,54; 71624 0,1,1,0,9; 71625 1,7,1,0,15; 71626 1,7,1,0,9; 71627 7,1,0,1,57; 71628 1,7,1,1,9; 71629 6,6,6,6,54; 71630 3,1,1,1,27; 71631 1,7,1,1,8; 71632 1,7,6,6,54; 71633 0,1,1,0,8; 71634 1,7,0,1,1; 71635 1,1,0,0,7; 71636 0,0,0,0,54; 71637 1,3,1,0,8; 71638 1,0,1,6,54; 71639 1,0,1,7,9; 71640 7,0,1,0,54; 71641 1,1,7,1,9; 71642 0,1,0,1,1; 71643 0,1,0,1,1; 71644 1,1,0,1,9; 71645 1,0,1,0,1; 71646 1,7,1,0,8; 71647 6,1,3,1,1; 71648 7,1,1,7,9; 71649 1,6,6,1,9; 71650 1,7,1,1,1; 71651 0,0,0,1,9; 71652 0,6,0,1,56; 1004/4 71653 1,0,1,1,31; 71654 1,0,1,1,54; 71655 7,0,0,6,54; 1005/2 71656 1,7,1,1,8; 71657 1,1,0,0,9; 71658 0,0,1,3,0; 71659 1,0,6,6,54; 71660 0,0,0,1,8; 71661 0,1,1,0,15; 71662 6,6,6,6,15; 1006/5 71663 1,1,1,7,57; 71664 7,1,0,1,1; 71665 0,1,0,1,15; 71666 1,7,0,0,56; 1007/3 71667 1,0,1,0,15; 71668 1,1,1,7,9; 71669 1,0,0,0,11; 71670 1,1,3,0,9; 71671 1,7,6,6,0; 71672 0,0,0,0,0; 1009/3 71673 0,0,0,0,0; 71674 0,0,0,0,0; 71675 0,0,0,0,0; 71676 0,0,0,0,0; 71677 0,0,0,0,0; 71678 0,0,0,0,0; 71679 0,0,0,0,0; 1010/5 71680 0,0,0,0,0; 71681 0,0,0,0,0; 71682 0,0,0,0,0; 71683 0,0,0,0,0; 71684 0,0,0,0,0; 71685 0,0,0,0,0; 71686 0,0,0,0,0; 71687 0,0,0,0,0; 71688 0,0,0,0,0; 1011/5 71689 0,0,0,0,0; 71700 CONST 717 717 0 FIRST LEVEL PARAS PASS 1 71702 (B5)0(B3)0(B3)0(B3)0(B6)0; 71703 0,0,0,0,0; 71704 0,0,0,0,0; 71705 0,0,0,0,0; 71706 0,0,0,0,0; 1012/5 71707 0,0,0,0,0; 71708 0,0,0,0,0; 71709 0,0,0,0,0; 71710 0,0,0,0,0; 71711 0,0,0,0,0; 71712 0,0,0,0,0; 71713 0,0,0,0,0; 71800 CONST 718 718 0 FIRST LEVEL PARAS PASS 1 71802 (B5)0(B3)0(B3)0(B3)0(B6)0; 71803 0,0,0,0,0; 71804 0,0,0,0,0; 71805 0,0,0,0,0; 71806 0,0,0,0,0; 71807 0,0,0,0,0; 71808 0,0,0,0,0; 71809 0,0,0,0,0; 1013/5 71810 0,0,0,0,0; 71811 0,0,0,0,54; 71812 (B5)1(B3)0(B3)1(B3)0(B6)9; 1014/0 71813 3,1,1,0,9; 71814 1,0,1,0,9; 71815 1,0,1,1,9; 71816 0,1,1,0,9; 71817 0,1,1,0,1; 71818 1,1,0,1,9; 71819 1,1,6,6,54; 71820 6,6,6,6,54; DUMMY WORD 71821 0,1,1,1,9; 71822 0,1,1,0,9; 1015/3 71823 0,1,1,1,9; 71824 1,0,1,1,54; 71825 6,6,1,1,1; 1016/3 71826 1,0,0,1,0; 71827 1,0,0,0,8; 71828 1,1,1,0,0; 71829 1,0,1,0,9; 71830 0,0,1,1,8; 1017/4 71831 1,1,1,0,9; 71832 0,0,0,0,1; 71833 0,1,1,0,1; 1018/4 71834 1,0,0,1,8; 71835 0,0,1,0,9; 71836 0,1,1,0,9; 71837 0,1,1,1,9; 1019/4 71838 0,0,1,1,0; 71839 0,1,0,0,8; 71840 1,0,0,1,0; 71841 1,0,1,0,1; 1020/5 71842 1,1,1,1,0; 71843 1,1,1,1,1; 71844 1,1,0,0,8; 71845 0,0,0,0,8; 71846 1,0,1,0,9; 71847 1,0,0,1,0; 71848 1,1,0,1,9; 71849 1,1,0,0,9; 71850 1,0,1,1,8; 1021/4 71851 1,1,1,0,9; 71852 0,1,1,1,0; 71853 1,1,6,6,54; 71854 6,1,1,1,9; 71855 0,1,1,0,1; 71856 1,0,1,1,1; 71857 1,6,6,6,54; 71858 0,1,0,1,0; 71859 1,1,1,0,8; 1022/5 71860 1,1,1,0,9; 71861 1,0,0,1,9; 71862 0,0,0,1,0; 71863 1,0,1,1,1; 71864 1,1,0,0,8; 71865 0,1,1,0,9; 71866 0,1,1,0,8; 71867 1,7,1,0,9; 1023/4 71868 1,1,3,0,9; 71869 0,1,0,0,8; 71870 1,0,1,0,54; 1024/2 71871 1,1,0,0,8; 1025/6 71872 0,1,0,1,1; 71873 0,0,2,2,0; 1026/0 1027/5 71874 0,0,0,0,0; 71875 0,0,0,0,0; 71876 0,0,0,0,0; 1028/5 71877 0,0,0,0,0; 1029/5 71878 0,0,0,0,0; 1030/3 1031/5 71879 0,0,0,0,0; 71880 0,0,0,0,0; 71881 0,0,0,0,0; 71882 0,0,0,0,0; 1032/3 71883 0,0,7,6,54; 71900 PROCR 719 719 CLOSE OUTPUT FILES 71901 NOTES RADIX 71902 81 719 2 0 0 0 719 71906>71903 80 715 2 0 0 0 715 71904 0 8 4 1 0 0 71905 12 0 0 0 5659655972 FINIS' 71906 71 719 3 0 0 0 719 71907 41 A2 0 0 0 1 CLOSE I/P 71908 82 719 2 0 0 0 719 72000 CONST 720 720 0 SECOND LEVEL PARAS 72002 (B8)24(B6)50(B6)51; 72003 24,24,7; 72004 24,6,63; 72005 51,38,24; 72006 54,53,15; 72007 50,34,15; 72008 15,36,24; 72009 37,36,52; 72010 39,39,39; 72011 18,39,41; 72012 24,24,24; 72013 24,16,62; 72100 PROCR 721 721 INPUT OFF PASS 2 72101 NOTES RADIX B SUB ROUTINE 72102 81 721 2 0 0 0 721 72103 94 721 7 0 2 8 721 STANDARD INCREMENT 68606>72104 80 722 2 0 0 0 722 READ A6->SEC 9 72105 90 0 0 2 0 72106 C 0 0 0 144 72103>72107 82 721 2 0 0 0 721 72200 PROCR 722 722 INPUT 72201 NOTES RADIX B SUB ROUTINE 72202 81 722 2 0 0 0 722 72203 42 A6 0 0 0 0 72204 C 9 0 0 0 0 72205 82 722 2 0 0 0 722 72300 PROCR 723 723 WRITE ON WORKING TAPE 72301 NOTES 72302 81 723 2 0 0 0 723 72303 55 8 4 1 0 50 COPY ANNEXES 72304 C 9 4 1 0 0 72305 0 731 20 1 0 0 731 BEW 72306 5 9 52 1 0 0 72307 43 A6 0 0 0 0 72308 C 9 0 0 0 0 72309 54 9 0 0 0 52 72310 82 723 2 0 0 0 723 72400 PROCR 724 724 PRINT 72401 NOTES RADIX B SUB ROUTINE 72402 81 724 2 0 0 0 724 72403 62 0 0 0 0 72404 731 20 1 0 0 731 72405 5 5 52 1 0 0 BEW 72406 10 0 0 0 1 ALWAYS TRACK 1 72407 5 5 0 1 0 0 FUNCTION WORD 72408 27 9 0 0 0 72409 70 724 14 0 0 0 724 gPRINTER 72410 55 5 0 1 0 50 72411 C 10 4 1 6 0 72412 80 725 2 0 0 0 725 gO/P 72413 76 724 36 0 0 0 724 72409>72414 27 8 0 0 0 PRINTER TYPE 72415 12 0 0 0 9 72416 70 724 32 0 0 0 724 gSPECIAL 72417 10 0 0 0 80000 72418 5 5 1 0 0 0 BIT 40 72419 124 999 15 1 2 0 SEC 5 72420 124 0 0 2 0 72421 124 999 13 1 2 0 SEC 10 72422 129 0 0 1 0 72423 10 0 0 0 4 72435>72424 30 0 0 0 5 72425 1 999 7 0 0 0 ROUTE 72426 34 999 12 0 0 0 72427 125 4096 1 1 0 72428 124 999 0 0 3 0 72429 123 160 0 2 0 72430 62 0 0 0 0 72431 76 724 36 0 0 0 724 72416>72432 55 5 0 1 0 54 72433 C 10 0 1 0 0 72434 10 0 0 0 9 72435 76 724 24 0 0 0 724 72431> 72413>72436 54 5 0 0 0 50 72437 5 16 1 0 0 0 CLEAR INDICATORS 72438 82 724 2 0 0 0 724 72500 PROCR 725 725 O/P->A9 72502 81 725 2 0 0 0 725 72503 94 725 9 0 6 50 725 72504 731 20 1 0 0 731 BEW 72505 5 10 306 1 0 0 72506 80 726 2 0 0 0 726 gO/P 72507 90 0 0 6 0 72508 C 0 0 0 300 72503>72509 82 725 2 0 0 0 725 72600 PROCR 726 726 WRITE A9 72602 81 726 2 0 0 0 726 72603 10 0 0 0 800000 72604 34 999 12 0 0 0 SEC 10 72605 125 4096 1 1 0 72606 1 999 7 0 0 0 D1/A9 72607 124 999 0 0 3 0 72608 123 160 0 2 0 72609 82 726 2 0 0 0 726 72700 PROCR 727 727 OUTPUT ON A2 72701 NOTES RADIX B SUB ROUTINE 72702 81 727 2 0 0 0 727 72703 731 20 1 0 0 731 BEW 72704 5 8 52 1 0 0 72705 43 A2 0 0 0 0 OUTPUT 72706 C 8 0 0 0 0 72707 54 8 0 0 0 52 CLEAR 72708 82 727 2 0 0 0 727 72800 PROCR 728 728 72802 81 728 2 0 0 0 728 72803 50 9 4 0 2 0 72804 C 737 14 0 0 0 737 UNPACK NEXT ITEM 72805 82 728 2 0 0 0 728 72900 PROCR 729 729 CONVERT (A) TO DECIMAL 72901 NOTES 72902 81 729 2 0 0 0 729 72903 5 733 4 1 0 0 733 72904 60 0 0 0 0 72905 124 734 22 0 2 0 734 72906 112 733 4 1 0 0 733 72907 82 729 2 0 0 0 729 73000 PROCR 730 730 CONVERT (A) TO BIN 73001 NOTES 73002 81 730 2 0 0 0 730 73003 5 733 4 1 0 0 733 73004 62 0 0 0 0 73005 124 734 2 0 2 0 734 73006 112 733 4 1 0 0 733 73007 82 730 2 0 0 0 730 73100 CONST 731 731 1 73102 (A)CHAPT; 73104 TYPE£; 73106 FILES; 73108 TYPE; 73110 ST.OF; 73112 BLOCK; 73114 SIZE; 73116 SIT; 73118 PREND; 73120 (D)7.0000007.; 73122 (A)START; 73124 NOTES; 73126 SPOOL; 73128 (A)PROC; 73130 EDURE; 73132 SEC; 73134 TION ; 73136 (D)6£6£6£6£6£; 73138 0; 73140 0; 73142 0; 73144 (A)ON/=; 73200 CONST 732 732 1 73202 (A)EXTRA; 73204 CHAP; 73206 TER ; 73208 (D)7£££0003££; BITS 1-10+25-39 73210 5.5.; 73212 (A)FIEND; 73214 (A)INDEX; 73216 CHAIN; 73218 08000; 73220 PROG; 73222 OUT; 73224 (D)5.5.; 73300 CONST 733 733 1 CONVERT TABLE 73302 (D)1; BIN->DEC 73304 0; (A) WL 73306 0; CURRENT PROCR 73400 CONST 734 734 1 COMPILER'S CONVERT TABLES 73402 (D)1; DEC->BIN 73404 t; 73406 64; 73408 3.8; 73410 2710; 73412 186t0; 73414 £4240; 73416 989680; 73418 5£5.100; 73420 3e9t+t00; 73422 1; BIN->DEC 73424 16; 73426 256; 73428 4096; 73430 65536; 73432 1048576; 73434 16777216; 73436 268435456; 73438 4294967296; 73440 ££££££££££; 73500 CONST 735 735 0 73502 (D)7; 73503 1£££; 73504 £.000-; 73505 7£; 73506 8000; 73507 6000; 73508 £000; 73509 80000; 73510 £0000; 73511 80; 73512 £0000-; 73513 £; 73514 3££; BITS 1-10 73515 0; THIS IS A 0/1 FLIPFLOP FOR SC'S FWD 73516 3£; BITS 1-6 75200 73600 TABLE 736 736 1 PRINT HEADING DATA 73601 NOTES 73602 13 4 0 0 0 0 5 0 0 0 0 0 0 73604 13 3 0 0 0 0 5 0 0 0 0 0 0 73606 13 0 0 0 0 0 5 0 0 0 0 0 0 73608 13 2 0 0 0 0 5 0 0 0 0 0 1 75400 73610 729 2 0 0 0 0 3 2 0 2 0 0 0 REF----ACTIONS WITH NEGATIVE ADDRESSES 73612 724 2 0 0 0 0 5 0 2 4 0 0 1 PROCR 73614 732 18 0 0 2 0 5 0 0 0 0 0 0 08000' 73616 732 20 0 0 2 0 4 1 1 0 0 0 0 PROG' 73618 732 22 0 0 2 0 3 2 1 0 0 0 0 OUT' 73620 16 2 0 0 0 0 5 0 2 0 0 0 0 PROGM 73622 16 3 0 0 0 0 5 0 2 4 0 0 0 SERIAL 73624 732 24 0 0 2 0 2 3 0 0 0 0 1 DOUBLE LE 73700 TABLE 737 737 1 73701 NOTES 73702 13 4 0 0 0 0 5 0 7 4 2 0 0 73704 13 6 0 0 0 0 5 0 2 4 0 0 1 73706 13 4 0 0 0 0 5 0 7 4 2 0 0 CONST 73708 13 6 0 0 0 0 5 0 2 4 0 0 0 PARA 73710 13 8 0 0 0 0 5 0 12 4 2 0 0 CONST 73712 13 10 0 0 0 0 5 0 2 4 0 0 1 73714 11 0 0 0 2 0 5 0 0 0 0 0 0 73716 11 2 0 0 2 0 5 0 0 0 0 0 0 73718 11 4 0 0 2 0 5 0 0 0 0 0 0 73720 11 6 0 0 2 0 5 0 0 0 0 0 1 73800 TABLE 738 738 3 73801 NOTES 73802 16 16 0 0 0 0 5 0 0 0 0 0 0 73804 735 2 0 0 0 0 5 0 0 0 0 0 0 73806 16 2 0 0 0 0 5 0 0 0 0 0 0 73808 16 3 0 0 0 0 5 0 0 0 0 0 0 SERIAL 73810 731 2 0 0 2 0 5 0 0 0 0 0 1 CHAPT' 73812 731 2 0 0 2 0 5 0 0 0 0 0 0 73814 16 16 0 0 0 0 5 0 3 4 0 0 1 73816 16 17 0 0 0 0 4 1 1 3 0 0 0 PROCR NUMBER 73818 731 44 0 0 2 0 1 4 0 0 0 0 0 =' 73820 16 36 0 0 0 0 4 1 0 3 0 0 1 PROCR START 73822 16 22 0 0 0 0 1 0 4 0 0 0 0 £ IND 73824 16 30 0 0 0 0 4 1 3 3 0 0 0 FIRST ADDRESS 73826 16 22 0 0 0 0 2 3 2 1 0 0 0 PARA 73828 731 38 0 0 0 0 5 0 4 4 0 0 0 SECOND ADDRESS=Q1-4 73830 13 0 0 0 0 0 2 3 2 1 0 0 0 Q5 73832 13 1 0 0 0 0 2 3 1 1 0 0 0 Q4 73834 13 2 0 0 0 0 2 3 1 1 0 0 0 Q3 73836 13 3 0 0 0 0 2 3 1 1 0 0 0 Q2 73838 13 4 0 0 0 0 2 3 1 1 0 0 0 Q1 73840 13 22 0 0 0 0 1 4 3 0 0 0 1 LTE 73842 16 18 0 0 2 0 5 0 0 0 0 0 0 73844 16 20 0 0 2 0 5 0 0 0 0 0 0 73846 16 17 0 0 0 0 4 1 1 3 0 0 1 PROCR NUMBER 73848 13 0 0 0 2 0 5 0 0 0 0 0 0 73850 13 2 0 0 2 0 5 0 0 0 0 0 1 73852 731 40 0 0 0 0 5 0 0 4 0 0 1 73900 TABLE 739 739 1 73902 13 0 0 0 0 0 2 3 6 1 0 0 0 A 73904 16 25 0 0 0 0 1 4 2 0 0 0 0 D 73906 16 26 0 0 0 0 1 4 2 0 0 0 0 M 73908 13 2 0 0 0 0 4 1 2 3 0 0 0 ADDR 73910 13 4 0 0 0 0 4 1 1 3 0 0 1 PARAMETER 74000 CONST 740 740 1 74002 (D)1; 74004 2; 74006 3; 74008 4; 74010 5; 74012 6; 74014 7; 74016 8; 74018 9; 74020 0; 74022 0; 74024 0; 74026 0; 74028 0; 74030 0; 74032 0; 74034 0; 74036 0; 74038 0; 74040 0; 74042 0; 74044 0; 74046 0; 74048 0; 74050 0; 74052 0; 74054 0; 74056 0; 74058 0; 74100 PROCR 741 741 1000 ENTRIES TO PTS 74102 124 757 7 1 0 0 757 >FROM PROG UNLOAD 74103 76 746 2 0 0 0 746 gFROM STORE DUMP START 74104 124 747 2 1 0 0 747 >FROM STORE DUMP END ROUTINE 74105 124 748 2 1 0 0 748 >FROM TROFL 74106 124 757 2 1 0 0 757 >FROM LOADER 74107 124 757 3 1 0 0 757 >FROM PROGRAMME 74108 76 745 63 0 0 0 745 gFROM'ABANDON VIA MASTER ALARM' 74109 124 757 5 1 0 0 757 >FROM OVERLAY(END) 74110 124 757 6 1 0 0 757 >FROM OVERLAY(START) 74111 76 745 2 0 0 0 745 gFROM'ABANDON BY 2/0/1 COMMAND' 74200 CONST 742 742 1 1001 ANNEXE 1 FOR PASSES 1,2 AND 3 74202 (D)0; 74204 0; 74206 0; 74208 0; 74210 0; 74212 0; 74214 0; 74216 0; 74218 0; 74220 0; 74222 0; 74224 0; 74226 0; 74228 0; 74230 0; 74232 0; 74234 0; 74236 0; 74238 0; 74240 0; 74242 0; 74244 0; 74246 0; 74248 0; 74250 0; 74252 0; 74254 0; 74300 CONST 743 743 1 1002 ANNEXE 2 FOR PASSES 1,2 AND 3 74302 (D)0; 74304 0; 74306 0; 74308 0; 74310 0; 74312 0; 74314 0; 74316 0; 74318 0; 74320 0; 74322 0; 74324 0; 74326 0; 74328 0; 74330 0; 74332 0; 74334 0; 74336 0; 74338 0; 74340 0; 74342 0; 74344 0; 74346 0; 74348 0; 74350 0; 74352 0; 74354 0; 74400 PROCR 744 744 1003 OVERLAY FOR PTS(WL'S IN PASS 3) 75815> 93229>74402 125 4096 1 1 0 74403 126 749 21 0 0 0 749 SET(71)FOR MASTER 74404 124 744 72 0 3 0 744 SET UP 64 74405 124 3 0 3 0 AND 124 74406 106 198 1 0 0 74407 124 744 72 0 3 0 744 74408 103 64 0 0 0 (24) 74409 30 0 0 0 5- 74410 124 744 72 0 3 0 744 74411 103 124 0 0 0 74412 101 40 1 3 0 74413 34 744 70 0 0 0 744 1 74414 80 749 2 0 0 0 749 gBACK 1 I/P->I/P 74415 125 4096 1 1 0 74416 124 744 72 1 1 0 744 MOD GROUP 0 74417 91 755 2 0 1 0 755 PROG SWITCH 74418 124 744 72 0 3 0 744 74419 126 0 0 0 0 (50)REQUEST M/R,CLOSE PROGM SWITCH 93241>74420 91 751 6 0 1 0 751 MASTER SWITCH 74421 10 0 0 0 7 74422 124 744 72 0 3 0 744 74423 102 0 0 0 0 (51)SET'OPT A'SWITCH 74424 124 744 72 0 3 0 744 74425 106 64 0 0 0 (24) 74426 124 744 72 0 3 0 744 74427 105 124 0 0 0 74428 127 744 38 0 0 0 744 >YES,AVOID READ 74429 124 744 72 0 3 0 744 74430 106 0 0 0 0 (24) 74431 102 744 76 0 0 0 744 74432 101 0 1 3 0 74433 124 744 72 0 3 0 744 74434 126 0 0 0 0 (7) READ BLOCK TO MR ANNEXES 74435 106 744 76 0 0 0 744 74436 124 744 72 0 3 0 744 74437 102 0 0 0 0 (24) 74428>74438 124 744 72 1 1 0 744 MG 0 74439 124 757 2 0 2 0 757 74440 3 757 2 1 0 0 757 74441 124 744 72 0 3 0 744 74442 102 2 0 0 0 SET PARA 2 74443 91 757 2 0 2 0 757 CHUNK START 74444 101 757 2 1 3 0 757 74445 124 744 72 0 3 0 744 74446 102 1 0 0 0 SET PARA 1 74447 101 0 1 3 0 PARA TABLE START 74448 124 744 72 0 3 0 744 74449 123 0 0 2 0 (6) LOAD CHAP SR 74450 124 744 64 0 2 0 744 74451 1 744 71 0 0 0 744 14 IN Q5 74452 124 755 2 0 3 0 755 74453 102 44 0 0 0 SET LINK IN PROG SWITCH 74454 124 744 72 0 3 0 744 74455 102 0 0 0 0 (51)CLEAR 'OPT A' SWITCH 74456 10 0 0 0 1 74457 4 744 74 0 0 0 744 STEP PASS IND(-1->0 0->1) 74458 124 755 2 0 3 0 755 PROG SWITCH START 74459 106 35 0 0 0 SI+35 74460 124 755 2 0 3 0 755 74461 102 7 0 0 0 >SI+7 (OPEN SWITCH) 74462 124 744 72 0 3 0 744 74463 124 0 1 0 0 >RELEASE MR SWITCH/ENTER PQ/RETURN(38) 74464 125 4096 1 1 0 74465 126 749 21 0 0 0 749 RESET (71) FOR MASTER 74466 101 40 1 3 0 74467 34 744 70 0 0 0 744 74468 80 749 2 0 0 0 749 gSETEP BACK 1 I/P->I/P 74469 76 757 2 0 0 0 757 gENTER PTS(2,3) 74470 100 1 0 0 0 CONSTS 74471 114 0 0 0 0 74472 100 0 0 0 0 ZERO 74473 100 0 0 0 0 (24)PTS CH/ROUTE NO 74474 116 1 0 0 0 1-=PASS1,0=PASS2,1+PASS3 IN STORE 74475 100 0 0 0 0 1=PROGM IN CONTROL,0=PTS IN CONTROL 74476 100 0 0 0 0 STORE PARA 24 74477 100 0 0 0 0 SPARE 74500 PROCR 745 745 1003A=DISENTANGLE THE ABANDON COMMANDS 74111>74502 124 744 72 0 3 0 744 SET MR3 FOR LOG (2/0/1)COMMAND 74503 126 53 1 3 0 (3)REQUEST QUEUE 74510>74504 124 744 72 0 3 0 744 FIND POSITION OP 74505 106 2 0 0 0 THIS PROGRAMS LOG 74506 124 744 72 0 3 0 744 REQUEST ENTRY 74507 105 2 0 3 0 74508 127 745 11 0 0 0 745 >FOUND 74509 125 2 0 3 0 74510 124 745 4 1 0 0 745 >NEXT ENTRY 74508>74511 124 744 72 0 3 0 744 74512 106 1 0 3 0 LINK IN LOG REQUEST QUEUE 74513 70 745 21 0 0 0 745 gTHIS PROG NOT TRYING TO USE LOG 74514 101 0 1 2 0 (54) 74515 71 745 18 0 0 0 745 gTHIS PROG NOT TRYING TO OFFER OPTIONS 74516 124 744 72 0 3 0 744 74517 102 0 0 0 0 (53) DELETE'OPT OUTSTANDING'IND 74515>74518 10 0 0 0 0 74519 124 744 72 0 3 0 744 74520 102 1 0 3 0 (53)DELETE LOG REQUEST 74513>74521 744 74 0 0 0 744 PASS IND 74522 71 745 53 0 0 0 745 gNOT PASS 2,ELSE SECOND ABDON 74523 101 0 1 3 0 (15)'RC'LINK 74524 3 744 74 0 0 0 744 SET'PASS 3' 74525 3 745 49 0 0 0 745 SET'2/0/1 COMMAND IN PROGRESS' 74526 124 744 72 0 3 0 744 74527 102 42 0 1 0 >SI+42 74528 124 744 72 0 3 0 744 CLEAR ASSOC TIME 74529 102 45 0 1 0 (SI->45) 74530 124 751 6 0 3 0 751 MASTER SWITCH START 74531 106 9 0 0 0 SM+9 74532 124 751 6 0 3 0 751 SET CLOSED+INTERRUPTIBLE 74533 102 7 0 0 0 >SM+7 74534 124 751 6 0 3 0 751 74535 106 57 0 0 0 SM+57=SP+9 74536 124 751 6 0 3 0 751 74537 102 6 0 0 0 >SM+6 74538 0 744 75 0 0 0 744 74539 71 745 79 0 0 0 745 gPROG IN CONTROL 74540 124 744 72 0 3 0 744 74541 106 44 0 1 0 PRESENT PTS LINK IN SI+44 74542 5 745 84 0 0 0 745 74543 124 745 79 0 2 0 745 74544 1 744 71 0 0 0 744 14 IN Q5 74545 124 744 72 0 3 0 744 74546 102 44 0 1 0 NEW LINK 74547 124 755 2 0 3 0 755 74548 124 7 1 0 0 >SI+7 TO CONTINUE THIS DUMP 74549 100 0 0 0 0 NONZERO='2/0/1 COMMAND IN PROGRESS' 74567> 74570> 74572> 93123> 93126> 96320> 96323>74550 124 744 72 1 1 0 744 MSG 0 74551 124 744 72 0 3 0 744 74552 126 0 0 0 0 (50)REQUEST MASTER 74568> 93121> 74522>74553 124 751 6 0 3 0 751 SET MASTER SWITCH NON-INT 74554 106 58 0 0 0 SM+58=SP+10 74555 124 751 6 0 3 0 751 74556 102 6 0 0 0 >SM+6 74557 124 744 72 0 3 0 744 74558 102 44 0 0 0 (3)CLEAR'TRIAL'IND 74559 124 744 72 1 1 0 744 MG 0 74560 10 0 0 0 0 *FORMED ORDER* 0/2='ABDON/END' 74561 124 744 72 0 3 0 744 >RETURN TO'ABDON'COMMENT 74562 124 0 1 0 0 (34) 74108>74563 0 745 49 0 0 0 745 '2/0/1'IND (ABANDON OPTION) 74564 70 745 69 0 0 0 745 gNO 74565 101 1 1 3 0 (15)1*'RC' LINK 74566 2 744 74 0 0 0 744 74567 70 745 50 0 0 0 745 gDURING PASS 3 74568 76 745 53 0 0 0 745 gSOMETIME IN PASS 2 74564>74569 0 744 74 0 0 0 744 PASS IND 74570 71 745 50 0 0 0 745 g1 OR 3 74571 0 744 75 0 0 0 744 CONTROL IND 74572 70 745 50 0 0 0 745 gPTS IN CONTROL 74573 101 0 1 3 0 (15)'RC' LINK 74574 3 744 74 0 0 0 744 SET'PTS 3' 74575 124 744 72 0 3 0 744 74576 102 42 0 1 0 >SI+42 74577 124 744 72 0 3 0 744 74578 102 45 0 1 0 CLEAR ASSOC TIME 74539>74579 10 0 0 0 0 74580 35 0 0 0 100 74581 37 757 23 0 0 0 757 CLEAR Q3=DISCARDS (2001/23) 74582 126 757 10 0 0 0 757 >TYPE'OP ABANDONS(PROG)' (2001/10) 74583 126 745 84 0 1 0 745 74584 100 0 0 0 0 FORMED PASS 1=1014/4 74585 10 0 0 0 2 ORDER CONST 74600 PROCR 746 746 1004 STORE DUMP (START) 74103>74602 124 744 73 0 3 0 744 TEST TAPE HAS JUST BEEN REWOUND 74603 106 0 0 0 0 (36) 74604 118 4124 0 0 0 JUST BEEN REWOUND 74605 127 746 8 0 0 0 746 >NO 74606 125 0 1 2 0 74607 124 746 11 1 0 0 746 > 74605>74608 124 744 72 0 3 0 744 74609 124 35 0 3 0 (3)BLOCK CTRS 74610 106 0 0 0 0 (24)PTS ROUTE 74607>74611 102 750 5 0 0 0 750 SERIAL NO 74612 101 27 1 3 0 CLOSE STORE 74613 80 749 2 0 0 0 749 .CLOSE I/P FILE 74614 124 744 72 0 3 0 744 74615 124 0 1 0 0 (37) 74700 PROCR 747 747 1005 STORE DUMP (END) 74104>74702 10 0 0 0 0 74703 35 0 0 0 10000 74704 124 744 73 0 3 0 744 PROG ROUTE 74705 114 0 0 0 0 (36)CLEAR Q5='REWIND'IND 74706 106 750 5 0 0 0 750 TEST PTS TAPE TO 74707 127 747 34 0 0 0 747 >NO BE REALIGNED 74708 34 751 2 1 0 0 751 74709 101 17 1 3 0 74710 80 749 2 0 0 0 749 gOPEN I/P FILE 74711 100 750 4 0 3 0 750 DEC 74712 10 0 0 0 0 74713 12 0 0 0 1 74714 4 750 5 0 0 0 750 STEP DOWN REQUIRED BLOCK 74715 100 744 72 0 3 0 744 BIN 74716 101 10 1 3 0 WORD 10=IDENTIFIER LOCN 74717 30 0 0 0 5 74718 124 744 72 0 3 0 744 74719 104 55 0 0 0 (3)PARA 55=IDENTIFIER VALUE 74720 32 0 0 0 10- 74721 101 37 1 3 0 74722 80 749 2 0 0 0 749 gRUN FWD TO MACHINE CODE START 74723 10 0 0 0 0 DUMMY 74732>74724 101 62 1 3 0 STORE DUMP PSEUDO 74725 32 0 0 0 10- 74726 101 7 1 3 0 REALIGN TAPE 74727 80 749 2 0 0 0 749 gREAD USING MR ANNEXES 74728 124 744 72 0 3 0 744 74729 124 126 0 3 0 STORE PSEUDO 74730 106 1 1 0 0 74731 2 750 5 0 0 0 750 REQUIRED BLOCK 74732 71 747 24 0 0 0 747 gNOT YET 74733 125 4096 1 1 0 74707>74734 124 744 72 0 3 0 744 74735 124 0 1 0 0 (52) 74800 PROCR 748 748 1006 TRIAL OVER FLOW 74105>74802 124 744 72 0 3 0 744 STORE POSN OF OFLOW CONSTANT 74803 106 0 0 0 0 (39) 74804 102 750 5 0 0 0 750 74805 124 751 4 0 2 0 751 AMEND EDIT TABLE 74806 124 744 72 0 3 0 744 AMEND EDIT TABLE 74807 102 0 0 0 0 (39) 74808 101 0 1 3 0 (39) 74809 124 744 72 0 3 0 744 74810 128 0 1 2 0 (10) 74811 124 744 72 0 3 0 744 74812 106 38 0 1 0 MOVE (24) 74813 124 744 72 0 3 0 744 74814 102 44 0 1 0 74815 124 744 72 0 3 0 744 74816 106 35 0 1 0 SET S1=4 74817 124 744 72 0 3 0 744 74818 102 7 0 1 0 74819 106 750 5 0 0 0 750 RESTORE EDIT TABLE 74820 124 744 72 0 3 0 744 RESTORE EDIT TABLE 74821 102 0 0 0 0 (39) 74822 124 744 72 0 3 0 744 74823 124 0 1 0 0 (41) 74900 PROCR 749 749 1007 I/P O/P S/R RTE 7 74902 100 0 0 0 0 LINK 74903 118 5 0 0 0 FORM PARAMETER 74904 101 0 1 1 0 (24) 74905 125 4096 1 1 0 SET NON INT 74906 124 750 2 0 3 0 750 MODIFY DIVISION 74907 123 160 0 2 0 74908 126 749 2 0 1 0 749 >LEAVE S/R 74909 100 0 0 0 0 SWOP 64*R S/R 74910 124 744 72 0 3 0 744 STORE(64*R) 74911 106 64 0 0 0 74912 102 749 19 0 0 0 749 74913 106 749 20 0 0 0 749 RESET(64*R) 74914 124 744 72 0 3 0 744 74915 102 64 0 0 0 74916 106 749 19 0 0 0 749 STORE NEXT(64*R) 74917 102 749 20 0 0 0 749 74918 126 749 9 0 1 0 749 >LEAVE S/R 74919 100 0 0 0 0 STORES FOR (64*R) 74920 100 0 0 0 0 74921 100 0 0 0 0 74922 124 750 2 0 3 0 750 INTERCHANGE VALUES 74923 100 24 0 2 0 (3)OF PARAMETER 24 74924 106 749 31 0 0 0 749 74925 124 750 2 0 3 0 750 74926 102 24 0 0 0 (3) 74927 32 0 0 0 10 74928 102 749 31 0 0 0 749 74929 126 749 9 0 0 0 749 74930 126 749 21 0 1 0 749 >LEAVE(S) 74931 100 0 0 0 0 (24) 75000 CONST 750 750 0 1008 W/L'S USED BY GENERAL CODING 75002 (D)00000; 75003 00002; 75004 66666; 75005 00000; O'LAY AND STORE DUMP W/L 75100 CONST 751 751 1 1009 LONG CONSTANTS UDED BY GENERAL CODING 75102 (D)0514808000; STORE DUMP I/P O/P CST 75104 (A)TROFL; 75106 0; WL FOR MASTER SWITCH START 75108 0; 8-31=UNPACK WL'S IN PASS 3 75110 0; 75112 0; 75114 0; 75116 0; 75118 0; 75120 0; 75122 0; 75124 0; 75126 0; 75128 0; 75130 0; 75132 0; 75134 0; START OF 256-LOCN PRINT ANNEX PASS 3 75136 0; 75138 0; 75140 0; 75142 0; 75144 0; 75200 CONST 752 752 1 1010 LIST AND PRINTER ANNEXE 75202 (D)0; I/O SERIAL 75204 0; REPLACED INSTRUCTIONS 75206 0; CHAP,24 IND,TYPE 75208 0; SEON START+LENGTH 75210 0; SEON NUMBER 75212 0; 75214 0; SUBSEQUENT SECNS 75216 0; 75218 0; 75220 0; 2ND PM POINT 75222 0; 75224 0; 75226 0; 75228 0; 75230 0; 75232 0; 75234 0; 75236 0; 75238 0; 3RD PM POINT 75240 0; 75242 0; 75244 0; 75246 0; 75248 0; 75250 0; 75252 0; 75254 0; 75300 CONST 753 753 1 1011 UNPACKED I/P AND LIST 75302 (D)0; 4TH PM POINT 75304 0; 75306 0; 75308 0; 75310 0; 75312 0; 75314 0; 75316 0; 75318 0; 75320 0; 5TH PM POINT 75322 0; 75324 0; 75326 0; 75328 0; 75330 0; 75332 0; 75334 0; 75336 0; 75400 CONST 754 754 1 1012 LIST CONTINUED 75402 (D)0; 6TH PM POINT 75404 0; 75406 0; 75408 0; 75410 0; 75412 0; 75414 0; 75416 0; 75418 0; 75420 0; 7TH PM POINT 75422 0; 75424 0; 75426 0; 75428 0; 75430 0; 75432 0; 75434 0; 75436 0; 75438 0; 8TH PM POINT 75440 0; 75442 0; 75444 0; 75446 0; 75448 0; 75450 0; 75452 0; 75454 0; 75456 0; 9TH PM POINT 75458 0; 75460 0; 75462 0; 75464 0; 75466 0; 75468 0; 75470 0; 75472 0; 75474 0; 10TH PM POINT 75476 0; 75478 0; 75480 0; 75482 0; 75484 0; 75486 0; 75488 0; 75490 0; 75500 CONST 755 755 0 1013 W/L'S COMMON TO PASSES 1 AND 2 75502 (D)0; START OF SWITCH OF TRIAL PROG 75503 0; START OF SP CHAP OF TRIAL PROG 75504 0; NO OF PARAMETERS+1 75505 0; NO OF INITIAL CHAPS 75506 0; MOD GROUPX8 75507 ; PROG'S ENTRY POINT 75508 ; (A)ON ENTRY TO PROG 75509 ; (B) ON ENTRY TO PROG 75510 ; (C) ON ENTRY TO PROG 75511 0; 2ND HALF(B) 75512 0; (C) 75513 0; SPARE 75600 PROCR 756 756 ACHTUNG:IF THE NEXT PROCR IS ALTERED 75601 NOTES RADIX PROCR 1003 MUST BE CHANGED-IT ADDRESSES 2001 AS 1014 75700 PROCR 757 757 1014 STORE DETAILS (1) 74469> 74106>75702 5 772 4 1 0 0 772 TRIAL DATA IND Q1-5,LOSE SIGN->WL 74107>75703 125 4096 1 1 0 SET NON INT 75704 124 770 8 0 3 0 770 74109>75705 106 2 1 0 0 R1 OF MG 0 74110>75706 5 751 6 1 0 0 751 MASTER PROG SWITCH 74102>75707 124 770 8 0 3 0 770 75708 106 44 0 0 0 (3)SWITCH START EX PLS PARAS 75709 102 755 2 0 0 0 755 75710 124 755 2 0 3 0 755 START OF SP CHAP 75711 106 37 0 0 0 75712 102 755 3 0 0 0 755 75713 106 755 2 1 0 0 755 SET (MR1)(MG0)FOR PROG UNDER TRIAL 75714 124 770 8 0 3 0 770 75715 102 2 1 0 0 75716 124 755 2 0 3 0 755 STORE (A),(B), ON ENTRY TO PROG 75717 100 30 1 1 0 75718 100 755 8 1 0 0 755 75719 100 744 72 0 3 0 744 75720 124 755 2 0 3 0 755 STORE ENTRY POINT 75721 106 44 0 0 0 75722 102 755 7 0 0 0 755 75723 106 775 2 1 0 0 775 CLEAR LIST 75724 128 752 2 0 0 0 752 75725 124 755 2 0 3 0 755 SET PROGS MOD GROUP 75726 124 29 1 1 0 75727 126 755 3 1 2 0 755 SET (MR2)=SP CHAP START 75728 124 744 72 0 3 0 744 75729 106 14 0 2 0 STORE NO OF PARAMETERS+1 75730 102 755 4 0 0 0 755 75731 124 744 72 0 3 0 744 75732 106 4 0 2 0 STORE NO OF INITIAL CHAPS 75733 102 755 5 0 0 0 755 75734 124 744 72 0 3 0 744 75735 106 1 0 2 0 STORE 8XMOD GROUP 75736 118 3 0 3 0 75737 102 755 6 0 0 0 755 75738 124 757 4 0 2 0 757 75739 5 745 84 0 0 0 745 SET LINK FOR'ABDON' 75740 10 0 0 0 0 DUMMY ORDER 75741 106 769 4 0 0 0 769 75742 102 749 20 0 0 0 749 75743 126 749 9 0 0 0 749 SET(71)FOR PTS 75744 106 769 5 0 0 0 769 75745 124 744 72 0 3 0 744 75746 102 123 0 0 0 75747 101 752 2 1 3 0 752 SET MR1 AT 75748 107 770 17 0 0 0 770 START AND END OF LIST 75749 102 770 16 0 0 0 770 75750 126 770 16 1 1 0 770 75751 100 771 6 0 2 0 771 STEP PROG TAPE 75752 101 40 1 3 0 BACK ONE BLOCK 75753 126 749 2 0 0 0 749 g 75800 PROCR 758 758 1015 TEST DIRECTIVE 75814> 76350> 76351> 76407> 76418> 76548>75802 100 771 3 0 2 0 771 READ PROG TAPE 75803 101 7 1 3 0 75804 126 749 2 0 0 0 749 > 75805 124 771 2 1 2 0 771 75806 106 4 1 0 0 TEST=FILES 75807 105 770 4 1 0 0 770 75808 127 759 2 0 0 0 759 >YES 75809 104 770 4 1 0 0 770 TEST=CHAPT 75810 105 770 2 1 0 0 770 75811 127 764 2 0 0 0 764 TEST=''E'' 75812 104 770 2 1 0 0 770 75813 101 85 1 2 0 75814 127 758 2 0 1 0 758 75815 76 744 2 0 0 0 744 gOLAY 75900 PROCR 759 759 1016 STORE PM POINT INFORMATION 75808>75902 106 775 4 1 0 0 775 FORM UP BULK COPY 75903 124 770 8 0 3 0 770 TABLE 75904 104 123 0 0 0 75905 128 774 2 1 0 0 774 COPY ALPHA->NUMERIC 75906 106 774 2 0 0 0 774 STORE I/C SERIAL NO 75907 102 1 0 1 0 75908 101 24 0 1 0 75909 115 774 5 0 0 0 774 COLLATE N1 75910 118 4125 1 0 0 75911 102 4 0 1 0 STORE N1 75912 115 774 5 0 0 0 774 COLLATE N2 75913 118 3 0 0 0 75914 107 4 0 1 0 STORE N2 75915 101 23 0 1 0 75916 124 755 6 0 3 0 755 8M 75917 106 2 0 0 0 (MR1) 75918 102 773 2 0 0 0 773 75919 126 773 2 1 3 0 773 SET MODIFIER MR3=MODIFIER MR1 75920 115 774 4 0 0 0 774 COLLATE CHAP NO PM TYPE AND N3 75921 103 5 0 1 0 AND STORE 75922 118 4124 0 0 0 TEST PM TYPE 75923 101 5 1 2 0 75924 127 763 2 0 0 0 763 >TYPE 5 75925 101 4 1 2 0 75926 127 762 2 0 0 0 762 >TYPE 9(CLEO 6) 75927 101 3 1 1 0 75928 127 762 2 0 0 0 762 >TYPE 6 75929 127 759 31 0 2 0 759 gTYPE>6 TYPE 7=CLEO 1 75930 101 5 1 1 0 TYPE 8=CLEO 3 75929>75931 101 1 1 1 0 75932 102 772 5 0 0 0 772 W/L(FOR TYPE OR TYPE=5) 76000 PROCR 760 760 1017 CHAPTER PMS 76002 126 770 8 1 2 0 770 SET(MR2)=16:0 TYPE 1,2,3,4,7,8 76018>76003 106 772 5 0 0 0 772 76004 101 3 1 2 0 TEST CHAPTER DUMP 76005 127 761 2 0 2 0 761 >NO 76006 106 774 6 0 2 0 774 CHAP NO 76007 127 763 2 0 0 0 763 >END OF CHAPS 76008 103 8 0 3 0 STORE CHAP NO 76009 104 774 6 0 2 0 774 76010 126 766 2 0 0 0 766 >FORM UP CHAP DETAILS 76011 103 6 0 3 0 STORE CHAP START 76012 118 4123 0 0 0 76013 105 6 0 3 0 76125>76014 102 7 0 3 0 STORE CHAP LENGTH 76015 125 3 0 3 0 76016 124 760 17 1 0 0 760 g 76016>76017 125 4 0 2 0 TEST FOUR CHAPS DEAL 76018 124 760 3 1 0 0 760 >NO WITH 76019 124 763 2 1 0 0 763 >YES 76100 PROCR 761 761 1018 SECTION PM'S 76005>76102 125 0 1 2 0 76103 101 7 0 1 0 76104 115 774 6 0 2 0 774 COLLATE OUT SECTION NO 76105 127 763 2 0 0 0 763 >END OF SECNS 76106 102 8 0 3 0 STORE SECN NO 76107 101 16 0 1 0 76108 115 774 7 0 2 0 774 COLLATE TA IND 76109 127 761 17 0 0 0 761 >NOT TA IE SECN 76110 107 8 0 3 0 T A IND 76111 125 0 1 2 0 76112 101 24 0 1 0 76113 115 774 6 0 2 0 774 COLLATE RTE PARAM 76114 118 4125 0 0 0 2XRTE PARAM 76115 126 767 2 0 0 0 767 >FORM UP -(64+P) 76116 124 761 23 1 0 0 761 > 76109>76117 101 8 0 1 0 76118 115 774 6 0 2 0 774 CHAP NO (Q4) 76119 115 774 6 0 2 0 774 76120 118 4125 0 0 0 76121 126 766 2 0 0 0 766 >FORM UP CHAP START 76122 104 774 8 0 2 0 774 SECTION START 76116>76123 102 6 0 3 0 SECTION START 76124 106 774 9 0 2 0 774 SECTION LENGTH 76125 124 760 14 1 0 0 760 > 76200 PROCR 762 762 1019 TRACE POINTS PM'S 75928> 75926>76202 126 770 10 1 2 0 770 SET(MR2)=18:0 76225>76203 106 774 6 0 2 0 774 CHAP NO AND REL ADD 76204 127 763 2 0 0 0 763 END OF TRACE PTS 76205 102 6 0 3 0 STORE 76206 101 16 0 1 0 TEST PT IN SECN 76207 115 774 7 0 2 0 774 76208 127 762 16 0 0 0 762 >NO,PROCR 76209 118 3 0 3 0 76210 102 7 0 3 0 SET BIT 20 (SECN IND) 76211 101 15 0 1 0 76212 115 774 7 0 2 0 774 REF 76213 118 3 0 0 0 SHIFT 13 BITS LEFT 76214 118 1 0 3 0 76215 124 762 19 1 0 0 762 > 76208>76216 101 15 0 1 0 76217 115 774 7 0 2 0 774 REF 76218 118 2 0 0 0 76215>76219 107 7 0 3 0 STORE 76220 106 774 8 0 2 0 774 ITEM 76221 107 7 0 3 0 STORE 76222 125 2 0 3 0 76223 124 762 24 1 0 0 762 76223>76224 125 3 0 2 0 76225 124 762 3 1 0 0 762 >NO 76226 125 0 1 2 0 76300 PROCR 763 763 1020 STORE REPLACED INSTRUCTIONS 76204> 76105> 76019> 76007> 75924>76302 101 1 0 1 0 TYPE 5 76303 115 774 4 0 0 0 774 UNCORRECTED CHAP NO 76304 105 755 5 0 0 0 755 76305 127 763 52 0 2 0 763 >NO 76306 104 755 5 0 0 0 755 76307 103 772 3 0 0 0 772 W/L 76308 118 2 0 0 0 76309 107 4 0 1 0 STORE ALLOCATED CHAP NO 76310 106 772 3 0 0 0 772 76311 104 772 3 0 0 0 772 76312 126 766 2 0 0 0 766 >FORM UP CHAP START 76313 104 774 3 0 0 0 774 76314 103 0 0 1 0 STORE ABS ADD 76315 102 773 2 0 0 0 773 W/L 76316 126 773 2 1 3 0 773 SET (MR3)=ABS ADD 76317 124 744 72 0 3 0 744 76318 106 0 0 3 0 76319 103 2 0 1 0 76320 127 763 33 0 2 0 763 >YES 76321 105 2 0 1 0 FORM COMPLEMENT OF ACTION 76322 105 2 0 1 0 76323 118 3 0 3 0 ALIGN INSTRUCTION 76324 118 4124 0 1 0 AT LEAST SIG END 76325 101 64 1 2 0 76326 127 763 35 0 0 0 763 >24/0/0 76327 101 1 1 2 0 76328 127 763 35 0 0 0 763 >24/0/1 76329 101 2 1 2 0 76330 127 763 35 0 0 0 763 >24/0/3 76331 101 3 1 2 0 76332 127 763 35 0 0 0 763 >24/1/2 76320>76333 106 769 2 0 0 0 769 25/1/0 76334 124 763 39 1 0 0 763 76332> 76330> 76328> 76326>76335 101 4096 1 3 0 76336 107 5 0 1 0 STORE 24 ACTION IND 76337 124 744 72 0 3 0 744 76338 106 1 0 3 0 76334>76339 102 3 0 1 0 STORE 2ND INSTRUCTION 76340 100 771 4 0 2 0 771 76341 124 772 2 0 3 0 772 76342 115 18 0 0 0 COLLATE 13 BIT CHAP START 76343 102 772 2 0 0 0 772 W/L 76344 105 772 2 0 0 0 772 76345 105 755 4 0 0 0 755 NO OF PARAMS+1 76346 104 769 3 0 0 0 769 26/0/0 76347 124 744 72 0 3 0 744 76348 102 0 0 3 0 INSERT IN PROG 76354>76349 125 18 0 1 0 76350 124 758 2 1 0 0 758 > 76351 124 758 2 1 0 0 758 >END OF 10 PM PTS 76305>76352 106 774 3 0 0 0 774 STORE REL ADDRESS 76353 102 0 0 1 0 76354 124 763 49 1 0 0 763 > 76400 PROCR 764 764 1021 OPEN TRIAL DATA FILE 75811>76402 0 775 6 1 0 0 775 76403 124 770 8 0 3 0 770 76404 104 123 0 0 0 76405 128 774 2 1 1 0 774 >UNPACK 76406 0 774 14 2 0 0 774 MT SET NUMBER 76407 70 758 2 0 0 0 758 gIGNORE SET 76408 12 0 0 0 9 76409 70 764 19 0 0 0 764 gALWAYS ACCEPT 76410 34 772 4 0 0 0 772 TRIAL DATA IND 76411 10 0 0 0 0 76417>76412 36 771 7 0 0 0 771 Q1 76413 2 774 14 2 0 0 774 76414 70 764 19 0 0 0 764 gACCEPT 76415 10 0 0 0 0 76416 32 0 0 0 1- 76417 75 764 12 0 0 0 764 gCONTINUE SEARCH 76418 76 758 2 0 0 0 758 gIGNORE SET 76414> 76409>76419 106 774 11 1 0 0 774 PSEUDO RTE PARAMETER 76420 126 767 2 0 0 0 767 >FORM UP=(64+R) 76421 102 772 3 0 0 0 772 W/L 76422 106 774 5 1 0 0 774 RTE PARAMETER 76423 126 767 2 0 0 0 767 >FORM UP=(64+R) 76424 101 64 1 1 0 76425 5 767 2 0 0 0 767 WL 76426 2 767 2 0 0 0 767 76427 30 0 0 0 0 ///// DUMMY ORDERS 76428 30 0 0 0 0 ///// 76429 102 772 2 0 0 0 772 W/L 76430 124 755 2 0 3 0 755 STORE PROG RUN NO 76431 106 40 0 0 0 76432 102 771 5 0 0 0 771 76433 0 774 8 2 0 0 774 MT RUN NUMBER 76434 30 0 0 0 1 76435 1 774 14 2 0 0 774 SET NUMBER AS RERUN 76436 124 755 2 0 3 0 755 76437 102 40 0 0 0 76438 106 774 3 1 0 0 774 PROG ID 76439 118 4123 1 1 0 76440 104 774 6 1 0 0 774 FILE ID 76441 118 4123 1 1 0 76442 101 18 1 1 0 76443 126 768 2 0 0 0 768 >I/P-O/P FOR TRIAL DATA 76444 106 771 5 0 0 0 771 RESTORE RUN NO 76445 124 755 2 0 3 0 755 76446 102 40 0 0 0 76500 PROCR 765 765 1022 WRITE TRIAL DATA 76502 106 774 13 1 0 0 774 76503 118 5 0 0 0 76504 102 773 2 1 0 0 773 76505 126 773 2 1 3 0 773 SET (MR3)=TRANSIT ARLENGTH 76542>76506 100 771 3 0 2 0 771 READ PROG TAPE 76507 101 7 1 3 0 76508 126 749 2 0 0 0 749 g 76509 126 770 12 1 2 0 770 SET (MR2) AT 48/0 76541>76510 124 770 8 0 3 0 770 TEST NEXT WORD 76511 124 123 0 3 0 =FIEND 76512 106 4 1 2 0 TEST NEXT WORD 76513 105 770 6 1 0 0 770 76514 127 765 43 0 0 0 765 >YES 76515 124 770 8 0 3 0 770 CONVERT WORD FROM 76516 124 123 0 3 0 DOUBLE ALPHA 76517 106 5 1 2 0 TO ALPHA 76518 118 5 0 0 0 76519 124 770 8 0 3 0 770 76520 124 123 0 3 0 76521 104 7 1 2 0 76522 124 772 3 1 2 0 772 STORE CONVERTED WORD 76523 103 4 1 3 0 76524 105 770 14 1 0 0 770 TEST BLOCK END WORD 76525 127 765 31 0 0 0 765 >YES 76526 125 2 0 3 0 TEST END OF TRANSIT 76527 124 765 40 1 0 0 765 >NO AREA 76528 106 770 14 1 0 0 770 B/E WORD 76529 124 772 3 1 2 0 772 76530 102 4 1 3 0 76525>76531 101 64 1 2 0 76532 105 772 3 0 0 0 772 76533 118 4118 1 0 0 SET (B)=PSEUDO RTE 76534 101 8 1 1 0 76535 126 768 2 0 0 0 768 >I/P-O/P FOR TRIAL DATA 76536 106 774 13 1 0 0 774 RESET (MR3) AT TRANSIT 76537 118 5 0 0 0 AREA LENGTH 76538 102 773 2 1 0 0 773 76539 126 773 2 1 3 0 773 76527>76540 125 4 0 2 0 TEST END OF INPUT 76541 124 765 10 1 0 0 765 >NO AREA 76542 124 765 6 1 0 0 765 >YES 76514>76543 101 33 1 3 0 REWIND FILE 76544 126 768 2 0 0 0 768 >I/P-O/P FOR TRIAL DATA 76545 125 0 1 2 0 76546 124 772 2 0 3 0 772 ROUTE 76547 102 0 0 0 0 -16 76548 124 758 2 1 0 0 758 > 76600 PROCR 766 766 1023 FORM UP CHAPTER START & END S/R 76602 81 766 2 0 0 0 766 76603 3 767 2 0 0 0 767 2X CHAP 76604 1 755 3 0 0 0 755 SPECIAL CHAP START 76605 5 772 2 0 0 0 772 76606 124 770 8 0 3 0 770 76607 106 43 0 0 0 (3) 76608 30 0 0 0 4- 76609 2 767 2 0 0 0 767 76610 70 766 13 0 0 0 766 gTHIS CHAP CONTAINS PTS 76611 10 0 0 0 0 76612 76 766 15 0 0 0 766 76610>76613 101 1500 1 2 0 (REDUCE CHAP END VALUE) 76614 30 0 0 0 5 76612>76615 124 772 2 0 3 0 772 76616 104 18 1 0 0 76617 82 766 2 0 0 0 766 76700 PROCR 767 767 1024 FORM UP -(64+R)FROM RTE PARAMETER 76702 100 0 0 0 0 76703 124 755 3 0 3 0 755 76704 104 20 0 0 0 START OF 1ST CHAP (2XRTE PARAM IN A) 76705 102 772 2 0 0 0 772 W/L 76706 124 772 2 0 3 0 772 76707 105 0 0 0 0 P 76708 101 64 1 2 0 76709 126 767 2 0 1 0 767 > 76800 PROCR 768 768 1025 I/P O/P FOR TRIAL DATA S/R 76802 100 0 0 0 0 76803 118 5 0 0 0 76804 104 772 2 0 0 0 772 76805 125 4096 1 1 0 SET NON INT 76806 124 770 8 0 3 0 770 76807 123 160 0 2 0 >ENTER M/R 76808 126 768 2 0 1 0 768 76900 PROCR 769 769 1026 INSTRUCTION CONSTANTS FOR PASS 1 76902 125 0 1 0 0 76903 126 0 0 0 0 76904 114 742 2 0 0 0 742 76905 114 743 2 0 0 0 743 77000 CONST 770 770 1 1027 CONSTANTS FOR PASS 1 77002 (A)CHAPT; 77004 (A)FILES; 77006 (A)FIEND; 77008 (D)0001000000; 16:00 77010 0001200000; 18:00 77012 0003000000; 48:0 77014 7.0000007.; B/E/WORD 77016 000e400000; 180:0 77018 0000500000; MR CONST 77100 CONST 771 771 0 1028 CONSTANTS FOR PASS 1 77102 (D)0007e-; -123(P.RTE FOR RTE 0) 77103 0003e; 59 PRTE FOR RTE 0 77104 01£££; BITS 1-13 77105 00000; RUN NO 77106 00001; 77107 £; Q1 77200 CONST 772 772 0 W/L'S FOR PASS 1 1029 77202 (D)0; GENERAL W/L 77203 0; GENERAL W/L 77204 ; TRIALS IND 77205 0; PM TYPE W/L 77300 CONST 773 773 1 1030 LONG W/L'S FOR PASS 1 77302 (D)0; W/L 77400 CONST 774 774 1 1031 UNPACKED I/P FOR PASS 1 77402 (D)0; 77404 0; 77406 0; 77408 0; 77410 0; 77412 0; 77414 0; 77416 0; 77418 0; 77420 0; 77422 0; 77500 CONST 775 775 1 1032 BULK CLEAR AND COPY CONSTS 77502 (D)200e400000; BULK CLEAR 180 77504 0002+00007; BULK CLEAR 44 FROM7 77506 0000.00006; BULK CLEAR 14 FROM6 77600 PROCR 776 776 START OF PASS 5 77610> 77612> 77614> 88214>77602 152 152 4 0 0 0 152 CALL REST OF PTS 77603 C 918 2 0 0 0 918 77604 0 27 13 0 0 0 77605 71 777 18 0 0 0 777 g'TRAMDING'ONLY 77606 76 777 2 0 0 0 777 77607 152 152 4 0 0 0 152 77608 C 994 2 0 0 0 994 77609 85 511 2 0 0 0 511 77610 C 776 2 0 0 0 776 77611 85 514 2 0 0 0 514 77612 C 776 2 0 0 0 776 77613 85 153 2 0 0 0 153 77614 C 776 2 0 0 0 776 77615 43 A1 0 0 0 0 SET UP SEC 5 77616 C 5 0 0 0 0 77700 PROCR 777 777 PREPARE FOR 08005 77705> 77606>77702 80 779 2 0 0 0 779 gREAD A6 77703 9 4 1 0 0 77704 2 908 12 1 0 0 908 INDEX' 77705 71 777 2 0 0 0 777 77706 84 352 2 0 0 0 352 CLEAR SWITCH 77707 90 0 0 1 0 77708 C 0 0 0 1010 77717>77709 90 0 0 2 0 77710 C 0 0 0 48 77711 80 779 2 0 0 0 779 gREAD A6 77716>77712 9 4 2 2 0 77713 5 18 10- 0 1 0 77714 94 777 16 0 1 1 777 77715 76 777 18 0 0 0 777 gEND 77714>77716 94 777 12 0 2 2 777 77717 76 777 9 0 0 0 777 77715> 77605>77718 54 869 5 0 0 3 869 CLEAR CTRS 77719 27 3 0 0 0 77720 70 778 2 0 0 0 778 gNO B/FWD TRIAL DATA 77721 48 A1 0 0 0 1 77722 C 0 0 0 1 77723 0 27 11 0 0 0 77724 71 778 4 0 0 0 778 PT=TRAMD 77725 10 0 0 0 5565540000 END ' 77726 5 9 0 1 0 0 NO PT TRAMD,SET END 77727 76 781 2 0 0 0 781 77800 PROCR 778 778 ALIGN A1,CHECK FIRST P/T BLOCK 77801 NOTES RADIX B 77720>77802 0 27 11 0 0 0 77803 70 882 2 0 0 0 882 gNO PT TRAMD OR MT TRIAL DATA 77807> 77724>77804 80 811 2 0 0 0 811 gREAD P/T 77805 0 9 0 1 0 0 77806 2 870 2 1 0 0 870 TRAMD' 77807 71 778 4 0 0 0 778 gNOT YET 77808 62 0 0 0 0 77809 80 892 2 0 0 0 892 g3 BLANK LINES 77810 80 892 2 0 0 0 892 77811 80 892 2 0 0 0 892 77812 76 781 2 0 0 0 781 77900 PROCR 779 779 READ A6->9 77902 81 779 2 0 0 0 779 77903 42 A6 0 0 0 0 77904 C 9 0 0 0 0 77905 82 779 2 0 0 0 779 78000 PROCR 780 780 ADJUST INTERCODE ADDRESSES FOR DUMP POINTS 78002 81 780 2 0 0 0 780 (A)=5-DIGIT SERIAL 78003 3 875 4 0 0 0 875 WL 78004 12 0 0 0 10000 78005 73 780 77 0 0 0 780 gREPORT REF<100 78006 12 0 0 0 89899 78007 72 780 77 0 0 0 780 gREPORT REF>998 78008 0 27 13 0 0 0 0 78009 70 780 12 0 0 0 780 gNOT TRAMDING ONLY 78010 0 875 4 0 0 0 875 78011 82 780 2 0 0 0 780 78009>78012 0 875 4 0 0 0 875 78013 32 0 0 0 2- 78014 5 875 4 0 0 0 875 REF 78015 32 0 0 0 2 78016 5 875 5 0 0 0 875 ITEM 78017 875 4 0 0 0 875 PROCR REPLACE PROCR 78018 80 821 2 0 0 0 821 gBIN 78019 33 0 0 0 1- HALVE 78020 5 875 2 1 0 0 875 78021 91 875 2 0 3 0 875 78022 74 780 26 0 0 0 780 gEVEN 78023 18 60- 0 3 0 (STARTS 18/10-) 78024 31 0 0 0 10- 78025 76 780 28 0 0 0 780 78022>78026 34 868 6 0 0 0 868 BITS 1-10 78027 36 18 60- 0 3 0 78025>78028 80 822 2 0 0 0 822 gDEC 78029 60 0 0 0 0 78030 70 780 66 0 0 0 780 gTRY UNIQUE REFS 78031 5 875 4 0 0 0 875 NEW PROCR ADJUST RESULT 78032 5 875 2 0 0 0 875 CLEAR WL 78033 90 0 0 3 0 78034 C 0 0 0 460 78047>78035 18 440 0 3 0 78036 32 0 0 0 2- PROCR 78037 70 780 48 0 0 0 780 gEND 78038 2 875 4 0 0 0 875 NEW PROCR 78039 73 780 47 0 0 0 780 gSEARCH 78040 71 780 48 0 0 0 780 gEND(GREATER) 78041 32 0 0 0 2 ITEM IN PROCR 78042 2 875 5 0 0 0 875 OLD ITEM 78043 70 780 45 0 0 0 780 78044 72 780 59 0 0 0 780 gNEXT ADJUST POINT IS LATER 78043>78045 18 441 0 3 0 78046 4 875 2 0 0 0 875 AUG TOTAL ADJUSTMENT 78039>78047 94 780 35 0 3 2 780 78061> 78040> 78037>78048 875 2 0 0 0 875 TOTAL ADJUSTMENT 78049 1 875 5 0 0 0 875 OLD ITEM 78050 3 875 5 0 0 0 875 78051 12 0 0 0 100 78052 72 780 64 0 0 0 780 gITEM TOO LARGE 78053 62 0 0 0 0 78054 875 4 0 0 0 875 NEW REF 78055 30 0 0 0 2 78056 1 875 5 0 0 0 875 NEW ITEM 78057 82 780 2 0 0 0 780 78058 76 780 81 0 0 0 780 gEXIT 78044>78059 1 18 441 0 3 0 78060 70 780 62 0 0 0 780 gADDRESS DELETED 78061 72 780 48 0 0 0 780 gNEXT IS DELETION 78060>78062 10 0 0 0 5:5:5:5:7£ ????DELTA' 78063 76 805 3 0 0 0 805 78052>78064 10 0 0 0 5:5:5:5:59 ????I' 78065 76 805 3 0 0 0 805 78030>78066 875 4 0 0 0 875 REF UNIQUE REFS 78067 30 0 0 0 2 78068 1 875 5 0 0 0 875 ITEM 78069 5 875 2 0 0 0 875 78070 90 0 0 3 0 78071 C 0 0 0 100 78076>78072 18 900 0 3 0 78073 70 780 77 0 0 0 780 gEND,REPORT 78074 2 875 2 0 0 0 875 78075 70 780 80 0 0 0 780 gMATCH 78076 94 780 72 0 3 2 780 78073> 78007> 78005>78077 10 0 0 0 5:5:5:5:69 ????R' 78078 62 0 0 0 0 78079 76 805 3 0 0 0 805 78075>78080 18 901 0 3 0 78058>78081 62 0 0 0 0 78082 82 780 2 0 0 0 780 78100 PROCR 781 781 STORE TRANSLATOR'S INFORMATION 78101 NOTES RADIX B COPY TAPE TO TRIALS INFORMATION 77812> 77727>78102 0 92 29 0 0 0 INITIAL CHAPS 78103 5 869 3 0 0 0 869 78104 52 5 2 0 0 0 EDIT PRINTER HEADING 78105 C 875 2 0 0 0 875 78106 00 872 6 1 0 0 872 78107 80 817 2 0 0 0 817 PRINT 78108 83 826 4 0 0 1 826 78109 83 129 2 0 0 2 129 78110 00 27 3 0 0 0 78111 71 781 15 0 0 0 781 gNO 78112 00 870 8 1 0 0 870 PUT PREND IN ANNEXE 78113 05 7 4 1 0 0 78114 76 782 2 0 0 0 782 78111>78115 80 810 2 0 0 0 810 gREAD A1 78116 00 7 4 1 0 0 78117 02 870 6 1 0 0 870 78118 70 783 2 0 0 0 783 gYES 78119 80 841 2 0 0 0 841 gPRINT DUMPS HEADING 78120 76 789 2 0 0 0 789 78200 PROCR 782 782 INITIAL SUBMISSION OF DUMPS POINTS 78201 NOTES RADIX B AND TRIAL DATA 78214> 78114>78202 80 811 2 0 0 0 811 gREAD B1 78203 00 9 0 1 0 0 78204 02 870 12 1 0 0 870 78205 70 783 11 0 0 0 783 gYES 78206 01 870 12 1 0 0 870 78207 02 870 10 1 0 0 870 78208 70 782 15 0 0 0 782 78209 01 870 10 1 0 0 870 78210 30 0 0 0 4- 78211 12 0 0 0 556554 78212 70 804 3 0 0 0 804 gYES 78213 80 820 2 0 0 0 820 gPRINT ERROR LINE 78214 76 782 2 0 0 0 782 g 82618> 78208>78215 80 814 2 0 0 0 814 gUNPACK'FILES' 78216 80 849 2 0 0 0 849 78217 80 848 2 0 0 0 848 gPROCESS/PRINT HEADING 78222>78218 80 838 2 0 0 0 838 gSET PRINT MR+CTRS 78219 10 0 0 0 1- 78220 5 833 12 0 0 0 833 SET IND 78221 80 784 2 0 0 0 784 gAPPLY PT 78222 71 782 18 0 0 0 782 gNOT NEW DATA TYPE 78223 76 803 37 0 0 0 803 gTEST 78300 PROCR 783 783 PROCESS P.M. POINTS 78301 NOTES RADIX B 78118>78302 0 27 11 0 0 0 78303 71 783 7 0 0 0 783 gPT=TRAMD 78304 10 0 0 0 5565540000 SET PT='END ' 78305 5 9 0 1 0 0 78306 76 803 37 0 0 0 803 gDEAL WITH MT TRIAL DATA 78303>78307 80 811 2 0 0 0 811 78308 0 9 0 1 0 0 TEST DUMPS BLOC 78309 2 870 12 1 0 0 870 OF P/T 78310 71 803 37 0 0 0 803 gNO 78205>78311 80 841 2 0 0 0 841 gPREPARE FOR DUMPS POINTS S/R 78316>78312 80 813 2 0 0 0 813 UNPACK P/T 78313 80 842 2 0 0 0 842 PROCESS DUMPS POINT 78314 80 811 2 0 0 0 811 gREAD P/T 78315 80 826 2 0 0 0 826 gTEST P/T S/R 78316 76 783 12 0 0 0 783 g 78400 PROCR 784 784 SR TO OUTPUT CURRENT BLOCK OF PT 78401 NOTES RADIX B 78402 81 784 2 0 0 0 784 78703>78403 80 811 2 0 0 0 811 READ P/T 78404 80 791 2 0 0 0 791 gTEST END OF DATA TYPE 78405 71 823 2 0 0 0 823 gUNPACK PT 78406 833 12 0 0 0 833 78407 70 787 19 0 0 0 787 gYES(EXIT WITH A ZERO) 78408 86 786 2 0 0 0 786 BEW FOUND? 78409 12 0 0 0 2 78410 71 787 17 0 0 0 787 gYES EXIT WITH ZERO 78411 83 352 2 0 0 1 352 SET NO 78412 872 4 1 0 0 872 78413 76 786 17 0 0 0 786 O/P IT 82553>78414 85 785 2 0 0 0 785 TEST BLOCK AND 78415 C 785 2 0 0 0 785 >NO ITEM LENBTHS TO 78416 C 784 17 0 0 0 784 >YES BE CHECKED 78416>78417 85 781 2 0 0 0 781 TEST BEGINNING 78418 C 785 2 0 0 0 785 >NO OF TD BLOCK 78419 C 784 20 0 0 0 784 >YES 78419>78420 10 0 0 0 6 SET ITEM LGTH POSN 78421 3 32 165 0 0 0 AT 6 78422 1 32 96 2 0 0 78423 80 822 2 0 0 0 822 gCONVERT TO DEC 78424 5 32 166 0 0 0 78500 PROCR 785 785 DEAL WITH BLANK LINES 78501 NOTES RADIX B 78418> 78415>78502 35 0 0 0 11 78503 10 0 0 0 0 CLEAR A 78504 36 32 92 2 0 0 Q1&2 OF PT LINE SERIAL 78505 5 32 92 2 0 0 78518>78506 32 139 0 0 0 LINE CTR 78507 2 32 92 2 0 0 PT LINE SERIAL 78508 72 786 2 0 0 0 786 gNO 78509 80 839 2 0 0 0 839 gSTEP WORD NOS BY 14 S/R 78510 90 0 0 12 0 SET 7 ZERO WORDS 78511 C 0 0 0 7 78513>78512 80 851 2 0 0 0 851 gSTEP(MR1)S/R 78513 94 785 12 0 12 1 785 78514 10 0 0 0 1 STEP LINE SERIAL CTR 78515 60 0 0 0 0 BY 1 78516 4 32 139 0 0 0 78517 62 0 0 0 0 78518 76 785 6 0 0 0 785 gGENERATE MORE BLANK LINES 78600 PROCR 786 786 PROCESS NEGATIVE WORDS 78601 NOTES RADIX B 78508>78602 60 0 0 0 0 78603 00 32 92 2 0 0 SET LINE CTR=LINE 78604 11 0 0 0 1 SERIAL+1 78605 05 32 139 0 0 0 78606 62 0 0 0 0 78706> 78713>78607 0 32 94 1 5 0 NEXT PT WORD 78608 72 786 17 0 0 0 786 gNO 78609 00 32 94 2 5 0 78610 80 822 2 0 0 0 822 gCONVERT TO DEC 78611 05 32 22 2 2 0 78612 10 0 0 0 5300000000 SET C SP SP SP SP 78613 35 0 0 0 1100000000 IN*WORD 78614 37 32 22 1 2 0 78615 83 787 4 0 0 2 787 78616 02 32 94 1 5 0 78608> 78413>78617 03 32 36 1 1 0 STORE FOR M/T 78618 3 32 0 1 2 0 78619 833 12 0 0 0 833 78620 71 786 34 0 0 0 786 gBLOCK AMENDMENT 78621 32 0 1 2 0 78622 85 781 2 0 0 0 781 FIRST WORD SWITCH 78623 C 786 42 0 0 0 786 >NO 78624 C 786 25 0 0 0 786 >YES 78624>78625 5 32 2 1 2 0 PUT 1ST WORD IN WORD 4 POSITION 78626 5 32 0 1 2 0 78627 10 0 0 0 6 78628 3 32 165 0 0 0 SET 78629 1 32 2 2 2 0 ADD BLOCK LENGTH 78630 80 822 2 0 0 0 822 gDEC 78631 5 32 166 0 0 0 SET AS NEW BLOCK LENGTH 78632 83 781 2 0 0 1 781 RESET SWITCH 78633 94 786 42 0 2 2 786 >(UNCONDITIONAL) 78620>78634 86 849 2 0 0 0 849 BLOCK AMEND 78635 12 0 0 0 2 78636 71 786 40 0 0 0 786 gNOT FIRST PRINTED LINE OF BLOCK 78637 10 0 0 0 10000 78638 35 0 0 0 10000 78639 37 32 14 0 0 0 SET'>>'IND 78636>78640 80 858 2 0 0 0 858 gPROCESS WORD 78641 76 786 57 0 0 0 786 78633> 78623>78642 80 788 2 0 0 0 788 gSET'AMEND'IND,PROCESS WORD 78643 86 830 2 0 0 0 830 78644 12 0 0 0 2 78645 71 786 53 0 0 0 786 gINSERTING,NOT REPLACING WORDS 78646 32 140 1 8 0 WORD BEING REPLACED 78647 5 875 4 1 0 0 875 WL 78648 80 861 2 0 0 0 861 STEP (MR8) S/R 78649 80 840 2 0 0 0 840 STEP WORD CTR S/R 78650 875 4 1 0 0 875 WORD JUST REPLACED 78651 2 872 4 1 0 0 872 BEW 78652 70 786 57 0 0 0 786 gOK,BEW REPLACED BEW 78645>78653 86 786 2 0 0 0 786 BEW FOUND'SWITCH 78654 12 0 0 0 1 78655 70 787 2 0 0 0 787 gBEW NOT OUTPUT 78656 80 862 2 0 0 0 862 gDRAIN REST OF M/T BLOCK BEING AMENDED 78652> 78641>78657 85 786 4 0 0 0 786 TEST B/E FOUND 78658 C 787 2 0 0 0 787 >NO 78659 C 787 14 0 0 0 787 >YES 78660 C 787 15 0 0 0 787 >YES AT END OF LINE 78700 PROCR 787 787 PREPARE FOR NEXT BLOCK 78701 NOTES RADIX B 78658> 78655>78702 94 787 4 0 5 2 787 >NOT END OF THIS PT BLOCK 78703 76 784 3 0 0 0 784 gREAD MORE PT 78702>78704 00 32 94 1 5 0 NEXT PT WORD 78705 02 872 8 1 0 0 872 'SXBE'=END SIGN 78706 71 786 7 0 0 0 786 gNO 78707 833 12 0 0 0 833 78708 73 787 11 0 0 0 787 gINSERTING ENTIRE TD SET 78709 10 0 0 0 1- 78710 82 784 2 0 0 0 784 (A)<0 78708>78711 10 0 0 0 0 DELETE END SIGN 78712 5 32 94 1 5 0 78713 76 786 7 0 0 0 786 78659>78714 80 853 2 0 0 0 853 gEND OF TRIAL DATA BLOCK S/R 78660>78715 86 352 2 0 0 0 352 78716 70 787 20 0 0 0 787 gEXIT WITH 1 78410>78717 10 0 0 0 0 78718 84 352 2 0 0 0 352 CLEAR SWITCH(EXIT WITH 0) 78407>78719 82 784 2 0 0 0 784 78716>78720 10 0 0 0 1 EXIT WITH 1 78721 82 784 2 0 0 0 784 78800 PROCR 788 788 PROCESS WORD EXPT AND SET'->'IND 78802 81 788 2 0 0 0 788 78803 96 0 0 2 0 78804 31 0 0 0 1- 78805 5 858 2 0 0 0 858 WL 78806 124 858 2 0 1 0 858 78807 2 32 15 0 0 0 78808 124 858 2 0 1 0 858 78809 5 32 15 0 0 0 SET NEGATIVE 78810 80 858 2 0 0 0 858 gPROCESS WORD 78811 82 788 2 0 0 0 788 78900 PROCR 789 789 PRINT DUMP POINT IF NOT TO BE AMENDED 78901 NOTES RADIX B 78910> 78923> 78120>78902 80 791 2 0 0 0 791 gTEST PT=END 78903 70 789 21 0 0 0 789 gYES,REST OF MT DUMPS 78904 0 9 0 1 0 0 78905 32 0 0 0 2- 78906 12 0 0 0 54746467 'DUMP' 78907 70 789 11 0 0 0 789 gYES 78920> 79009>78908 80 820 2 0 0 0 820 gPRINT PT 78909 80 811 2 0 0 0 811 gREAD PT 78910 76 789 2 0 0 0 789 78907>78911 32 0 0 0 2 78912 12 0 0 0 59 'I' 78913 71 789 17 0 0 0 789 gNO 78914 10 0 0 0 41 REPLACE 'DUMPI' BY 'DUMP1' 78915 35 0 0 0 11 78916 37 9 0 1 0 0 79016> 79030> 78913>78917 0 9 0 1 0 0 TEST AMENDMENT TO TH 78918 02 7 50 1 0 0 DUMPS POINT 78919 70 790 2 0 0 0 790 gYES 78920 73 789 8 0 0 0 789 gREPORT PT 79012> 79026> 78903>78921 76 854 2 0 0 0 854 gOUTPUT DUMPS POINT EX MT 79034> 79038> 79042> 79049> 85537>78922 80 857 2 0 0 0 857 gREAD A1,TEST'CHART/PREND/E' 78923 71 789 2 0 0 0 789 gNO,TEST PT 78928> 79024>78924 80 791 2 0 0 0 791 gTEST PT=END 78925 70 803 37 0 0 0 803 gYES 79044>78926 80 820 2 0 0 0 820 gPRINT PT 78927 80 811 2 0 0 0 811 gREAD PT 78928 76 789 24 0 0 0 789 gLOOP TO PT END 79000 PROCR 790 790 IMPLEMENT DUMPS POINT AMDTS 79001 NOTES RADIX B 78919>79002 00 9 2 1 0 0 TEST DIRECTIVE 79003 30 0 0 0 8- 79004 12 0 0 0 54 79005 70 790 32 0 0 0 790 gDELETE 79006 12 0 0 0 15 79007 70 790 20 0 0 0 790 gREPLACE 79008 12 0 0 0 t 79009 71 789 8 0 0 0 789 gNOT INSERT,REPORT 79019>79010 80 811 2 0 0 0 811 gREAD PT INSERTION 79011 80 791 2 0 0 0 791 gTEST END 79012 70 789 21 0 0 0 789 gYES,FINISH MT 79013 0 9 0 1 0 0 79014 30 0 0 0 2- 79015 12 0 0 0 54746467 'DUMP' 79016 70 789 17 0 0 0 789 gEND OF INSERTION 79017 80 813 2 0 0 0 813 gUNPACK PT 79018 80 842 2 0 0 0 842 gPROCESS PT 79019 76 790 10 0 0 0 790 79031> 79007>79020 80 813 2 0 0 0 813 gUNPACK PT REPLACEMENT 79021 80 842 2 0 0 0 842 gPROCESS PT 79022 80 811 2 0 0 0 811 gREAD PT 79023 80 857 2 0 0 0 857 gREAD MT,TEST END 79024 70 789 24 0 0 0 789 gYES 79025 80 791 2 0 0 0 791 gTEST PT=END 79026 70 789 21 0 0 0 789 gYES,FINISH MT 79027 0 9 0 1 0 0 79028 30 0 0 0 2- 79029 12 0 0 0 54746467 'DUMP' 79030 70 789 17 0 0 0 789 gNEW DIRECTIVE 79031 76 790 20 0 0 0 790 gASSUME REPLACES NEXT LINE 79005>79032 80 811 2 0 0 0 811 gREAD PT DELETIONS 79033 80 791 2 0 0 0 791 gTEST END 79034 70 789 22 0 0 0 789 gYES DELETION ENDED 79035 0 9 0 1 0 0 79036 30 0 0 0 2- 79037 12 0 0 0 54746467 'DUMP' 79038 71 789 22 0 0 0 789 gNO,READ MT,PREPARE TO REPORT PT 79039 0 9 3 0 0 0 79040 70 790 43 0 0 0 790 gOK MULTIPLE DELETION 79041 2 872 5 0 0 0 872 79042 71 789 22 0 0 0 789 gNOT MULTIPLE DELETION 79047> 79040>79043 80 857 2 0 0 0 857 gREAD MT,TEST END 79044 70 789 26 0 0 0 789 gYES,PRINT REPORT 79045 0 7 50 1 0 0 79046 2 9 0 1 0 0 79047 71 790 43 0 0 0 790 gDELETION NOT FINISHED 79048 80 811 2 0 0 0 811 gREAD PT 79049 76 789 22 0 0 0 789 79100 PROCR 791 791 TEST PT=END OF DUMPS DATA 79102 81 791 2 0 0 0 791 79103 0 9 0 1 0 0 79104 30 0 0 0 2- 79105 12 0 0 0 56596355 'FILE' 79106 70 791 10 0 0 0 791 gYES 79107 0 9 0 1 0 0 79108 30 0 0 0 4- 79109 12 0 0 0 556554 'END' 79106>79110 82 791 2 0 0 0 791 79200 PROCR 792 792 'FILER'AND'FILED'DATA TYPES=REPLACEMENT/DELETION OF WHOLESET 79201 NOTES RADIX B WHOLE TD SET 79214> 82620>79202 00 7 4 1 0 0 TEST CHAPT BLOCK 79203 02 870 6 1 0 0 870 79204 71 804 2 0 0 0 804 gNO,ERROR 79205 80 814 2 0 0 0 814 UNPACK 79206 0 30 2 1 0 0 ROUTE IDENTIFIER 79207 80 812 2 0 0 0 812 gR-ALIGN 79208 02 7 26 1 0 0 TEST RIGHT FILE 79209 70 792 15 0 0 0 792 gYES 79222>79210 7 26 1 0 0 79211 30 0 0 0 6 79212 5 30 2 1 0 0 79213 80 856 2 0 0 0 856 gPRINT'FILE UNALTERED' 79214 76 792 2 0 0 0 792 g 79209>79215 0 7 18 2 0 0 79216 30 0 0 0 7 LOSE POSSIBLE ££ IN Q4 AND Q5 79217 30 0 0 0 7- 79218 5 869 8 0 0 0 869 79219 0 30 10 2 0 0 SET EX PT 79220 80 812 2 0 0 0 812 gR-ALIGN 79221 2 869 8 0 0 0 869 TEST RIGHT SET 79222 71 792 10 0 0 0 792 gNO 79224>79223 80 857 2 0 0 0 857 gREAD,TEST PREND,CHAPT OR E 79224 71 792 23 0 0 0 792 gNO 79225 76 797 17 0 0 0 797 g 79300 PROCR 793 793 'FILEA'DATA TYPE=FIND FILE BEING AMENDED 79301 NOTES RADIX B 79724> 82611>79302 80 829 2 0 0 0 829 gUNPACK PT 79303 0 833 2 1 0 0 833 PT FILE 79304 2 32 126 1 0 0 MT FILE 79305 71 793 16 0 0 0 793 gNOT THIS 79306 0 833 4 0 0 0 833 PT SET 79307 2 32 125 0 0 0 MT SET 79308 71 793 16 0 0 0 793 gNO 79309 80 799 2 0 0 0 799 gTEST'FIEND' REPORT IF SO 79310 0 833 12 0 0 0 833 NEXT IS BLOCK AMEND? 79311 71 796 3 0 0 0 796 gYES,FINISH THIS BLOCK 79738>79312 0 833 6 0 0 0 833 PT BLOCK (WORD AMEND) 79313 2 32 138 0 0 0 PT BLOCK 79314 71 796 3 0 0 0 796 gDIFFERENT BLOCK,FINISH THIS ONE 79315 76 798 2 0 0 0 798 gAPPLY 79727> 79730> 79308> 79305>79316 80 864 2 0 0 0 864 gWRITE AND PRINT TO FIEND 79331>79317 00 7 4 1 0 0 TEST CHAPT BLOCK 79318 02 870 6 1 0 0 870 79319 71 804 2 0 0 0 804 gNO ERROR 79320 0 833 2 1 0 0 833 PT FILE 79321 2 7 26 1 0 0 MT FILE 79322 71 793 27 0 0 0 793 gNO 79323 35 0 0 0 1 79324 36 7 18 2 0 0 MT SET 79325 2 833 4 0 0 0 833 PT SET 79326 70 795 2 0 0 0 795 gYES 79322>79327 0 7 26 1 0 0 ROUTE IDENTIFIER 79328 30 0 0 0 6 79329 5 30 2 1 0 0 79330 80 856 2 0 0 0 856 gPRINT'FILE UNALTERED' 79331 76 793 17 0 0 0 793 g 79400 PROCR 794 794 PREPARE TO APPLY AMENDMENTS 79401 NOTES RADIX B 79402 81 794 2 0 0 0 794 79403 00 7 12 2 0 0 RUN NO 79404 05 30 4 0 0 0 79405 00 7 22 2 0 0 BLOCK SIZE 79406 05 30 5 0 0 0 79407 00 7 20 2 0 0 SECN NO 79408 05 30 6 0 0 0 79409 35 0 0 0 1 79410 36 7 18 2 0 0 'CLEAN'SET NO 79411 05 30 7 0 0 0 79412 00 7 24 2 0 0 IND 79413 05 30 8 0 0 0 79414 00 7 10 1 0 0 FILE ID 79415 30 0 0 0 6 79416 05 30 10 1 0 0 79417 80 849 2 0 0 0 849 gPROCESS TD HEADING 79418 82 794 2 0 0 0 794 79500 PROCR 795 795 ALIGN ON FIRST BLOCK TO BE AMENDED 79501 NOTES RADIX B 79326>79502 00 7 26 1 0 0 79503 03 32 126 1 0 0 STORE FILE ID 79504 30 0 0 0 6 79505 05 30 2 1 0 0 79506 35 0 0 0 1 79507 36 7 18 2 0 0 CLEAN SET NO 79508 05 32 125 0 0 0 79509 833 12 0 0 0 833 79510 70 795 14 0 0 0 795 gWORD AMEND OF THIS BLOCK 79511 0 833 6 0 0 0 833 BLOCK NUMBER 79512 12 0 0 0 7 79513 70 797 2 0 0 0 797 gREPLACING FILE HEADING 79510>79514 80 794 2 0 0 0 794 79515 80 848 2 0 0 0 848 gPROCESS AND PRINT HEADING 79516 10 0 0 0 8 SET BLOCK CTRS AT 8 79517 05 32 138 0 0 0 79518 90 0 0 8 22 SET(MR8)=24:22 79519 C 0 0 0 24 79520 80 861 2 0 0 0 861 gREAD AND STORE BLOCK 79613>79521 80 838 2 0 0 0 838 gSET SWITCHES AND WORD NOS 79739>79522 0 833 6 0 0 0 833 PT BLOCK NO 79523 2 32 138 0 0 0 MT BLOCK NO 79524 73 796 24 0 0 0 796 gMISALIGNED 79525 70 798 2 0 0 0 798 gOPERATE ON THIS BLOCK 79526 85 785 2 0 0 0 785 TEST BLOCK AND 79527 C 796 2 0 0 0 796 >NO ITEM LENGTHS TO BE 79528 C 795 29 0 0 0 795 >YES CHECKED 79528>79529 00 32 140 2 0 0 STORE POSN OF B/E WORD 79530 11 0 0 0 6 79531 80 822 2 0 0 0 822 gCONVERT TO DEC 79532 05 32 166 0 0 0 79533 10 0 0 0 6 SET ITEM LENGTH POSN 79534 05 32 165 0 0 0 =WORD 6 79600 PROCR 796 796 ALIGN ON REQD BLOCK(2) 79601 NOTES RADIX B 79604> 79527>79602 80 860 2 0 0 0 860 gPROCESS WORD 79314> 79311>79603 85 786 4 0 0 0 786 TEST B/E FOUND 79604 C 796 2 0 0 0 796 >NO 79605 C 796 7 0 0 0 796 >YES 79606 C 796 8 0 0 0 796 >YES,AT END OF LINE 79605>79607 80 853 2 0 0 0 853 gPRINT REST OF LINE 80329> 80335> 79606>79608 96 0 0 8 0 TEST FIEND 79609 98 0 0 8 0 79610 92 0 0 3 0 79611 00 7 4 1 3 0 79612 02 870 4 1 0 0 870 79613 71 795 21 0 0 0 795 gNO 79614 0 833 6 0 0 0 833 PT BLOCK 79615 2 32 138 0 0 0 PRESENT MT BLOCK 79616 71 796 24 0 0 0 796 gERROR 79617 0 833 12 0 0 0 833 79618 70 796 24 0 0 0 796 gERROR,WORD AMEND 79619 86 830 2 0 0 0 830 79620 12 0 0 0 3 79621 71 796 24 0 0 0 796 gERROR,NOT INSERTING BLOCK 79622 83 129 2 0 0 1 129 SET INSERTING BEFORE FIEND SWITCH 79623 76 798 2 0 0 0 798 79904> 80010> 80117> 79621> 79618> 79616> 79524>79624 80 820 2 0 0 0 820 gREPORT PT 79625 76 803 39 0 0 0 803 g 79700 PROCR 797 797 'FILEA' FOR BLOCK 7-PROCESS FOLLOWING'FILES'BLOCK 79701 NOTES RADIX B 79513>79702 80 811 2 0 0 0 811 gREAD B1 79703 80 814 2 0 0 0 814 UNPACK P/T 79704 80 849 2 0 0 0 849 79705 80 848 2 0 0 0 848 gPROCESS AND PRINT HEADING 79706 0 7 26 1 0 0 STORE FILE ID 79707 5 32 126 1 0 0 79708 35 0 0 0 1 79709 36 7 18 2 0 0 79710 5 32 125 0 0 0 79711 10 0 0 0 8 SET BLOCK CTRS AT 8 79712 5 32 138 0 0 0 79713 80 838 2 0 0 0 838 gSET UP WORD NOS 79714 90 0 0 8 22 SET (MR8) AT 22:24 79715 C 0 0 0 24 79716 80 861 2 0 0 0 861 gREAD AND STORE BLOCK 79816> 79225>79717 80 811 2 0 0 0 811 gREAD B1 79718 9 0 1 0 0 79719 12 0 0 0 5659635551 'FILEA' 79720 71 803 37 0 0 0 803 gNO 79721 80 829 2 0 0 0 829 UNPACK 79722 833 6 0 0 0 833 BLOCK NO 79723 2 32 138 0 0 0 79724 71 793 2 0 0 0 793 gNOT THIS 79725 833 2 1 0 0 833 FILE ID 79726 2 32 126 1 0 0 79727 71 793 16 0 0 0 793 gNO 79728 833 4 1 0 0 833 SET NO 79729 2 32 125 0 0 0 79730 71 793 16 0 0 0 793 gNO 79731 85 129 2 0 0 0 129 HAVE WE INSERTED BEFORE FIEND? 79732 C 797 34 0 0 0 797 YES 79733 C 797 36 0 0 0 797 NO 79732>79734 83 129 2 0 0 2 129 RESET SWITCH 79735 76 797 37 0 0 0 797 79733>79736 80 799 2 0 0 0 799 TEST FIEND 79735>79737 833 12 0 0 0 833 79738 70 793 12 0 0 0 793 gWORD AMDT 79739 76 795 22 0 0 0 795 g 79800 PROCR 798 798 'FILEA'FOR DELETION/REPLACEMENT/INSERTION OF WHOLE BLOCKS 79801 NOTES RADIX B 80331> 79623> 79525> 79315>79802 0 833 12 0 0 0 833 IND 79803 70 800 2 0 0 0 800 gWORD AMDT 79804 85 830 4 0 0 0 830 AMDT TYPE SWITCH 79805 C 798 8 0 0 0 798 >D 79806 C 798 22 0 0 0 798 >R 79807 C 798 24 0 0 0 798 >T 79805>79808 0 833 8 0 0 0 833 LAST BLOCK NO DELETE BLOCK(S) 79809 71 798 12 0 0 0 798 gDELETING SEVERAL 79810 0 833 6 0 0 0 833 FIRST 79811 5 833 8 0 0 0 833 SET AS LAST 79821> 79809>79812 80 799 2 0 0 0 799 gTEST'FIEND' 79813 80 862 2 0 0 0 862 gREAD TO END OF BLOCK 79814 0 833 6 0 0 0 833 FIRST 79815 2 833 8 0 0 0 833 =LAST? 79816 70 797 17 0 0 0 797 gYES 79817 60 0 0 0 0 79818 10 0 0 0 1- STEP BLOCK W/L 2 79819 4 833 8 0 0 0 833 REDUCE LAST 79820 62 0 0 0 0 79821 76 798 12 0 0 0 798 g 79806>79822 80 799 2 0 0 0 799 gTEST'FIEND' 79823 80 862 2 0 0 0 862 gREAD TO END OF BLOCK 79807>79824 80 838 2 0 0 0 838 gNEW O/P BLOCK PRELIMS 79826>79825 80 784 2 0 0 0 784 gREAD/APPLY PT 79826 73 798 25 0 0 0 798 gNOT END OF MT BLOCK 79827 70 798 38 0 0 0 798 gNEW DT 79828 80 811 2 0 0 0 811 gREAD PT 79829 80 791 2 0 0 0 791 gTEST NEW DT? 79830 70 798 38 0 0 0 798 gYES 79831 86 830 2 0 0 0 830 AMDT TYPE SWITCH 79832 12 0 0 0 3 79833 70 798 36 0 0 0 798 gINSERTION 79834 80 799 2 0 0 0 799 gTEST'FIEND' REPLACEMENT 79835 80 862 2 0 0 0 862 gREAD TO END OF BLOCK BEING REPLACED 79833>79836 80 838 2 0 0 0 838 gNEW O/P BLOCK PRELIMS 79837 76 823 2 0 0 0 823 gUNPACK PT AND RETURN VIA S/R 768 79830> 79827>79838 85 786 4 0 0 0 786 DID LAST BLOCK HAVE BEN? 79839 C 798 42 0 0 0 798 >NO 79840 C 803 2 0 0 0 803 >YES 79841 C 803 2 0 0 0 803 >YES 79839>79842 872 4 1 0 0 872 BEW 79843 3 32 36 1 1 0 FOR MT 79844 5 32 0 1 2 0 AND PRINTER 79845 80 788 2 0 0 0 788 gSET AMENDIND,PROCESS WORD 79846 94 798 48 0 2 0 798 ///// END OF LINE 79847 76 803 2 0 0 0 803 79846>79848 80 853 2 0 0 0 853 gEND OF BLOCK S/R 79849 76 803 2 0 0 0 803 79900 PROCR 799 799 TEST I/P AT'FIEND' 79902 81 799 2 0 0 0 799 79903 80 802 2 0 0 0 802 g 79904 70 796 24 0 0 0 796 gREPORT 79905 82 799 2 0 0 0 799 80000 PROCR 800 800 ALIGN ON REQUIRED WORD 80001 NOTES RADIX B 79803>80002 85 781 2 0 0 0 781 FIRST WORD? 80003 C 800 7 0 0 0 800 >NO 80004 C 800 5 0 0 0 800 >YES 80004>80005 10 0 0 0 4 START AT WORD 4 80006 5 32 164 0 0 0 80017> 80003>80007 0 833 8 0 0 0 833 WORD 80008 2 32 164 0 0 0 REQD WORD 80009 70 801 2 0 0 0 801 gYES 80010 73 796 24 0 0 0 796 gYES TEST ALIGNED AFTER 80011 80 860 2 0 0 0 860 gPROCESS WORD 80012 85 786 4 0 0 0 786 TEST B/E WORD 80013 C 800 16 0 0 0 800 >NO 80014 C 800 18 0 0 0 800 80015 C 800 19 0 0 0 800 80013>80016 80 840 2 0 0 0 840 STEP WORD CTR BY 2 80017 76 800 7 0 0 0 800 g 80014>80018 80 853 2 0 0 0 853 gFINISH PRINTING BLOCK 80015>80019 80 820 2 0 0 0 820 gPRINT PT 80020 80 838 2 0 0 0 838 gPREP FOR NEW BLOCK 80021 76 803 39 0 0 0 803 gREAD 80100 PROCR 801 801 'FILEA' FOR DELETION/REPLACEMENT/INSERTION OF WORDS WITHIN CURREN 80101 NOTES RADIX B 80009>80102 85 830 4 0 0 0 830 AMDT TYPE SWITCH 80103 C 801 6 0 0 0 801 >D 80104 C 801 28 0 0 0 801 >R 80105 C 801 28 0 0 0 801 >T 80103>80106 0 833 10 0 0 0 833 LAST WORD DELETE WORD(S) 80107 71 801 10 0 0 0 801 gNO TO BE DELETED 80108 0 833 8 0 0 0 833 FRST 80109 5 833 10 0 0 0 833 SET AS LAST 80107>80110 60 0 0 0 0 80111 833 10 0 0 0 833 LAST 80112 11 0 0 0 2 80113 5 833 10 0 0 0 833 80114 62 0 0 0 0 80122>80115 32 140 1 8 0 CURRENT MT WORD 80116 2 872 4 1 0 0 872 80117 70 796 24 0 0 0 796 gDELETING BEW, REPORT 80118 80 861 2 0 0 0 861 gSTEP(MR8)S/R 80119 80 840 2 0 0 0 840 STEP WORD CTR BY 2 80120 00 32 164 0 0 0 TEST LAST WORD 80121 2 833 10 0 0 0 833 >NO 80122 71 801 15 0 0 0 801 80127> 80131>80123 80 811 2 0 0 0 811 gREAD PT 80124 80 791 2 0 0 0 791 gTEST RECOGNISABLE 80125 70 803 8 0 0 0 803 gYES 80126 80 820 2 0 0 0 820 gPRINT PT 80127 76 801 23 0 0 0 801 80130> 80105> 80104>80128 80 784 2 0 0 0 784 gREAD/APPLY PT 80129 70 803 8 0 0 0 803 gNEW DATA TYPE 80130 73 801 28 0 0 0 801 gNOT TD BLOCK END 80131 76 801 23 0 0 0 801 gEXPECT A NEW DATA TYPE 80200 PROCR 802 802 TEST FIEND 80202 81 802 2 0 0 0 802 80203 96 0 0 8 0 80204 98 0 0 8 0 80205 92 0 0 3 0 80206 7 4 1 3 0 80207 2 870 4 1 0 0 870 80208 82 802 2 0 0 0 802 80300 PROCR 803 803 TEST NEXT PT DIRECTIVE FOR SAME FILE/BOCK 80301 NOTES RADIX B 79849> 79847> 79841> 79840>80302 85 129 2 0 0 0 129 HAVE WE INSERTED BEFORE FIEND 80303 C 803 5 0 0 0 803 80304 C 803 7 0 0 0 803 80303>80305 83 129 2 0 0 2 129 RESET SWITCH 80306 76 803 37 0 0 0 803 80304>80307 80 838 2 0 0 0 838 80129> 80125>80308 0 9 0 1 0 0 80309 12 0 0 0 5659635551 'FILEA' 80310 70 803 15 0 0 0 803 80311 80 802 2 0 0 0 802 TEST FIEND 80312 71 803 36 0 0 0 803 gNO 80313 80 864 2 0 0 0 864 WRITE & PRINT TO FIEND 80314 76 803 37 0 0 0 803 g 80310>80315 80 829 2 0 0 0 829 gUNPACK 80316 833 2 1 0 0 833 PT FILE 80317 2 32 126 1 0 0 MT FILE 80318 70 803 22 0 0 0 803 80324>80319 80 802 2 0 0 0 802 gTEST FIEND 80320 70 803 37 0 0 0 803 gYES 80321 76 803 36 0 0 0 803 gNO 80318>80322 833 4 0 0 0 833 PT SET 80323 2 32 125 0 0 0 MT SET 80324 71 803 19 0 0 0 803 80325 833 6 0 0 0 833 PT BLOCK 80326 2 32 138 0 0 0 MT BLOCK 80327 71 803 32 0 0 0 803 80328 833 12 0 0 0 833 80329 71 796 8 0 0 0 796 gBLOCK AMDT 80330 80 799 2 0 0 0 799 gREPORT IF AT FIEND 80331 76 798 2 0 0 0 798 gWORD AMDT TO SAME BLOCK 80327>80332 80 799 2 0 0 0 799 gREPORT IF AT FIEND 80333 80 863 2 0 0 0 863 gFINISH BLOCK 80334 80 838 2 0 0 0 838 gRESET SWITCHES 80335 76 796 8 0 0 0 796 g 80321> 80312>80336 80 863 2 0 0 0 863 gPROCESS TO END OF BLOCK S/R 80320> 80314> 80306> 79720> 78925> 78310> 78306> 78223>80337 80 826 2 0 0 0 826 TEST P/T 80341> 85827> 85915>80338 80 820 2 0 0 0 820 gPRINT ERROR LINE 83021> 80021> 79625>80339 80 811 2 0 0 0 811 gREAD P/T 80340 80 826 2 0 0 0 826 gTEST P/T 80341 76 803 38 0 0 0 803 gPRINT UNTIL RECOGNISED 80400 PROCR 804 804 END ROUTINE 80401 NOTES RADIX B 79319> 79204>80402 80 820 2 0 0 0 820 gPRINT PT 80410> 82622> 78212>80403 7 4 1 0 0 80404 02 870 6 1 0 0 870 80405 71 882 2 0 0 0 882 gNO, MUST BE PREND OR E 80406 0 7 26 1 0 0 80407 30 0 0 0 6 80408 5 30 2 1 0 0 80409 80 856 2 0 0 0 856 gPRINT 'FILE UNALTERED LINE 80410 76 804 3 0 0 0 804 80500 PROCR 805 805 DUMP TYPE NOT IN RANGE OR TOO MANY POINTS 80501 NOTES RADIX B 84303> 84304> 84306>80502 0 872 20 1 0 0 872 '?????' 78079> 78065> 78063>80503 5 5 48 1 0 0 80504 62 0 0 0 0 80505 52 5 2 0 0 0 80506 C 877 2 0 0 0 877 80507 54 5 12 1 0 36 80519>80508 00 872 18 1 0 0 872 REPLACE DUMPX BY SQUARES 80509 05 5 4 1 0 0 80510 80 866 2 0 0 0 866 gADD ONE TO DISASTROUS CTR 80511 94 0 0 4 1- 80512 80 817 2 0 0 0 817 gPRINT 80513 82 842 2 0 0 0 842 gLEAVE DUMPS POIT S/R 84204> 84214>80514 52 5 2 0 0 0 EDIT DUMP POINT 80515 C 877 2 0 0 0 877 80516 872 20 1 0 0 872 '?????' 80517 5 5 48 1 0 0 80518 54 5 10 1 0 38 80519 76 805 8 0 0 0 805 80600 PROCR 806 806 N1,N2 OR N3 OUT OF RANGE S/R 80601 NOTES RADIX 80602 81 806 2 0 0 0 806 80603 80 867 2 0 0 0 867 gADD ONE TO OTHERS CTR 80604 10 0 0 0 414243 80605 37 871 40 1 0 0 871 PACK IN NO 80606 10 0 0 0 0 80607 35 0 0 0 1111000000 80608 36 871 30 1 0 0 871 PACK IN*N 80609 37 871 40 1 0 0 871 80610 101 255 1 3 0 80611 82 806 2 0 0 0 806 g 84314>80612 35 0 0 0 110000 80613 80 806 2 0 0 0 806 80614 76 843 17 0 0 0 843 g 84321>80615 35 0 0 0 1100 80616 80 806 2 0 0 0 806 80617 76 843 24 0 0 0 843 g 84326> 84328>80618 35 0 0 0 11 80619 80 806 2 0 0 0 806 80620 76 843 31 0 0 0 843 80700 PROCR 807 807 SECOND ERROR WORD S/R 80701 NOTES RADIX B 80702 81 807 2 0 0 0 807 80703 35 0 0 0 111100 80704 37 871 42 1 0 0 871 PACK IN *C S OR P 80705 80 867 2 0 0 0 867 gADD ONE TO 'OTHERS' CTR 80706 96 0 0 1 0 80707 71 807 12 0 0 0 807 gNO 80708 35 0 0 0 11 80709 10 0 0 0 41 PACK IN ONE 80710 37 871 42 1 0 0 871 80711 10 0 0 0 0 80707>80712 82 807 2 0 0 0 807 g 80800 PROCR 808 808 THIRD ERROR WORD S/R 80801 NOTES RADIX B 80802 81 808 2 0 0 0 808 80803 35 0 0 0 1100000000 80804 12 0 0 0 1 80805 70 808 16 0 0 0 808 g2ND CHAP 80806 12 0 0 0 1 80807 70 808 15 0 0 0 808 g3RD CHAP 80808 12 0 0 0 1 80809 70 808 14 0 0 0 808 g4TH CHAP 80810 12 0 0 0 1 80811 70 808 13 0 0 0 808 g5TH CHAP 80812 32 0 0 0 2- 6TH CHAP 80811>80813 32 0 0 0 2- 80809>80814 32 0 0 0 2- 80807>80815 32 0 0 0 2- 80805>80816 10 0 0 0 4243444546 80817 37 871 44 1 0 0 871 PACK IN NO 80818 82 808 2 0 0 0 808 g 80900 PROCR 809 809 IGNORE T D FILE ERROR S/R 80901 NOTES RADIX B 80902 81 809 2 0 0 0 809 80903 0 871 42 1 0 0 871 ALREADY DONE? 80904 2 872 20 1 0 0 872 '?????' 80905 70 809 12 0 0 0 809 gYES 80906 872 20 1 0 0 872 '?????' 80907 05 871 42 1 0 0 871 80908 0 868 2 0 0 0 868 '£££££' 80909 35 0 0 0 11000 PACK ££ IN SET NUMBER 80910 37 31 12 2 0 0 AS 'IGNORE' IND 80911 80 866 2 0 0 0 866 gADD ONE TO 'DISASTROUS' CTR 80905>80912 82 809 2 0 0 0 809 81000 PROCR 810 810 READ A1 S/R 81001 NOTES RADIX B 81002 81 810 2 0 0 0 810 81003 42 A1 0 0 0 0 81004 C 7 0 0 0 0 81005 82 810 2 0 0 0 810 81100 PROCR 811 811 READ B1 S/R 81101 NOTES RADIX B 81102 81 811 2 0 0 0 811 81103 80 779 2 0 0 0 779 gREAD 81104 34 9 48 2 0 0 81105 10 0 0 0 0 81106 32 0 0 0 7 81107 91 0 0 3 0 81108 10 0 0 0 0 81109 32 0 0 0 3 81110 05 869 2 0 0 0 869 81111 35 0 0 0 11 81112 10 0 0 0 7. 81113 124 869 2 0 1 0 869 81114 32 0 0 0 0 ///// 81115 37 9 0 1 3 0 81116 55 9 4 1 0 44 81117 C 9 0 1 0 0 81118 82 811 2 0 0 0 811 81200 PROCR 812 812 RIGHT-ALIGN(A) SR 81202 81 812 2 0 0 0 812 81203 32 0 0 0 10- N->B 81204 5 869 14 1 0 0 869 CLEAR WL 81208>81205 0 869 14 1 0 0 869 81206 32 0 0 0 2 81207 5 869 14 1 0 0 869 81208 75 812 5 0 0 0 812 gNOT END 81209 0 869 14 1 0 0 869 81210 82 812 2 0 0 0 812 81300 PROCR 813 813 UNPACK DUMPS POINT P/T SR 81301 NOTES RADIX B 81302 81 813 2 0 0 0 813 81303 54 30 0 0 0 18 81304 87 27 10 0 0 0 81305 C 813 10 0 0 0 813 P/T 81306 C 813 7 0 0 0 813 CARD 81306>81307 50 9 0 0 0 0 UNPACK CARD 81308 C 874 10 0 0 0 874 81309 76 813 13 0 0 0 813 81305>81310 124 873 14 0 2 0 873 81311 124 999 21 1 2 0 SEC 9 81312 128 0 0 3 0 UNPACK 81309>81313 92 30 0 0 0 81314 70 813 16 0 0 0 813 gINITIAL TRANSLATION 81315 82 813 2 0 0 0 813 81314>81316 60 0 0 0 0 81317 10 0 0 0 2 81318 4 30 0 0 0 0 STEP LINE SERIAL 81319 30 1 0 0 0 PM TYPE 81320 12 0 0 0 6 81321 71 813 31 0 0 0 813 gNOT LOCATION DUMP 81322 90 0 0 3 0 81323 C 0 0 0 12 81330>81324 30 5 0 3 0 REF 81325 70 813 31 0 0 0 813 gEND 81326 12 0 0 0 100 81327 73 813 30 0 0 0 813 gNOT PROCR 81328 10 0 0 0 2 81329 4 30 6 0 3 0 STEP ITEM 81327>81330 94 813 24 0 3 2 813 81325> 81321>81331 62 0 0 0 0 81332 82 813 2 0 0 0 813 81400 PROCR 814 814 UNPACK TD HEADING P/T S/R 81401 NOTES RADIX B 81402 81 814 2 0 0 0 814 81403 54 30 0 0 0 18 81404 87 27 10 0 0 0 81405 C 814 16 0 0 0 814 P/T 81406 C 814 7 0 0 0 814 CARD 81406>81407 50 9 0 0 0 0 UNPACK CARD 81408 C 874 48 0 0 0 874 81409 30 2 1 0 0 L-ALIGN ALPHA DATA 81410 30 0 0 0 6 81411 5 30 2 1 0 0 81412 30 10 1 0 0 81413 30 0 0 0 6 81414 5 30 10 1 0 0 81415 82 814 2 0 0 0 814 g 81405>81416 124 873 6 0 2 0 873 81417 124 999 21 1 2 0 SEC 9 81418 128 0 0 3 0 UNPACK 81419 82 814 2 0 0 0 814 81500 PROCR 815 815 WRITE A2 FROM SECTION 1 S/R 81501 NOTES RADIX B 81502 81 815 2 0 0 0 815 81503 55 7 4 1 0 50 81504 C 8 4 1 0 0 81505 43 A2 0 0 0 0 81506 C 8 0 0 0 0 81507 82 815 2 0 0 0 815 81600 PROCR 816 816 WRITE A2 FROM SECTION 4 S/R 81601 NOTES RADIX B 81602 81 816 2 0 0 0 816 81603 80 890 2 0 0 0 890 81604 82 816 2 0 0 0 816 81700 PROCR 817 817 PRINT S/R 81701 NOTES RADIX B 81702 81 817 2 0 0 0 817 81703 05 5 0 1 0 0 SET UP FUNCTION WORD 81704 80 892 2 0 0 0 892 81705 82 817 2 0 0 0 817 81800 PROCR 818 818 PRINT BLANK LINE 81801 NOTES RADIX B 81802 81 818 2 0 0 0 818 81803 27 9 0 0 0 ON LINE 81804 70 818 7 0 0 0 818 gYES 81805 54 5 0 1 0 50 BLANK LINE 81806 76 818 9 0 0 0 818 81804>81807 872 4 1 0 0 872 BEW 81808 5 5 2 1 0 0 81806>81809 80 817 2 0 0 0 817 81810 82 818 2 0 0 0 818 81900 PROCR 819 819 CLEAR 1ST 2 WORDS OF ANNEXE 81901 NOTES RADIX 81902 81 819 2 0 0 0 819 81903 10 0 0 0 0 81904 05 5 2 1 0 0 81905 05 5 4 1 0 0 81906 82 819 2 0 0 0 819 82000 PROCR 820 820 PRINT UNRECOGNISABLE P/T LINE S/R 82001 NOTES RADIX B 82002 81 820 2 0 0 0 820 82003 80 818 2 0 0 0 818 gLINE FEED S/R 82004 80 865 2 0 0 0 865 gSTEP'PT OMITTED' 82005 00 871 46 1 0 0 871 'P/T? ' 82006 05 5 2 1 0 0 82007 9 48 2 0 0 82008 30 0 0 0 3- 82009 12 0 0 0 4 82010 91 0 0 3 0 82011 10 0 0 0 0 CLEAR 82012 35 0 0 0 11 (FOR ONE CHAR) 82013 36 9 48 2 0 0 82014 5 821 2 0 0 0 821 WL 82015 124 821 2 0 1 0 821 82016 32 0 0 0 0 ///// SHIFT PACKING BITS OVER BE CHAR 82017 37 9 0 1 3 0 CLEAR BE CHAR 82018 55 9 0 1 0 32 82019 C 5 4 1 0 0 82020 80 817 2 0 0 0 817 gPRINT 82021 80 818 2 0 0 0 818 gLINE FEED S/R 82022 82 820 2 0 0 0 820 g 82100 PROCR 821 821 CONVERT TO BINARY S/R 82101 NOTES RADIX B 82102 81 821 2 0 0 0 821 82103 5 908 54 1 0 0 908 82104 62 0 0 0 0 82105 124 909 2 0 2 0 909 82106 112 908 54 1 0 0 908 82107 82 821 2 0 0 0 821 82200 PROCR 822 822 CONVERT TO DECIMAL S/R 82201 NOTES RADIX B 82202 81 822 2 0 0 0 822 82203 5 908 54 1 0 0 908 82204 60 0 0 0 0 82205 124 909 22 0 2 0 909 82206 112 908 54 1 0 0 908 82207 62 0 0 0 0 82208 82 822 2 0 0 0 822 82300 PROCR 823 823 UNPACK THIS PT/CARD BLOCK CHARACTER-BY-CHARACTER 82301 NOTES RADIX B 79837> 78405>82302 91 872 2 0 3 0 872 SET (MR3)=0:0 82303 90 0 0 4 0 SET (MR4)=14:0 82304 C 0 0 0 14 82305 90 0 0 5 0 SET (MRS)=5:0 82306 C 0 0 0 5 82307 54 32 60 0 0 64 CLEAR W/L'S 82308 55 9 0 0 0 32 82309 C 32 60 0 0 0 82310 87 27 10 0 0 0 82311 C 823 13 0 0 0 823 P/T 82312 C 823 27 0 0 0 823 CARD 82311>82313 34 32 60 1 3 0 SET(B)AT 1ST WORD 82314 32 0 0 0 2 82326>82315 12 0 0 0 7: 82316 70 824 2 0 0 0 824 gYES 82317 12 0 0 0 1 TEST BE 82318 70 825 47 0 0 0 825 gYES 82319 11 0 0 0 7. 82320 05 32 124 0 0 0 W/L 2 82321 00 32 92 1 0 0 LINE SERIAL SO FAR 82322 30 0 0 0 2 82323 01 32 124 0 0 0 82324 05 32 92 1 0 0 82325 80 827 2 0 0 0 827 gS/R A 82326 76 823 15 0 0 0 823 g 82312>82327 00 32 60 1 0 0 STORE LINE SERIAL 82328 05 32 92 1 0 0 82329 05 32 121 0 0 0 CLEAR CARD IND 82330 94 823 31 0 3 2 823 82330>82331 34 32 60 1 3 0 SET(B) AT NEXT WORD 82332 32 0 0 0 2 82333 76 824 3 0 0 0 824 g 82400 PROCR 824 824 PSEUDO UNPACK-MAIN LOOP(1) 82401 NOTES RADIX B 82417> 82422> 82556> 82316>82402 80 827 2 0 0 0 827 gS/R A 82333>82403 12 0 0 0 7: 82404 70 824 18 0 0 0 824 gYES 82405 12 0 0 0 1 82406 70 825 47 0 0 0 825 gYES 82407 11 0 0 0 1£ 82408 70 825 57 0 0 0 825 gYES 82409 11 0 0 0 4 82410 70 825 2 0 0 0 825 gYES 82411 11 0 0 0 5e 82534> 82536> 82538> 82540> 82542> 82544> 82546>82412 05 32 124 0 0 0 W/L 2 82413 00 32 122 1 0 0 W/L 1 82414 30 0 0 0 2 82415 01 32 124 0 0 0 82416 05 32 122 1 0 0 82417 76 824 2 0 0 0 824 g 82723> 82404>82418 80 828 2 0 0 0 828 gS/R B 82523>82419 05 32 94 1 4 0 STORE WORD IN LIST 82420 05 32 120 0 0 0 CLEAR*C IND 82421 05 32 122 1 0 0 CLEAR W/L 1 82422 94 824 2 0 4 2 824 STEP(MR4) 82423 76 825 51 0 0 0 825 g 82500 PROCR 825 825 82501 NOTES RADIX B 82410>82502 80 827 2 0 0 0 827 gS/R A 82503 12 0 0 0 51 82504 70 825 45 0 0 0 825 gYES 82505 12 0 0 0 1 82506 70 825 43 0 0 0 825 gYES 82507 12 0 0 0 1 82508 70 825 54 0 0 0 825 gYES 82509 12 0 0 0 1 82510 70 825 41 0 0 0 825 gYES 82511 12 0 0 0 7 82512 70 825 39 0 0 0 825 gYES 82513 12 0 0 0 8 82514 70 825 37 0 0 0 825 gYES 82515 12 0 0 0 2 82516 70 825 35 0 0 0 825 gYES 82517 12 0 0 0 : 82518 70 825 33 0 0 0 825 gYES 82519 12 0 0 0 e 82532>82520 71 825 24 0 0 0 825 gNO 82521 80 867 2 0 0 0 867 gSTEP'OTHERS' 82522 00 872 16 1 0 0 872 ***** 82523 76 824 19 0 0 0 824 g 82520>82524 12 0 0 0 1 82525 71 825 29 0 0 0 825 gNO 82526 80 867 2 0 0 0 867 gSTEP'OTHERS' 82527 00 872 16 1 0 0 872 ***** 82528 76 825 48 0 0 0 825 g 82525>82529 10 0 0 0 0 82530 80 827 2 0 0 0 827 gS/R A 82531 12 0 0 0 7: 82532 76 825 20 0 0 0 825 g 82518>82533 10 0 0 0 5£ SQUARE 82534 76 824 12 0 0 0 824 g 82516>82535 10 0 0 0 7: NUMBER END 82536 76 824 12 0 0 0 824 g 82514>82537 10 0 0 0 5. LINE END 82538 76 824 12 0 0 0 824 g 82512>82539 10 0 0 0 5e STAR 82540 76 824 12 0 0 0 824 82510>82541 10 0 0 0 7£ TRIANGLE 82542 76 824 12 0 0 0 824 g 82506>82543 10 0 0 0 7. BLOCK END 82544 76 824 12 0 0 0 824 g 82504>82545 10 0 0 0 6£ ALIGNMENT MARK 82546 76 824 12 0 0 0 824 g 82406> 82318>82547 80 828 2 0 0 0 828 gS/R B 82528>82548 05 32 94 1 4 0 STORE WORD IN LIST 82549 00 872 8 1 0 0 872 SET END SIGN IN LIST 82550 05 32 96 1 4 0 82559> 82423>82551 90 0 0 5 0 82552 C 0 0 0 14 82553 76 784 14 0 0 0 784 g 82508>82554 10 0 0 0 1 SET*C ID 82555 05 32 120 0 0 0 82556 76 824 2 0 0 0 824 g 82408>82557 0 872 8 1 0 0 872 SET END SIGN IN LIST 82558 5 32 94 1 4 0 82559 76 825 51 0 0 0 825 82600 PROCR 826 826 TEST P/T S/R 82601 NOTES RADIX B 82602 81 826 2 0 0 0 826 82603 00 9 0 1 0 0 82604 2 870 10 1 0 0 870 'FILES'' 82605 70 826 17 0 0 0 826 gINSERTION 82606 11 0 0 0 1. 82607 70 826 19 0 0 0 826 g'FILED' (DELETION) 82608 12 0 0 0 15 82609 70 826 19 0 0 0 826 g'FILER' (REPLACEMENT) 82610 11 0 0 0 18 82611 70 793 2 0 0 0 793 g'FILEA' (BLOCK/WORD AMENDMENT) 82612 9 0 1 0 0 82613 30 0 0 0 4- 82614 12 0 0 0 556554 'END' 82615 70 826 21 0 0 0 826 gYES 82616 82 826 2 0 0 0 826 (REPORT) 82605>82617 80 864 2 0 0 0 864 FILE PREP 82618 76 782 15 0 0 0 782 82609> 82607>82619 80 864 2 0 0 0 864 FILE PREP 82620 76 792 2 0 0 0 792 82615>82621 80 864 2 0 0 0 864 82622 76 804 3 0 0 0 804 82700 PROCR 827 827 PSEUDO UNPACK S/R A 82701 NOTES RADIX B 82702 81 827 2 0 0 0 827 82703 94 827 15 0 5 1 827 STEP (MR5) 82704 87 27 10 0 0 0 82705 C 827 11 0 0 0 827 P/T 82706 C 827 7 0 0 0 827 CARD 82706>82707 00 32 121 0 0 0 82708 71 827 17 0 0 0 827 gYES 82709 10 0 0 0 1 SET CARD IND 82710 05 32 121 0 0 0 82705>82711 90 0 0 5 0 RESET (MR5) 82712 C 0 0 0 5 82713 94 827 14 0 3 2 827 STEP (MR3) 82713>82714 34 32 60 1 3 0 SET(B)AT NEXT WORD 82703>82715 32 0 0 0 2 82716 82 827 2 0 0 0 827 82708>82717 10 0 0 0 0 82718 05 32 121 0 0 0 CLEAR CARD IND 82719 90 0 0 5 1- SET(MR5)AT-1:5 82720 C 0 0 0 5 82721 94 827 22 0 3 2 827 STEP(MR3) 82721>82722 34 32 60 1 3 0 SET(B)AT NEXT WORD 82723 76 824 18 0 0 0 824 g 82800 PROCR 828 828 PSEUDO UNPACK S/R B 82801 NOTES RADIX B 82802 81 828 2 0 0 0 828 82803 00 32 120 0 0 0 82804 70 828 13 0 0 0 828 gNO 82805 32 0 0 0 10 STORE(B) 82806 05 32 128 1 0 0 82807 00 32 122 2 0 0 82808 80 821 2 0 0 0 821 gCONVERT TO BINARY 82809 05 32 122 2 0 0 82810 34 32 128 1 0 0 RESTORE(B) 82811 02 32 122 1 0 0 82812 76 828 14 0 0 0 828 g 82804>82813 00 32 122 1 0 0 82812>82814 82 828 2 0 0 0 828 g 82900 PROCR 829 829 UNPACK'FILEA'BLOCK 82901 NOTES RADIX B 82902 81 829 2 0 0 0 829 82903 54 833 2 1 0 10 833 82904 87 27 10 0 0 0 82905 C 829 7 0 0 0 829 >PT 82906 C 832 2 0 0 0 832 >CARDS 82905>82907 124 873 18 0 2 0 873 82908 124 999 21 1 2 0 SEC 9 82909 128 0 0 3 0 83204>82910 0 833 2 1 0 0 833 FILE ID 82911 80 812 2 0 0 0 812 gR-ALIGN 82912 5 833 2 1 0 0 833 82913 0 833 6 1 0 0 833 82914 80 812 2 0 0 0 812 gR-ALIGN 82915 32 0 0 0 2- 82916 5 869 14 1 0 0 869 WL 82917 32 0 0 0 2 82918 12 0 0 0 54 82919 70 831 4 0 0 0 831 g'D' DELETE BLOCK(S) 82920 12 0 0 0 15 82921 70 831 3 0 0 0 831 g'R' REPLACE BLOCK 82922 12 0 0 0 t 82923 70 831 2 0 0 0 831 g'T' INSERT BLOCK 82924 0 833 6 1 0 0 833 (ASSUME WORD AMEND 82925 80 812 2 0 0 0 812 gR-ALIGN BLOCK NUMBER 82926 0 869 14 2 0 0 869 82927 73 830 20 0 0 0 830 gREJECT 82928 5 833 6 1 0 0 833 DEC BLOCK NUMBER 82929 0 833 8 1 0 0 833 FIRST WORD NUMBER 82930 80 812 2 0 0 0 812 gR-ALIGN 82931 3 869 14 1 0 0 869 WL 82932 32 0 0 0 2- 82933 10 0 0 0 0 82934 32 0 0 0 2 82935 12 0 0 0 54 'D' 82936 70 830 4 0 0 0 830 gDELETE WORD(S) 82937 12 0 0 0 15 82938 70 830 3 0 0 0 830 g'R' REPLACE WORD(S) 82939 12 0 0 0 t 82940 71 830 20 0 0 0 830 gNOT'T' REJECT 83000 PROCR 830 830 UNPACK P/T TD AMDTS (2) 83001 NOTES RADIX B 83002 10 0 0 0 1 3=T 82938>83003 11 0 0 0 1 2=R 82936>83004 11 0 0 0 1 1=D 83005 84 830 2 0 0 0 830 SET WORD AMEND SWITCH 83006 0 869 14 1 0 0 869 83007 30 0 0 0 2- 83008 5 833 8 1 0 0 833 83009 0 833 8 2 0 0 833 83010 73 830 20 0 0 0 830 gREJECT 83011 5 833 8 1 0 0 833 NUMERIC FIRST WORD NUMBER 83012 0 833 10 1 0 0 833 LAST WORD(DELETIONS) 83013 70 831 20 0 0 0 831 gOK 83014 73 830 20 0 0 0 830 gREJECT 83015 833 8 0 0 0 833 FIRST 83016 2 833 10 0 0 0 833 LAST 83017 72 830 20 0 0 0 830 gREJECT 83018 10 0 0 0 0 83019 76 831 20 0 0 0 831 83107> 83113> 83118> 83017> 83014> 83010> 82940> 82927>83020 80 820 2 0 0 0 820 gPRINT PT 83021 76 803 39 0 0 0 803 gREAD PT UNTIL DT RECOGNISED 83100 PROCR 831 831 UNPACK P/T TO AMDTS (3) 83101 NOTES RADIX B 82923>83102 10 0 0 0 1 3=T 82921>83103 11 0 0 0 1 2=R 82919>83104 11 0 0 0 1 1=D 83105 84 830 2 0 0 0 830 SET BLOCK AMEND SWITCH 83106 0 869 14 2 0 0 869 83107 73 830 20 0 0 0 830 gREJECT 83108 5 833 6 1 0 0 833 STORE BLOCK NUMBER 83109 0 833 8 1 0 0 833 83110 80 812 2 0 0 0 812 gR-ALIGN 83111 5 869 14 1 0 0 869 83112 0 869 14 2 0 0 869 83113 73 830 20 0 0 0 830 gREJECT 83114 3 833 8 1 0 0 833 LAST BLOCK(DELETIONS) 83115 70 831 19 0 0 0 831 gOK 83116 833 6 0 0 0 833 FIRST 83117 2 833 8 0 0 0 833 LAST 83118 72 830 20 0 0 0 830 gREJECT 83115>83119 10 0 0 0 1 83019> 83013>83120 5 833 12 0 0 0 833 ZERO=WORD AMEND NONZERO=BLOCK AMEND 83121 82 829 2 0 0 0 829 83200 PROCR 832 832 UNPACK CARD TD AMDTS 83201 NOTES RADIX B 82906>83202 50 9 0 0 0 0 83203 C 874 64 0 0 0 874 83204 76 829 10 0 0 0 829 83300 CONST 833 833 1 UNPACKED PT FOR 'FILEA' DATA 83302 (D)0; 'FILEA'/FILE ID R-ALIGNED 83304 0; SET(NUMERIC) 83306 0; BLOCK NUMBER(DEC NUMERIC) 83308 0; START WORD/LAST BLOCK(DEC NUMERIC) 83310 0; END WORD(DEC NUMERIC) 83312 ; ZERO=WORD AMEND 83400 PROCR 834 834 FORM UP RELATIVE ADDRESS S/R 83401 NOTES RADIX B 83402 81 834 2 0 0 0 834 83403 05 869 2 0 0 0 869 STORE I/C SERIAL 83404 35 0 0 0 11100 83405 36 869 2 0 0 0 869 COLLARE PROCR NO 83406 30 0 0 0 2- 83407 80 821 2 0 0 0 821 gCONVERT TO BINARY 83408 92 0 0 5 0 SET (MR5)=PROCR NO 83409 90 0 0 3 0 83410 C 0 0 0 40 83414>83411 00 25 2 0 3 0 83412 02 869 2 0 0 0 869 83413 70 834 27 0 0 0 834 gYES 83414 94 834 11 0 3 2 834 >NO 83415 18 1000 0 5 0 PROCR START 83416 3 822 2 0 0 0 822 PROCR START 83417 70 834 28 0 0 0 834 gPROCR NOT THERE, LEAVE SR (A)=0 83418 10 0 0 0 0 CLEAR A 83419 35 0 0 0 11 COLLATE ITEM NO 83420 36 869 2 0 0 0 869 83421 80 821 2 0 0 0 821 gCONVERT TO BINARY 83422 12 0 0 0 2 BIN ITEM-2 83423 3 821 2 0 0 0 821 WL 83424 71 834 29 0 0 0 834 gIGNORE=LINE SERIAL, ACCEPT=PM 6 DATA 83425 822 2 0 0 0 822 PROCR=START 83426 76 834 28 0 0 0 834 g 83413>83427 00 25 3 0 3 0 83426> 83417>83428 82 834 2 0 0 0 834 83424>83429 10 0 0 0 0 83430 82 834 2 0 0 0 834 83500 PROCR 835 835 FORM UP CHAPTER NO S/R 83501 NOTES RADIX B 83502 81 835 2 0 0 0 835 83503 05 869 2 0 0 0 869 STORE PROCR NO 83504 90 0 0 3 1 83505 C 0 0 0 15 83506 35 0 0 0 11100 83512>83507 10 0 0 0 0 83508 36 92 9 0 3 0 LAST PROCR IN CHAP 83509 30 0 0 0 2- 83510 02 869 2 0 0 0 869 83511 72 835 13 0 0 0 835 g 83512 94 835 7 0 3 1 835 >NO 83511>83513 10 0 0 0 0 83514 35 0 0 0 1 83515 36 92 9 0 3 0 CORRECTED CHAP NO 83516 82 835 2 0 0 0 835 83600 PROCR 836 836 FORM UP CHAPTER NO OF SECN 83601 NOTES RADIX B 83602 81 836 2 0 0 0 836 83603 35 0 0 0 1 (A)=0 83604 36 15 0 0 3 0 83605 92 0 0 5 0 83606 10 0 0 0 0 83607 36 92 9 0 5 0 CORRECTED CHAP 83608 82 836 2 0 0 0 836 83700 PROCR 837 837 FORM UP TRANSIT AREA PARAMETER S/R 83701 NOTES RADIX B 83702 81 837 2 0 0 0 837 83703 05 869 2 0 0 0 869 STORE SECN NO 83704 91 24 2 0 3 0 SET(MR3)=2(R+T)/2R 83705 94 837 7 0 3 0 837 ///// 83706 76 837 13 0 0 0 837 gNO TX AREAS 83705>83707 35 0 0 0 111- 83712>83708 36 24 4 0 3 0 SECN NO 83709 02 869 2 0 0 0 869 83710 70 837 14 0 0 0 837 g 83711 10 0 0 0 0 83712 94 837 8 0 3 2 837 > 83706>83713 82 837 2 0 0 0 837 g 83710>83714 35 0 0 0 11000 83715 36 24 4 0 3 0 TA PARAMETER 83716 82 837 2 0 0 0 837 g 83800 PROCR 838 838 SET UP COUNTERS AT START OF NEW TRIAL DATA BLOCK 83801 NOTES RADIX B 83802 81 838 2 0 0 0 838 83803 60 0 0 0 0 SET DECIMAL 83804 90 0 0 3 0 83805 C 0 0 0 7 83806 10 0 0 0 2 83809>83807 03 32 15 0 3 0 FOR PRINTING 83808 11 0 0 0 2 83809 94 838 7 0 3 1 838 83810 62 0 0 0 0 SET BINARY 83811 90 0 0 2 0 83812 C 0 0 0 14 83813 83 787 4 0 0 1 787 SET*SWITCH AT 1 83814 83 786 4 0 0 1 786 SET B/E SWITCH AT 1 83815 83 849 4 0 0 2 849 SET BLOCK NO SWITCH AT 2 83816 83 781 2 0 0 2 781 SET FIRST WORD SWITCH AT 2 83817 05 871 42 1 0 0 871 CLEAR ERROR WORD 83818 80 818 2 0 0 0 818 gLINE FEED S/R 83819 82 838 2 0 0 0 838 g 83900 PROCR 839 839 STEP WORD NUMBERS FOR PRINTED LINE BY 14 83901 NOTES RADIX B 83902 81 839 2 0 0 0 839 83903 60 0 0 0 0 83904 90 0 0 3 0 83905 C 0 0 0 7 83906 35 0 0 0 1111 83910>83907 10 0 0 0 14 83908 36 32 15 0 3 0 83909 5 32 15 0 3 0 (CLEAR PREVIOUS SIGN) 83910 94 839 7 0 3 1 839 83911 62 0 0 0 0 83912 82 839 2 0 0 0 839 84000 PROCR 840 840 STEP WORD COUNTER BY 2 84001 NOTES RADIX B 84002 81 840 2 0 0 0 840 84003 10 0 0 0 2 84004 60 0 0 0 0 84005 04 32 164 0 0 0 84006 62 0 0 0 0 84007 82 840 2 0 0 0 840 84100 PROCR 841 841 PREPARE FOR DUMPS POINTS S/R 84101 NOTES RADIX B 84102 81 841 2 0 0 0 841 84103 80 818 2 0 0 0 818 gLINE FEED S/R 84104 80 818 2 0 0 0 818 gLINE FEED S/R 84105 90 0 0 4 0 SET(MR4)=11:0 84106 C 0 0 0 11 84107 52 5 2 0 0 0 EDIT PM POINT HEADING 84108 C 876 2 0 0 0 876 84109 80 817 2 0 0 0 817 gPRINT 84110 9 0 1 0 0 84111 30 0 0 0 4- 84112 12 0 0 0 556554 'END' 84113 70 841 15 0 0 0 841 gALREADY AT END 84114 80 811 2 0 0 0 811 gREAD P/T 84113>84115 80 818 2 0 0 0 818 gLINE FEED S/R 84116 82 841 2 0 0 0 841 g 84200 PROCR 842 842 PROCESS DUMPS POINT S/R 84201 NOTES RADIX B 84202 81 842 2 0 0 0 842 84203 94 842 5 0 4 1 842 STEP(MR4) 84204 76 805 14 0 0 0 805 gTOO MANY DUMPS POINTS 84203>84205 54 31 0 1 0 22 84206 5 871 40 1 0 0 871 CLEAR ERROR WORDS 84207 5 871 42 1 0 0 871 84208 5 871 44 1 0 0 871 84209 0 30 0 0 0 0 STORE I/C SERIAL 84210 80 780 2 0 0 0 780 gUPDATE ADDRESS 84211 3 30 0 0 0 0 NEW SERIAL 84212 3 31 0 0 0 0 84213 80 834 2 0 0 0 834 gFORM UP REL ADD S/R 84214 70 805 14 0 0 0 805 gNOT PROCR START OR 'TRACE' ,REJECT 84215 5 31 1 0 0 0 84216 96 0 0 5 0 BINARY PROCR NO 84217 80 835 2 0 0 0 835 gFORM UP CHAP NO 84218 96 0 0 3 0 UNCORRECTED CHAP 84219 5 31 2 0 0 0 84300 PROCR 843 843 PROCESS TYPE N1 N2 AND N3 84301 NOTES RADIX B 84302 0 30 1 0 0 0 84303 70 805 2 0 0 0 805 gREJECT 84304 73 805 2 0 0 0 805 84305 12 0 0 0 7 84306 72 805 2 0 0 0 805 gNO,ERROR 84307 11 0 0 0 7 84308 30 0 0 0 4 84309 4 31 2 0 0 0 84310 84 780 17 0 0 0 780 SET SWITCH 2 BY TYPE 84311 C 30 1 0 0 0 84312 0 30 2 0 0 0 84313 12 0 0 0 256 84314 72 806 12 0 0 0 806 gNO 84315 11 0 0 0 256 84316 80 821 2 0 0 0 821 gCONVERT TO BINARY 80614>84317 30 0 0 0 3 84318 5 31 3 0 0 0 84319 0 30 3 0 0 0 84320 12 0 0 0 256 84321 72 806 15 0 0 0 806 gNO 84322 11 0 0 0 256 84323 80 821 2 0 0 0 821 gCONVERT TO BINARY 80617>84324 4 31 3 0 0 0 84325 0 30 4 0 0 0 84326 70 806 18 0 0 0 806 gNO 84327 12 0 0 0 256 84328 72 806 18 0 0 0 806 gNO 84329 11 0 0 0 256 84330 80 821 2 0 0 0 821 gCONVERT TO BINARY 80620>84331 30 0 0 0 1 84332 4 31 2 0 0 0 84333 91 872 2 0 2 0 872 SET(MR2)=0:0 84334 90 0 0 1 0 SET(MR1)=4:0 84335 C 0 0 0 4 84400 PROCR 844 844 PM TYPE SWITCH,DEAL WITH TYPES 1 &2 84401 NOTES RADIX B 84402 85 780 17 0 0 0 780 SWITCH 2,PM TYPE 84403 C 844 9 0 0 0 844 (1) 84404 C 844 9 0 0 0 844 (2) 84405 C 845 2 0 0 0 845 (3) 84406 C 845 2 0 0 0 845 (4) 84407 C 847 2 0 0 0 847 (5) 84408 C 846 2 0 0 0 846 (6) 84417> 84404> 84403>84409 0 30 5 0 1 0 CHAP NO 84410 70 847 2 0 0 0 847 gEND OF CHAPS 84411 2 869 3 0 0 0 869 84412 70 844 14 0 0 0 844 gYES 84413 72 845 44 0 0 0 845 gNO ERROR 84412>84414 1 869 3 0 0 0 869 84415 5 31 4 0 2 0 84416 94 844 17 0 2 4 844 84546> 84548> 84416>84417 94 844 9 0 1 1 844 >NO 84418 76 847 2 0 0 0 847 gYES 84500 PROCR 845 845 DEAL WITH TYPES 3 & 4 84501 NOTES RADIX B 84542> 84406> 84405>84502 0 30 5 0 1 0 SECN NO 84503 70 847 2 0 0 0 847 gEND OF SECNS 84504 73 845 49 0 0 0 845 gSECN<0 84505 12 0 0 0 100 84506 72 845 49 0 0 0 845 gSECN>99 84507 30 5 0 1 0 SECN NO 84508 80 821 2 0 0 0 821 gCONVERT TO BINARY 84509 3 31 4 0 2 0 84510 92 0 0 3 0 SET (MR3)=SECN NO 84511 0 15 0 0 3 0 84512 70 845 49 0 0 0 845 gNO ERROR 84513 0 27 4 0 0 0 COMPILER? 84514 70 845 22 0 0 0 845 NO-> 84515 95 0 0 2 0 84516 3 875 2 1 0 0 875 WL 84517 124 999 24 0 3 0 84518 107 0 0 0 0 DOUBLE MR 2 84519 0 7 20 2 2 0 CLEO LENGTH 84520 91 875 2 0 2 0 875 RESET 84521 76 845 25 0 0 0 845 84514>84522 34 868 3 0 0 0 868 BITS 5->19 84523 36 15 0 0 3 0 SECN LGTH 84524 30 0 0 0 1- 84521>84525 70 845 49 0 0 0 845 LENGTH ZERO 84526 5 31 7 0 2 0 84527 34 868 4 0 0 0 868 BIT 20 84528 36 15 0 0 3 0 84529 71 845 35 0 0 0 845 gYES 84530 18 1000 0 3 0 PROCR START 84531 5 31 6 0 2 0 84532 80 836 2 0 0 0 836 FORM UP CHAP NO 84533 30 0 0 0 3 84534 76 845 40 0 0 0 845 g 84529>84535 31 0 0 0 3- 84536 5 31 5 0 2 0 STORE TA IND 84537 0 31 4 0 2 0 SECN NO 84538 80 837 2 0 0 0 837 gFORM UP TA PARAMETER 84539 70 845 49 0 0 0 845 gT A PARAM NOT FOUND 84534>84540 4 31 4 0 2 0 84541 94 845 42 0 2 4 845 84551> 84553> 84541>84542 94 845 2 0 1 1 845 >NEXT SECN 84543 76 847 2 0 0 0 847 g 84413>84544 10 0 0 0 5e5300 *C 84545 80 807 2 0 0 0 807 g 84546 70 844 17 0 0 0 844 g 84547 80 808 2 0 0 0 808 g 84548 76 844 17 0 0 0 844 g 84539> 84525> 84512> 84506> 84504>84549 10 0 0 0 5e7200 *S 84550 80 807 2 0 0 0 807 g 84551 70 845 42 0 0 0 845 g 84552 80 808 2 0 0 0 808 g 84553 76 845 42 0 0 0 845 g 84605> 84610> 84612> 84621> 84634> 84636> 84652>84554 10 0 0 0 5e6700 *P 84555 80 807 2 0 0 0 807 g 84556 70 846 60 0 0 0 846 84557 31 0 0 0 1- 84558 80 808 2 0 0 0 808 g 84559 76 846 60 0 0 0 846 g 84600 PROCR 846 846 DEAL WITH TYPE 6 84601 NOTES RADIX B 84408>84602 90 0 0 1 0 SET(MR1)=6:0 84603 C 0 0 0 12 84660>84604 0 30 6 0 1 0 ITEM 84605 73 845 54 0 0 0 845 gREPORT NEG ITEM 84606 80 821 2 0 0 0 821 gCONVERT 84607 5 31 6 0 2 0 84608 0 30 5 0 1 0 REF 84609 70 847 2 0 0 0 847 gASSUME END OF DETAILS 84610 73 845 54 0 0 0 845 gREPORT NEG 84611 12 0 0 0 999 84612 72 845 54 0 0 0 845 gREPORT >998 84613 0 30 5 0 1 0 84614 32 0 0 0 2- 84615 71 846 29 0 0 0 846 gPROCR 84616 32 0 0 0 2 84617 80 821 2 0 0 0 821 gCONVERT REF 84618 3 31 5 0 2 0 84619 92 0 0 3 0 SET(MR3)=BIN SECN 84620 18 1000 0 3 0 PROCR START 84621 70 845 54 0 0 0 845 gNON-EXISTANT SECN 84622 1 31 6 0 2 0 ITEM 84623 5 31 4 0 2 0 84624 10 0 0 0 10000 SET SEC IND 84625 4 31 5 0 2 0 84626 10 0 0 0 0 84627 80 836 2 0 0 0 836 gFORM UP CHAP NO 84628 76 846 57 0 0 0 846 g 84615>84629 32 0 0 0 2 84630 80 821 2 0 0 0 821 gCONVERT REF 84631 5 31 5 0 2 0 84632 0 30 6 0 1 0 ITEM(3-DIGIT REF) 84633 12 0 0 0 2 84634 73 845 54 0 0 0 845 gREPORT<2 84635 12 0 0 0 98 84636 72 845 54 0 0 0 845 gREPORT>99 84637 0 30 5 0 1 0 REF 84638 30 0 0 0 2 84639 60 0 0 0 0 SET DECIMAL 84640 1 30 6 0 1 0 ITEM 84641 62 0 0 0 0 RESET BINARY 84642 80 780 2 0 0 0 780 gUPDATE ADDRESS 84643 3 834 2 0 0 0 834 84644 32 0 0 0 2- 84645 5 30 5 0 1 0 NEW REF 84646 32 0 0 0 2 84647 5 30 6 0 1 0 NEW ITEM 84648 834 2 0 0 0 834 84649 80 834 2 0 0 0 834 gFORM UP REL ADD 84650 71 846 54 0 0 0 846 gOK 84651 0 822 2 0 0 0 822 PROCR START 84652 70 845 54 0 0 0 845 gREJECT 84653 1 821 2 0 0 0 821 (BIN ITEM=2) 84650>84654 5 31 4 0 2 0 84655 95 0 0 5 0 84656 80 835 2 0 0 0 835 gFORM UP CHAP NO 84628>84657 30 0 0 0 4 84658 4 31 4 0 2 0 84659 94 846 60 0 2 3 846 84659> 84559> 84556>84660 94 846 4 0 1 2 846 >NEXT TRACE POINT 84700 PROCR 847 847 FORM UP M/T BLOCK AND PRINT 84701 NOTES RADIX B 84609> 84543> 84503> 84418> 84410> 84407>84702 96 0 0 4 0 DUMP POINT NUMBER 84703 3 869 4 0 0 0 869 84704 11 0 0 0 40 CONVERT TO ALPHA 84705 1 870 14 1 0 0 870 DDUMP SP 84706 5 8 50 1 0 0 84707 0 870 10 1 0 0 870 FILES 84708 5 8 4 1 0 0 84709 55 31 0 0 0 22 84710 C 8 6 1 0 0 84711 80 816 2 0 0 0 816 WRITE 84712 52 5 2 0 0 0 84713 C 877 2 0 0 0 877 84714 0 30 1 0 0 0 TEST TYPE 6 84715 12 0 0 0 6 84716 70 847 20 0 0 0 847 gYES 84717 52 5 18 0 0 0 84718 C 877 16 0 0 0 877 84719 76 847 31 0 0 0 847 84716>84720 52 5 18 0 0 0 84721 C 877 34 0 0 0 877 84722 90 0 0 3 0 LEFT ALIGN ITEMS 84723 C 0 0 0 24 84724 10 0 0 0 0 84730>84725 34 5 22 1 3 0 84727>84726 32 0 0 0 2 84727 70 847 26 0 0 0 847 84728 32 0 0 0 8 84729 5 5 22 1 3 0 84730 94 847 25 0 3 4 847 84719>84731 80 817 2 0 0 0 817 gPRINT 84732 82 842 2 0 0 0 842 g 84800 PROCR 848 848 PROCESS AND PRINT T.D. HEADING 84801 NOTES RADIX B 84802 81 848 2 0 0 0 848 84803 52 5 2 0 0 0 EDIT 84804 C 878 2 0 0 0 878 84805 0 872 6 1 0 0 872 HEAD OF FORM 84806 80 817 2 0 0 0 817 PRINT 84807 83 826 4 0 0 2 826 SET FIEND SWITCH 84808 82 848 2 0 0 0 848 84900 PROCR 849 849 PROCESS TRIAL DATA HEADING S/R (1) 84901 NOTES RADIX B 84902 81 849 2 0 0 0 849 84903 0 16 2 0 0 0 PROG ID 84904 5 31 0 2 0 0 84905 5 871 42 1 0 0 871 CLEAR ERROR W/L 84906 0 30 4 0 0 0 RUN NO 84907 3 32 167 0 0 0 84908 5 31 6 2 0 0 84909 0 30 7 0 0 0 T D SET NO 84910 71 849 17 0 0 0 849 gNON-ZERO 84911 80 867 2 0 0 0 867 gSTEP'OTHERS' 84912 0 871 12 1 0 0 871 SET ERROR WORD=SET 84913 30 0 0 0 4- 84914 5 871 42 1 0 0 871 84915 10 0 0 0 9 SET T D SET=9 84916 3 30 7 0 0 0 84910>84917 3 31 12 2 0 0 STORE FOR O/P 84918 0 30 5 0 0 0 MAX BLOCK SIZE 84919 12 0 0 0 1001 TEST>1000 84920 73 849 26 0 0 0 849 gNO 84921 0 871 32 1 0 0 871 SET UP ERROR REPORT 84922 5 871 42 1 0 0 871 84923 80 867 2 0 0 0 867 gSTEP'OTHERS' 84924 0 30 5 0 0 0 84925 12 0 0 0 1001 84920>84926 11 0 0 0 1001 84927 3 32 168 0 0 0 84928 3 31 16 2 0 0 84929 80 821 2 0 0 0 821 gCONVERT TO BINARY 84930 31 0 0 0 1 FORM(2N-4) 84931 12 0 0 0 4 84932 5 31 10 2 0 0 84933 0 30 8 0 0 0 FIXED/VARIABLE IND 84934 3 31 18 2 0 0 84935 70 849 41 0 0 0 849 gFIXED SET UP IND IN 84936 10 0 0 0 1 84937 3 30 8 0 0 0 84938 5 31 18 2 0 0 84939 0 871 38 1 0 0 871 TD HEADING 84940 76 849 42 0 0 0 849 gVAR 84935>84941 0 871 36 1 0 0 871 84940>84942 5 871 40 1 0 0 871 85000 PROCR 850 850 PROCESS TRIAL DATA HEADING (2) 85001 NOTES RADIX B 85002 0 30 11 0 0 0 TEST TRUE FILE ID ZERO 85003 70 850 13 0 0 0 850 gYES 85004 32 0 0 0 3- 85005 5 869 2 0 0 0 869 COPY ALPHA PART TO W/L 85006 0 30 3 0 0 0 TEST ALPHA PART OF 85007 32 0 0 0 3- RTE IDENTIFIER= 85008 2 869 2 0 0 0 869 STORED ALPHA VALUE 85009 70 850 11 0 0 0 850 gYES 85010 80 809 2 0 0 0 809 gERROR S/R 85009>85011 0 30 10 1 0 0 85012 76 850 15 0 0 0 850 g 85003>85013 0 30 2 1 0 0 SET TRUE FILE ID= 85014 3 30 10 1 0 0 ROUTE IDENTIFIER 85012>85015 30 0 0 0 6- 85016 5 31 4 1 0 0 85017 0 30 2 1 0 0 STORE RTE IDENTIFIER 85018 30 0 0 0 6- 85019 5 31 20 1 0 0 85020 0 24 1 0 0 0 85021 70 850 30 0 0 0 850 gNO FILES 85022 91 24 0 0 1 0 SET(MR1)=2R/0 85029>85023 24 5 0 1 0 B7-20=FILE ID 85024 31 0 0 0 6- 85025 11 0 0 0 4000 85026 30 0 0 0 1 85027 2 30 3 0 0 0 85028 70 850 35 0 0 0 850 gYES 85029 94 850 23 0 1 2 850 85021>85030 10 0 0 0 7777 DUMMY FILE IDENTY'XX' 85031 3 31 20 1 0 0 ON MAG TAPE 85032 30 0 0 0 6 85033 5 30 2 1 0 0 AND PRINTER 85034 80 809 2 0 0 0 809 gERROR S/R 85028>85035 10 0 0 0 3£ BITS 1-6 85036 32 0 0 0 10- 85037 36 24 5 0 1 0 85038 12 0 0 0 7 85039 70 850 45 0 0 0 850 gYES 7 85040 12 0 0 0 1 85041 70 850 45 0 0 0 850 gYES 8 85042 12 0 0 0 3 85043 70 850 45 0 0 0 850 gYES 11 85044 80 809 2 0 0 0 809 gERROR S/R 85043> 85041> 85039>85045 95 0 0 1 0 FORM UP RTE PARAM 85046 31 0 0 0 1- 85047 11 0 0 0 1 85048 1 869 3 0 0 0 869 NO OF INITIAL CHAPS 85049 1 869 3 0 0 0 869 85050 5 31 2 2 0 0 85051 0 30 6 0 0 0 SECN NO 85052 3 32 169 0 0 0 85053 3 31 14 2 0 0 85054 80 821 2 0 0 0 821 gCONVERT TO BINARY 85055 80 837 2 0 0 0 837 gFORM UP PARAMETER 85056 71 850 58 0 0 0 850 gT.A.PARAMETER FOUND 85057 80 809 2 0 0 0 809 gERROR S/R 85056>85058 30 0 0 0 3- 85059 5 31 8 2 0 0 85060 80 818 2 0 0 0 818 gLINE FEED S/R 85061 80 818 2 0 0 0 818 gLINE FEED S/R 85062 54 8 0 0 0 54 85063 0 870 6 1 0 0 870 CHAPT 85064 5 8 4 1 0 0 85065 55 31 0 1 0 22 85066 C 8 6 1 0 0 85067 80 816 2 0 0 0 816 WRITE 85068 54 32 0 0 0 60 CLEAR W/L'S 85069 10 0 0 0 8 SET BLOCK CTR AT 8 85070 5 32 14 0 0 0 85071 90 0 0 1 0 SET (MR1) AT 24:0 85072 C 0 0 0 24 85073 0 30 8 0 0 0 FIXED/VARIABLE IND 85074 11 0 0 0 1 85075 84 785 2 0 0 0 785 SET BLOCK LGTH SWITCH 85076 82 849 2 0 0 0 849 85100 PROCR 851 851 OUTPUT M/T BLOCK S/R 85101 NOTES RADIX B 85102 81 851 2 0 0 0 851 85103 85 781 2 0 0 0 781 TEST THIS IS FIRST WORD OF TD BLOCK 85104 C 851 8 0 0 0 851 >NO 85105 C 851 6 0 0 0 851 >YES 85105>85106 83 781 2 0 0 1 781 SET FIRST WORD SWITCH AT 1 85107 76 851 23 0 0 0 851 85104>85108 94 851 23 0 1 2 851 >NO TEST END OF BLOCK 85109 90 0 0 3 0 85110 C 0 0 0 24 85111 90 0 0 1 0 85112 C 0 0 0 48 85118>85113 0 32 37 0 3 0 85114 5 8 4 2 1 0 85115 0 32 36 0 3 0 85116 5 8 6 2 1 0 85117 94 0 0 1 4 85118 94 851 13 0 3 2 851 85119 80 816 2 0 0 0 816 gWRITE 85120 90 0 0 1 0 RESET (MR1) 85121 C 0 0 0 24 85122 54 32 36 0 0 24 CLEAR W/L'S 85108> 85107>85123 82 851 2 0 0 0 851 85200 PROCR 852 852 EDIT NEXT PRINTER TRIAL DATA LINE+BLOCK NUMBER IF REQUIRED 85201 NOTES RADIX B 85202 81 852 2 0 0 0 852 85203 85 849 4 0 0 0 849 TEST BLOCK TO BE EDITED 85204 C 852 21 0 0 0 852 >NO 85205 C 852 6 0 0 0 852 >YES 85205>85206 52 5 2 0 0 0 EDIT BLOCK NO 85207 C 879 2 0 0 0 879 85208 60 0 0 0 0 85209 10 0 0 0 1 85210 4 32 14 0 0 0 STEP IT READY FOR NEXT BLOCK 85211 62 0 0 0 0 85212 83 849 2 0 0 1 849 SET BLOCK NO SWITCH 85213 0 32 14 0 0 0 85214 32 0 0 0 4- 85215 70 852 20 0 0 0 852 gNOT EX PT 85216 10 0 0 0 2+2+0 >>' 85217 5 5 3 0 0 0 85218 32 0 0 0 4 85219 5 32 14 0 0 0 CLEAR IND 85215>85220 76 852 22 0 0 0 852 85204>85221 80 819 2 0 0 0 819 CLEAR ANNEXE START 85220>85222 52 5 6 0 0 0 EDIT LINE 85223 C 879 8 0 0 0 879 85224 95 0 0 1 0 SET 'EX PT' INDS 85225 5 869 14 1 0 0 869 WL 85226 95 0 0 2 0 85227 5 908 54 1 0 0 908 WL 85228 90 0 0 1 0 SCAN WORD NUMBERS 85229 C 0 0 0 7 85230 90 0 0 2 0 SCAN SEC 5 85231 C 0 0 0 42 85238>85232 32 15 0 1 0 85233 72 852 37 0 0 0 852 gNORMAL 85234 35 0 0 0 110 85235 10 0 0 0 2t0 '->' 85236 37 5 7 0 2 0 85233>85237 94 0 0 1 1 85238 94 852 32 0 2 6 852 85239 91 869 14 0 1 0 869 RESTORE 85240 91 908 54 0 2 0 908 85241 82 852 2 0 0 0 852 85300 PROCR 853 853 END OF TRIAL DATA BLOCK S/R 85301 NOTES RADIX B 85302 81 853 2 0 0 0 853 85303 80 852 2 0 0 0 852 gEDIT BLOCK NO IF REQD 85304 10 0 0 0 2t SET(MR3)=42/3XMR 85305 30 0 0 0 5 85306 98 0 0 2 0 85307 98 0 0 2 0 85308 98 0 0 2 0 85309 91 0 0 3 0 85311>85310 54 5 6 0 3 6 CLEAR REST OF ANNEXE 85311 94 853 10 0 3 6 853 85312 5 32 139 0 0 0 CLEAR LINE CTR 85313 80 817 2 0 0 0 817 PRINT 85314 85 787 4 0 0 0 787 85315 C 853 22 0 0 0 853 >NO 85316 C 853 17 0 0 0 853 >YES 85316>85317 52 5 6 0 0 0 EDIT LINE 85318 C 880 2 0 0 0 880 85319 80 819 2 0 0 0 819 CLEAR ANNEXE START 85320 80 817 2 0 0 0 817 PRINT 85321 54 32 22 0 0 14 85315>85322 83 786 4 0 0 3 786 85323 82 853 2 0 0 0 853 85400 PROCR 854 854 PROCESS DUMP POINT FROM MT 85401 NOTES RADIX B 78921>85402 00 7 6 2 0 0 I/C SERIAL 85403 05 30 0 0 0 0 85404 35 0 0 0 10000 85405 36 7 10 2 0 0 PM TYPE 85406 30 0 0 0 4- 85407 05 30 1 0 0 0 85408 35 0 0 0 11000 N1 85409 36 7 12 2 0 0 85410 30 0 0 0 3- 85411 80 822 2 0 0 0 822 gCONVERT TO DEC 85412 05 30 2 0 0 0 85413 35 0 0 0 11 N2 85414 36 7 12 2 0 0 85415 80 822 2 0 0 0 822 gCONVERT TO DEC 85416 05 30 3 0 0 0 85417 35 0 0 0 110 N3 85418 36 7 10 2 0 0 85419 30 0 0 0 1- 85420 80 822 2 0 0 0 822 gCONVERT TO DEC 85421 05 30 4 0 0 0 85500 PROCR 855 855 -2 85501 NOTES RADIX B 85502 00 30 1 0 0 0 85503 12 0 0 0 6 85504 71 855 19 0 0 0 855 gNO 85505 90 0 0 1 0 SET (MR1)=6:0 85506 C 0 0 0 12 85507 91 872 2 0 2 0 872 SET (MR2)=0:0 85517>85508 10 0 0 0 0 85509 35 0 0 0 1111 85510 36 7 16 2 2 0 REF 85511 80 822 2 0 0 0 822 gCONVERT TO DEC 85512 5 30 5 0 1 0 85513 0 7 18 2 2 0 ITEM 85514 80 822 2 0 0 0 822 gCONVERT TO DEC 85515 5 30 6 0 1 0 85516 94 855 17 0 2 6 855 85516>85517 94 855 8 0 1 2 855 >NEXT ONE 85518 76 855 36 0 0 0 855 g 85504>85519 0 30 1 0 0 0 TEST TYPE 5 85520 12 0 0 0 5 85521 71 855 26 0 0 0 855 gNO 85522 5 30 5 0 0 0 CLEAR W/L'S 85523 5 30 6 1 0 0 85524 5 30 8 1 0 0 85525 76 855 36 0 0 0 855 g 85521>85526 90 0 0 1 0 SET (MR1)=4:0 85527 C 0 0 0 4 85528 91 872 2 0 2 0 872 SET (MR2)=0:0 85535>85529 10 0 0 0 0 85530 35 0 0 0 111 85531 36 7 14 2 2 0 CHAP OR SECN NO 85532 80 822 2 0 0 0 822 gCONVERT TO DEC 85533 5 30 5 0 1 0 85534 94 855 35 0 2 8 855 85534>85535 94 855 29 0 1 1 855 >NEXT ONE 85525> 85518>85536 80 842 2 0 0 0 842 gPROCESS DUMPS POINT 85537 76 789 22 0 0 0 789 85600 PROCR 856 856 PRINT FILE UNALTERED S/R 85601 NOTES RADIX B 85602 81 856 2 0 0 0 856 85603 0 27 0 0 0 0 TEST ISSUE 6 OR 85604 30 0 0 0 4- EARLIER 85605 12 0 0 0 7 85606 72 856 55 0 0 0 856 gNO 85607 0 7 10 1 0 0 FILE ID 85608 5 30 10 1 0 0 85609 0 7 12 2 0 0 RUN NO 85610 5 30 4 0 0 0 85611 5 30 7 0 0 0 SET NO 85612 5 30 8 0 0 0 IND 85613 0 7 16 2 0 0 TA LGTH 85614 31 0 0 0 1- 85615 80 822 2 0 0 0 822 gTO DEC 85616 5 30 5 0 0 0 85617 62 0 0 0 0 85618 0 7 14 2 0 0 P RTE PARAM 85619 30 0 0 0 3 SEARCH LIST FOR 85620 5 869 2 0 0 0 869 W/L SECN ASSOCIATED 85621 91 24 2 0 3 0 2(R+T):2R WITH THIS P RTE 85622 94 856 24 0 3 0 856 ///// 85623 76 856 30 0 0 0 856 gNO TX AREAS 85629> 85622>85624 35 0 0 0 11000 85625 36 24 4 0 3 0 85626 2 869 2 0 0 0 869 85627 70 856 31 0 0 0 856 gSECN FOUND 85628 10 0 0 0 0 85629 94 856 24 0 3 2 856 85623>85630 80 809 2 0 0 0 809 NOT FOUND ERROR S/R 85627>85631 35 0 0 0 111 85632 36 24 4 0 3 0 SECN NO 85633 80 821 2 0 0 0 821 gTO BIN 85634 5 30 6 0 0 0 85635 0 7 8 2 0 0 RTE PARAM 85636 2 869 3 0 0 0 869 NO OF CHAPS 85637 2 869 3 0 0 0 869 85638 12 0 0 0 1 85639 31 0 0 0 1 85640 91 0 0 3 0 85641 24 5 0 3 0 FILE ID BITS 7-20 85642 31 0 0 0 6- 85643 11 0 0 0 4000 RESTORE TOP CONTROL 85644 30 0 0 0 6 85645 5 30 2 1 0 0 TRUE FILE ID OF TRIAL DATA SET 85646 80 849 2 0 0 0 849 gPROCESS T D HEADING 85657> 85659>85647 80 848 2 0 0 0 848 gPRINT T D HEADING 85648 10 0 0 0 8 SET BLOCK CTR 2 AT 8 85649 5 32 138 0 0 0 85650 90 0 0 8 22 SET(MR8)=24:22 85651 C 0 0 0 24 85652 80 861 2 0 0 0 861 gREAD AND STORE BLOCK 85653 80 864 2 0 0 0 864 gPRINT T D SET 85654 82 856 2 0 0 0 856 g 85606>85655 80 794 2 0 0 0 794 gPROCESS T D HEADING 85656 23 46 0 0 0 'PRINTOUT'INDICATOR 85657 71 856 47 0 0 0 856 gPRINT ALL B/FWD DATA 85658 0 871 42 1 0 0 871 ERROR WORD 85659 71 856 47 0 0 0 856 gHEADING REPORTED PRINT WHOLE SET 85660 0 7 26 1 0 0 STORE FILE ID 85661 5 871 44 0 0 0 871 85662 52 5 2 0 0 0 EDIT 'FILE UNALTERED' LINE 85663 C 881 2 0 0 0 881 85664 80 817 2 0 0 0 817 gPRINT 85668>85665 80 857 2 0 0 0 857 gREAD,TEST CHAPT,PREND OR E 85666 70 856 69 0 0 0 856 gYES 85667 80 815 2 0 0 0 815 gWRITE A2 85668 76 856 65 0 0 0 856 g 85666>85669 83 826 4 0 0 1 826 SET FIEND SWITCH AT 1 85670 82 856 2 0 0 0 856 85700 PROCR 857 857 READ A1,TEST CHAPT PREND OR E 85701 NOTES RADIX B 85702 81 857 2 0 0 0 857 85703 80 810 2 0 0 0 810 gREAD A1 85704 0 7 4 1 0 0 85705 2 870 8 1 0 0 870 85706 70 857 12 0 0 0 857 gYES 85707 1 870 8 1 0 0 870 85708 2 870 6 1 0 0 870 85709 70 857 12 0 0 0 857 gYES 85710 1 870 6 1 0 0 870 85711 12 0 0 0 55 85709> 85706>85712 82 857 2 0 0 0 857 85800 PROCR 858 858 FORM TD WORD FOR PRINTING S/R 85801 NOTES RADIX B 85802 81 858 2 0 0 0 858 85803 00 32 0 1 2 0 TEST ERROR WORD 85804 02 872 16 1 0 0 872 85805 71 858 10 0 0 0 858 gNO 85806 00 872 16 1 0 0 872 85807 05 32 22 1 2 0 85808 83 787 4 0 0 2 787 SET -LINE SWITCH AT 2 85809 76 858 71 0 0 0 858 85805>85810 10 0 0 0 3£ SET (B)=63 85811 32 0 0 0 10- 85823>85812 36 32 0 1 2 0 TEST WORD CONTAINS 85813 05 32 122 1 0 0 W/L 85814 36 872 8 1 0 0 872 85815 02 32 122 1 0 0 85816 70 858 62 0 0 0 858 gYES 85817 10 0 0 0 0 85818 36 872 10 1 0 0 872 TEST WORD CONTAINS 85819 02 32 122 1 0 0 85820 70 858 69 0 0 0 858 gYES 85868>85821 32 0 0 0 2 85822 10 0 0 0 0 TEST END OF WORD 85823 75 858 12 0 0 0 858 gNO 85824 85 786 4 0 0 0 786 TEST B/E FOUND 85825 C 858 71 0 0 0 858 >NO 85826 C 858 28 0 0 0 858 >YES 85827 C 803 38 0 0 0 803 GHASTLY MISTAKE 85826>85828 872 4 1 0 0 872 SAFETY 85829 5 32 36 1 1 0 85830 0 32 0 1 2 0 85831 12 0 0 0 5200000052 85832 70 858 37 0 0 0 858 gYES 85833 35 0 0 0 110000 ERROR REPORT B 85834 10 0 0 0 525963 BIL 85835 37 871 42 1 0 0 871 85836 80 867 2 0 0 0 867 gADD ONE TO OTHERS CTR 85832>85837 85 785 2 0 0 0 785 TEST BLOCK AND ITEM 85838 C 858 87 0 0 0 858 >NO LGHS BEING CHECKED 85839 C 858 40 0 0 0 858 >YES 85839>85840 96 0 0 2 0 FORM UP WORD NO 85841 31 0 0 0 1- OF B/E WORD 85842 92 0 0 3 0 85843 10 0 0 0 0 85844 35 0 0 0 1111 85845 36 32 15 0 3 0 85846 02 32 166 0 0 0 WORD CORRECT 85847 70 858 52 0 0 0 858 gYES 85848 35 0 0 0 11 ERROR REPORT L 85849 10 0 0 0 525963 85850 37 871 42 1 0 0 871 85851 80 867 2 0 0 0 867 gADD ONE TO OTHERS CTR 85847>85852 10 0 0 0 0 85853 35 0 0 0 1111 85854 36 32 15 0 3 0 85855 02 32 165 0 0 0 LGTHS CORRECT 85856 70 858 74 0 0 0 858 gOK 85857 35 0 0 0 1100 ERROR REPORT 1 85858 10 0 0 0 525963 85859 37 871 42 1 0 0 871 85860 80 867 2 0 0 0 867 gADD ONE TO 'OTHERS'CTR 85861 76 858 74 0 0 0 858 85816>85862 83 786 4 0 0 2 786 SET B/E FOUND SWITCH AT 2 85863 0 872 12 1 0 0 872 REPLACE B/E BY B 85870>85864 37 32 0 1 2 0 85865 0 872 16 1 0 0 872 SET UP * 85866 37 32 22 1 2 0 85867 83 787 4 0 0 2 787 SET*LINE SWITCH AT 2 85868 76 858 21 0 0 0 858 g 85820>85869 0 872 14 1 0 0 872 REPLACE L/E BY L 85870 76 858 64 0 0 0 858 g 85825> 85809>85871 85 785 2 0 0 0 785 CHECK BLOCK AND ITEM LENGTH' 85872 C 858 87 0 0 0 858 >NO 85873 C 858 74 0 0 0 858 >YES 85873> 85861> 85856>85874 96 0 0 2 0 85875 31 0 0 0 1- 85876 5 839 2 0 0 0 839 WL 85877 35 0 0 0 1111 85878 124 839 2 0 1 0 839 85879 36 32 15 0 0 0 PRINTER WORD NUMBER 85880 2 32 165 0 0 0 POSITION OF NEXT ITEM LENGTH WORD 85881 71 858 87 0 0 0 858 gNOT ITEM LENGTH POSITION 85882 32 36 2 1 0 ITEM LENGTH 85883 80 822 2 0 0 0 822 gDEC 85884 60 0 0 0 0 85885 4 32 165 0 0 0 EXPECTED POSITION NEXT ITEM LENGTH WORD 85886 62 0 0 0 0 85881> 85872> 85838>85887 80 851 2 0 0 0 851 gWRITE O/P IF FULL 85888 94 859 22 0 2 2 859 PRINTER LINE N OT FULL 85889 90 0 0 3 0 TEST ZERO ANNEX 85890 C 0 0 0 14 85893>85891 32 0 1 3 0 85892 71 859 2 0 0 0 859 gSOMETHING TO PRINT 85893 94 858 91 0 3 2 858 85894 76 859 16 0 0 0 859 gNOTHING TO PRINT 85900 PROCR 859 859 PRINT LINE OF TRIAL DATA 85892>85902 80 852 2 0 0 0 852 gEDIT BLOCK NUMBER 85903 80 817 2 0 0 0 817 gPRINT 85904 85 787 2 0 0 0 787 LAST LINE CONTAINED FUNNIES' 85905 C 859 16 0 0 0 859 >NO 85906 C 859 7 0 0 0 859 >YES 85906>85907 80 819 2 0 0 0 819 gCLEAR FRONT OF ANNEX 85908 52 5 6 0 0 0 EDIT WEIRD LINE 85909 C 880 2 0 0 0 880 85910 80 817 2 0 0 0 817 gPRINT 85911 54 32 22 1 0 14 85912 85 786 2 0 0 0 786 BEW FOUND IN MT TRIAL DATA' 85913 C 859 16 0 0 0 859 >NO 85914 C 859 21 0 0 0 859 >YES 85915 C 803 38 0 0 0 803 >GHASTLY MISTAKE 85913> 85905> 85894>85916 90 0 0 2 0 85917 C 0 0 0 14 85918 80 839 2 0 0 0 839 gSTEP MT WORD NUMBERS 85919 83 787 2 0 0 1 787 CLEAR'FUNNY LINE'IND 85920 82 858 2 0 0 0 858 85914>85921 83 786 2 0 0 3 786 SET'BEW FOUND AND PRINTED' 85888>85922 82 858 2 0 0 0 858 86000 PROCR 860 860 PROCESS UNAMENDED TRIAL DATA WORD EX MT 86001 NOTES RADIX B 86002 81 860 2 0 0 0 860 86003 0 32 140 1 8 0 NEXT I/P MT WORD 86004 3 32 36 1 1 0 STORE FOR MT O/P 86005 5 32 0 1 2 0 STORE FOR PRINTING 86006 85 781 2 0 0 0 781 TEST 1ST WORD OF BLOCK 86007 C 860 22 0 0 0 860 >NO 86008 C 860 9 0 0 0 860 >YES 86008>86009 85 785 2 0 0 0 785 TEST BLOCK AND ITEM LGTHS TO BE CHECKED 86010 C 860 17 0 0 0 860 >NO 86011 C 860 12 0 0 0 860 >YES 86011>86012 10 0 0 0 6 SET ITEM LGTH POSN=6 86013 3 32 165 0 0 0 86014 1 32 0 2 2 0 FORM AND STORE POSN OF B/E WORD 86015 80 822 2 0 0 0 822 gCONVERT TO DEC 86016 5 32 166 0 0 0 86010>86017 83 781 2 0 0 1 781 SET SWITCH AT 1 86018 0 32 0 1 2 0 (DON'T PRINT FIRST WORD IN'WORD 2'POSITI 86019 5 32 2 1 2 0 NEXT POSN 86020 5 32 0 1 2 0 86021 94 860 22 0 2 2 860 STEP(MR2) 86021> 86007>86022 80 858 2 0 0 0 858 gPROCESS WORD 86023 80 861 2 0 0 0 861 gADDRESS NEXT I/P MT WORD 86024 82 860 2 0 0 0 860 gLEAVE S/R 86100 PROCR 861 861 ADDRESS NEXT I/P TRIAL DATA WORD EX MT 86101 NOTES RADIX B 86102 81 861 2 0 0 0 861 86103 32 140 1 8 0 LAST MT WORD 86104 2 872 4 1 0 0 872 BEW 86105 71 861 10 0 0 0 861 gNO 86106 60 0 0 0 0 86107 10 0 0 0 1 86108 4 32 138 0 0 0 86109 62 0 0 0 0 STEP I/P BLOCK CTR 86105>86110 94 861 27 0 8 2 861 86111 80 810 2 0 0 0 810 gREAD A1 86112 95 0 0 1 0 PRESERVE 86113 5 875 2 1 0 0 875 86114 90 0 0 1 0 COPY NEXT I/P BLOCK 86115 C 0 0 0 48 86116 90 0 0 3 0 86117 C 0 0 0 24 86123>86118 0 7 4 2 1 0 86119 30 0 0 0 5 86120 1 7 6 2 1 0 86121 5 32 140 1 3 0 86122 94 0 0 1 4 86123 94 861 18 0 3 2 861 86124 91 875 2 0 1 0 875 RESTORE MR1 86125 90 0 0 8 0 RESET (MR8) 86126 C 0 0 0 24 86110>86127 82 861 2 0 0 0 861 86200 PROCR 862 862 READ TO END OF BLOCK S/R 86201 NOTES RADIX B 86202 81 862 2 0 0 0 862 86207>86203 00 32 140 1 8 0 TEST B/E WORD 86204 02 872 4 1 0 0 872 86205 70 862 8 0 0 0 862 gYES LEAVE S/R 86206 80 861 2 0 0 0 861 gSTEP MR8 S/R 86207 76 862 3 0 0 0 862 g 86205>86208 80 861 2 0 0 0 861 gADDRESS NEXT I/P MT WORD S/R 86209 82 862 2 0 0 0 862 g 86300 PROCR 863 863 PROCESS TO END OF TD BLOCK S/R 86301 NOTES RADIX B 86302 81 863 2 0 0 0 863 86308>86303 85 786 4 0 0 0 786 B/E SWITCH 86304 C 863 7 0 0 0 863 >NO 86305 C 863 9 0 0 0 863 >YES 86306 C 863 10 0 0 0 863 >YES 86304>86307 80 860 2 0 0 0 860 gPROCESS WORD 86308 76 863 3 0 0 0 863 g 86305>86309 80 853 2 0 0 0 853 gEND OF TRIAL DATA BLOCK S/R 86306>86310 82 863 2 0 0 0 863 86400 PROCR 864 864 WRITE AND PRINT TO FIEND S/R 86401 NOTES RADIX B 86402 81 864 2 0 0 0 864 86403 00 7 4 1 0 0 TEST PREND OR 86404 02 870 8 1 0 0 870 E BLOCK IN ANNEXE 86405 70 864 22 0 0 0 864 gYES 86406 01 870 8 1 0 0 870 86407 12 0 0 0 55 86408 70 864 22 0 0 0 864 gYES 86409 11 0 0 0 55 TEST CHAPT 86410 02 870 6 1 0 0 870 86411 70 864 22 0 0 0 864 gYES 86420>86412 96 0 0 8 0 TEST FIEND REACHED 86413 98 0 0 8 0 86414 92 0 0 2 0 86415 00 7 4 1 2 0 86416 02 870 4 1 0 0 870 86417 70 864 21 0 0 0 864 gYES 86418 80 838 2 0 0 0 838 gRESET WORD NOS,MR2 AND SWITCHES 86419 80 863 2 0 0 0 863 gPROCESS TO END OF T.D.BLOCK 86420 76 864 12 0 0 0 864 86417>86421 80 810 2 0 0 0 810 READ A1 86411> 86408> 86405>86422 85 826 4 0 0 0 826 FIEND SWITCH 86423 C 864 53 0 0 0 864 86424 C 864 25 0 0 0 864 86424>86425 90 0 0 12 0 86426 C 0 0 0 24 86427 90 0 0 3 0 86428 C 0 0 0 48 86434>86429 00 32 37 0 12 0 86430 05 8 4 2 3 0 86431 00 32 36 0 12 0 86432 05 8 6 2 3 0 86433 94 0 0 3 4 86434 94 864 29 0 12 2 864 86435 96 0 0 1 0 86436 98 0 0 1 0 86437 92 0 0 1 0 86438 00 870 4 1 0 0 870 FIEND 86439 05 8 4 1 1 0 86440 80 816 2 0 0 0 816 WRITE 86441 52 5 2 0 0 0 86442 C 879 2 0 0 0 879 EDIT BLOCK NUMBER 86443 10 0 0 0 5659655972 FINIS' 86444 5 5 8 1 0 0 86445 27 9 0 0 0 86446 70 864 49 0 0 0 864 gYES 86447 54 5 10 0 0 40 CLEAR REST OF LINE 86448 76 864 51 0 0 0 864 gPRINT 86446>86449 0 872 4 1 0 0 872 BEW 86450 5 5 10 1 0 0 86448>86451 80 817 2 0 0 0 817 gPRINT 86452 83 826 4 0 0 1 826 RESET FIEND SWITCH 86423>86453 82 864 2 0 0 0 864 86500 PROCR 865 865 ADD ONE TO P/T OMITTED COUNTER 86502 81 865 2 0 0 0 865 86503 10 0 0 0 1 86504 60 0 0 0 0 86505 04 869 5 0 0 0 869 86506 62 0 0 0 0 86507 82 865 2 0 0 0 865 86600 PROCR 866 866 ADD ONE TO DISASTROUS COUNTER 86602 81 866 2 0 0 0 866 86603 10 0 0 0 1 86604 60 0 0 0 0 86605 04 869 6 0 0 0 869 86606 62 0 0 0 0 86607 82 866 2 0 0 0 866 86700 PROCR 867 867 ADD ONE TO OTHERS COUNTER 86702 81 867 2 0 0 0 867 86703 10 0 0 0 1 86704 60 0 0 0 0 86705 04 869 7 0 0 0 869 86706 62 0 0 0 0 86707 82 867 2 0 0 0 867 86800 CONST 868 868 0 86802 (D)£££££; 86803 3£££0; BITS 5-18 86804 80000; BIT 20 86805 123.:; PRINTING 86806 3££; BITS 1-10 86900 CONST 869 869 0 86902 (D)0; GENERAL W/L 86903 0; NO OF CHAPS INITIALLY 86904 0; W/L FOR PRINTING 86905 0; P/T OMITTED 86906 0; DISASTROUS 86907 0; OTHERS 86908 ; ACTUAL SET NUMBER IN Q1 86909 ; 86910 ; FILE 86911 ; 86912 ; SET NUMBER 86913 ; 86914 ; WL FOR R-ALIGN SR 86915 ; 87000 CONST 870 870 1 ALPHA CONSTANTS 87002 (A)TRAMD; 87004 FIEND; 87006 CHAPT; 87008 PREND; 87010 (A)FILES; 87012 (A)DUMPS; 87014 (A)DUMP ; 87016 PROG ; 87018 IND ; 87100 CONST 871 871 1 PRINTING CONSTANTS 87102 (A)ERIAL; 87104 TYPE; 87106 CHAPS; 87108 SECNS; 87110 POINT; 87112 SETOR; 87114 BLOCK; 87116 LGTH; 87118 (A)RUN(D)7t7e; 87120 UNALT; 87122 ERED ; 87124 RAMME; 87126 TRIAL; 87128 DATA ; 87130 *NAND; 87132 MBS; 87134 ORDER; 87136 = FIX; 87138 = VAR; 87140 ; PRINTER W/L 87142 ; ERROR W/L 87144 ; ERROR W/L 87146 (D)5:677173 ; ?P/T 87200 CONST 872 872 1 DECIMAL CONSTANTS 87202 (D)0; 87204 7.0000007.; B/E WORD 87206 0000000800; HEAD OF FORM FUNCTION WD 87208 7.7.7.7.7.; BLOCK ENDS 87210 5.5.5.5.5.; LINE ENDS 87212 5252525252; B'S 87214 6363636363; L'S 87216 5e5e5e5e5e; ASTERISKS 87218 5£5£5£5£5£; SQUARES 87220 5:5:5:5:5:; QUESTION MARKS 87300 TABLE 873 873 4 VARIOUS UNPACK TABLES 87301 NOTES 87302 30 0 0 0 2 0 0 0 0 0 0 0 0 TRAMD 87304 30 2 0 0 0 1 0 0 0 0 0 0 1 SUITE JOB SERIAL 87306 30 0 0 0 2 0 0 0 0 0 0 0 0 FILES 87308 30 2 0 0 2 0 0 0 0 0 0 0 0 ROUTE IDENTIFIER 87310 30 10 0 0 2 0 0 0 0 0 0 0 0 FILE ID 87312 30 4 0 0 0 1 0 0 0 0 0 0 1 RUN NO , BLOCK SIZE, SECN, SET,IND 87314 869 2 0 0 0 0 0 0 0 0 0 0 0 LINE SERIAL 87316 30 0 0 0 0 1 0 0 0 0 0 0 1 P M POINT 87318 833 2 0 0 2 0 0 0 0 0 0 0 0 FILEA' 87320 833 2 0 0 2 0 0 0 0 0 0 0 0 FILE 87322 833 4 0 0 1 0 0 0 0 0 0 0 0 SET 87324 833 6 0 0 2 0 0 0 0 0 0 0 0 BLOCK (+LETTER ?) 87326 833 8 0 0 2 0 0 0 0 0 0 0 0 FIRST WORD/LAST BLOCK (+LETTER ?) 87328 833 10 0 0 1 0 0 0 0 0 0 0 1 LAST WORD 87400 TABLE 874 874 3 UNPACK TABLES FOR CARDS 87401 NOTES 87402 30 0 0 0 2 0 5 0 0 0 0 0 0 TRAMD 87404 30 2 0 0 0 0 3 0 0 0 0 0 0 SUITE 87406 30 3 0 0 0 0 2 0 0 0 0 0 0 JOB 87408 30 4 0 0 0 0 5 0 0 0 0 0 1 SERIAL 87410 30 0 0 0 0 0 6 0 0 0 0 0 0 /////LINE SERIAL 87412 30 0 0 0 0 0 5 0 0 0 0 0 0 I/O SERIAL 87414 30 1 0 0 0 0 1 0 0 0 0 0 0 TYPE 87416 30 2 0 0 0 0 3 0 0 0 0 0 0 N1 87418 30 3 0 0 0 0 3 0 0 0 0 0 0 N2 87420 30 4 0 0 0 0 3 0 0 0 0 0 0 N3 87422 30 5 0 0 0 0 4 0 0 0 0 0 0 DETAILS 87424 30 6 0 0 0 0 4 0 0 0 0 0 0 87426 30 7 0 0 0 0 4 0 0 0 0 0 0 87428 30 8 0 0 0 0 4 0 0 0 0 0 0 87430 30 9 0 0 0 0 4 0 0 0 0 0 0 87432 30 10 0 0 0 0 4 0 0 0 0 0 0 87434 30 11 0 0 0 0 4 0 0 0 0 0 0 87436 30 12 0 0 0 0 4 0 0 0 0 0 0 87438 30 13 0 0 0 0 4 0 0 0 0 0 0 87440 30 14 0 0 0 0 4 0 0 0 0 0 0 87442 30 15 0 0 0 0 4 0 0 0 0 0 0 87444 30 16 0 0 0 0 4 0 0 0 0 0 0 87446 30 17 0 0 0 0 4 0 0 0 0 0 1 87448 30 0 0 0 2 0 5 0 0 0 0 0 0 FILES 87450 30 2 0 0 2 0 2 0 0 0 0 0 0 RTE IDENT 87452 30 10 0 0 2 0 2 0 0 0 0 0 0 FILE ID 87454 30 4 0 0 0 0 4 0 0 0 0 0 0 RUN NO 87456 30 5 0 0 0 0 4 0 0 0 0 0 0 BLOCK LGTH 87458 30 6 0 0 0 0 2 0 0 0 0 0 0 SECN NO 87460 30 7 0 0 0 0 1 0 0 0 0 0 0 SET NO 87462 30 8 0 0 0 0 1 0 0 0 0 0 1 IND 87464 833 2 0 0 2 0 5 0 0 0 0 0 0 FILEA' 87466 833 2 0 0 2 0 2 0 0 0 0 0 0 FILE ID 87468 833 4 0 0 1 0 1 0 0 0 0 0 0 SET 87470 833 6 0 0 2 0 5 0 0 0 0 0 0 87472 833 8 0 0 2 0 5 0 0 0 0 0 0 87474 833 10 0 0 1 0 5 0 0 0 0 0 1 87500 TABLE 875 875 1 PRINTER HEADING 87501 NOTES 87502 870 16 0 0 2 0 4 0 5 0 0 0 0 PROG' 87504 871 24 0 0 2 0 5 0 0 0 0 0 0 RAMME 87506 16 2 0 0 0 0 5 0 1 0 0 0 0 PROG ID 87508 870 10 0 0 2 0 1 4 2 0 0 0 0 2 SP S 87510 871 2 0 0 2 0 5 0 0 0 0 0 0 SERIAL 87512 16 3 0 0 0 0 5 0 1 4 0 0 0 PROG SERIAL 87514 871 26 0 0 2 0 5 0 2 0 0 0 0 2 SP TRIAL 87516 871 28 0 0 2 0 4 0 1 0 0 0 0 SP DATA 87518 871 30 0 0 2 0 3 2 1 0 0 0 0 SP AND 87520 870 12 0 0 2 0 5 0 1 0 0 0 0 SP DUMPS 87522 871 10 0 0 2 0 5 0 1 0 0 0 0 SP POINT 87524 870 10 0 0 2 0 1 4 0 0 0 0 0 S 87526 872 4 0 0 2 0 1 1 1 0 0 0 1 87600 TABLE 876 876 1 PM POINT HEADING LINE 87601 NOTES 87602 871 8 0 0 2 0 1 0 13 0 0 0 0 13 SP S 87604 871 2 0 0 2 0 5 0 0 0 0 0 0 ERIAL 87606 871 4 0 0 2 0 4 1 2 0 0 0 0 2SP TYPE 87608 871 8 0 0 2 0 1 3 2 0 0 0 0 2SPN 87610 868 5 0 0 0 0 1 0 0 0 0 0 0 1 87612 871 8 0 0 2 0 1 3 3 0 0 0 0 3 SP N 87614 868 5 0 0 0 0 1 1 0 0 0 0 0 2 87616 871 8 0 0 2 0 1 3 3 0 0 0 0 3 SP N 87618 868 5 0 0 0 0 1 2 0 0 0 0 0 3 87620 871 6 0 0 2 0 5 0 5 0 0 0 0 5 SP CHAPS 87622 871 8 0 0 2 0 5 0 1 0 0 0 0 SP SECNS 87624 871 12 0 0 2 0 2 3 1 0 0 0 0 SP OR 87626 871 10 0 0 2 0 5 0 1 0 0 0 0 SP POINT 87628 871 8 0 0 2 0 1 0 0 0 0 0 0 S 87630 872 4 0 0 2 0 1 1 4 0 0 0 1 B/E 87700 TABLE 877 877 1 PRINT PM POINT LINE 87701 NOTES 87702 870 12 0 0 2 0 4 0 5 0 0 0 0 DUMP 87704 869 4 0 0 0 0 1 4 0 0 0 0 0 DUMP NO 87706 30 0 0 0 0 0 5 0 3 0 0 0 0 3 SP R/C SERIAL 87708 30 1 0 0 0 0 2 3 4 1 2 0 0 4SP TYPE 87710 30 2 0 0 0 0 3 2 1 2 2 0 0 1SP TYPE***** 87712 30 3 0 0 0 0 3 2 1 2 2 0 0 1SP N2 87714 30 4 0 0 0 0 3 2 1 2 2 0 1 1SP N3 87716 30 5 0 0 0 0 3 2 6 3 2 0 0 IST CHAP OR SECN 87718 30 6 0 0 0 0 3 2 6 3 2 0 0 2ND CHAP OR SECN 87720 30 7 0 0 0 0 3 2 6 3 2 0 0 3RD CHAP OR SECN 87722 30 8 0 0 0 0 3 2 6 3 2 0 0 4TH CHAP OR SECN 87724 872 2 0 0 1 0 10 0 0 10 0 0 0 10 SP 87726 871 40 0 0 2 0 5 0 15 0 0 0 0 14 SP ERROR REPORT 87728 871 42 0 0 2 0 5 0 0 0 0 0 0 15 SP ERROR REPORT 87730 871 44 0 0 2 0 5 0 0 0 0 0 0 MORE 87732 872 4 0 0 2 0 5 0 0 0 0 0 1 87734 30 5 0 0 0 0 3 2 6 2 0 0 0 6SP FIRST REF 87736 868 5 0 0 0 0 1 4 0 0 0 0 0 : 87738 30 6 0 0 0 0 4 1 0 3 2 0 0 1ST ITEM 87740 30 7 0 0 0 0 3 2 1 2 0 0 0 1SP 2ND REF 87742 868 5 0 0 0 0 1 4 0 0 0 0 0 : 87744 30 8 0 0 0 0 4 1 0 3 2 0 0 2ND ITEM 87746 30 9 0 0 0 0 3 2 1 2 0 0 0 1SP 3RD REF 87748 868 5 0 0 0 0 1 4 0 0 0 0 0 : 87750 30 10 0 0 0 0 4 1 0 3 2 0 0 3RD ITEM 87752 30 11 0 0 0 0 3 2 1 2 0 0 0 1SP 4TH REF 87754 868 5 0 0 0 0 1 4 0 0 0 0 0 : 87756 30 12 0 0 0 0 4 1 0 3 2 0 0 4TH ITEM 87758 30 13 0 0 0 0 3 2 1 2 0 0 0 1SP 5TH REF 87760 868 5 0 0 0 0 1 4 0 0 0 0 0 : 87762 30 14 0 0 0 0 4 1 0 3 2 0 0 5TH ITEM 87764 30 15 0 0 0 0 3 2 1 2 0 0 0 1SP 6TH REF 87766 868 5 0 0 0 0 1 4 0 0 0 0 0 : 87768 30 16 0 0 0 0 4 1 0 3 2 0 0 6TH ITEM 87770 871 40 0 0 2 0 5 0 0 0 0 0 0 ERROR REPORTS 87772 871 42 0 0 2 0 5 0 0 0 0 0 0 87774 871 44 0 0 2 0 5 0 0 0 0 0 0 87776 872 4 0 0 2 0 5 0 0 0 0 0 1 8/E 87800 TABLE 878 878 1 TRIAL DATA HEADING LINE 87801 NOTES 87802 870 10 0 0 2 0 4 0 5 0 0 0 0 FILE 87804 30 2 0 0 2 0 2 0 1 0 0 0 0 SP FILE ID 87806 871 18 0 0 2 0 1 3 1 0 0 0 0 SP ( 87808 30 10 0 0 2 0 2 0 0 0 0 0 0 OTHER FILE ID 87810 871 18 0 0 2 0 1 4 0 0 0 0 0 ) 87812 871 18 0 0 2 0 3 0 2 0 0 0 0 ZSP RUN 87814 32 167 0 0 0 0 4 1 1 3 0 0 0 SP RUN NO 87816 871 14 0 0 2 0 5 0 2 0 0 0 0 2SP BLOCK 87818 871 16 0 0 2 0 4 1 1 0 0 0 0 SP LGTH 87820 32 168 0 0 0 0 4 1 1 3 0 0 0 SP LENGTH 87822 871 8 0 0 2 0 4 0 2 0 0 0 0 2SP SECN 87824 32 169 0 0 0 0 2 3 1 1 0 0 0 87826 871 12 0 0 2 0 3 0 2 0 0 0 0 2SP SET 87828 30 7 0 0 0 0 2 3 1 1 0 0 0 87830 870 18 0 0 2 0 3 0 2 0 0 0 0 'IND' 87832 30 8 0 0 0 0 1 4 1 0 0 0 0 87834 871 40 0 0 2 0 5 0 1 0 0 0 0 SP IND 87836 872 2 0 0 1 0 10 0 15 10 0 0 0 25 SPACES 87838 871 42 0 0 2 0 5 0 10 0 0 0 0 10 SP ERROR REPORT 87840 872 4 0 0 2 0 1 1 0 0 0 0 1 87900 TABLE 879 879 1 EDIT LINE OF TRIAL DATA 87901 NOTES 87902 868 5 0 0 0 0 1 3 3 0 0 0 0 3SP. 87904 32 14 0 0 0 0 4 1 1 3 0 0 0 BLOCK NO 87906 868 5 0 0 0 0 1 3 0 0 0 0 1 . 87908 32 15 0 0 0 0 4 1 2 3 0 0 0 2 SP WORD NO 87910 868 5 0 0 0 0 1 3 2 0 0 0 0 2SP. 87912 32 0 0 0 2 0 5 0 0 0 0 0 0 1ST WORD 87914 868 5 0 0 0 0 1 3 0 0 0 0 0 . 87916 32 16 0 0 0 0 4 1 2 3 0 0 0 87918 868 5 0 0 0 0 1 3 2 0 0 0 0 87920 32 2 0 0 2 0 5 0 0 0 0 0 0 87922 868 5 0 0 0 0 1 3 0 0 0 0 0 87924 32 17 0 0 0 0 4 1 2 3 0 0 0 87926 868 5 0 0 0 0 1 3 2 0 0 0 0 87928 32 4 0 0 2 0 5 0 0 0 0 0 0 87930 868 5 0 0 0 0 1 3 0 0 0 0 0 87932 32 18 0 0 0 0 4 1 2 3 0 0 0 87934 868 5 0 0 0 0 1 3 2 0 0 0 0 87936 32 6 0 0 2 0 5 0 0 0 0 0 0 87938 868 5 0 0 0 0 1 3 0 0 0 0 0 87940 32 19 0 0 0 0 4 1 2 3 0 0 0 87942 868 5 0 0 0 0 1 3 2 0 0 0 0 87944 32 8 0 0 2 0 5 0 0 0 0 0 0 87946 868 5 0 0 0 0 1 3 0 0 0 0 0 87948 32 20 0 0 0 0 4 1 2 3 0 0 0 87950 868 5 0 0 0 0 1 3 2 0 0 0 0 87952 32 10 0 0 2 0 5 0 0 0 0 0 0 87954 868 5 0 0 0 0 1 3 0 0 0 0 0 87956 32 21 0 0 0 0 4 1 2 3 0 0 0 87958 868 5 0 0 0 0 1 3 2 0 0 0 0 87960 32 12 0 0 2 0 5 0 0 0 0 0 0 87962 868 5 0 0 0 0 1 3 0 0 0 0 0 87964 871 42 0 0 2 0 3 2 2 0 0 0 0 2SP ERROR INDS 87966 872 4 0 0 2 0 5 0 0 0 0 0 1 B/E 88000 TABLE 880 880 1 EDIT + LINE 88001 NOTES 88002 32 22 0 0 2 0 5 0 9 0 0 0 0 88004 32 24 0 0 2 0 5 0 10 0 0 0 0 88006 32 26 0 0 2 0 5 0 10 0 0 0 0 88008 32 28 0 0 2 0 5 0 10 0 0 0 0 88010 32 30 0 0 2 0 5 0 10 0 0 0 0 88012 32 32 0 0 2 0 5 0 10 0 0 0 0 88014 32 34 0 0 2 0 5 0 10 0 0 0 0 88016 872 4 0 0 2 0 1 1 0 0 0 0 1 88100 TABLE 881 881 1 FILE UNALTERED LINE 88101 NOTES 88102 870 10 0 0 2 0 4 0 15 0 0 0 0 15SP FILE 88104 871 44 0 0 2 0 2 3 2 0 0 0 0 2SP FILE ID 88106 871 12 0 0 2 0 1 2 3 0 0 0 0 3SP T 88108 870 2 0 0 2 0 1 4 1 0 0 0 0 'D' 88110 871 12 0 0 2 0 3 0 1 0 0 0 0 SP SET 88112 30 7 0 0 0 0 2 3 1 1 0 0 0 SP SET NO 88114 871 20 0 0 2 0 5 0 3 0 0 0 0 3SP UNALT 88116 871 22 0 0 2 0 4 0 0 0 0 0 0 ERED 88118 872 4 0 0 2 0 1 1 1 0 0 0 1 88200 PROCR 882 882 08005 INSERTED BEFORE HERE-FINAL ROUTINES 80405> 77803>88202 0 27 3 0 0 0 88203 70 882 9 0 0 0 882 88204 27 4 0 0 0 COMPILER CALLED TRANSLATOR? 88205 70 882 8 0 0 0 882 gNO 88206 45 A1 0 0 0 1 REWIND 88207 76 882 9 0 0 0 882 88205>88208 41 A1 0 0 0 1 88207> 88203>88209 54 8 4 1 0 48 88210 10 0 0 0 55 88211 5 8 4 1 0 0 88212 80 890 2 0 0 0 890 gWRITE'E' 88213 27 12 0 0 0 88214 71 776 2 0 0 0 776 gCALL PASS 6,WRITE PTS(2)AND(3) 91825>88215 908 2 1 0 0 908 'PREND' 88216 5 8 4 1 0 0 88217 16 2 0 0 0 PROG ID 88218 5 8 6 2 0 0 88219 80 890 2 0 0 0 890 gWRITE'PREND' 88220 908 12 1 0 0 908 'INDEX' 'INDEX'BLOX 88221 5 8 6 1 0 0 88222 908 26 2 0 0 908 '£££££' 88223 5 8 8 2 0 0 88224 10 0 0 0 4 88225 5 8 10 1 0 0 88226 908 26 1 0 0 908 ALIGNMENT MARKS 88227 5 8 4 1 0 0 88228 80 890 2 0 0 0 890 gWRITE 88229 16 2 0 0 0 PROG IDENTITY 88230 3 8 4 2 0 0 88231 5 8 12 2 0 0 88232 16 3 0 0 0 PROG SERIAL 88233 3 8 6 2 0 0 88234 5 8 14 2 0 0 88235 10 0 0 0 2 88236 5 8 10 2 0 0 88237 10 0 0 0 3 88238 3 8 18 2 0 0 88239 10 0 0 0 2 88240 1 27 12 0 0 0 0/2=PTS NO/YES 88241 5 8 16 2 0 0 88242 908 26 2 0 0 908 '£££££' 88243 5 8 20 2 0 0 88244 80 890 2 0 0 0 890 gWRITE'INDEX'DATA 88245 45 A6 0 0 0 1 88246 54 5 0 1 0 48 88247 90 0 0 1 0 88248 C 0 0 0 5 88250>88249 80 892 2 0 0 0 892 gPRINT 5 BLANK LINES 88250 94 882 49 0 1 1 882 88251 55 908 78 1 0 26 908 88252 C 5 10 1 0 0 88253 80 888 2 0 0 0 888 gSUPPRESS I/C IF TRAMD ONLY 88254 80 892 2 0 0 0 892 gPRINT 88300 PROCR 883 883 PRINT FINAL LINE, TEST FOR PASS 3 COPY 88302 90 0 0 1 0 88303 C 0 0 0 13 88304 27 6 0 0 0 'PT OMITTED' 88305 70 883 8 0 0 0 883 gNO 88306 908 74 1 0 0 908 'YES' 88307 76 883 9 0 0 0 883 88305>88308 908 76 1 0 0 908 'NO' 88307>88309 5 5 12 1 0 0 88310 0 869 5 0 0 0 869 TRIAL DATA PT IND 88311 70 883 14 0 0 0 883 88312 0 908 74 1 0 0 908 'YES' 88313 76 883 15 0 0 0 883 88311>88314 0 908 76 1 0 0 908 'NO' 88313>88315 5 5 18 1 0 0 88316 80 915 2 0 0 0 915 PRINT 88317 94 0 0 1 4 88318 869 6 0 0 0 869 TD'DISASTEROUS' 88319 5 908 56 0 0 0 908 88320 86 511 2 0 0 0 511 SERIOUS ERRORS CTR 88321 80 912 2 0 0 0 912 CONVERT 88322 80 916 2 0 0 0 916 EDIT 88323 80 915 2 0 0 0 915 PRINT 88324 94 0 0 1 4 88325 869 7 0 0 0 869 TD'OTHERS' 88326 5 908 56 0 0 0 908 88327 86 514 2 0 0 0 514 OTHER ERRORS CTR 88328 80 912 2 0 0 0 912 CONVERT 88329 80 916 2 0 0 0 916 EDIT 88330 80 915 2 0 0 0 915 PRINT 88331 54 40 0 0 0 20 88332 62 0 0 0 0 88334>88333 80 892 2 0 0 0 892 gMORE BLANK LINES 88334 94 883 33 0 1 1 883 88335 155 0 0 0 0 TRANSLATOR SERIAL 88336 5 908 40 1 0 0 908 88337 55 908 28 1 0 14 908 88338 C 5 6 1 0 0 88339 153 0 0 0 0 DATE 88340 5 908 40 1 0 0 908 88341 86 153 2 0 0 0 153 A2 SPOOL NUMBER 88342 5 908 22 0 0 0 908 88343 52 5 20 0 0 0 88344 C 910 18 0 0 0 910 88345 80 892 2 0 0 0 892 PRINT 'MADE BY' 88346 27 9 0 0 0 88347 71 883 55 0 0 0 883 gOFF-LINE PRINT 88348 27 8 0 0 0 PRINTER TYPE 88349 11 0 0 0 14 88350 30 0 0 0 5 88351 1 999 7 0 0 0 88352 125 4096 1 1 0 88353 124 999 0 0 3 0 88354 123 160 0 2 0 CLOSE PRINTER 88347>88355 62 0 0 0 0 88356 46 A2 10 0 0 0 RUN BACK TO SECOND'INDEX'BLOCK 88357 C 0 0 0 3 88358 10 0 0 0 1 88359 5 908 60 0 0 0 908 SET IND 88360 16 2 0 0 0 PROGM BEING TRANSLATED 88361 12 0 0 0 8000 88362 70 883 74 0 0 0 883 gTRANSLATOR 88363 16 2 0 0 0 88364 12 0 0 0 9001 88365 70 883 74 0 0 0 883 gMASTER 88366 16 2 0 0 0 88367 12 0 0 0 8060 88368 70 897 5 0 0 0 897 gCOMPILER ALARM 5 88369 12 0 0 0 1 88370 70 897 3 0 0 0 897 gBIG COMPILER 88371 12 0 0 0 5 88372 70 897 2 0 0 0 897 gCHAR HANDLING COMP 88373 76 884 40 0 0 0 884 gORDINARY PROGMS 88481> 89707> 88365> 88362>88374 10 0 0 0 0 88375 5 908 60 0 0 0 908 CLEAR IND 88376 0 27 4 0 0 0 COMPILER? 88377 70 883 83 0 0 0 883 gNO 88378 34 999 9 0 0 0 A1 ROUTE---INTERCHANGE A1,A6 88379 0 999 11 0 0 0 A6 ROUTE 88380 5 999 9 0 0 0 >A1 88381 32 0 0 0 10 88382 5 999 11 0 0 0 >A6 88377>88383 40 A6 0 0 0 0 88384 100 908 54 1 0 0 908 SPOOL NUMBER->66 88385 52 9 4 0 0 0 88386 C 910 34 0 0 0 910 88387 154 9 4 0 0 0 TYPE COMMENT 88388 80 893 2 0 0 0 893 gWRITE BLANKS 88389 80 893 2 0 0 0 893 gWRITE 2 BLANK BLOCKS->A6 88390 80 894 2 0 0 0 894 READ A2 88391 10 0 0 0 2 88392 5 8 10 2 0 0 88393 908 4 1 0 0 908 'CHAIN' 88394 5 8 12 1 0 0 88395 80 893 2 0 0 0 893 gA6 88396 80 894 2 0 0 0 894 A2-> 88400 PROCR 884 884 ALARM 6 7 88402 27 4 0 0 0 COMPILER? 88403 70 884 6 0 0 0 884 gNO 88404 10 0 0 0 2 88405 76 884 8 0 0 0 884 88403>88406 10 0 0 0 2 88407 1 27 12 0 0 0 0/2=PTS NO/YES 88405>88408 5 8 8 2 0 0 88409 10 0 0 0 £££££ 88410 5 8 12 2 0 0 88411 80 893 2 0 0 0 893 gA6 88417>88412 80 894 2 0 0 0 894 A2-> 88413 0 8 6 1 0 0 88414 2 908 12 1 0 0 908 'INDEX' 88415 70 884 18 0 0 0 884 gYES 88416 80 893 2 0 0 0 893 gWRITE 88417 76 884 12 0 0 0 884 88415>88418 80 893 2 0 0 0 893 gWRITE 'INDEX' 88419 80 894 2 0 0 0 894 gREAD 88420 27 4 0 0 0 COMPILER? 88421 70 884 24 0 0 0 884 gNO 88422 10 0 0 0 2 88423 76 884 26 0 0 0 884 88421>88424 10 0 0 0 2 88425 1 27 12 0 0 0 0/2=PTS NO/YES 88423>88426 5 8 8 2 0 0 88427 10 0 0 0 £££££ 88428 5 8 12 2 0 0 88429 80 893 2 0 0 0 893 gWRITE 88430 41 A6 0 0 0 0 88431 0 27 4 0 0 0 COMPILER? 88432 70 884 38 0 0 0 884 gNO 88433 34 999 9 0 0 0 RESTORE A1,A6 ROUTE NUMBERS 88434 0 999 11 0 0 0 88435 5 999 9 0 0 0 88436 32 0 0 0 10 88437 5 999 11 0 0 0 88432>88438 46 A2 10 0 0 1 RUN BACK TO SECOND 'INDEX' BLOCK 88439 C 0 0 0 3 89926> 90609> 88373>88440 90 0 0 1 0 CLEAR R1 88441 C 0 0 0 0 ///// 88442 10 0 0 0 6 88443 5 908 22 0 0 0 908 88444 0 27 9 0 0 0 88445 70 884 52 0 0 0 884 gON-LINE PRINT 88446 86 511 2 0 0 0 511 'DISASTEROUS' 88447 1 869 6 0 0 0 869 (TD) 88448 71 884 56 0 0 0 884 88449 0 27 6 0 0 0 'PT OMITTED' 88450 1 869 5 0 0 0 869 (TD) 88451 71 884 56 0 0 0 884 88445>88452 27 7 0 0 0 88453 71 884 56 0 0 0 884 gREF/PROCR REPORT 88454 27 5 0 0 0 25?'S IND 88455 70 884 58 0 0 0 884 88453> 88451> 88448>88456 10 0 0 0 7 88457 5 908 22 0 0 0 908 88455>88458 27 9 0 0 0 88459 70 884 78 0 0 0 884 gON 88460 101 300 1 3 0 88461 99 0 0 6 0 88462 5 890 2 0 0 0 890 88463 54 10 4 0 6 0 CLEAR REST OF ANNEX 88464 C 890 2 0 0 0 890 88465 908 24 1 0 0 908 88466 5 10 306 1 0 0 88467 80 914 2 0 0 0 914 WRITE LAST BLOCK 88468 54 10 0 1 0 306 88469 908 24 1 0 0 908 BEW 88470 5 10 306 1 0 0 88471 80 914 2 0 0 0 914 WRITE BLANK BLOCK 88472 34 909 2 0 0 0 909 STEP BACK A9 88473 10 0 0 0 2700000 O/P->O/P 1 BLOCK 88474 1 999 7 0 0 0 88475 125 4096 1 1 0 88476 124 999 0 0 3 0 88477 123 160 0 2 0 88459>88478 150 908 22 0 0 0 908 ALARM 6 7 88479 C 884 85 0 0 0 884 >END 88480 C 884 99 0 0 0 884 >CLOSE FILES:REENTER TO PRINT 88481 C 883 74 0 0 0 883 >COPY TO PASS 3 O/P TO A6 88482 C 885 24 0 0 0 885 88483 C 885 43 0 0 0 885 88484 C 885 28 0 0 0 885 88479>88485 80 911 2 0 0 0 911 88486 80 889 2 0 0 0 889 gCLOSE A9 88487 908 60 0 0 0 908 88488 71 884 93 0 0 0 884 88489 27 4 0 0 0 88490 70 884 98 0 0 0 884 88491 80 891 2 0 0 0 891 CLOSE A6 88492 76 884 98 0 0 0 884 88488>88493 27 4 0 0 0 88494 70 884 97 0 0 0 884 gNO 88495 40 A1 0 0 0 1 88496 41 A1 0 0 0 1 88494>88497 80 891 2 0 0 0 891 gOPEN AND CLOSE A6 88492> 88490>88498 151 0 0 0 0 88480>88499 80 911 2 0 0 0 911 88500 PROCR 885 885 IF AMEND BEWARE ADDRESSES OF 23/0/2'S 88502 90 0 0 3 0 88503 C 0 0 0 2 88504 80 889 2 0 0 0 889 CLOSE A9 OR PRINTER 88505 27 9 0 0 0 88506 70 885 9 0 0 0 885 gON 88507 90 0 0 3 0 88508 C 0 0 0 4 88536> 88542> 88549> 88506>88509 27 4 0 0 0 88510 71 885 13 0 0 0 885 88511 893 2 0 0 0 893 88512 76 100 2 0 0 0 100 gCALL TRANSLATOR PASS 0 88510>88513 80 891 2 0 0 0 891 OPEN AND CLOSE A6 88514 125 4096 1 1 0 88515 123 895 2 0 2 0 895 88516 124 909 2 0 2 0 909 88517 32 0 0 0 5- 88518 101 80 1 3 0 88519 32 0 0 0 5 ESTORE COMPILER 88520 124 999 5 0 3 0 88521 128 204 1 1 0 88522 893 2 0 0 0 893 88523 76 100 2 0 0 0 100 gCALL COMPILER PASS 1 88544> 88482>88524 80 886 2 0 0 0 886 IS MATCH HD? OPT 4 88525 70 885 32 0 0 0 885 gNO 88526 10 0 0 0 0 88527 76 887 2 0 0 0 887 88484>88528 80 886 2 0 0 0 886 IS MATCH HD? OPT 6 88529 70 885 32 0 0 0 885 gNO 88530 10 0 0 0 58 H 88531 76 887 2 0 0 0 887 88704> 88529> 88525>88532 80 911 2 0 0 0 911 88533 90 0 0 3 1 88534 C 0 0 0 2 88535 27 9 0 0 0 OFF? CONST 88536 70 885 9 0 0 0 885 88537 84 787 2 0 0 0 787 CLEAR,A9 NOW CLOSED 88538 C 999 0 0 0 0 88539 80 889 2 0 0 0 889 CLOSE A9 OR PRINTER 88540 90 0 0 3 1 88541 C 0 0 0 4 88542 76 885 9 0 0 0 885 88483>88543 27 9 0 0 0 88544 70 885 24 0 0 0 885 gAS OPT 4 88545 83 787 2 0 0 1 787 88546 80 911 2 0 0 0 911 gCLOSE A2 88547 90 0 0 3 1 88548 C 0 0 0 3 88549 76 885 9 0 0 0 885 88600 PROCR 886 886 TEST IF MACHINE IS HIGH DENSITY 88602 81 886 2 0 0 0 886 88603 123 886 5 0 2 0 886 88604 82 886 2 0 0 0 886 88605 100 0 0 0 0 88606 124 999 5 0 3 0 88607 124 32 0 3 0 88608 106 21 0 0 0 88609 126 886 5 0 3 0 886 88700 PROCR 887 887 INFORM MASTER OF DENSITY REQUIRED 88531> 88527>88702 5 893 2 0 0 0 893 88703 123 887 5 0 2 0 887 88704 76 885 32 0 0 0 885 88705 100 0 0 0 0 88706 124 999 5 0 3 0 88707 124 32 0 3 0 88708 106 22 0 0 0 88709 1 999 7 0 0 0 88710 5 891 2 0 0 0 891 88711 893 2 0 0 0 893 88712 124 891 2 0 3 0 891 88713 102 0 0 0 0 88714 126 887 5 0 3 0 887 88800 PROCR 888 888 88802 81 888 14 0 0 0 888 88803 34 27 13 0 0 0 (DONT SPOIL CLEARNESS OF A) 88804 74 888 9 0 0 0 888 gNOT TRAMD ONLY 88805 5 5 10 1 0 0 CLEAR 88806 5 5 12 1 0 0 88807 5 5 14 1 0 0 88808 54 5 22 1 0 14 88804>88809 82 888 2 0 0 0 888 88900 PROCR 889 889 CLOSE A9 88902 81 889 2 0 0 0 889 88903 27 9 0 0 0 >PRINTING 88904 70 889 12 0 0 0 889 88905 84 787 2 0 0 0 787 CLEAR'DONT OPEN A9' IND 88906 C 999 0 0 0 0 88907 10 0 0 0 1+00000 88908 1 999 7 0 0 0 88909 125 4096 1 1 0 88910 124 999 0 0 3 0 88911 123 160 0 2 0 88904>88912 82 889 2 0 0 0 889 89000 PROCR 890 890 WRITE->A2 89002 81 890 2 0 0 0 890 89003 908 24 1 0 0 908 89004 5 8 52 1 0 0 89005 43 A2 0 0 0 0 89006 C 8 0 0 0 0 89007 54 8 0 1 0 52 89008 82 890 2 0 0 0 890 89100 PROCR 891 891 OPEN & CLOSE A6 89102 81 891 2 0 0 0 891 89103 40 A6 0 0 0 1 89104 41 A6 0 0 0 1 89105 82 891 2 0 0 0 891 89200 PROCR 892 892 PRINT SR 89202 81 892 2 0 0 0 892 89203 62 0 0 0 0 89204 908 24 1 0 0 908 89205 5 5 52 1 0 0 89206 908 60 0 0 0 908 HEAD OF FORM OR TRACK 1 89207 5 5 0 2 0 0 89208 10 0 0 0 1 89209 5 908 60 0 0 0 908 89210 27 9 0 0 0 89211 70 892 16 0 0 0 892 gPRINTER 89212 55 5 0 1 0 50 89213 C 10 4 1 6 0 89214 80 913 2 0 0 0 913 O/P->A9 89215 76 892 38 0 0 0 892 89211>89216 27 8 0 0 0 PRINTER TYPE 89217 12 0 0 0 9 89218 70 892 34 0 0 0 892 gSPECIAL PRINTER 89219 10 0 0 0 80000 89220 5 5 1 0 0 0 89221 124 999 15 1 2 0 89222 124 0 0 2 0 89223 124 999 13 1 2 0 89224 129 0 0 1 0 89225 10 0 0 0 4 89237>89226 30 0 0 0 5 89227 1 999 7 0 0 0 89228 34 999 12 0 0 0 89229 125 4096 1 1 0 89230 124 999 0 0 3 0 89231 123 160 0 2 0 89232 62 0 0 0 0 89233 76 892 38 0 0 0 892 89218>89234 55 5 0 1 0 54 89235 C 10 0 1 0 0 89236 10 0 0 0 9 89237 76 892 26 0 0 0 892 89233> 89215>89238 54 5 0 1 0 50 89239 82 892 2 0 0 0 892 89300 PROCR 893 893 WRITE ON A6 89302 81 893 2 0 0 0 893 89303 55 8 4 1 0 50 89304 C 9 4 1 0 0 89305 908 24 1 0 0 908 BEW 89306 5 9 52 1 0 0 89307 43 A6 0 0 0 0 89308 C 9 0 0 0 0 89309 54 9 0 1 0 52 89310 82 893 2 0 0 0 893 89400 PROCR 894 894 READ A2 89402 81 894 2 0 0 0 894 89403 42 A2 0 0 0 0 89404 C 8 0 0 0 0 89405 82 894 2 0 0 0 894 89500 PROCR 895 895 DELETE GUARD WORDS 89502 81 895 2 0 0 0 895 89503 124 999 5 0 3 0 89504 126 20 1 2 0 89505 80 896 2 0 0 0 896 89506 124 999 5 0 3 0 89507 126 22 1 2 0 89508 80 896 2 0 0 0 896 89509 124 999 5 0 3 0 89510 126 24 1 2 0 89511 125 204 0 2 0 89512 80 896 2 0 0 0 896 89513 90 0 0 1 0 89514 C 0 0 0 0 ///// 89515 126 895 2 0 3 0 895 89600 PROCR 896 896 STACK TAG SR 89602 81 896 2 0 0 0 896 89603 123 909 2 0 3 0 909 PROG TAG 89606>89604 124 999 0 0 3 0 89605 123 0 1 2 0 89606 94 896 4 0 2 2 896 89607 82 896 2 0 0 0 896 89700 PROCR 897 897 88372>89702 10 0 0 0 5 88370>89703 11 0 0 0 11 89704 4 908 14 0 0 0 908 89733> 90112> 88368>89705 150 0 0 0 5 PAUSE TO PUT TRANSLATOR ON A1 ROUTE 89706 C 897 9 0 0 0 897 89707 C 883 74 0 0 0 883 89708 C 898 32 0 0 0 898 89706>89709 16 2 0 0 0 ARE WE 08066? 89710 12 0 0 0 8066 89711 71 897 27 0 0 0 897 gNO 89712 10 0 0 0 9 89713 5 909 98 0 0 0 909 89714 80 900 2 0 0 0 900 MERGE S/R 89861> 89884>89715 90 0 0 1 0 89716 C 0 0 0 6 89719>89717 870 4 0 1 0 870 89718 80 899 2 0 0 0 899 CONVERT TO DEC 89719 94 897 17 0 1 2 897 89720 52 870 10 0 0 0 870 EDIT CHAP LENGTHS 89721 C 910 2 0 0 0 910 FOR TYPING 89722 154 870 10 0 0 0 870 TYPE 89723 10 0 0 0 4630 89724 5 908 14 0 0 0 908 89725 91 16 10 0 1 0 SET M/R AT NO OFCHAPS 89726 76 898 11 0 0 0 898 gCOPY TRANSLATOR 89711>89727 40 A1 0 0 0 1 89736> 89740> 89743>89728 80 903 2 0 0 0 903 gREAD A1 TO SEC 7 89729 7 4 1 0 0 89730 2 908 6 1 0 0 908 'FINIS' 89731 71 897 34 0 0 0 897 89732 41 A1 0 0 0 1 89733 76 897 5 0 0 0 897 89731>89734 7 4 2 0 0 89735 12 0 0 0 £££££ 89736 71 897 28 0 0 0 897 89737 35 0 0 0 1 89738 36 7 6 2 0 0 89739 12 0 0 0 5 89740 71 897 28 0 0 0 897 gNOT SENTINEL 5 89741 7 8 2 0 0 89742 12 0 0 0 8000 89743 71 897 28 0 0 0 897 g NOT TRANSLATOR 89747>89744 80 903 2 0 0 0 903 89745 7 42 1 0 0 89746 2 908 10 1 0 0 908 'ALLOC' 89747 71 897 44 0 0 0 897 89748 40 A6 0 0 0 0 OPEN FOR FINAL PROGM 89749 32 0 0 0 10 89750 5 869 14 0 0 0 869 SPOOL NUMBER 89751 80 904 2 0 0 0 904 WRITE 2 ZERO BLOX 89752 80 904 2 0 0 0 904 89753 80 894 2 0 0 0 894 gREAD A2 89754 10 0 0 0 2 INDEX IDENTIFIER 89755 5 8 10 2 0 0 89756 908 4 1 0 0 908 89757 5 8 12 1 0 0 89758 80 904 2 0 0 0 904 gWRITE 89759 80 894 2 0 0 0 894 gREAD A2 89760 10 0 0 0 2 89761 5 8 8 2 0 0 89762 10 0 0 0 £££££ 89763 5 8 12 2 0 0 89764 80 904 2 0 0 0 904 gWRITE 89770>89765 80 894 2 0 0 0 894 gREAD A2 89766 8 42 1 0 0 89767 2 908 10 1 0 0 908 'ALLOC' 89768 70 897 71 0 0 0 897 89769 80 904 2 0 0 0 904 gWRITE SEC 8 TO A6 89770 76 897 65 0 0 0 897 89768>89771 90 0 0 1 0 REFORM ALLOC DATA 89772 C 0 0 0 6 89779>89773 7 24 2 1 0 MAXAMISE ALL 3 CHAP LENGTHS 89774 2 8 24 2 1 0 89775 73 897 77 0 0 0 897 89776 4 8 24 2 1 0 89775>89777 0 8 24 2 1 0 89778 80 899 2 0 0 0 899 CONVERT TO DEC 89779 94 897 73 0 1 2 897 89780 52 870 10 0 0 0 870 89781 C 910 2 0 0 0 910 89782 154 870 10 0 0 0 870 TYPE COMBINED CHAP LENGTHS 89783 10 0 0 0 4630 89784 5 908 14 0 0 0 908 89785 0 8 10 2 0 0 TOTAL CHAPS IN OBJECT PROGRAM 89786 5 16 10 1 0 0 89787 91 16 10 0 1 0 0:X 89788 10 0 0 0 4 89789 4 8 10 2 0 0 89790 80 904 2 0 0 0 904 gWRITE 89800 PROCR 898 898 COPY OBJECT PROGRAM: JOIN ON TRANSLATOR 89809>89802 80 894 2 0 0 0 894 READ A2 89803 8 4 1 0 0 89804 2 908 2 1 0 0 908 'PREND' 89805 71 898 8 0 0 0 898 gNO 89806 41 A2 0 0 0 1 CSE 89807 76 898 10 0 0 0 898 89805>89808 80 904 2 0 0 0 904 gWRITE A6 89809 76 898 2 0 0 0 898 89812> 89807>89810 80 905 2 0 0 0 905 gREAD A1 TO SEC 8 OF TRANSLATOR 89726>89811 80 907 2 0 0 0 907 'CHAPT' SR 89812 71 898 10 0 0 0 898 gNOT START 89813 76 898 17 0 0 0 898 g(AT START OF PASS 1 NOW) 89831>89814 80 905 2 0 0 0 905 gREAD A1 89815 80 907 2 0 0 0 907 g'CHAPT' SR 89816 71 898 27 0 0 0 898 gNO 89813>89817 80 905 2 0 0 0 905 READ/WRITE FIRST BLOCK 89818 80 904 2 0 0 0 904 89819 80 905 2 0 0 0 905 READ/WRITE SECOND BLOCK 89820 80 904 2 0 0 0 904 89821 80 905 2 0 0 0 905 READ BLOCK WITH LOCN 35=1/1/3 N 89822 0 16 10 0 0 0 X=TOT CHAPS IN OBJECT PROGM 89823 11 0 0 0 1.001 1/1/3 1 89824 5 8 50 2 0 0 89825 10 0 0 0 1 89826 4 16 10 0 0 0 STEP CTR 89816>89827 8 4 1 0 0 89828 2 908 2 1 0 0 908 'PREND' 89829 70 899 10 0 0 0 899 gYES 89830 80 904 2 0 0 0 904 gWRITE A6 89831 76 898 14 0 0 0 898 gLOOP 89708>89832 80 900 2 0 0 0 900 MERGE S/R 89833 41 A1 0 0 0 1 89834 40 A1 0 0 0 1 89840> 89844> 89848>89835 80 903 2 0 0 0 903 READ A1 TO SECN 7 89836 80 906 2 0 0 0 906 89837 C 909 83 0 0 0 909 89838 7 6 1 0 0 89839 2 908 12 1 0 0 908 'INDEX' 89840 71 898 35 0 0 0 898 gGET TO INDEX BLOCK 89841 80 903 2 0 0 0 903 89842 7 4 2 0 0 89843 12 0 0 0 8000 89844 71 898 35 0 0 0 898 gGET TO TRANS 89845 7 6 2 0 0 89846 30 0 0 0 2- 89847 12 0 0 0 899 89848 71 898 35 0 0 0 898 gGET TO 899 VERSION 89854>89849 80 903 2 0 0 0 903 READ 89850 80 906 2 0 0 0 906 89851 C 909 83 0 0 0 909 89852 7 42 1 0 0 89853 2 908 10 1 0 0 908 'ALLOC' 89854 71 898 49 0 0 0 898 gGET TO ALLOC BLOCK 89855 90 0 0 1 0 89856 C 0 0 0 6 89860>89857 870 4 0 1 0 870 89858 2 7 24 2 1 0 89859 73 898 62 0 0 0 898 89860 94 898 57 0 1 2 898 89861 76 897 15 0 0 0 897 gALL CHAPS OK 89859>89862 46 A6 10 0 0 0 RUN BACK TO PASS 3 START 89863 C 0 0 0 2 89868>89864 42 A6 0 0 0 0 READ 89865 C 8 0 0 0 0 89866 8 42 1 0 0 89867 2 908 10 1 0 0 908 ALLOC' 89868 71 898 64 0 0 0 898 gGET TO ALLOC BLOCK 89869 90 0 0 1 0 89870 C 0 0 0 6 89876>89871 7 24 2 1 0 89872 2 870 4 0 1 0 870 89873 73 898 76 0 0 0 898 gCHAP NOT BIGGER 89874 4 8 24 2 1 0 89875 4 870 4 0 1 0 870 89873>89876 94 898 71 0 1 2 898 89877 48 A6 0 0 0 3 89878 C 0 0 0 1 89879 80 904 2 0 0 0 904 REWRITE ALLOC BLOCK 89880 47 A6 2 0 0 0 89881 C 0 0 0 £££££ 89882 48 A6 0 0 0 0 89883 C 0 0 0 1 89884 76 897 15 0 0 0 897 gJOIN UP 89900 PROCR 899 899 END ROUTINE 89902 81 899 2 0 0 0 899 CONVERT S/R 89903 5 870 2 0 0 0 870 89904 60 0 0 0 0 89905 124 909 22 0 2 0 909 89906 112 870 2 0 0 0 870 89907 5 870 4 0 1 0 870 89908 62 0 0 0 0 89909 82 899 2 0 0 0 899 89829>89910 80 904 2 0 0 0 904 g WRITE 'PREND' 89911 908 26 1 0 0 908 89912 5 8 4 1 0 0 89913 0 908 12 1 0 0 908 INDEX' 89914 5 8 6 1 0 0 89915 10 0 0 0 £££££ 89916 5 8 8 2 0 0 89917 10 0 0 0 3 89918 5 8 10 1 0 0 89919 80 904 2 0 0 0 904 g WRITE 2ND INDEX BLOCK 89920 80 902 2 0 0 0 902 89921 41 A1 0 0 0 1 89922 41 A6 0 0 0 0 89923 125 0 1 2 0 CLEAR 89924 5 908 60 0 0 0 908 89925 5 909 98 0 0 0 909 89926 76 884 40 0 0 0 884 90000 PROCR 900 900 S/R TO MERGE 08066 AND 08061 90002 81 900 2 0 0 0 900 90003 40 A6 0 0 0 0 90004 32 0 0 0 10 90005 5 869 14 0 0 0 869 SPOOL NUMBER 90006 80 904 2 0 0 0 904 WRITE 2 BLANK BLOCKS 90007 80 904 2 0 0 0 904 90008 908 26 1 0 0 908 ALIGNMENT MARKS 90009 5 8 4 1 0 0 90010 908 12 1 0 0 908 90011 5 8 6 1 0 0 INDEX' 90012 10 0 0 0 £££££ 90013 5 8 8 2 0 0 90014 10 0 0 0 2 90015 5 8 10 2 0 0 90016 80 904 2 0 0 0 904 WRITE 90017 80 902 2 0 0 0 902 WRITE 2ND INDEX BLOCK 90018 47 A2 10 0 0 0 90019 C 0 0 0 2 90025>90020 80 894 2 0 0 0 894 READ A2 TO SCN 8 90021 80 906 2 0 0 0 906 90022 C 909 82 0 0 0 909 90023 8 12 1 0 0 90024 12 0 0 0 6751727243 'PASS 3' 90025 71 900 20 0 0 0 900 gREAD TILL PASS 3 90032>90026 80 904 2 0 0 0 904 WRITE 90027 80 894 2 0 0 0 894 READ A2 90028 80 906 2 0 0 0 906 90029 C 909 82 0 0 0 909 90030 8 42 1 0 0 90031 2 908 10 1 0 0 908 'ALLOC' 90032 71 900 26 0 0 0 900 gCOPY BLOCKS TILL 'ALLOC' 90033 8 10 2 0 0 90034 5 16 10 1 0 0 90035 90 0 0 1 0 STORE CHAP LENGHTS 90036 C 0 0 0 6 90039>90037 8 24 2 1 0 90038 5 870 4 0 1 0 870 90039 94 900 37 0 1 2 900 90046>90040 80 904 2 0 0 0 904 WRITE 90041 80 894 2 0 0 0 894 READ A2 90042 80 906 2 0 0 0 906 90043 C 909 82 0 0 0 909 90044 8 12 1 0 0 90045 2 908 8 1 0 0 908 'CHAPT' 90046 71 900 40 0 0 0 900 WRITE UNTIL CHAPT 90100 PROCR 901 901 90102 40 A1 0 0 0 1 90108>90103 80 905 2 0 0 0 905 READ A1 90104 80 906 2 0 0 0 906 90105 C 909 83 0 0 0 909 90106 8 6 1 0 0 90107 2 908 12 1 0 0 908 'INDEX' 90108 71 901 3 0 0 0 901 gGET TO INDEX 90109 80 905 2 0 0 0 905 READ NEXT BLOCK 90110 8 4 2 0 0 90111 12 0 0 0 8061 HAS CORR PROG BEEN LOADED? 90112 71 897 5 0 0 0 897 gNO, RETURN TO *05 90118>90113 80 905 2 0 0 0 905 READ A1 90114 80 906 2 0 0 0 906 90115 C 909 83 0 0 0 909 90116 0 8 42 1 0 0 90117 2 908 10 1 0 0 908 'ALLOC' 90118 71 901 13 0 0 0 901 gGET TO ALLOC 90119 90 0 0 1 0 90120 C 0 0 0 6 COMPARE CHAP LENGHTS 90125>90121 8 24 2 1 0 08066 AND 08061 90122 2 870 4 0 1 0 870 90123 73 901 25 0 0 0 901 90124 4 870 4 0 1 0 870 90123>90125 94 901 21 0 1 2 901 90131>90126 80 905 2 0 0 0 905 READ A1 TO SECN 8 90127 80 906 2 0 0 0 906 90128 C 909 83 0 0 0 909 90129 8 12 1 0 0 90130 2 908 8 1 0 0 908 'CHAPT' 90131 71 901 26 0 0 0 901 gGET TO'CHAPT' 90132 90 0 0 1 1 90133 C 0 0 0 5 90145>90134 16 2 0 0 0 PROG ID 08066 90135 5 8 8 2 0 0 90136 16 3 0 0 0 SERIAL 90137 5 8 10 2 0 0 90144>90138 80 904 2 0 0 0 904 WRITE 90139 80 905 2 0 0 0 905 READ 90140 80 906 2 0 0 0 906 90141 C 909 83 0 0 0 909 90142 8 12 1 0 0 90143 2 908 8 1 0 0 908 'CHAPT' 90144 71 901 38 0 0 0 901 gWRITE CONTENTS 90145 94 901 34 0 1 1 901 gWRITE CHAPT BLOCK 90151> 90154>90146 80 894 2 0 0 0 894 READ A2 90147 80 906 2 0 0 0 906 90148 C 909 82 0 0 0 909 90149 8 12 1 0 0 90150 2 908 8 1 0 0 908 'CHAPT' 90151 71 901 46 0 0 0 901 gGET TO CHAPT 90152 8 4 2 0 0 90153 12 0 0 0 5 90154 71 901 46 0 0 0 901 gGET TO CHAPT 5 90155 90 0 0 1 5 90156 C 0 0 0 10 90163> 90164>90157 80 904 2 0 0 0 904 WRITE 90158 80 894 2 0 0 0 894 READ A2 90159 80 906 2 0 0 0 906 90160 C 909 82 0 0 0 909 90161 8 12 1 0 0 90162 2 908 8 1 0 0 908 'CHAPT' 90163 71 901 57 0 0 0 901 gWRITE CONTENTS 90164 94 901 57 0 1 1 901 gWRITE CHAPT BLOCK 90170> 90173>90165 80 905 2 0 0 0 905 READ A1 90166 80 906 2 0 0 0 906 90167 C 909 83 0 0 0 909 90168 8 12 1 0 0 90169 2 908 8 1 0 0 908 'CHAPT' 90170 71 901 65 0 0 0 901 GET TO CHAPT 90171 8 4 2 0 0 90172 101 10 1 2 0 90173 71 901 65 0 0 0 901 gGET TO CHAPT 10 90190>90174 16 2 0 0 0 PROG ID 08066 90175 5 8 8 2 0 0 90176 16 3 0 0 0 SERIAL 90177 5 8 10 2 0 0 90187>90178 80 904 2 0 0 0 904 WRITE 90179 80 905 2 0 0 0 905 READ A1 90180 80 906 2 0 0 0 906 90181 C 909 83 0 0 0 909 90182 8 4 1 0 0 90183 2 908 2 1 0 0 908 'PREND' 90184 70 901 91 0 0 0 901 90185 8 12 1 0 0 90186 2 908 8 1 0 0 908 'CHAPT' 90187 71 901 78 0 0 0 901 gWRITE CONTENTS 90188 8 4 2 0 0 90189 101 13 1 2 0 90190 71 901 74 0 0 0 901 gWRITE CHAPT BLOCK 90184>90191 41 A2 0 0 0 1 90192 82 900 2 0 0 0 900 90200 PROCR 902 902 WRITE 2ND INDEX BLOCK S/R 90202 81 902 2 0 0 0 902 90203 16 2 0 0 0 PROG ID 90204 5 8 4 2 0 0 90205 16 3 0 0 0 SERIAL 90206 5 8 6 2 0 0 90207 10 0 0 0 2 90208 3 8 8 2 0 0 90209 5 8 10 2 0 0 90210 10 0 0 0 £££££ 90211 5 8 12 2 0 0 90212 80 904 2 0 0 0 904 WRITE 90213 82 902 2 0 0 0 902 90300 PROCR 903 903 READ A1>SEC 7 90302 81 903 2 0 0 0 903 90303 42 A1 0 0 0 0 90304 C 7 0 0 0 0 90305 82 903 2 0 0 0 903 90400 PROCR 904 904 WRITE SEC 8>A6 90402 81 904 2 0 0 0 904 90403 55 8 4 1 0 50 90404 C 9 4 1 0 0 90405 908 24 1 0 0 908 BEW 90406 5 9 52 1 0 0 90407 54 8 4 1 0 50 90408 43 A6 0 0 0 0 90409 C 9 0 0 0 0 90410 82 904 2 0 0 0 904 90500 PROCR 905 905 READ A1>SEC 8 90502 81 905 2 0 0 0 905 90503 42 A1 0 0 0 0 90504 C 8 0 0 0 0 90505 82 905 2 0 0 0 905 90600 PROCR 906 906 TEST FINIS ON A2 AND A1 (08066 ONLY) 90602 81 906 2 0 0 0 906 90603 8 4 1 0 0 90604 2 908 6 1 0 0 908 'FINIS' 90605 71 906 10 0 0 0 906 gNO 90606 1001 0 0 0 0 90607 5 909 94 0 0 0 909 90608 154 909 84 0 0 0 909 90609 76 884 40 0 0 0 884 90605>90610 82 906 2 0 0 0 906 90700 PROCR 907 907 'CHAPT' SR 90702 81 907 2 0 0 0 907 90703 8 12 1 0 0 90704 2 908 8 1 0 0 908 'CHAPT' 90705 71 907 24 0 0 0 907 gNO 90715>90706 0 8 4 2 0 0 CHAP NUMBER 90707 12 0 0 0 4 90708 2 909 98 0 0 0 909 0 OR 9 90709 73 907 11 0 0 0 907 gCHAP 1, PASS 0, SPECIAL 90710 76 907 16 0 0 0 907 90714> 90709>90711 80 905 2 0 0 0 905 gREAD 90712 0 8 12 1 0 0 90713 2 908 8 1 0 0 908 'CHAPT' 90714 71 907 11 0 0 0 907 gDRAIN TO NEXT CHAP START 90715 76 907 6 0 0 0 907 90710>90716 125 1 0 1 0 STEP CTR 90717 96 0 0 1 0 90718 5 8 4 2 0 0 SET CHAP NUMBER 90719 16 2 0 0 0 OBJECT PROG ID 90720 5 8 8 2 0 0 90721 16 3 0 0 0 SERIAL 90722 5 8 10 2 0 0 90723 80 904 2 0 0 0 904 gWRITE A6 90705>90724 82 907 2 0 0 0 907 A CLEAR IF WAS 'CHAPT' 90800 CONST 908 908 1 90802 (A)PREND; 90804 CHAIN; 90806 FINIS; 90808 CHAPT; 90810 ALLOC; 90812 INDEX; 90814 (A)08060; 90816 CHAPS; 90818 ON; 90820 (D)5.5.; 90822 (A)0; 90824 (D)7.0000007.; 90826 6£6£6£6£6£; 90828 (A)MADE ; 90830 BY 08; 90832 000 I; 90834 SSUE ; 90836 8 SE; 90838 RIAL ; 90840 70000; 90842 /; 90844 SPOOL; 90846 08000; 90848 MAKES; 90850 COPY ; 90852 PASS3; 90854 0; WL'S 90856 0; WL'S 90858 0; WL'S 90860 0; IND 90862 (A)PT OM; 90864 ITTED; 90866 DISAS; 90868 TROUS; 90870 OTHER; 90872 S ; 90874 YES; 90876 NO; 90878 IN; 90880 TERCO; 90882 DE ; 90884 TRI; 90886 AL DA; 90888 TA ; 90890 SERIA; 90892 L NUM; 90894 BERS ; 90896 OF IN; 90898 TERCO; 90898 DE RE; ///// 90898 PORTS; ///// 90900 CONST 909 909 1 COMPILER'S CONVERT TABLES 90902 (D)1; DEC->BIN 90904 t; 90906 64; 90908 3.8; 90910 2710; 90912 186t0; 90914 £4240; 90916 989680; 90918 5£5.100; 90920 3e9t+t00; 90922 1; BIN->DEC 90924 16; 90926 256; 90928 4096; 90930 65536; 90932 1048576; 90934 16777216; 90936 268435456; 90938 4294967296; 90940 ££££££££££; 90942 1; STERLINGgBIN 90944 +; 90946 78; 90948 £0; 90950 960; 90952 5:+0; 90954 3t980; 90956 249£00; 90958 16.3600; 90960 .4.1+00; 90962 1; BINgSTERLING 90964 14; 90966 1014; 90968 17014; 90970 273014; 90972 4369014; 90974 69905014; 90976 1118481014; 90978 ££££££££££; 90980 ££££££££££; 90982 1000020000; 90984 (A)08000; 90986 UNEX; 90988 PECTE; 90990 D FIN; 90992 IS ON; 90994 A ; 90996 (D)5.5.; 90998 0; N.B. THIS IS NOT SPARE 91000 TABLE 910 910 1 91002 908 14 0 0 2 0 5 0 0 0 0 0 0 08060' 91004 908 16 0 0 2 0 5 0 1 0 0 0 0 CHAPS' 91006 870 4 0 0 0 0 5 0 1 4 0 0 0 LENGTHS 91008 870 6 0 0 0 0 5 0 1 4 0 0 0 91010 870 8 0 0 0 0 5 0 0 4 0 0 0 91012 908 18 0 0 2 0 2 3 2 0 0 0 0 ON' 91014 869 14 0 0 0 0 5 0 1 0 0 0 0 SPOOL NUMBER 91016 908 20 0 0 2 0 2 3 0 0 0 0 1 DOUBLE LE 91018 908 18 0 0 2 0 2 3 1 0 0 0 0 ON' 91020 908 40 0 0 1 0 2 4 1 2 0 0 0 DAY 91022 908 42 0 0 2 0 1 4 0 0 0 0 0 /' 91024 908 40 0 0 0 0 2 1 0 2 0 0 0 MONTH 91026 908 42 0 0 2 0 1 4 0 0 0 0 0 /' 91028 908 40 0 0 0 0 2 3 0 2 0 0 0 YEAR 91030 908 44 0 0 2 0 5 0 2 0 0 0 0 SPOOL' 91032 908 22 0 0 0 0 5 0 1 5 0 0 1 NUMBER 91034 908 46 0 0 2 0 5 0 2 0 0 0 0 08000' 91036 908 48 0 0 2 0 5 0 1 0 0 0 0 MAKES 91038 908 52 0 0 2 0 5 0 1 0 0 0 0 PASS5 91040 908 50 0 0 2 0 5 0 1 0 0 0 0 COPY' 91042 908 18 0 0 2 0 2 3 0 0 0 0 0 ON' 91044 908 56 0 0 0 0 5 0 1 5 0 0 0 SPOOL NUMBER 91046 908 20 0 0 2 0 2 3 0 0 0 0 1 DOUBLE LINE END 91048 905 2 0 0 0 0 3 2 0 2 0 0 0 REF----ACTIONS WITH NEG ADDRESS 91050 904 2 0 0 0 0 5 0 2 4 0 0 1 PROCR 91052 908 54 0 0 0 0 4 1 1 3 0 0 0 TRANSLATOR REPORTS 91054 908 56 0 0 0 0 5 0 10 4 0 0 0 08005 REPORTS 91056 40 0 0 0 0 0 5 0 6 5 0 0 0 SERIAL NUMBERS OF 91058 40 1 0 0 0 0 5 0 1 5 0 0 0 INTERCODE REPORTS 91060 40 2 0 0 0 0 5 0 1 5 0 0 0 91062 40 3 0 0 0 0 5 0 1 5 0 0 0 91064 40 4 0 0 0 0 5 0 1 5 0 0 0 91066 40 5 0 0 0 0 5 0 1 5 0 0 0 91068 40 6 0 0 0 0 5 0 1 5 0 0 0 91070 40 7 0 0 0 0 5 0 1 5 0 0 0 91072 40 8 0 0 0 0 5 0 1 5 0 0 0 91074 40 9 0 0 0 0 5 0 1 5 0 0 1 91100 PROCR 911 911 CLOSE I/P FILE 91102 81 911 2 0 0 0 911 91103 0 908 6 1 0 0 908 FINIS' 91104 124 999 10 0 3 0 91105 124 64 1 2 0 91106 102 4 1 0 0 PLANT 91107 41 A2 0 0 0 1 91108 82 911 2 0 0 0 911 91200 PROCR 912 912 CONVERT TO DEC 91202 81 912 2 0 0 0 912 91203 5 911 2 0 0 0 911 91204 60 0 0 0 0 91205 124 909 22 0 2 0 909 91206 112 911 2 0 0 0 911 91207 82 912 2 0 0 0 912 91300 PROCR 913 913 O/P->A9 91302 81 913 2 0 0 0 913 91303 94 913 9 0 6 50 913 91304 908 24 1 0 0 908 91305 5 10 306 1 0 0 91306 80 914 2 0 0 0 914 91307 90 0 0 6 0 91308 C 0 0 0 300 91303>91309 82 913 2 0 0 0 913 91400 PROCR 914 914 WRITE A9 91402 81 914 2 0 0 0 914 91403 10 0 0 0 800000 91404 34 999 12 0 0 0 SEC 10 91405 125 4096 1 1 0 91406 1 999 7 0 0 0 D1/A9 91407 124 999 0 0 3 0 91408 123 160 0 2 0 91409 82 914 2 0 0 0 914 91500 PROCR 915 915 COPY WORDS FOR ERROR TOTALS REPORTS 91502 81 915 2 0 0 0 915 91503 908 62 1 1 0 908 91504 5 5 6 1 0 0 91505 908 64 1 1 0 908 91506 5 5 8 1 0 0 91507 80 888 2 0 0 0 888 gSUPPRESS I/C IF TRAMD ONLY 91508 80 892 2 0 0 0 892 PRINT 91509 82 915 2 0 0 0 915 91600 PROCR 916 916 EDIT NUMBER OF REPORTS 91602 81 916 2 0 0 0 916 91603 5 908 54 0 0 0 908 91604 52 5 12 0 0 0 91605 C 910 52 0 0 0 910 91606 55 40 10 0 0 10 COPY'OTHERS'SERIAL NOS 91607 C 40 0 0 0 0 91608 82 916 2 0 0 0 916 91700 CONST 917 917 1 BLISTER SPACE PASS 5 91702 (D)0; 91704 0; 91706 0; 91708 0; 91710 0; 91712 0; 91714 0; 91716 0; 91718 0; 91720 0; 91722 0; 91724 0; 91726 0; 91728 0; 91730 0; 91732 0; 91734 0; 91736 0; 91738 0; 91740 0; 91742 0; 91744 0; 91746 0; 91748 0; 91750 0; 91752 0; 91754 0; 91756 0; 91758 0; 91760 0; 91800 PROCR 918 918 PASS 6=REMAINDER OF PTS 91802 152 101 2 0 0 0 101 91803 C 995 0 0 0 0 995 91804 124 992 2 0 2 0 992 SECOND LEVEL PARAS 91805 91 0 0 1 0 SECOND LEVEL PARAS 91806 124 922 2 0 2 0 922 91807 91 0 0 2 0 ORDERS 91808 124 987 2 0 2 0 987 91809 91 0 0 3 0 FIRST LEVEL PARAS 91810 0 987 2 0 0 0 987 91811 31 0 0 0 2 91812 5 921 11 0 0 0 921 91813 0 992 2 0 0 0 992 91814 31 0 0 0 2 91815 5 921 17 0 0 0 921 91816 90 0 0 5 0 91817 C 0 0 0 6 91818 90 0 0 8 0 91819 C 0 0 0 3 91820 80 920 2 0 0 0 920 gO/P PTS(2) 91821 10 0 0 0 5358596773 CHIPT' 91822 5 8 12 1 0 0 91823 80 919 2 0 0 0 919 gWRITE 91824 80 920 2 0 0 0 920 gO/P PTS(3) 91825 76 882 15 0 0 0 882 gO/P'PREND' 91900 PROCR 919 919 WRITE8->A2 91902 81 919 2 0 0 0 919 91903 10 0 0 0 7.0000007. 91904 5 8 52 1 0 0 91905 43 A2 0 0 0 0 91906 C 8 0 0 0 0 91907 54 8 4 1 0 50 91908 82 919 2 0 0 0 919 92000 PROCR 920 920 WRITE CHUNK.SR 92002 81 920 2 0 0 0 920 92003 96 0 0 2 0 STORE CHUNK START FOR PARAS 1 AND 5 92004 5 921 2 0 0 0 921 92005 124 921 2 0 1 0 921 92006 101 0 1 3 0 92007 5 921 6 0 0 0 921 CHUNK START 92079>92008 124 999 19 1 2 0 92009 124 0 0 2 0 92010 3 919 2 0 0 0 919 92011 101 48 1 1 0 92012 30 0 0 0 5 92013 1 919 2 0 0 0 919 92014 91 0 0 4 0 92077>92015 124 921 4 0 3 0 921 STORE WORD 92016 106 0 0 2 0 92017 5 921 7 0 0 0 921 STORE WORD 92031>92018 34 921 10 1 0 0 921 FIRST LEVEL PARA WORD 92019 33 0 0 0 3 NEXT ONE TO A 92020 100 921 8 1 0 0 921 STORE (A) (B) ( C) 92021 94 920 29 0 5 1 920 TEST END OF PARA WORD 92022 90 0 0 5 0 SET UP MR FOR 92023 C 0 0 0 6 NEXT PARA WORD 92024 124 921 4 0 3 0 921 STORE PARA WORD 92025 106 1 0 3 0 STORE PARA WORD 92026 33 0 0 0 2 RIGHT ALIGN WORD 92027 5 921 11 0 0 0 921 92028 94 920 29 0 3 1 920 STEP PARAS MR 92028> 92021>92029 921 8 0 0 0 921 TEST DUMMY PARA 92030 12 0 0 0 6 92031 70 920 18 0 0 0 920 gYES 92032 12 0 0 0 1 TEST SECOND LEVEL REQD 92033 71 920 57 0 0 0 920 gNO 92047>92034 34 921 16 1 0 0 921 SECOND LEVEL PARA WORD 92035 33 0 0 0 6 NEXT ONE TO A 92036 100 921 14 1 0 0 921 STORE (A) (B) ( C) 92037 94 920 45 0 8 1 920 TEST END OF PARA WORD 92038 90 0 0 8 0 SET UP MR FOR 92039 C 0 0 0 3 NEXT PARA WORD 92040 124 921 4 0 3 0 921 STORE PARA WORD 92041 106 1 0 1 0 92042 33 0 0 0 2 RIGHT ALIGN WORD 92043 5 921 17 0 0 0 921 92044 94 920 45 0 1 1 920 STEP PARAS MR 92044> 92037>92045 921 14 0 0 0 921 TEST SECOND LEVEL 92046 101 63 1 2 0 PARA=63(DUMMY) 92047 70 920 34 0 0 0 920 gYES 92048 101 1 1 1 0 TEST END SIGN(62) 92049 71 920 55 0 0 0 920 gNO 92050 921 4 1 0 0 921 STORE END SIGN 92051 5 4 1 4 0 92052 5 6 1 4 0 92053 80 919 2 0 0 0 919 gWRITE LAST BLOCK 92054 82 920 2 0 0 0 920 gLEAVE S/R 92049>92055 921 14 1 0 0 921 STORE ACTUAL PARA 92056 5 921 8 1 0 0 921 VALUE 92033>92057 921 8 0 0 0 921 TEST PARA=1 92058 12 0 0 0 1 92059 70 920 62 0 0 0 920 gYES 92060 12 0 0 0 1 92061 71 920 72 0 0 0 920 gNO 92059>92062 101 8191 1 3 0 92063 32 0 0 0 10- 92064 36 921 7 0 0 0 921 INSTRUCTION 13-BIT ADDRESS 92065 101 987 2 1 2 0 987 PTS(2,3)END 92066 73 920 80 0 0 0 920 gNORMAL ORDER NOT ADDRESSING PTS(1) 92067 35 0 0 0 11111 92068 10 0 0 0 0 92069 36 921 7 0 0 0 921 92070 101 757 2 1 2 0 757 PTS(2,3)START IN PTS(1) 92082>92071 37 921 7 0 0 0 921 92061>92072 921 7 0 0 0 921 92073 5 6 2 4 0 92074 921 8 0 0 0 921 92075 5 4 2 4 0 92076 94 920 77 0 2 1 920 WORD MR 92076>92077 94 920 15 0 4 4 920 >NEXT WORD 92078 80 919 2 0 0 0 919 92079 76 920 8 0 0 0 920 gNEXT BLOCK 92066>92080 101 987 2 1 1 0 987 92081 2 921 6 0 0 0 921 13-BIT CHUNK START 92082 76 920 71 0 0 0 920 92100 CONST 921 921 1 CONSTANTS 92102 (D); 92104 (A)£ ; 92106 (D)0; CHUNK START/ORDER 92108 0; A 92110 0; B 92112 0; C 92114 0; A 92116 0; B 92118 0; C 92200 PROCR 922 922 2001 WRITE START BLOCK 92202 124 922 32 1 0 0 922 >FROM PASS1 92203 124 923 2 1 0 0 923 >FROM PROGRAMME 92204 124 935 2 1 0 0 935 >FROM OPT 20 AND ABDON 92205 124 937 2 1 0 0 937 >FROM OVERLAY(END) 92206 76 939 2 0 0 0 939 gFROM OVERLAY(START) 92207 10 0 0 0 2 (FROM PROGRAM UNLOAD) 92208 5 741 2 0 0 0 741 SET 'END' IND 92209 76 931 4 0 0 0 931 92210 100 0 0 0 0 LINK 92211 124 755 2 0 3 0 755 PROG ID 92212 106 39 0 0 0 WL 92213 5 932 2 0 0 0 932 92214 124 922 22 0 2 0 922 92215 128 751 34 1 2 0 751 92216 124 751 34 0 2 0 751 92217 125 4096 1 1 0 92218 124 951 8 0 3 0 951 92219 123 168 0 2 0 92220 100 951 8 0 3 0 951 92221 126 922 10 0 1 0 922 92222 100 953 8 0 0 0 953 'PTS' ('OP') 92223 101 515 0 0 0 2/0/3(0/0/3) 92224 100 953 2 0 0 0 953 'ABAND' 92225 101 21 0 0 0 1/5 92226 100 953 4 0 0 0 953 'ONS' 92227 101 3 0 0 0 92228 100 932 2 0 0 0 932 PROG ID 92229 100 21 0 0 0 1/5 92230 100 953 4 0 0 0 953 DOUBLE LE 92231 117 770 0 0 0 3/0/2 92242> 92202>92232 100 950 6 0 2 0 950 92233 101 7 1 3 0 92234 126 749 2 0 0 0 749 92235 124 950 8 1 2 0 950 92236 106 4 1 0 0 92237 105 953 6 1 0 0 953 92238 127 922 43 0 0 0 922 >YES 92239 124 950 8 1 2 0 950 92240 106 12 1 0 0 92241 105 951 4 1 0 0 951 92242 127 922 32 0 1 0 922 >NO 92238>92243 100 954 2 0 2 0 954 92244 101 44 1 3 0 92245 126 749 2 0 0 0 749 >STEP BACK 1 I/P> 92246 124 952 14 0 2 0 952 SET UP 92247 102 930 11 0 0 0 930 IND MOD REG 92248 124 952 16 0 2 0 952 AND ANOTHER 92249 102 933 10 0 0 0 933 92250 0 755 2 0 0 0 755 SWITCH START 92251 101 39 1 1 0 92252 5 952 12 0 0 0 952 ADDRESS OF PROG ID 92253 124 952 2 0 2 0 952 92254 124 950 8 1 2 0 950 -123 92255 128 4 1 2 0 EDIT 'START' BLOCK 92256 126 942 2 0 0 0 942 >WRITE BLOCK, SET TAG 15 92257 125 4096 1 1 0 SET NON INT 92258 0 955 6 1 0 0 955 92259 124 755 6 0 3 0 755 8X MOD GROUP 92260 128 2 0 0 0 CLEAR PROGS MOD REGISTERS 92261 10 0 0 0 £ 92262 3 744 75 0 0 0 744 SET 'PROG IN CONTROL' 92263 5 949 11 0 0 0 949 SET 'STATE OF TAPE' IND 92264 100 755 8 1 1 0 755 RESTORE ORIGINAL (ABC) 92265 126 755 7 0 3 0 755 >GO TO PROGS ENTRY POINT 92300 PROCR 923 923 2002 ENTRY FROM PM POINT VIA 172-STORE LINKS, TEST TIME FOR PM 92203>92302 100 952 2 1 0 0 952 (ABC)>WL AND PROG SWITCH 92303 124 755 2 0 3 0 755 92304 100 30 1 0 0 92305 100 951 8 0 3 0 951 BIN 92306 106 955 2 1 0 0 955 STORE CONTENTS OF 92307 104 755 6 0 0 0 755 PROG'S MOD REGS 92308 128 952 8 0 0 0 952 92309 5 744 75 0 0 0 744 SET 'PTS IN CONTROL' 92310 101 15 0 1 0 92311 124 951 8 0 3 0 951 92312 115 172 0 0 0 ADDRESS OF PM SR LINK 92313 101 4 1 2 0 92314 102 952 7 0 0 0 952 92315 124 952 7 0 3 0 952 STORE PM SR LINK-1 92316 106 0 0 0 0 92317 101 1 1 2 0 92318 102 949 6 0 0 0 949 92319 80 946 2 0 0 0 946 gSET MR2 TO SCAN PM LIST 92429>92320 106 0 0 2 0 92321 105 949 6 0 0 0 949 92322 71 924 28 0 0 0 924 gNO, STEP R2 92323 106 6 1 2 0 TEST NOTHING TO DUMP 92324 70 924 5 0 0 0 924 gRETURN TO PROG 92325 10 0 0 0 0 92326 101 3 0 1 0 COLLATE N1 92327 115 4 0 2 0 92328 127 924 2 0 1 0 924 >NO 92329 101 6 0 1 0 92330 115 5 0 2 0 92331 71 926 2 0 0 0 926 gNO,TAKE A DUMP 92400 PROCR 924 924 RETURN TO PROGRAM AFTER DUMP OR IF NOT DUMPING THIS TIME 92328>92402 106 4 0 2 0 AUGMENT N1 BY -1 92403 101 1 1 2 0 92404 102 4 0 2 0 93014> 93460> 92324>92405 101 8 0 1 0 AUGMENT LINK BY 92406 115 5 0 2 0 24 ACTION IND 92407 118 4125 0 0 0 92408 124 952 7 0 3 0 952 92409 107 0 0 0 0 92410 106 2 0 2 0 REPLACE INSTRUCTIONS 92411 124 952 7 0 3 0 952 92412 102 4 0 0 0 92413 106 3 0 2 0 92414 124 952 7 0 3 0 952 92415 102 5 0 0 0 92416 102 949 2 1 0 0 949 CLEAR W/L'S 1,2 92417 102 949 4 0 0 0 949 AND 3 92418 106 956 2 1 0 0 956 92419 124 755 6 0 3 0 755 PROG'S MOD REGS 92420 128 2 0 0 0 92421 125 4096 1 1 0 92422 10 0 0 0 1 92423 5 744 75 0 0 0 744 SET'PROG IN CONTROL' 92424 76 924 25 0 0 0 924 DUMMY 92424>92425 100 952 2 1 1 0 952 RESTORE A B 92426 124 951 8 0 3 0 951 92427 126 172 0 3 0 >RETURN TO PROGRAM VIA PTS SR 92322>92428 125 18 0 2 0 92429 76 923 20 0 0 0 923 gNEXT PM POINT 92430 126 922 10 0 0 0 922 >TYPE'PTS ABANDONS(PROG)' 92431 76 935 10 0 0 0 935 gCONTINUE AS IF ABDON COMMAND 92500 PROCR 925 925 2004 TYPE'PTS ABANDONS(PROG)' 92600 PROCR 926 926 2005 SET UP HEADING BLOCK 92331>92602 101 16 1 2 0 STEP N3 BY -1 92603 114 5 0 2 0 92604 106 949 11 0 0 0 949 92605 127 926 7 0 1 0 926 >YES 92606 126 948 2 0 0 0 948 >RUN FORWARD TO FINIS:STEP BACK 1 92605>92607 101 15 1 3 0 SET STATE OF TAPE INAT 15 92608 102 949 11 0 0 0 949 92609 101 24 0 1 0 SET N1=N2 92610 115 4 0 2 0 92611 118 4125 0 0 0 92612 107 4 0 2 0 92613 125 0 1 2 0 92614 101 16 0 1 0 92615 115 5 0 2 0 92616 103 949 4 0 0 0 949 COPY TAPE TO W/L 3 92617 105 950 2 0 0 0 950 92618 127 926 21 0 1 0 926 >NO 92619 106 950 2 0 0 0 950 92620 124 935 16 1 0 0 935 >YES 92618>92621 126 947 2 0 0 0 947 >TRANSFER CONTENTS OF MOD REGS TO O/P SE 92622 106 1 0 2 0 TRANSFER I/C SERIAL 92623 124 950 8 1 2 0 950 TO O/P SECN 92624 102 9 1 0 0 92625 126 951 8 1 1 0 951 SET(MR1)=10/0 92626 126 951 10 1 3 0 951 SET(MR3)=5/0 92633>92627 106 952 2 0 3 0 952 TRANSFER CONTENTS 92628 124 950 8 1 2 0 950 OF (A), (B), C) TO 92629 102 11 1 1 0 O/P SECN 92630 125 2 0 1 0 STEP MR1 92631 124 926 32 1 0 0 926 > 92631>92632 125 1 0 3 0 STEP MR3 92633 124 926 27 1 0 0 926 > 92700 PROCR 927 927 2006 SET UP HEADING BLOCK (2) 92702 101 1 1 3 0 SET HEADING IND 92703 102 949 7 0 0 0 949 92704 106 951 12 1 0 0 951 SET IND MOD AT 12/0 92705 102 952 14 1 0 0 952 93012>92706 106 949 4 0 0 0 949 TRANSFER PM TYPE TO SECN 92707 124 950 8 1 2 0 950 92708 103 7 1 0 0 TEST PM TYPE 6 92709 105 950 9 0 0 0 950 92710 127 933 2 0 0 0 933 >YES 92711 127 927 20 0 2 0 927 >YES TEST TYPE >6 92712 30 0 0 0 4- 92713 101 2 1 1 0 TEST TYPE 4 92714 127 927 17 0 0 0 927 >YES 92715 101 2 1 1 0 TEST TYPE 2 92716 127 927 23 0 1 0 927 >NO 92714>92717 101 1 1 3 0 SET COMP DUMP TAKEN 92718 102 949 9 0 0 0 949 92719 124 927 23 1 0 0 927 > 92711>92720 103 949 10 0 0 0 949 SET CLEO DUMP TAKEN IND 92721 105 950 3 0 0 0 950 TEST TYPE 9 DUMP 92722 127 933 2 0 0 0 933 >YES 92719> 92716>92723 124 952 14 0 1 0 952 TEST ZERO CHAP 92724 106 6 0 2 0 OR SECN START 92725 127 930 13 0 0 0 930 >YES END OF DUMP 92726 127 927 34 0 2 0 927 >NO TEST IF TRANSIT AREA 92727 106 952 14 0 0 0 952 92728 124 755 6 0 3 0 755 92729 104 4 0 0 0 92730 102 949 5 0 0 0 949 W/L 92731 124 949 5 0 1 0 949 92732 124 6 0 3 0 92733 106 0 0 0 0 TRANSIT AREA START 92726>92734 118 6 0 0 0 FORM UP 13 BIT ADD 92735 118 4122 0 0 0 OF SECTION OR CHAP START 92736 103 952 18 0 0 0 952 SET (MR1) AT START/S 92737 124 950 8 1 2 0 950 +LENGTH 92738 103 33 1 0 0 TRANSFER (MR1) TO 92739 124 952 14 0 1 0 952 O/P SECN 92740 104 7 0 2 0 SECTION LENGTH 92741 118 6 0 0 0 FORM UP 15 BIT ADD 92742 118 4122 0 0 0 OF SECTION END 92743 103 952 19 0 0 0 952 92744 124 950 8 1 2 0 950 92745 102 35 1 0 0 92746 101 3 0 1 0 92747 124 952 14 0 1 0 952 92748 115 8 0 2 0 CHAP OR SECN NO 92749 126 941 2 0 0 0 941 >CONVERT TO DEC 92750 124 950 8 1 2 0 950 92751 107 7 1 0 0 92800 PROCR 928 928 2007 OUTPUT THIS DUMP'S HEADING BLOCK 93320> 93619> 93631>92802 106 949 7 0 0 0 949 92803 127 928 9 0 0 0 928 >NO 92804 125 0 1 2 0 CLEAR IND 92805 102 949 7 0 0 0 949 92806 101 4096 1 3 0 SET IND IN O/P SECN 92807 124 950 8 1 2 0 950 1 IN Q4 92808 107 7 1 0 0 32=ABS START,34=ABS END AREA DUMPED 92803>92809 106 951 2 1 0 0 951 4='DUMPS',36=BEW 92810 124 950 8 1 2 0 950 (6)Q1+2=DEC SEC/CHAP,Q4=HEAD IND 92811 102 4 1 0 0 Q5=DUMP TYPE 92812 106 951 18 1 0 0 951 10,12,14=(ABC) 8=PM POINT 92813 124 950 8 1 2 0 950 92814 102 36 1 0 0 BEW 92815 126 942 2 0 0 0 942 >WRITE BLOCK S/R 92900 PROCR 929 929 2008 MAIN DUMP ROUTINE 92902 126 943 2 0 0 0 943 >SET (MR3)=(123)+48/(123) 92903 106 949 3 0 0 0 949 92904 127 934 2 0 1 0 934 >YES 92905 101 20 1 3 0 SET ABSURD TAG 92906 102 951 22 0 0 0 951 92933> 92935>92907 124 952 18 0 3 0 952 92908 123 0 0 3 0 92909 105 951 22 0 0 0 951 92910 127 929 18 0 0 0 929 >NO 92911 107 951 22 0 0 0 951 STORE NEW TAG 92912 106 951 22 1 0 0 951 TRANSFER TAG CHANGE 92913 102 4 1 3 0 WORD TO O/P SECN 92914 102 6 1 3 0 92915 125 4 0 3 0 92916 124 929 18 1 0 0 929 >NO 92917 126 944 2 0 0 0 944 >OUTPUT BLOCK AND 92916> 92910>92918 106 951 14 1 0 0 951 92919 104 952 18 0 0 0 952 92920 124 755 6 0 3 0 755 92921 124 6 0 1 0 COPY LONG WORD 92922 128 5 0 1 0 TO O/P SECN 92923 126 952 18 1 1 0 952 92924 125 2 0 1 0 92925 124 929 27 1 0 0 929 >NO 92926 124 930 2 1 0 0 930 >YES 92925>92927 101 2 1 3 0 STEP INDIRECT MOD 92928 107 952 18 0 0 0 952 92929 106 952 18 0 0 0 952 TEST IF SECN ENDS AT 7/8191 92930 118 4124 0 0 0 92931 127 930 2 0 1 0 930 >YES 92932 125 4 0 3 0 92933 124 929 7 1 0 0 929 >NO 92934 126 944 2 0 0 0 944 >OUTPUT BLOCK AND RESET (MR3) 92935 124 929 7 1 0 0 929 > 93000 PROCR 930 930 2009 END OF DUMPS 92931> 92926>93002 125 4 0 3 0 93003 124 930 4 1 0 0 930 93003>93004 126 944 2 0 0 0 944 >WRITE BLOCK 93005 106 952 19 0 0 0 952 93006 2 941 9 0 0 0 941 93007 127 936 6 0 0 0 936 >YES 93008 106 949 2 0 0 0 949 93009 127 930 16 0 1 0 930 >YES 93010 123 3 0 0 0 93011 100 952 14 0 0 0 952 93012 124 927 6 1 0 0 927 >NO 93022> 92725>93013 745 49 0 0 0 745 93014 70 924 5 0 0 0 924 gNORMAL 93015 76 935 10 0 0 0 935 gDO FINAL DUMP AFTER THIS 93009>93016 126 952 14 1 1 0 952 93017 125 1 0 1 0 93018 124 930 23 1 0 0 930 >NO 93019 106 949 4 0 0 0 949 93020 70 931 2 0 0 0 931 gYES,END OF FINAL DUMP 93021 125 0 1 2 0 93022 76 930 13 0 0 0 930 gTHIS WAY FOR TYPE 5 93018>93023 101 1 1 3 0 STEP IND MOD 93024 107 952 14 0 0 0 952 93025 124 936 6 1 0 0 936 > 93100 PROCR 931 931 2010 ENTRY FROM PROGRAMUNLOAD 93020>93102 5 741 2 0 0 0 741 SET'ABDON'IND 93103 125 4096 1 1 0 92209>93104 5 744 75 0 0 0 744 SET 'PTS IN CONTROL' 93105 949 10 0 0 0 949 TEST CLEO DUMP TAKEN 93106 127 931 14 0 1 0 931 >YES 93107 124 951 8 0 3 0 951 TEST BTS PRINTS ON-LINE 93108 106 26 0 0 0 (3) 93109 127 931 14 0 0 0 931 >NO 93110 12 0 0 0 1 93111 71 932 17 0 0 0 932 gYES O'LAY PASS 3 93112 106 949 9 0 0 0 949 TEST ANY DUMPS 2 OR 4 TAKEN(COMPARISONS) 93113 127 932 17 0 1 0 932 >YES O'LAY PASS 3 93109> 93106>93114 106 949 11 0 0 0 949 93115 127 931 17 0 1 0 931 >YES 93116 80 948 2 0 0 0 948 gGET TO'FINIS'BEFORE CLOSING FILE 93115>93117 101 28 1 3 0 93118 126 749 2 0 0 0 749 >CLOSE RTE 7 TAPE 93119 125 4096 1 1 0 SET NON INT 93120 0 745 49 0 0 0 745 '2/0/1' IND 93121 71 745 53 0 0 0 745 gYES 93122 0 741 2 0 0 0 741 'PROG END' IND 93123 70 745 50 0 0 0 745 gNO 93124 0 745 85 0 0 0 745 1/1/3 2 93125 5 745 60 0 0 0 745 93126 76 745 50 0 0 0 745 93127 10 0 0 0 0 DUMMY ORDER 93200 PROCR 932 932 2011 PREPARE TO READ IN PASS 3 93202 100 0 0 0 0 LINK 93203 106 949 11 0 0 0 949 TEST TAPE ALIGNED 93204 127 932 16 0 0 0 932 >NO 93205 100 951 28 1 2 0 951 RUN BACK TO START 93206 101 35 1 3 0 (O/P) 93207 126 749 2 0 0 0 749 93208 101 10 1 3 0 10=WORD HOLDING IDENTIFIER 93209 30 0 0 0 5 93210 124 744 72 0 3 0 744 93211 104 55 0 0 0 (3) 93212 32 0 0 0 10- 93213 101 36 1 3 0 93214 126 749 2 0 0 0 749 > 93215 101 1 1 3 0 93204>93216 126 932 2 0 1 0 932 >LEAVE S/R 93113> 93111>93217 101 40 1 3 0 93218 34 744 70 0 0 0 744 93219 106 749 2 0 0 0 749 DUMMY 93220 80 932 2 0 0 0 932 gALIGN TAPE 93227>93221 100 950 6 0 2 0 950 READ TO START 93222 101 7 1 3 0 OF PASS 3 OF 93223 126 749 2 0 0 0 749 >READ 93224 124 950 8 1 2 0 950 93225 106 12 1 0 0 93226 105 951 26 1 0 0 951 93227 71 932 21 0 0 0 932 gNOT AT 'CHIPT' YET 93228 0 745 49 0 0 0 745 '2/0/1' IND 93229 70 744 2 0 0 0 744 gNOT SET, NORMAL OLAY 93230 125 4096 1 1 0 93231 126 749 9 0 0 0 749 >SET(71)FOR MASTER 93232 101 40 1 3 0 93233 34 744 70 0 0 0 744 93234 80 749 2 0 0 0 749 gBACK 1 I/P>I/P 93235 125 4096 1 1 0 93236 124 755 2 0 3 0 755 CLOSE PROGM SWITCH 93237 106 9 0 0 0 93238 124 755 2 0 3 0 755 93239 102 7 0 0 0 93240 124 744 72 1 1 0 744 MG 0 93241 76 744 20 0 0 0 744 gCONTINUE WITH OLAY 93300 PROCR 933 933 2012 FORM UP NUMBER OF TRACE POINTS 92722> 92710>93302 101 1 1 3 0 SET W/L 2 NON ZERO 93303 102 949 3 0 0 0 949 93304 106 951 12 1 0 0 951 SET IND MOD=12:0 93305 102 952 16 1 0 0 952 TEST I/C SERIAL 93311>93306 124 952 16 0 1 0 952 93307 106 7 0 2 0 93308 127 933 12 0 0 0 933 >YES 93309 123 2 0 0 0 TEST END OF TRACE PT 93310 100 952 16 0 0 0 952 93311 124 933 6 1 0 0 933 >NO 93308>93312 106 952 16 0 0 0 952 93313 124 950 8 1 2 0 950 TRANSFER 2XNO OF 93314 102 35 1 0 0 TRACE PTS TO O/P SECN 93315 124 950 8 1 2 0 950 93316 102 33 1 0 0 93317 106 952 16 0 0 0 952 SET IND MOD AT 2XNO OF TRACE PTS/0 93318 118 5 0 0 0 93319 102 952 14 1 0 0 952 93320 124 928 2 1 0 0 928 g 93400 PROCR 934 934 2013 DUMP TRACE POINTS 93464> 93466> 92904>93402 125 0 1 2 0 93403 100 950 12 0 2 0 950 BIT 20 TEST SEC OR PROCR 93404 124 952 14 0 1 0 952 93405 115 7 0 2 0 93406 127 934 16 0 0 0 934 gPROCR 93407 125 0 1 2 0 93408 100 950 13 0 2 0 950 BITS 14->19 93409 124 952 14 0 1 0 952 0 93410 115 7 0 2 0 REF 93411 118 3 0 3 0 93412 118 4124 0 0 0 93413 102 7 1 3 0 93414 100 950 11 0 2 0 950 BITS 1->13 93415 124 934 22 1 0 0 934 g 93406>93416 101 28 0 1 0 Q3,4,5 93417 124 952 14 0 1 0 952 93418 115 7 0 2 0 REF 93419 118 4126 0 0 0 93420 102 7 1 3 0 93421 101 3 0 1 0 93415>93422 124 952 14 0 1 0 952 93423 115 7 0 2 0 ITEM 93424 102 5 1 3 0 93425 101 15 0 1 0 93426 124 952 14 0 1 0 952 TRANSFER REL ADD TO 93427 115 6 0 2 0 O/P SECN 93428 102 9 1 3 0 93429 101 16 0 1 0 93430 124 952 14 0 1 0 952 FORM UP 2X CHAP NO 93431 115 6 0 2 0 93432 118 4124 0 0 0 93433 118 1 0 3 0 93434 126 945 2 0 0 0 945 gFORM UP CHAP START 93435 102 952 16 1 0 0 952 START+END 93436 106 952 16 0 0 0 952 START ONLY 93437 104 9 1 3 0 93438 103 11 1 3 0 TRANSFER ABS ADD TO O/P SECN 93439 103 949 5 0 0 0 949 W/L 93440 118 3 0 3 0 ROUND DOWN TO EVEN ADDRESS 93441 118 4127 0 0 0 93442 118 1 0 3 0 93443 104 951 14 1 0 0 951 93444 104 951 14 1 0 0 951 93445 124 755 6 0 3 0 755 COPY 2 LONG WORDS 93446 124 6 0 1 0 93447 128 13 0 1 0 93448 124 949 5 0 3 0 949 TFRANSFER TAG TO O/P SECN 93449 123 0 0 3 0 93450 101 64 1 1 0 93451 118 8 0 0 0 93452 104 6 1 3 0 93453 102 6 1 3 0 93454 126 952 14 1 1 0 952 TEST END OF TRACE POINTS 93455 125 2 0 1 0 93456 124 934 61 1 0 0 934 gNO 93457 106 951 18 1 0 0 951 SET UP B/E WORD 93458 102 20 1 3 0 93459 126 942 2 0 0 0 942 gWRITE BLOCK 93460 124 924 5 1 0 0 924 g 93456>93461 101 2 1 3 0 STEP IND MOD 93462 107 952 14 0 0 0 952 93463 125 16 0 3 0 TEST END OF BLOCK 93464 124 934 2 1 0 0 934 gNO 93465 126 944 2 0 0 0 944 gOUTPUT BLOCK AND RESET (MR3) 93466 124 934 2 1 0 0 934 g 93500 PROCR 935 935 2014 FROM UNLOADER WHEN PROG IS ABANDONED 92204>93502 10 0 0 0 0 93503 5 744 75 0 0 0 744 SET 'PTS IN CONTROL' 93504 106 955 2 1 0 0 955 STORE CONTENTS 93505 104 755 6 0 0 0 755 OF PROGS MOD 93506 128 952 8 0 0 0 952 REGS 93507 124 951 8 0 3 0 951 SET PROGS MOD 93508 124 2 0 3 0 GROUP 93509 124 29 1 1 0 93015> 92431>93510 126 947 2 0 0 0 947 gTRANSFER CONTENTS OF MOD REGS TO O/P SE 93511 125 0 1 2 0 93512 102 949 4 0 0 0 949 CLEAR DUMP TYPE OF DUMP IN PROGRESS 93513 106 950 4 0 0 0 950 10 IN Q5 93514 103 949 7 0 0 0 949 SET HEADING IND 93515 103 949 8 0 0 0 949 SET TYPE 7 IND 92620>93516 102 949 2 0 0 0 949 STORE TYPE IN W/L 1 93517 0 949 11 0 0 0 949 TEST TAPE ALIGNED AT END OF DUMPS 93518 71 936 2 0 0 0 936 gYES 93519 80 948 2 0 0 0 948 gRUN FWD TO 'FINIS' 93520 10 0 0 0 £ 93521 5 949 11 0 0 0 949 SET ALIGN IND 93600 PROCR 936 936 2015 INITIAL AND FINAL DUMPS 93518>93602 101 1 1 3 0 SET IND MOD AT 93603 103 952 14 0 0 0 952 NO OF CHAPS+1/1 93604 104 755 5 0 0 0 755 93605 102 952 15 0 0 0 952 93025> 93007>93606 106 949 2 0 0 0 949 TRANSFER PM TYPE 93607 124 950 8 1 2 0 950 TO O/P SECN 93608 102 7 1 0 0 93609 106 949 8 0 0 0 949 TEST TYPE 7 IND SET 93610 127 936 20 0 0 0 936 gNO 93611 0 941 9 0 0 0 941 PQ END FINAL DUMP 93612 103 952 19 0 0 0 952 93613 124 950 8 1 2 0 950 SET MOD REG IN O/P SECN 93614 102 35 1 0 0 AT 600:0 93615 102 952 18 0 0 0 952 93616 124 950 8 1 2 0 950 93617 102 32 1 0 0 93618 102 949 8 0 0 0 949 CLEAR TYPE 7 IND 93619 76 928 2 0 0 0 928 gJOIN UP WITH MAIN DUMP ROUTINE 93610>93620 0 952 14 0 0 0 952 CHAP NO INITIAL DUMP 93621 124 950 8 1 2 0 950 93622 107 7 1 0 0 93623 104 952 14 0 0 0 952 93624 126 945 2 0 0 0 945 .FORM UP CHAP START AND END 93625 103 952 18 1 0 0 952 93626 124 950 8 1 2 0 950 93627 102 33 1 0 0 93628 106 952 19 0 0 0 952 93629 124 950 8 1 2 0 950 93630 102 35 1 0 0 93631 76 928 2 0 0 0 928 gJOIN UP WITH MAIN DUMP ROUTINE 93700 PROCR 937 937 2016 ENTRY AT END OF PROGRAM OVERLAY 92205>93702 126 946 2 0 0 0 946 >SET UP (MR2) 93728>93703 124 755 2 0 3 0 755 STORE OVERLAYED CHAP 93704 106 32 0 0 0 93705 103 949 2 0 0 0 949 93706 104 949 2 0 0 0 949 SET (MR1) AI 93707 104 755 3 0 0 0 755 ((2XCHAP NO)+SP CHAP START 93708 102 952 16 0 0 0 952 93709 126 952 16 1 1 0 952 93710 124 755 2 0 3 0 755 93711 106 30 0 0 0 TEST O'LAYING CHAP 93712 105 755 5 0 0 0 755 AN INITIAL CHAP 93713 127 937 15 0 3 0 937 >YES 93714 101 1 1 2 0 93713>93715 104 755 5 0 0 0 755 STORE CORRECTED O'LAYING 93716 102 949 3 0 0 0 949 CHAP NO 93717 101 1 0 1 0 TEST PM PT DETAILS 93718 115 5 0 2 0 ZERO 93719 127 937 29 0 0 0 937 >YES 93720 105 949 3 0 0 0 949 TEST O'LAYING CHAP 93721 127 938 2 0 0 0 938 >YES 93722 104 949 3 0 0 0 949 93723 105 949 2 0 0 0 949 TEST OVERLAID 93724 127 937 27 0 1 0 937 >NO 93725 105 0 0 2 0 SET PM POINT CLOSED 93726 102 0 0 2 0 93853> 93724>93727 125 18 0 2 0 TEST ALL PTS 93728 124 937 3 1 0 0 937 CHECKED >NO 93719>93729 102 949 2 1 0 0 949 CLEAR WLS 93730 102 949 4 0 0 0 949 93731 102 949 11 0 0 0 949 CLEAR STATE OF TAPE IND 93732 10 0 0 0 0 DUMMY ORDER 93733 126 749 9 0 0 0 749 >RESTORE(71)FOR PTS 93734 124 951 8 0 3 0 951 93735 124 0 1 0 0 (40) 93800 PROCR 938 938 2017 93721>93802 101 4 0 1 0 TEST PM POINT 93803 115 4 0 2 0 NOT YET USED 93804 127 938 9 0 0 0 938 >YES 93805 125 0 1 2 0 93806 105 0 0 2 0 SET PM POINT 93807 102 0 0 2 0 OPEN 93808 124 938 41 1 0 0 938 > 93804>93809 106 949 2 0 0 0 949 SET ALLOCATED CHAP 93810 118 2 0 0 0 NO IN LIST 93811 114 4 0 2 0 93812 124 951 8 0 3 0 951 93813 106 18 0 1 0 FORM ABS ADD OF 93814 104 0 0 2 0 PM POINT 93815 103 0 0 2 0 93816 102 952 16 0 0 0 952 93817 126 952 16 1 3 0 952 93818 124 951 8 0 3 0 951 93819 106 0 0 3 0 STORE REPLACED INSTRUCTION 93820 103 2 0 2 0 93821 127 938 34 0 2 0 938 gYES TEST ACTION POSITIVE 93822 105 2 0 2 0 FORM COMPLEMENT 93823 105 2 0 2 0 OF ACTION 93824 118 3 0 3 0 ALIGN INSTRUCTION 93825 118 4124 0 1 0 AT LEAST SIG END 93826 101 64 1 2 0 93827 127 938 36 0 0 0 938 g24/0/0 93828 101 1 1 2 0 93829 127 938 36 0 0 0 938 g24/0/1 93830 101 2 1 2 0 93831 127 938 36 0 0 0 938 g24/0/3 93832 101 3 1 2 0 93833 127 938 36 0 0 0 938 g24/1/2 93821>93834 0 950 7 0 0 0 950 25/01/2000 93835 124 938 40 1 0 0 938 g 93833> 93831> 93829> 93827>93836 101 4096 1 3 0 SET 24 ACTION IND 93837 107 5 0 2 0 IN LIST 93838 124 951 8 0 3 0 951 93839 106 1 0 3 0 STORE NEXT INSTRUCTION 93835>93840 102 3 0 2 0 93808>93841 106 0 0 2 0 93842 102 952 16 0 0 0 952 93843 126 952 16 1 3 0 952 93844 34 950 11 0 0 0 950 BITS 1-13 93845 124 951 8 0 3 0 951 93846 115 18 0 1 0 93847 5 949 4 0 0 0 949 93848 2 949 4 0 0 0 949 93849 2 755 4 0 0 0 755 (PARAS+1) 93850 1 950 10 0 0 0 950 26/0/0 93851 124 951 8 0 3 0 951 93852 102 0 0 3 0 INSERT ENTRY POINT 93853 76 937 27 0 0 0 937 93900 PROCR 939 939 2017A ENTRY AT START OF PROGRAM OVERLAY 92206>93902 80 932 2 0 0 0 932 gRUN BACK TO M/CODE START 93903 126 749 9 0 0 0 749 gSET(71)FOR MASTER 93904 10 0 0 0 0 DUMMY 93905 0 949 11 0 0 0 949 REALIGNMENT IND 93906 124 951 8 0 3 0 951 93907 124 0 1 0 0 (45)->DO OVERLAY 94000 PROCR 940 940 2018 INSTRUCTION CONSTANTS FOR PASS 2 94100 PROCR 941 941 2019 CONVERT S/R 94102 100 0 0 0 0 94103 102 949 5 0 0 0 949 W/L 94104 100 950 5 0 3 0 950 SET DECIMAL 94105 124 954 2 0 2 0 954 94106 112 949 5 0 0 0 949 CONVERT TO DECIMAL 94107 100 951 8 0 3 0 951 SET BINARY 94108 126 941 2 0 1 0 941 94109 100 0 0 0 0 (49)CONST IN PROCR 2015=PQ END 94200 PROCR 942 942 2020 WRITE S/R 94202 100 0 0 0 0 94203 100 950 6 0 2 0 950 94204 101 8 1 3 0 94205 126 749 2 0 0 0 749 gI/P-O/P FOR RTE 7 S/R 94206 106 955 4 1 0 0 955 BULK CLEAR O/P SECN 94207 124 950 8 1 2 0 950 94208 128 0 1 1 0 94209 125 4096 1 1 0 94210 10 0 0 0 0 DUMMY ORDER 94211 124 951 8 0 3 0 951 94212 126 0 0 0 0 (42)->SET TAG 15 94213 126 942 2 0 1 0 942 gLEAVE S/R 94300 PROCR 943 943 2021 SET UP (MR3) S/R 94302 100 0 0 0 0 LINK 94303 124 950 8 1 2 0 950 -123 94304 101 0 1 3 0 13-BIT ASL 94305 103 952 16 0 0 0 952 48+(123)/(123) 94306 101 48 1 1 0 94307 102 952 17 0 0 0 952 94308 126 952 16 1 3 0 952 94309 126 943 2 0 1 0 943 94400 PROCR 944 944 2022 OUTPUT BLOCK AND RESET(MR3)S/R 94402 100 0 0 0 0 94403 106 951 18 1 0 0 951 SET UP B/E WORD 94404 102 4 1 3 0 94405 126 942 2 0 0 0 942 gWRITE BLOCK 94406 126 943 2 0 0 0 943 gRESET (MR3) 94407 126 944 2 0 1 0 944 gLEAVE S/R 94500 PROCR 945 945 2023 FORM UP CHAP START AND END S/R 94502 81 945 2 0 0 0 945 94503 3 949 5 0 0 0 949 2XCHAP 94504 1 755 3 0 0 0 755 SPECIAL CHAP START 94505 5 946 2 0 0 0 946 WL 94506 124 951 8 0 3 0 951 94507 106 43 0 0 0 (3)PARA 43=TWICE PTS CHAP IN Q5 94508 30 0 0 0 4- 94509 2 949 5 0 0 0 949 94510 70 945 13 0 0 0 945 gTHIS CHAP CONTAINS PTS 94511 10 0 0 0 0 94512 76 945 15 0 0 0 945 94510>94513 101 1500 1 2 0 REDUCE CHAP END BY PTS LENGTH 94514 30 0 0 0 5 94512>94515 124 946 2 0 3 0 946 94516 104 18 1 0 0 CHAP DETAILS EX SPECIAL CHAPTER 94517 82 945 2 0 0 0 945 94600 PROCR 946 946 2024 SET UP(MR2) S/R 94602 100 0 0 0 0 94603 101 752 2 1 3 0 752 START OF LIST 94604 103 952 16 0 0 0 952 W/L 94605 101 180 1 1 0 94606 102 952 17 0 0 0 952 94607 126 952 16 1 2 0 952 94608 126 946 2 0 1 0 946 >LEAVE S/R 94609 100 4097 1 0 0 CONST=09001(PROCR 2001) 94700 PROCR 947 947 2025 TRANSFER CONTENTS OF MOD REGS TO O/P SECN 94702 100 0 0 0 0 94703 126 951 12 1 1 0 951 SET (MR1) AT 12/0 94704 126 951 20 1 3 0 951 SET (MR3) AT 6/0 94712>94705 106 952 8 0 3 0 952 94706 126 941 2 0 0 0 941 >CONVERT TO DECIMAL 94707 124 950 8 1 2 0 950 94708 102 21 1 1 0 94709 125 2 0 1 0 94710 124 947 11 1 0 0 947 > 94710>94711 125 1 0 3 0 94712 124 947 5 1 0 0 947 > 94713 126 947 2 0 1 0 947 >LEAVE S/R 94800 PROCR 948 948 2026 RUN FWD TO FINIS,STEP BACK 1 S/R 94802 100 0 0 0 0 94811>94803 100 951 16 1 2 0 951 ///// IN WORD 2 94804 101 38 1 3 0 RUN BACK CONST 94805 126 749 2 0 0 0 749 >I/P O/P S/R RTE 7 94806 124 951 8 0 3 0 951 94807 124 64 0 3 0 94808 106 4 1 0 0 94809 101 0 1 1 0 94810 105 953 6 1 0 0 953 94811 127 948 3 0 1 0 948 >NO 94812 100 954 3 0 2 0 954 94813 101 44 1 3 0 94814 126 749 2 0 0 0 749 >I/P O/P S/R 94815 126 948 2 0 1 0 948 >LEAVE S/R 94900 CONST 949 949 0 2027 SHORT W/L'S FOR PASS 2 94902 (D)0; W/L 1 ALSO USED IN O'LAY 94903 0; W/L 2 ALSO USED IN O'LAY 94904 0; 94905 0; GENARAL W/L 94906 0; W/L FOR PMSR LINK-1 94907 0; HEADING IND 94908 0; TYPE 10 IND 94909 0; COMP DUMP TAKEN IND 94910 0; CLEO DUMP TAKEN IND 94911 0; DUMP TAKEN SINCE O'LAY IND 95000 CONST 950 950 0 2028 SHORT CONSTANTS FOR PASS 2 95002 (D)50000; 95003 30000; 95004 t0000; 95005 66666; 95006 0003e; 59 95007 98000-; 25/0/1 ORDER 95008 0007e-; -(123) P RTE FOR RTE 7 95009 60000; 95010 t0000-; 26/0/0 ORDER 95011 01£££; BITS 1->13 95012 80000; BIT 20 95013 7.000; BITS 14->19 95100 CONST 951 951 1 2029 LONG CONSTANTS FOR PASS 2 95102 (A)DUMPS; 95104 START; 95106 (D)6£6£6£6£6£; RESTART MARK WORD 95108 0000t00000; 10:0 95110 0000500000; 5:0 95112 0000+00000; 12:0 95114 0000200000; 2:0 95116 00002£££££; 95118 7.0000007.; BLOSK END WORD 95120 0000600000; 6:0 95122 7777000000; XX/TAG W/L 95124 00004£££££; 95126 (A)CHIPT; 95128 (D)0000t£££££; 95200 PROCR 952 952 2030 EDIT TABLE FOR'START'BLOCK,THEN LONG WL'S 95202 100 946 9 0 0 0 946 09001 95203 100 5 0 0 0 95204 100 175 0 0 0 DATE 95205 100 5 0 0 0 95206 100 156 0 0 0 TIME 95207 100 5 0 0 0 95208 100 951 6 0 0 0 951 ALIGN WORD 95209 101 5 0 0 0 95210 100 952 18 0 0 0 952 'START' 95211 101 5 0 0 0 95212 100 0 0 0 0 PROG ID 95213 100 5 0 0 0 95214 100 49 0 0 0 (3)PQ END 95215 100 5 0 0 0 95216 100 951 18 0 0 0 951 BEW 95217 117 5 0 0 0 95218 101 2419 0 3 0 CONST='START' 95219 107 1845 0 1 0 95300 CONST 953 953 1 2031 TYPING ANNEXE FOR ABANDON 95302 (A)ABAND; TYPING CONSTANTS 95304 (A)ONS(D)5.5.; 95306 (A)FINIS; 95308 OPTS; 95400 CONST 954 954 1 2032 BINARY TO DECIMAL CONVERSION TABLE 95402 (D)0000000001; 95404 0000000016; 95406 0000000256; 95408 0000004096; 95410 0000065536; 95500 CONST 955 955 1 2033 BULK CLEAR COPY ITEMS 95502 (D)0000600002; BULK COPY MOD REGS 95504 2003600000; BULK CLEAR 54 95506 2000600000; BULK CLEAR 6 95600 PROCR 956 956 2034 TABLES 95602 100 952 8 0 0 0 952 RESTORE MOD REGS 95603 100 6 0 0 0 95700 PROCR 957 957 3801 PREPERATION AND W/L'S 95713>95702 35 0 0 0 11 95703 10 0 0 0 2 95704 4 957 7 0 0 0 957 (STEP ORDER) 95705 124 982 2 0 3 0 982 95706 124 3 0 3 0 SPECIAL CHAP START=R1 END VALUE 95707 106 30 0 0 0 SCAN PROGRAM'S ALLOCATED ROUTE LIST 95708 114 979 22 0 0 0 979 STORE ROUTE NUMBER 95709 118 4124 1 0 0 RTE TYPE IN Q1 95710 101 4 1 2 0 95711 70 957 14 0 0 0 957 gROUTE TYPE 4 95712 101 5 1 2 0 95713 127 957 2 0 1 0 957 >NOT PRINTER TRY NEXT ONE 95711>95714 124 751 34 0 2 0 751 PRINT ASL 95715 1 957 31 0 0 0 957 14 IN Q5 95716 124 979 22 0 3 0 979 ROUTE 95717 102 64 0 0 0 95718 101 64 1 2 0 95719 2 979 22 0 0 0 979 95720 5 979 23 0 0 0 979 FORM-(64+R) 95721 124 961 16 0 2 0 961 95722 102 965 23 0 0 0 965 95723 124 980 6 0 2 0 980 95724 102 967 23 0 0 0 967 95725 124 980 8 0 2 0 980 95726 102 967 27 0 0 0 967 95727 979 22 0 0 0 979 95728 124 982 2 0 3 0 982 RTE NO 95729 102 26 0 0 0 (3) SET FOR PRINT SR 95730 76 962 2 0 0 0 962 95731 114 0 0 0 0 CONST 95800 CONST 958 958 1 3001 EXTRA ROOM FOR 120 COLS 95802 (D); 95804 ; 95806 ; 95808 ; 95810 ; 95812 ; 95814 ; 95816 ; 95818 ; 95820 ; 95822 ; 95824 ; 95826 ; 95828 ; 95830 ; 95832 ; 95834 ; 95836 ; 95838 ; 95840 ; 95842 ; 95844 ; 95846 ; 95848 ; 95850 ; 95852 ; 95854 ; 95856 ; 95858 ; 95860 ; 95862 ; 95864 ; 95866 ; 95900 CONST 959 959 1 3001A 95902 (D); 95904 ; 95906 ; 95908 ; 95910 ; 95912 ; 95914 ; 95916 ; 95918 ; 95920 ; 95922 ; 95924 ; 95926 ; 95928 ; 95930 ; 95932 ; 95934 ; 95936 ; 95938 ; 95940 ; 95942 ; 95944 ; 95946 ; 95948 ; 95950 ; 95952 ; 95954 ; 95956 ; 95958 ; 95960 ; 95962 ; 95964 ; 95966 ; 95968 ; 95970 ; 95972 ; 95974 ; 95976 ; 95978 ; 95980 ; 95982 ; 95984 ; 95986 ; 95988 ; 95990 ; 96000 PROCR 960 960 3001B=TABLE1 96002 100 981 16 0 0 0 981 'PRINT' 96003 101 229 0 0 0 14/5 96004 100 981 18 0 0 0 981 'OUT' 96005 101 19 0 0 0 1/3 96006 100 981 18 0 0 0 981 'OF' 96007 101 786 0 0 0 3/1/2 96008 100 981 24 0 0 0 981 'DUMPS' 96009 101 21 0 0 0 1/3 96010 100 981 18 0 0 0 981 'OF' 96011 101 786 0 0 0 3/1/2 96012 100 980 10 0 0 0 980 (PROG ID) 96013 100 21 0 0 0 1/5 96014 100 981 26 0 0 0 981 'TAKEN' 96015 101 21 0 0 0 1/5 96016 100 981 28 0 0 0 981 'ON' 96017 101 18 0 0 0 1/2 96018 100 980 8 0 0 0 980 (DAY) 96019 102 5154 0 0 0 1/4/2/2 96020 100 980 8 0 0 0 980 (MONTH) 96021 102 5650 0 0 0 1/6/1/2 96022 100 980 8 0 0 0 980 (YEAR) 96023 102 2066 0 0 0 8/1/2 96024 100 981 28 0 0 0 981 'AT' 96025 101 786 0 0 0 3/1/2 96026 100 980 7 0 0 0 980 (HRS) 96027 100 4130 0 0 0 1/0/2/2 96028 100 980 7 0 0 0 980 (MINS) 96029 100 4626 0 0 0 1/2/1/2 96030 100 981 34 0 0 0 981 BE 96031 117 1089 0 0 0 4/4/1 96032 100 0 0 0 0 BULK CLEAR 96033 102 36 0 0 0 CONSTANT 96100 PROCR 961 961 DUMMY PROCEDURE 96200 PROCR 962 962 3002 RUN FORARD TO START AND OPEN PRINTER 96211> 95730>96202 100 980 6 1 2 0 980 SET CONST IN B 96203 101 38 1 3 0 SET TYPE IN A 96204 126 749 2 0 0 0 749 >I/P O/P RTE 7 96205 100 982 8 0 2 0 982 96206 101 7 1 3 0 96207 126 749 2 0 0 0 749 >I/P O/P RTE 7 96208 124 982 5 1 2 0 982 TEST IF START OF BLOCK 96209 106 12 1 0 0 96210 105 980 8 1 0 0 980 'START' 96211 127 962 2 0 1 0 962 >NO 96212 101 20 1 2 0 FORM T/E 96213 126 976 2 0 0 0 976 >FORM T/E S/R 96214 128 980 5 1 0 0 980 BULK COPY ALPHA->NUMERIC 96215 124 982 2 0 3 0 982 96216 106 138 1 0 0 STORE 6 CHARACTER DATE 96217 102 980 8 1 0 0 980 96218 124 982 2 0 3 0 982 TEST IF CLOCK EXISTS 96219 106 25 0 0 0 (3) 96220 127 962 23 0 1 0 962 >YES 96221 102 980 7 0 0 0 980 CLEAR TIME 96222 102 981 28 0 0 0 981 CLEAR 'AT' 96220>96223 76 962 26 0 0 0 962 *****SPARE ORDERS 96224 124 979 23 1 2 0 979 96225 128 0 1 1 0 96223>96226 101 10 1 3 0 96227 126 978 2 0 0 0 978 >OPEN/CLOSE S/R 96228 106 960 32 1 0 0 960 CLEAR AREA 96229 128 744 2 1 1 0 744 96230 124 960 2 0 2 0 960 HEADING LINE 96231 126 977 2 0 0 0 977 gEDIT AND O/P S/R 96300 PROCR 963 963 3003 READ NEXT BLOCK,TEST DUMPS,TEST FINIS,END ROUTINE 96435> 96453> 96525> 96725> 96729>96302 100 982 8 0 2 0 982 READ NEXT BLOCK 96303 101 7 1 3 0 96304 126 749 2 0 0 0 749 gI/P O/P RTE 7 96305 124 982 5 1 2 0 982 TEST DUMPS BLOCK 96306 106 4 1 0 0 96307 105 981 24 1 0 0 981 'DUMPS' 96308 127 964 2 0 0 0 964 gYES 96309 104 981 24 1 0 0 981 TEST FINIS BLOCK 96310 105 981 32 1 0 0 981 'FINIS 96311 127 965 2 0 1 0 965 gNO 96312 124 983 2 0 2 0 983 EDIT FINIS LINE 96313 126 977 2 0 0 0 977 gEDIT AND O/P S/R 96314 101 20 1 3 0 CLOSE PRINTER FILE 96315 126 978 2 0 0 0 978 gOPEN/CLOSE S/R 96316 101 27 1 3 0 96317 126 749 2 0 0 0 749 gCLOSE RTE 7 TAPE 96318 125 4096 1 1 0 SET NON -INT 96319 0 741 2 0 0 0 741 ABDON/END'IND 96320 70 745 50 0 0 0 745 gABDON 96321 0 745 85 0 0 0 745 1/1/3 2 96322 5 745 60 0 0 0 745 96323 76 745 50 0 0 0 745 gEND 96400 PROCR 964 964 3004 PRINT HEADING BLOCKS 96308>96402 106 975 15 0 0 0 975 RESET ORDER 96403 102 965 2 0 0 0 965 96404 126 976 2 0 0 0 976 gFORM T/E S/R UNPACK DUMPS BLOCK 96405 128 751 9 1 0 0 751 ALPHA->NUM 96406 751 10 0 0 0 751 DUMP TYPE IN Q5 96407 118 4124 1 0 0 96408 102 982 4 0 0 0 982 96409 118 1 1 0 0 TEST HEADING IND SET 96410 127 964 24 0 0 0 964 gNO 96411 106 982 4 0 0 0 982 TEST DUMP TYPE 6 96412 101 6 1 2 0 96413 127 964 16 0 0 0 964 gYES 96414 751 23 0 0 0 751 TEST 600 LOCNS OF M/R TO BE OUTPUT 96415 127 964 54 0 0 0 964 gYES 96413>96416 124 983 4 0 2 0 983 (BLANK LINE) 96417 126 977 2 0 0 0 977 gEDIT AND O/P S/R 96418 124 984 2 0 2 0 984 96419 126 977 2 0 0 0 977 gEDIT AND O/P S/R 96420 124 984 18 0 2 0 984 96421 126 977 2 0 0 0 977 gEDIT AND O/P S/R 96422 124 984 36 0 2 0 984 96423 126 977 2 0 0 0 977 gEDIT AND O/P S/R 96410>96424 106 982 4 0 0 0 982 TEST PM TYPE 96425 101 3 1 2 0 96426 127 964 36 0 3 0 964 g1,2 96427 101 2 1 2 0 96428 127 964 40 0 3 0 964 g3,4 96429 101 2 1 2 0 96430 127 964 47 0 3 0 964 g5,6 96431 101 3 1 2 0 TEST DUMP TYPE 10 96432 127 964 36 0 0 0 964 >YES 96433 106 964 35 0 0 0 964 STOP PROCESSING BLOCKS 96434 102 965 2 0 0 0 965 UNTIL NEXT DUMPS BLOCK 96435 124 963 2 1 0 0 963 >READ NEXT BLOCK 96432> 96426>96436 106 981 8 1 0 0 981 FORM UP CHAPTER CHAPTER FOR 1,2,7 96437 102 981 16 1 0 0 981 OR SECTION 96438 106 981 10 1 0 0 981 96439 124 964 44 1 0 0 964 96428>96440 106 981 12 1 0 0 981 SECTION FOR 3,4 96441 102 981 16 1 0 0 981 96442 102 961 18 0 0 0 961 CLEAR INDICATORS 96443 106 981 14 1 0 0 981 96439>96444 102 981 18 1 0 0 981 96445 124 985 2 0 2 0 985 96446 126 977 2 0 0 0 977 >EDIT AND O/P S/R 96461> 96430>96447 751 24 0 0 0 751 START/END ADDRESSES 96448 118 5 0 0 0 128 FOR DUMP TYPE 6 96449 104 751 23 0 0 0 751 96450 103 961 16 1 0 0 961 FOR DUMP TYPE 6 96451 102 980 6 1 0 0 980 FOR SECT OR CHAP 96452 102 980 5 0 0 0 980 CLEAR CHAP ADDRESS C 96453 124 963 2 1 0 0 963 >READ NEXT BLOCK 96415>96454 102 981 26 0 0 0 981 SET 0-600 INDICATOR 96455 124 985 12 0 2 0 985 96456 126 977 2 0 0 0 977 HEADING LINES >EDIT AND O/P S/R 96457 124 984 36 0 2 0 984 96458 126 977 2 0 0 0 977 >EDIT AND O/P S/R 96459 124 985 22 0 2 0 985 96460 126 977 2 0 0 0 977 >EDIT AND O/P S/R 96461 124 964 47 1 0 0 964 96500 PROCR 965 965 3005 TEST PM TYPE AND PROCESS PM TYPE 6 96311>96502 101 16 1 3 0 UNPACK ALPHA>NUMERIC 96503 126 976 2 0 0 0 976 >FORM T/E 96504 128 751 9 1 0 0 751 UNPACK 96505 106 982 2 1 0 0 982 SET IND MOD REG 2 96506 102 980 8 1 0 0 980 0/48 96728>96507 106 982 4 0 0 0 982 96508 101 6 1 2 0 TEST PM TYPE 6 96509 127 966 2 0 1 0 966 >NO 96510 102 980 2 0 0 0 980 CLEAR NEW/OLD IND FOR S/R 96511 124 980 8 0 1 0 980 STORE NEXT LONG WORD 96512 124 751 13 0 2 0 751 AND FORM SIGN PARAS 96513 126 975 2 0 0 0 975 >STORE LONG WORD ETC S/R 96514 124 980 8 0 1 0 980 96515 124 751 9 0 2 0 751 REL+ABS ADDRESS 96516 1 979 24 1 0 0 979 4 IN Q6 96517 128 980 3 0 0 0 980 BULK COPY SHORT>SHORT 96518 102 980 22 1 0 0 980 SET PARAS AT 0 FOR NEW WORD 96519 126 971 2 0 0 0 971 PRINT NEXT LINE FORM UP AND O/P S/R 96520 101 6 1 3 0 STEP IND MRS ADJUST IND MRS 96521 107 980 8 0 0 0 980 96522 123 2 0 0 0 TEST LAST TRACE 96523 100 961 16 0 0 0 961 96524 124 967 26 1 0 0 967 >NO, NEXT TRACE 96525 124 963 2 1 0 0 963 >YES, NEXT BLOCK 96600 PROCR 966 966 PROCESS NEXT WORD ON MT BLOCK,DECODE IF AN INSTRUCTION 96509>96602 106 963 6 0 0 0 963 FORM UP ACTIONM TEST TAG CHANGE 96603 104 980 8 0 0 0 980 REQUIRED 96604 104 980 8 0 0 0 980 96605 102 966 7 0 0 0 966 96606 124 982 5 1 2 0 982 MODIFY BY 123 96607 106 0 1 0 0 *FORMED ORDER* NEXT WORD EX T/X AREA 96608 105 981 50 1 0 0 981 'XX ' 96609 127 966 14 0 3 0 966 gNOT CHANGE 96610 118 4 0 0 0 NEW TAG TO Q5 96611 103 980 4 0 0 0 980 STORE NEW TAG 96612 102 981 29 0 0 0 981 SET TAG CHANGE IND 96613 124 967 26 1 0 0 967 STEP MRS 96609>96614 101 0 1 3 0 SET PARAS=0 STORE NEW LONG WORD 96615 102 980 2 0 0 0 980 AND FORM SIGN PATTER 96616 124 980 8 0 1 0 980 I/O MODIFIER 96617 124 751 9 0 2 0 751 96618 80 975 2 0 0 0 975 gDECODE/STORE''AFTER'' 96619 10 0 0 0 0 DUMMY ORDER 96620 124 982 2 0 3 0 982 96621 126 0 0 0 0 (42)SET TAG 15 96622 101 2 1 3 0 FORM PARAS 96623 102 980 2 0 0 0 980 96624 106 980 6 0 0 0 980 96625 80 975 2 0 0 0 975 gDECODE/STORE''BEFORE'' 96626 106 980 16 1 0 0 980 TEST SIGN PATTERNS TEST WORDS EQUAL 96627 105 980 18 1 0 0 980 EQUAL 96628 127 966 32 0 1 0 966 gNO 96629 106 980 14 1 0 0 980 TEST MAGNITUDE EQUAL 96630 105 980 12 1 0 0 980 96631 127 966 45 0 0 0 966 gYES ->YES 96628>96632 106 981 26 0 0 0 981 TEST 0-600 SET 96633 127 966 44 0 0 0 966 gYES 96634 0 980 6 0 0 0 980 ADDRESS TO WRITE INTO 96635 124 982 2 0 3 0 982 96636 105 3 0 0 0 R1 END=SPECIAL CHAP START 96637 73 966 40 0 0 0 966 gOK 96638 101 204 1 2 0 96639 73 966 44 0 0 0 966 gNEVER OVERWRITE 0-203 OF SPECIAL CHAPTE 96637>96640 124 980 12 0 2 0 980 COPY NEW RECORD 96641 104 980 20 1 0 0 980 TO STORE 96642 124 980 6 0 3 0 980 96643 128 0 0 0 0 96639> 96633>96644 101 1 1 3 0 SET EQUALITY INDIC 96631>96645 102 980 11 0 0 0 980 96646 123 966 47 0 2 0 966 SET TAG 14 96647 100 0 0 0 0 96700 PROCR 967 967 TEST PM TYPE 96702 106 982 4 0 0 0 982 SWTICH BY PM TYPE 96703 101 5 1 2 0 96704 127 967 20 0 0 0 967 96705 101 1 1 1 0 96706 127 968 2 0 0 0 968 96707 101 2 1 1 0 96708 127 968 2 0 0 0 968 96709 106 981 29 0 0 0 981 TEST TAG CHANGE 96710 127 967 15 0 1 0 967 gYES INDICATOR SET 96807> 96811>96711 106 980 12 1 0 0 980 TEST LONG WORD 96712 127 967 15 0 1 0 967 TRUE ZERO >NO 96713 106 980 16 1 0 0 980 96714 127 967 18 0 0 0 967 >YES 96712> 96710>96715 101 0 1 3 0 FORM PARAMETER 96716 102 980 22 1 0 0 980 96717 126 970 2 0 0 0 970 >FORM UP AND O/P S/R** 96714>96718 101 0 1 3 0 ***DELETE 96719 102 981 29 0 0 0 981 CLEAR TAG CHANGE INDICATOR 96803> 96704>96720 101 2 1 3 0 STEP ADDRESS COUNTER 96721 107 980 5 0 0 0 980 96722 123 2 0 0 0 STEP IND MR1 96723 100 980 6 0 0 0 980 96724 124 967 26 1 0 0 967 96725 124 963 2 1 0 0 963 >NEXT BLOCK 96724> 96613> 96524>96726 123 2 0 0 0 STEP IND MR2 96727 100 980 8 0 0 0 980 96728 124 965 7 1 0 0 965 >NEXT WORD 96729 124 963 2 1 0 0 963 >NEXT BLOCK 96800 PROCR 968 968 3008 TYPES 2 AND 4 96708> 96706>96802 106 980 11 0 0 0 980 TEST NEW WORD=OLD 96803 127 967 20 0 0 0 967 >YES 96804 106 980 14 1 0 0 980 TEST OLD WORD MAGNITUDE=0 96805 127 968 8 0 1 0 968 IS TRUE ZERO >NO 96806 106 980 18 1 0 0 980 SIGN PATTERN=0 96807 127 967 11 0 0 0 967 >YES >YES 96805>96808 106 980 24 1 0 0 980 96809 102 980 22 1 0 0 980 96810 126 970 2 0 0 0 970 >FORM UP AND O/P S/R 96811 124 967 11 1 0 0 967 >OUTPUT NEW WORD 96900 PROCR 969 969 3009 CONVERT S/R BINARY>DECIMAL 96902 100 0 0 0 0 LINK 96903 100 961 20 1 0 0 961 STORE (A) (B) ( C) 96904 100 982 7 0 3 0 982 SET DECIMAL 96905 124 980 26 0 2 0 980 SELECT TABLE START 96906 112 961 20 0 0 0 961 CONVERT 96907 102 961 20 1 0 0 961 96908 100 961 20 1 1 0 961 RESET (A) (B) ( C) 96909 126 969 2 0 1 0 969 >LEAVE S/R 97000 PROCR 970 970 33010 FORM UP AND O/P S/R IF NOT TYPE 6 97002 100 0 0 0 0 LINK 97003 101 31 0 1 0 COLLATION CONST 97004 106 980 6 0 0 0 980 CONVERT AND STORE 97005 118 3 1 3 0 REL ADDRESS REMOVE DIVISION NO 97006 118 4124 1 0 0 97007 114 980 4 0 0 0 980 STORE DIVISION NO 97008 101 0 1 3 0 CLEAR A 97009 118 13 1 3 0 97010 102 980 3 0 0 0 980 STORE ADDRESS 97011 126 971 2 0 0 0 971 >FORM UP AND OUTPUT S/R 97012 126 970 2 0 1 0 970 >LEAVE S/R 97013 5 961 2 0 0 0 961 ORDER CONST 97100 PROCR 971 971 FORM UP LINE OF PRINT,PRINT IT,PRINT STARRY LINE IF REQUIRED 97102 81 971 2 0 0 0 971 97103 124 980 23 0 1 0 980 0/2=OLD/NEW WORD 97104 124 980 12 0 2 0 980 97105 1 980 20 1 0 0 980 2 IN Q6=QTTY 97106 128 980 14 0 0 0 980 COPY CURRENT LONG WORD->WL 97107 124 980 23 0 1 0 980 97108 0 980 16 1 0 0 980 COPY INDS THAT ACTION>16 97109 5 980 18 1 0 0 980 97110 35 0 0 0 1111 97111 36 980 4 0 0 0 980 DIVISION OR REF 97112 126 973 2 0 0 0 973 CONVERT AND STORE 97113 106 980 3 0 0 0 980 CONVERT 13 BIT ADDRESS 97114 126 969 2 0 0 0 969 (OR ITEM) TO DECIMAL 97115 102 980 3 0 0 0 980 97116 100 980 14 1 2 0 980 PROCESS LONG WORD 97117 126 974 2 0 0 0 974 gPROCESS WORD S/R MOSST SIG HALF 97118 106 980 18 0 0 0 980 STORE SIGN PARAS 97119 102 980 19 0 0 0 980 97120 126 974 2 0 0 0 974 gPROCESS WORD S/R LEAST SIG HALF 97121 106 980 14 1 0 0 980 STORE ALPHA WORD 97122 102 981 18 1 0 0 981 L/E'S IN LONG WORD 97123 102 980 18 1 0 0 980 WITH B'S AND L'S 97124 34 974 15 0 0 0 974 BITS 1-6 97143>97125 115 981 18 1 0 0 981 STORE NEXT QRTET LINE 97126 102 981 16 1 0 0 981 97127 115 981 52 1 0 0 981 TET FOR B/E 97128 105 981 16 1 0 0 981 97129 127 971 32 0 0 0 971 gYES 97130 101 0 1 3 0 97131 124 971 34 1 0 0 971 gNO 97129>97132 106 981 6 1 0 0 981 g'S AND B'S 97133 124 971 38 1 0 0 971 97131>97134 115 981 54 1 0 0 981 TEST FOR L/E'S 97135 105 981 16 1 0 0 981 97136 71 971 41 0 0 0 971 gNO 97137 106 981 4 1 0 0 981 97133>97138 114 981 18 1 0 0 981 97139 106 981 2 1 0 0 981 97140 114 980 18 1 0 0 980 g'S 97136>97141 118 2 1 0 0 97142 101 0 1 3 0 97143 127 971 25 1 1 0 971 gNEXT QRTET 97144 106 980 4 0 0 0 980 CONVERT TAG S/R 97145 118 4124 0 0 0 SHIFT TO Q1 97146 126 973 2 0 0 0 973 CONVERT AND TRANSFER S/R 97147 106 980 5 0 0 0 980 RELATIVE ADDRESS 97148 126 973 2 0 0 0 973 gCONVERT AND TRANSFER S/R 97149 124 986 2 0 2 0 986 EDIT LINE 97150 126 977 2 0 0 0 977 gEDIT AND O/P S/R 97151 106 980 18 1 0 0 980 OUTPUT * LINE 97152 127 971 55 0 0 0 971 IF NEEDED 97153 124 986 38 0 2 0 986 EDIT LINE 97154 126 977 2 0 0 0 977 gEDIT AND O/P S/R 97152>97155 0 970 13 0 0 0 970 RESET ORDDER 97156 5 972 3 0 0 0 972 97157 126 971 2 0 1 0 971 FOR NEXT WORD 97200 PROCR 972 972 3812 TRANSPER S/R 97202 81 972 2 0 0 0 972 97203 5 961 2 0 0 0 961 >FORMED ORDER 97204 10 0 0 0 1 97205 4 972 3 0 0 0 972 STEP ADDRESS 97206 10 0 0 0 0 CLEAR A 97207 82 972 2 0 0 0 972 97300 PROCR 973 973 3013 CONVERT AND TRANSFER S/R 97302 100 0 0 0 0 LINK 97303 126 969 2 0 0 0 969 >CONVERT S/R 97304 126 972 2 0 0 0 972 >TRANSFER S/R 97305 126 973 2 0 1 0 973 >LEAVE S/R 97400 PROCR 974 974 3014 PROCESS WORD S/R 97402 100 0 0 0 0 LINK 97403 101 0 1 3 0 TRANSFER ACTION CLEAR A 97404 118 1 1 0 0 SHIFT ACTION INTO B 97405 104 980 19 0 0 0 980 0 OR 16 IF ACTION 16 97406 126 973 2 0 0 0 973 DISCRIMINANT D IN A 97407 118 1 1 3 0 >TRANSFER 97408 126 972 2 0 0 0 972 MODIFIER M IN A 97409 118 2 1 3 0 >TRANSFER 97410 126 972 2 0 0 0 972 ADDRESS 97411 118 1 1 3 0 97412 118 3 1 0 0 97413 126 973 2 0 0 0 973 >CONVERT AND TRANSFER 97414 126 974 2 0 1 0 974 >LEAVE S/R 97415 100 63 0 0 0 CONST=BITS 1-6 97500 PROCR 975 975 3015 STORE LONG WORD AND FORM SIGN PARAS S/R 97502 100 0 0 0 0 LINK 97503 104 980 20 1 0 0 980 STORE WORD FORM T/E 97504 124 980 2 0 0 0 980 97505 128 980 12 0 0 0 980 BULK COPY LONG WORD 97506 124 980 2 0 1 0 980 0/2=OLD/NEW WORD 97507 124 980 12 0 2 0 980 97508 1 979 26 1 0 0 979 1 IN Q6 97509 118 0 0 0 0 DUMMY ORDER 97510 128 981 27 0 0 0 981 BULK COPY SHORT WORD 97511 100 981 26 1 1 0 981 FORM SIGN PATTERN FORM SIGN PATTERN 97512 127 975 15 0 3 0 975 0 IF POSIVIE FOR LEAST SIG HALF 97513 101 0 1 3 0 16 IF POSITIVE POSITIVE 97514 124 975 16 1 0 0 975 97512>97515 101 16 1 3 0 NEGATIVE 97514>97516 124 980 2 0 1 0 980 97517 102 980 16 0 0 0 980 97518 124 980 2 0 1 0 980 FORM SIGN PATTERN 97519 100 980 12 1 1 0 980 FOR MOST SIG HALF 97520 127 975 23 0 3 0 975 97521 101 0 1 3 0 POSITIVE 97522 124 975 24 1 0 0 975 97520>97523 101 16 1 3 0 NEGATIVE 97522>97524 124 980 2 0 0 0 980 97525 102 980 17 0 0 0 980 97526 100 982 2 0 3 0 982 RESET BINARY 97527 126 975 2 0 1 0 975 97600 PROCR 976 976 3016 UNPACK FROM WORD 6 S/R 97602 100 0 0 0 0 LINK 97603 101 32 1 1 0 FORM T/E 97604 118 5 0 0 0 97605 101 5 1 1 0 97606 124 982 2 0 3 0 982 97607 104 123 0 0 0 97608 126 976 2 0 1 0 976 gLEAVE S/R 97609 10 0 0 0 0 DUMMY ORDER 97700 PROCR 977 977 3017 EDIT AND O/P S/R 97702 81 977 2 0 0 0 977 97703 128 744 12 1 2 0 744 97704 124 986 50 0 2 0 986 EDIT 20 SPACES 97705 128 744 4 1 2 0 744 BEFORE PRINTING 97706 5 744 2 1 0 0 744 CLEAR FUNCTION WORD 97707 101 1 0 1 0 97708 124 982 2 0 3 0 982 97709 115 27 0 0 0 97710 12 0 0 0 4 97711 70 977 24 0 0 0 977 gGP PRINTER 97712 124 744 2 0 2 0 744 SPECIAL PRINT 97713 1 979 28 1 0 0 979 48 IN Q6 97714 124 979 23 1 2 0 979 97715 128 0 1 1 0 COPY ANNEX,CLEAR A 97731>97716 979 22 0 0 0 979 97717 32 0 0 0 5- ROUTE IN TOP OF B 97718 979 22 0 0 0 979 97719 32 0 0 0 5- AND IN BOTTOM 97720 80 978 2 0 0 0 978 gPRINT 97721 123 979 2 0 2 0 979 gTEST PRINT FINISHED 97722 10 0 0 0 0 CLEAR A 97723 82 977 2 0 0 0 977 (YES) 97711>97724 10 0 0 0 8 GP PRINT 97725 30 0 0 0 4 97726 5 744 3 0 0 0 744 (PRINT ON COLS 1-120) 97727 124 744 2 0 2 0 744 97728 124 979 23 1 2 0 979 97729 129 0 0 1 0 EDIT 97730 10 0 0 0 0 CLEAR A 97731 76 977 16 0 0 0 977 gGO TO PRINT 97800 PROCR 978 978 3018 ENTER MASTER FOR PRINTER 97802 100 0 0 0 0 LINK 97803 118 5 0 0 0 FORM T/E 97804 124 982 2 0 3 0 982 97805 104 26 1 0 0 (PARAS 26,27) 97806 125 4096 1 1 0 SET NON INT 97807 124 982 2 0 3 0 982 97808 123 160 0 2 0 gOPEN PRINTER 97809 126 978 2 0 1 0 978 gLEAVE S/R 97900 PROCR 979 979 3019 TEST PREVIOUS PRINT ORDER FINISHED 97902 81 979 2 0 0 0 979 97903 125 4096 1 1 0 97904 124 982 2 1 1 0 982 MG C 97905 979 22 0 0 0 979 ROUTE 97906 124 982 2 0 3 0 982 97907 102 30 0 1 0 gSI+30 97908 979 21 0 0 0 979 26/1/0 97909 2 979 22 0 0 0 979 97910 124 982 2 0 3 0 982 97911 102 7 0 1 0 SI+7 97912 124 982 2 0 3 0 982 97913 102 45 0 1 0 CLEAR ASSOCIATED TIME 97914 124 979 17 0 2 0 979 (RETURN ADDRESS) 97915 124 982 2 0 3 0 982 97916 124 174 1 0 0 >MASTER TO TEST ROUTE 97917 124 982 2 0 3 0 982 97918 124 2 0 3 0 97919 124 29 1 1 0 RESTORE PROG'S MOD GROUP 97920 126 979 2 0 3 0 979 >(SET INTERRUPTIBLE) 97921 126 0 1 0 0 CONST 97922 100 0 0 0 0 WL FOR ALLOCATED ROUTE R 97923 100 0 0 0 0 WL FOR-(64+R) 97924 100 0 0 0 0 )COPY 4 97925 100 4 0 0 0 ) 97926 100 0 0 0 0 (COPY 1 97927 100 1 0 0 0 ( 97928 100 0 0 0 0 )COPY 48 97929 100 48 0 0 0 ) 98000 CONST 980 980 1 3020 W/L'S AND CONVERT TABLES 98002 (D)0; I/O SERIAL/W/L 98004 0; RELATIVE ADDRESS/TAG 98006 t£££££; TIME/DATE,IND MOD1 98008 (A)START; (LONG DATE)IND MOD 2 98010 (D)0; =INDIC/PROG IDENTITY 98012 0; NEW LONG WORD 98014 0; OLD LONG WORD 98016 0; 0/16 IN ODD/EVEN IF ODD/EVEN NEW WORD PO 98018 0; DITTO FOR OLD VALUE OF WORD 98020 200000; TABLE CONSTANT 98022 0; PARAS NEW/OLD 98024 (D)2000(A)*; OLD WORD CONSTANT 98026 (D)1; CONVERT TABLE 98028 16; BINARY>DECIMAL 98030 256; 98032 4096; 98034 65536; 98100 CONST 981 981 1 3021 ALPHA CONSTANTS 98102 (A)*****; 98104 LLLLL; 98106 BBBBB; 98108 (A)CHAPT; CONSTANTS FOR HEADING 98110 ER ; BLOCKS 98112 (A)SECTI; 98114 ON ; 98116 PRINT; W/L FOR HEADING 98118 OUTOF; W/L FOR HEADING 98120 POINT; CONSTANTS FOR PRINTING 98122 P M B; HEADING BLOCK 98124 (A)DUMPS; 98126 TAKEN; W/L/0-600 IND 98128 ON AT; TAG CH IND/W/L 98130 (A)PROGM; 98132 (A)FINIS; 98134 (A)TYPE(D)7.; 98136 (A)FINAL; 98138 MASTE; 98140 R ROU; 98142 MR1 ; 98144 MR2 ; 98146 MR3 ; 98148 TINE ; 98150 XX ; 98152 (D)7.7.7.7.7.; 98154 5.5.5.5.5.; 98200 CONST 982 982 0 3022 NUMERIC CONSTANTS 98202 (D)00000; ZERO 98203 00018; M/R SETTING 0/24 98204 0; STORE FOR PM TYPE 98205 7e-; ASL 123 98206 3:; 61 98207 66666; 98208 3e; 59 98209 0; 98300 PROCR 983 983 3023 TABLE 1 98302 100 981 32 0 0 0 981 FINIS 98303 101 5 0 0 0 98304 100 981 34 0 0 0 981 B/E 98305 117 1029 0 0 0 98400 PROCR 984 984 3024 TABLE 2 98402 100 981 30 0 0 0 981 15 SP PROGM 98403 101 245 0 0 0 98404 100 980 10 0 0 0 980 SP PROG ID 98405 100 21 0 0 0 98406 100 981 22 0 0 0 981 4SP PM 98407 101 68 0 0 0 98408 100 981 20 0 0 0 981 POINT 98409 101 5 0 0 0 98410 108 751 11 0 0 0 751 LINE SERIAL 98411 100 53 0 0 0 98412 100 981 34 0 0 0 981 4SP TYPE 98413 101 68 0 0 0 98414 100 982 4 0 0 0 982 SP TYPE NO 98415 100 1041 0 0 0 98416 100 981 34 0 0 0 981 2SP B/E 98417 117 1057 0 0 0 98418 100 981 8 0 0 0 981 15SP A 98419 101 753 0 0 0 98420 108 751 13 0 0 0 751 (A) 98421 100 53 0 0 0 98422 108 751 12 0 0 0 751 98423 106 1285 0 0 0 98424 100 981 22 0 0 0 981 4SP B 98425 101 1089 0 0 0 98426 108 751 15 0 0 0 751 (B) 98427 100 53 0 0 0 98428 108 751 14 0 0 0 751 98429 106 1285 0 0 0 98430 100 981 8 0 0 0 981 4SP C 98431 101 65 0 0 0 98432 108 751 16 0 0 0 751 98433 104 53 0 0 0 98434 100 981 34 0 0 0 981 4SP B/E 98435 117 1089 0 0 0 98436 100 981 42 0 0 0 981 MR1 98437 101 243 0 0 0 98438 108 751 18 0 0 0 751 (R1) 98439 104 21 0 0 0 98440 108 751 17 0 0 0 751 98441 104 5 0 0 0 98442 100 981 44 0 0 0 981 MR2 98443 101 67 0 0 0 98444 108 751 20 0 0 0 751 (R2) 98445 104 21 0 0 0 CONTENTS OF MR2 98446 108 751 19 0 0 0 751 98447 104 5 0 0 0 98448 100 981 46 0 0 0 981 MR3 98449 101 67 0 0 0 98450 108 751 22 0 0 0 751 (MR3) 98451 104 21 0 0 0 98452 108 751 21 0 0 0 751 98453 104 5 0 0 0 98454 100 981 34 0 0 0 981 3SP BE 98455 117 1073 0 0 0 98500 PROCR 985 985 3025 TABLE 3 98502 100 980 10 0 0 0 980 15 SP PROG ID 98503 100 245 0 0 0 98504 100 981 16 0 0 0 981 2SP CHAPTER/SECTION 98505 101 37 0 0 0 98506 100 981 18 0 0 0 981 98507 101 5 0 0 0 98508 108 751 10 0 0 0 751 CHAP/SECTION 98509 100 4866 0 0 0 98510 100 981 34 0 0 0 981 B/E 98511 117 1025 0 0 0 98512 100 981 30 0 0 0 981 15SP PROGM 98513 101 245 0 0 0 98514 100 980 10 0 0 0 980 SERIAL NO 98515 100 21 0 0 0 98516 100 981 36 0 0 0 981 FINAL 98517 101 37 0 0 0 98518 100 981 24 0 0 0 981 DUMP 98519 101 20 0 0 0 98520 100 981 34 0 0 0 981 SP B/E 98521 117 1041 0 0 0 98522 100 981 38 0 0 0 981 MASTER 98523 101 245 0 0 0 98524 100 981 40 0 0 0 981 ROUTINE 98525 101 5 0 0 0 98526 100 981 48 0 0 0 981 98527 101 5 0 0 0 98528 100 981 34 0 0 0 981 4SP B/E 98529 117 1089 0 0 0 98600 PROCR 986 986 3026 TABLE 4 98602 100 980 22 0 0 0 980 ASTERISK 98603 101 1025 0 0 0 4/0/1 98604 100 961 2 0 0 0 961 DIVISION NO OR REF 98605 100 515 0 1 0 2/2/0/3 98606 100 980 3 0 0 0 980 13 BIT DEC ADD 98607 100 5 0 2 0 4/0/0/5 98608 100 961 12 0 0 0 961 RELATIVE ADDRESS 98609 100 21 0 2 0 4/0/1/5 98610 100 980 6 0 0 0 980 15 BIT BINARY ADDRESS 98611 100 4117 0 0 0 1/0/1/5 98612 100 961 7 0 0 0 961 ACTION 98613 100 531 0 1 0 2/2/1/3 98614 100 961 8 0 0 0 961 DISC 98615 100 1041 0 0 0 4/1/1 98616 100 961 9 0 0 0 961 MOD 98617 100 1041 0 0 0 4/1/1 98618 100 961 10 0 0 0 961 ADDRESS 98619 100 21 0 2 0 1/5 98620 100 961 3 0 0 0 961 ACTION 98621 100 531 0 1 0 2/2/1/3 98622 100 961 4 0 0 0 961 DISC 98623 100 1041 0 0 0 4/1/1 98624 100 961 5 0 0 0 961 MOD 98625 100 1041 0 0 0 4/1/4 98626 100 961 6 0 0 0 961 ADDRESS 98627 100 21 0 2 0 1/5 98628 100 980 14 0 0 0 980 LSH NUMERIC 98629 104 69 0 2 0 4/0/2/5 98630 100 980 15 0 0 0 980 MSH NUMERIC 98631 104 37 0 2 0 4/0/2/5 98632 100 981 18 0 0 0 981 PROCESSED ALPHA 98633 101 37 0 0 0 2/5 98634 100 961 11 0 0 0 961 TAG 98635 100 4882 0 0 0 1/3/1/2 98636 100 981 52 0 0 0 981 BEW 98637 117 5 0 0 0 0/5 98638 100 982 2 0 0 0 982 STARRY LINE 98639 100 4341 0 2 0 5/0/15/5 98640 100 982 2 0 0 0 982 98641 100 4341 0 2 0 98642 100 982 2 0 0 0 982 98643 100 4341 0 2 0 98644 100 982 2 0 0 0 982 98645 100 4117 0 2 0 5/0/1/5 98646 100 980 18 0 0 0 980 STARTS 98647 101 53 0 0 0 98648 100 981 52 0 0 0 981 BEW 98649 117 5 0 0 0 0/5 98650 100 982 2 0 0 0 982 20 SPACES 98651 116 4341 0 2 0 98700 CONST 987 987 0 FIRST LEVEL PARAS PASS 2 98702 (B5)1(B3)1(B3)1(B3)1(B6)8; 2001/0 98703 1,1,0,1,1; 98704 1,1,1,0,8; 98705 1,1,2,0,16; 98706 2,0,2,0,16; 98707 1,0,1,1,1; 98708 1,1,0,1,9; 98709 0,1,6,6,54; 98710 6,1,1,1,9; 98711 0,1,1,1,6; 98712 1,0,1,1,0; 98713 1,1,1,1,9; 2002/5 98714 0,1,1,1,9; 98715 0,1,0,0,54; 98716 1,1,0,0,9; 98717 0,1,1,0,8; 98718 0,0,1,6,54; 98719 6,6,6,6,54; 98720 0,0,1,0,0; 2003/4 98721 0,0,0,1,0; 98722 1,0,0,1,1; 98723 1,1,1,0,6; 98724 0,1,1,1,8; 98725 0,1,1,1,6; 2004/5 2005/5 98726 0,1,1,1,1; 98727 0,0,0,0,0; 98728 0,1,1,1,9; 98729 1,0,1,0,9; 98730 1,1,0,0,8; 98731 1,0,1,1,9; 2006/2 98732 1,0,1,1,8; 98733 0,1,0,1,1; 98734 1,1,1,1,8; 98735 1,1,1,1,1; 98736 1,0,0,0,1; 98737 1,0,1,0,0; 98738 1,1,0,0,8; 98739 1,1,0,1,8; 2007/4 98740 1,0,1,0,9; 98741 0,1,1,0,9; 2008/6 98742 1,1,0,1,8; 98743 1,1,1,1,0; 98744 0,1,1,1,9; 98745 0,0,1,0,9; 98746 0,1,1,0,8; 98747 1,1,1,6,54; 98748 0,1,1,1,9; 2009/0 98749 1,1,0,1,9; 98750 1,1,1,6,54; 98751 6,0,1,1,8; 98752 1,0,1,1,8; 2010/5 98753 1,1,1,6,11; 98754 1,0,1,1,9; 98755 1,1,0,1,1; 98756 1,1,1,1,9; 98757 0,6,6,0,9; 2011/4 98758 1,0,1,0,1; 98759 3,0,0,1,54; 98760 0,1,0,1,9; 98761 1,0,1,6,54; 98762 1,0,1,1,9; 98763 0,1,0,1,8; 98764 1,0,1,0,9; 98765 0,6,6,6,54; 2012/1 98766 1,1,1,1,1; 98767 0,1,1,1,8; 98768 1,0,1,0,9; 98769 0,1,1,0,8; 2013/0 98770 1,1,0,0,0; 98771 1,1,0,1,0; 98772 0,0,1,0,0; 98773 1,0,0,0,8; 98774 0,0,1,1,8; 98775 0,1,0,0,1; 98776 1,1,0,0,8; 98777 0,0,0,0,8; 98778 1,1,0,1,8; 98779 1,0,1,1,8; 2014/6 98780 1,1,1,1,8; 98781 0,1,0,1,9; 98782 1,6,6,6,54; 98783 1,1,1,1,1; 98784 0,1,1,1,9; 2015/0 98785 0,1,1,1,9; 98786 0,1,1,0,9; 98787 1,1,0,1,9; 98788 1,0,1,1,1; 98789 1,1,0,1,9; 2016/0 98790 1,1,1,0,9; 98791 0,1,1,6,0; 98792 1,1,1,1,9; 98793 0,0,0,1,49; 98800 CONST 988 988 0 FIRST LEVEL PARA PASS 2 CONTD 98802 (B5)1(B3)1(B3)0(B3)1(B6)15; 98803 0,0,1,0,0; 2017/1 98804 1,1,0,0,8; 98805 0,0,1,1,8; 98806 0,1,0,0,0; 98807 0,1,0,1,1; 98808 0,1,1,1,0; 98809 1,0,0,0,9; 98810 1,1,0,1,9; 98811 1,1,0,1,9; 2017A/5 98812 0,1,1,7,1; 2018/5 2019/5 98813 1,1,1,1,15; 98814 0,1,0,1,9; 2020/1 98815 0,0,0,1,57; 98816 0,1,0,6,54; 2022/1 98817 1,0,1,1,8; 2022/6 98818 1,0,1,1,8; 2023/6 98819 1,1,1,1,24; 98820 1,1,0,1,0; 98821 1,0,1,0,54; 2024/4 98822 1,1,0,1,9; 98823 0,6,6,6,54; 98824 0,1,1,1,9; 2025/0 98825 0,0,1,0,9; 98826 0,1,0,1,15; 2026/0 98827 0,0,1,1,8; 98828 1,1,0,0,0; 2027/3 98829 0,0,0,0,0; 98830 0,0,0,0,0; 2028/0 98831 0,0,0,0,0; 98832 0,0,0,0,0; 2029/0 98833 0,0,0,0,0; 98834 0,0,0,0,0; 98835 0,0,0,0,0; 98836 0,0,0,0,16; 2030/5 98837 0,0,0,0,16; 98838 2,0,0,0,24; 98839 2,0,0,0,0; 2031/5 98840 0,0,0,0,0; 98841 0,0,0,0,0; 2032/1 98842 0,0,0,0,0; 2033/5 98843 0,0,0,0,16; 2034/5 98844 7,6,6,6,54; (CHAP END) 98845 6,6,6,6,54; DUMMY WORD 98900 CONST 989 989 0 FIRST LEVEL PARAS PASS 3 98902 (B5)0(B3)0(B3)1(B3)1(B6)0; 3001/0 98903 1,0,0,1,1; 98904 1,1,1,0,6; 98905 1,1,1,1,9; 98906 1,1,1,1,25; 98907 0,6,6,6,54; 98908 0,0,0,0,0; 3001.5/1 98909 0,0,0,0,0; 98910 0,0,0,0,0; 98911 0,0,0,0,0; 98912 0,0,0,0,0; 98913 0,0,0,0,0; 98914 0,0,0,0,0; 98915 0,0,0,0,0; 98916 0,0,0,0,0; 98917 0,0,0,0,0; 98918 0,0,0,0,0; 3001A/1 98919 0,0,0,0,0; 98920 0,0,0,0,0; 98921 0,0,0,0,0; 98922 0,0,0,0,0; 98923 0,0,0,0,0; 98924 0,0,0,0,0; 98925 0,0,0,0,0; 98926 0,0,0,0,0; 98927 0,0,0,0,0; 98928 0,0,0,0,0; 98929 0,0,0,0,0; 98930 0,0,0,0,0; 98931 0,0,0,0,0; 98932 0,0,0,0,0; 98933 0,0,0,0,0; 98934 2,0,2,0,16; 30018/1 98935 2,0,2,0,16; 98936 2,0,2,0,16; 98937 2,0,2,0,16; 98938 2,0,2,0,16; 98939 0,0,1,0,9; 3002/3 98940 0,1,1,0,9; 98941 0,1,1,1,1; 98942 1,3,1,1,9; 98943 1,0,0,1,9; 98944 1,1,6,6,54; 98945 1,0,1,1,1; 3003/0 98946 1,1,1,1,9; 98947 0,1,0,1,1; 98948 1,1,1,1,49; 3004/6 98949 6,6,6,6,54; 98950 1,1,1,1,54; 98951 0,1,0,1,8; 98952 1,1,1,1,9; 98953 1,1,1,1,9; 98954 0,1,0,1,1; 98955 0,1,1,1,9; 98956 1,1,1,1,9; 98957 1,1,1,1,8; 98958 1,1,6,6,54; 98959 1,1,1,1,9; 98960 1,1,1,1,8; 3005/6 98961 1,1,1,1,8; 98962 1,1,1,1,9; 98963 1,1,6,1,9; 98964 0,1,0,1,9; 98965 1,1,1,1,8; 3006/0 98966 1,1,0,1,9; 98967 0,1,1,1,8; 98968 1,7,0,1,9; 98969 1,1,1,1,9; 98970 1,1,1,1,1; 98971 0,1,1,1,8; 98972 0,1,1,0,8; 3007/5 98973 1,0,1,0,9; 98974 1,1,1,1,8; 98975 1,1,0,1,1; 98976 0,1,1,1,1; 98977 1,1,1,1,9; 3008/3 98978 1,1,1,1,9; 98979 0,1,1,1,9; 3009/0 98980 1,1,0,0,8; 3010/3 98981 0,1,0,0,9; 98982 1,1,6,6,54; 98983 6,0,6,6,9; 3011/2 98984 1,1,1,1,8; 98985 1,1,1,1,9; 98986 1,1,1,1,9; 98987 1,1,1,1,9; 98988 1,0,1,6,49; 98989 1,1,1,1,9; 98990 1,1,0,0,9; 98991 0,1,1,1,9; 98992 1,1,1,1,9; 98993 1,0,1,0,8; 3012/2 98994 1,0,1,1,8; 3013/2 3014/6 98995 0,0,1,1,1; 98996 0,1,0,0,9; 98997 0,6,6,6,54; 98998 0,1,1,1,9; 3015/1 98999 1,0,1,1,8; 99000 CONST 990 990 0 99002 (B5)1(B3)0(B3)1(B3)1(B6)9; 99003 1,0,1,0,9; 99004 1,1,0,0,0; 3016/3 99005 1,0,1,0,1; 3017/4 99006 1,1,1,0,11; 99007 0,1,1,6,54; 99008 1,1,0,1,1; 99009 0,1,1,0,8; 99010 0,1,1,1,0; 99011 1,0,0,1,54; 3018/2 99012 3,0,1,0,8; 3019/6 99013 0,1,1,1,1; 99014 (B5)1(B3)1(B3)0(B3)1(B6)1; 99015 1,0,1,0,1; 99016 0,0,0,0,0; 99017 0,0,0,6,54; 99018 0,0,0,0,0; 3020/1 99019 0,0,0,0,0; 99020 0,0,0,0,0; 99021 (B5)0(B3)0(B3)0(B3)0(B6)0; 99022 0,0,0,0,0; 99023 0,0,0,0,0; 3021/5 99024 0,0,0,0,0; 99025 0,0,0,0,0; 99026 0,0,0,0,0; 99027 0,0,0,0,0; 99028 0,0,0,0,0; 99029 0,0,0,0,0; 99100 CONST 991 991 0 FIRST LEVEL PARAS PASS C CONTD 99102 (B5)0(B3)0(B3)0(B3)0(B6)0; 99103 0,0,0,0,0; 99104 0,0,0,0,0; 3022/5 99105 0,0,0,0,0; 99106 2,0,2,0,16; 3023/1+3024/5 99107 2,0,2,0,16; 99108 2,0,2,0,16; 99109 2,0,2,0,16; 99110 2,0,2,0,16; 99111 2,0,2,0,16; 99112 2,0,2,0,16; 99113 2,0,2,0,16; 99114 2,0,2,0,16; 99115 2,0,2,0,16; 3025/4 99116 2,0,2,0,16; 99117 2,0,2,0,16; 99118 2,0,2,0,16; 99119 2,0,2,0,16; 99120 2,0,2,0,16; 3026/2 99121 2,0,2,0,16; 99122 2,0,2,0,16; 99123 2,0,2,0,16; 99124 2,0,2,0,16; 99125 2,0,2,0,16; 99126 2,0,2,0,16; 99127 2,0,2,0,16; 99128 2,0,2,0,62; 99200 CONST 992 992 0 SECOND LEVEL PARAS 99202 (B8)40(B6)45(B6)49; PASS 2 99203 42,24,62; 99204 42,62,63; PASS 3 99300 CONST 993 993 1 BLISTER SPACE 99302 (D)0; 99304 0; 99306 0; 99308 0; 99310 0; 99312 0; 99314 0; 99316 0; 99318 0; 99320 0; 99322 0; 99324 0; 99326 0; 99328 0; 99400 PROCR 994 994 CHAPTER 9 99500 PROCR 995 995 CHAPTER 10 99600 END PROGRAMME 08000 SERIAL 801 CHAPS 3 FILES 5 TRAN. AREAS 5 F.PT. NO MOD. GP. YES PRIORITY 3 ENTRY= CH2/ 41 SIZE OF CHAPS 2574 7368 992 0 0 0 0 FILE ID. RTE. TYPE START LOCN. ALT.ROUTES BLOCK SIZE CHAPT D1 14 598 NO 394 3 B1 15 6806 NO 58 2 A1 7 6864 NO 154 2 A2 8 7018 NO 154 2 A6 7 7172 NO 154 2 TRAN. AREAS START LOCN. CHAPT SIZE 10 204 3 394 5 6286 2 58 7 6344 2 154 8 6498 2 154 9 6652 2 154 SECTION.START 1=5234 2= 64 3=2524 4=2572 5=6286 6=2672 7=6344 8=6498 9=6652 10= 204 11=4946 12= 50 13=4966 14=6286 15=5038 16=4998 17=3572 18= 74 19=4122 20= 330 21=4582 22=3672 23=6156 24=5138 25=6204 26=3040 27=6266 28=5280 29=5326 30=5550 31=5568 32=5590 40=6246 52=1080 53=5506 54=5760 55=5920 61=5234 62= 110 63= 50 66=5206 67=5230 70=5550 71=5386 72=5354 77=5506 91=6008 92=5970 93= 170 94=5406 95=6056 97= 620 98=6044 99=6106 SWITCHES 129= CH2/7326 252= CH2/7327 191= CH2/7328 108= CH2/7329 214= CH2/7330 217= CH2/7331 227= CH2/7332 263= CH2/7333 267= CH2/7334 278= CH2/7335 352= CH2/7336 372= CH2/7337 381= CH2/7338 458= CH2/7339 100= CH2/7340 695= CH2/7341 511= CH2/7342 514= CH2/7343 153= CH2/7344 785= CH2/7345 781= CH2/7346 786= CH2/7347 830= CH2/7348 780= CH2/7349 849= CH2/7350 787= CH2/7351 826= CH2/7352 ITEM+ CTRS MR'S 4-20 8= CH2/7354 4= CH2/7356 6= CH2/7358 5= CH2/7360 19= CH2/7362 20= CH2/7364 12= CH2/7366 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 11 12 0 0 0 0 12 0 0 0 0 13 0 0 0 0 14 0 0 0 0 15 16 0 0 0 0 16 0 0 0 0 17 0 0 0 0 18 0 0 0 0 19 20 0 0 0 0 20 0 0 0 0 21 0 0 0 0 22 0 0 0 0 23 24 0 0 0 0 24 0 0 0 0 25 0 0 0 0 0 25 1 1 4096 0 28 24 0 3 0 2 23 0 2 0 1792 0 0 0 0 0 0 0 0 0 0 32 26 0 1 26 2 PROCEDURE 100 33 0 1 0 44 2 0 0 3 0 2 1 1 3 2 0 36 0 0 2 60 2 25 1 1 4096 0 24 0 3 0 2 23 0 2 0 1024 40 0 1 1 44 2 24 0 3 3 2 24 1 0 41 0 0 0 0 0 0 SECTION 1012 44 0 0 0 0 0 0 0 0 48 0 0 0 0 0 0 0 0 52 0 0 0 0 0 0 0 0 56 0 0 0 0 0 0 0 0 SECTION 1013 60 2 0 0 0 0 0 0 0 SECTION 1014 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 11 12 0 0 0 0 12 0 0 0 0 13 0 0 0 0 14 0 0 0 0 15 16 0 0 0 0 16 0 0 0 0 17 0 0 0 0 18 0 0 0 0 19 20 0 0 0 0 20 0 0 0 0 21 0 0 0 0 22 0 0 0 0 23 24 0 0 0 0 24 0 0 0 0 25 0 0 0 0 0 25 1 1 4096 0 28 24 0 3 0 4 23 0 2 0 1792 0 0 0 0 0 0 0 0 0 0 32 26 0 1 26 4 PROCEDURE 101 33 0 1 0 2404 4 0 0 3 0 4 1 1 3 3 0 36 0 0 2 2508 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 1024 40 0 1 1 2404 4 PROCEDURE 102 41 0 0 3 2509 4 25 1 1 4096 0 23 0 2 44 4 44 0 0 0 0 0 2 1 0 2192 4 2 1 0 6266 4 2 1 0 6268 4 48 2 1 0 6270 4 2 1 0 6272 4 2 0 0 6277 4 2 0 0 6279 4 52 2 0 0 7347 4 23 0 3 1430 4 18 0 1 4 0 1 0 1 16 0 56 14 0 0 1325 4 14 0 0 1326 4 14 0 0 1327 4 25 0 3 0 0 60 24 1 0 128 4 24 0 3 5 4 6 0 0 34 0 18 0 1 4124 0 64 2 1 0 6274 4 24 0 3 5 4 6 0 0 36 0 18 0 1 4124 0 68 1 1 2 4 0 2 0 0 6276 4 6 0 0 1417 4 2 0 0 1409 4 72 6 1 0 2193 4 27 0 0 140 4 6 0 0 2192 4 2 0 0 31 4 76 1 1 3 7 0 26 0 0 141 4 27 0 0 85 4 1 1 3 8 0 80 26 0 0 141 4 27 0 0 85 4 1 1 3 11 0 26 0 0 141 4 84 27 0 1 163 4 6 0 0 0 4 2 0 0 7351 4 1 1 3 1 0 88 2 0 0 6275 4 24 0 3 0 4 6 0 0 4 22 1 1 2 64 0 92 3 0 0 7 4 18 0 3 1 0 18 1 1 4127 0 2 0 0 1404 4 96 18 1 3 3 0 2 0 0 1449 4 6 0 0 1404 4 26 0 0 1845 4 100 2 0 0 2192 4 0 0 3 2509 4 6 0 0 6275 4 27 0 0 174 4 104 24 0 3 5 4 24 0 3 32 0 24 0 3 16 0 1 1 3 0 0 108 4 0 0 7 4 2 0 0 1839 4 24 0 3 1839 4 2 0 0 0 0 112 24 0 3 5 4 24 0 3 32 0 6 0 0 22 0 4 0 0 7 4 116 2 0 0 141 4 24 0 3 5 4 24 0 3 32 0 6 0 0 21 0 120 27 0 0 174 4 6 0 0 31 4 1 1 2 88 0 27 0 1 161 4 124 1 1 3 1 0 24 0 3 141 4 2 0 0 0 0 24 1 0 174 4 128 24 0 3 0 4 6 0 0 6 22 27 0 0 134 4 6 0 0 6275 4 132 27 0 1 140 4 24 1 0 74 4 6 0 0 6275 4 27 0 0 140 4 136 6 0 0 6274 4 26 0 0 141 4 27 0 1 163 4 24 1 0 88 4 140 26 0 3 1325 4 PROCEDURE 103 141 0 0 0 0 0 2 0 0 1792 4 26 1 2 2418 4 144 6 0 0 1792 4 24 0 3 0 4 5 0 2 0 0 27 0 0 160 4 148 25 0 2 1 0 24 1 0 144 4 6 0 0 9 4 1 1 2 24 0 152 27 0 3 160 4 26 1 2 2420 4 24 0 3 0 4 6 0 2 0 0 156 5 0 0 1792 4 27 0 0 160 4 25 0 2 1 0 24 1 0 154 4 160 26 0 1 141 4 1 1 3 0 0 24 1 0 125 4 PROCEDURE 104 163 26 0 3 1326 4 164 1 1 3 16 0 0 0 2 2510 4 25 1 1 4096 0 24 0 3 0 4 168 26 0 2 0 512 0 0 0 1761 3 0 0 0 172 3 0 0 0 231 3 172 6 1 0 2192 4 24 1 0 41 4 24 0 3 5 4 6 0 0 34 0 176 18 1 1 4124 0 2 0 0 1839 4 18 1 1 2 0 1 1 3 0 0 180 18 1 1 2 0 2 0 0 1845 4 24 0 3 5 4 24 0 3 32 0 184 24 0 3 12 0 1 1 3 0 0 0 0 2 1845 4 15 0 0 2246 4 188 2 0 0 1404 4 PROCEDURE 105 189 1 1 1 128 0 6 0 0 189 4 24 0 3 5 4 192 24 0 3 32 0 4 0 0 32 0 3 0 0 211 4 2 0 0 218 4 196 24 0 3 1404 4 6 0 0 0 0 5 0 0 1845 4 27 0 1 202 4 200 24 0 3 1404 4 2 1 0 0 0 24 0 3 1845 4 6 0 0 64 0 204 24 0 3 7 4 2 0 0 64 0 6 0 0 1839 4 24 0 3 1845 4 208 2 0 0 64 0 6 0 0 1792 4 18 0 1 2 0 1 1 1 128 0 212 18 0 1 2 0 4 0 0 7 4 24 0 3 5 4 2 0 0 34 0 216 6 0 0 7 4 18 0 1 2 0 1 1 1 128 0 24 0 3 5 4 220 2 0 0 35 0 26 0 3 1327 4 24 0 2 2264 4 28 1 2 2524 4 224 0 1 0 2404 4 0 0 3 0 4 24 0 2 2524 4 25 1 1 4096 0 228 24 0 3 0 4 23 0 2 0 1280 0 1 1 2404 4 0 0 3 2509 4 232 26 0 0 1535 4 6 0 0 6276 4 1 1 1 14 0 0 1 2 2220 4 236 26 0 0 1404 4 6 1 0 2422 4 28 1 1 2524 4 6 1 0 2424 4 240 28 1 1 5354 4 26 0 0 1819 4 24 1 2 15 4 6 1 0 0 0 244 5 1 0 2194 4 3 1 0 2194 4 27 0 1 347 4 0 1 0 2404 4 248 0 0 3 0 4 0 1 2 2426 4 6 1 0 2428 4 4 0 0 11 4 252 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 0 3 2408 4 256 26 0 0 1492 4 1 1 3 99 0 2 0 0 5451 4 26 0 0 1819 4 260 27 0 0 1341 4 24 1 2 15 4 6 1 0 0 0 5 1 0 2222 4 264 27 0 1 271 4 1 1 3 1 0 2 0 0 6277 4 26 0 0 1492 4 268 26 0 0 1819 4 27 0 0 1341 4 24 1 0 267 4 6 1 0 2430 4 272 28 1 1 2572 4 6 0 0 6276 4 1 1 2 1 0 27 0 0 280 4 276 24 0 2 2282 4 24 1 2 15 4 28 0 2 4 0 24 1 0 283 4 280 24 0 2 2282 4 24 1 2 15 4 28 0 3 0 0 6 1 0 2578 4 284 5 1 0 2196 4 27 0 1 288 4 3 0 0 2240 4 24 1 0 298 4 288 6 1 0 2578 4 5 1 0 2198 4 27 0 0 297 4 6 1 0 2578 4 292 5 1 0 2200 4 27 0 1 341 4 0 0 2 2588 4 15 0 0 2152 4 296 27 0 0 298 4 1 1 3 1 0 2 0 0 3572 4 0 0 3 2509 4 300 1 1 3 1 0 7 0 0 5451 4 0 0 3 2511 4 PROCEDURE 106 303 6 1 0 2580 4 304 1 1 2 256 0 27 0 3 344 4 1 1 2 2201 0 27 0 2 344 4 308 6 1 0 2580 4 26 0 0 1839 4 1 1 2 100 0 18 1 3 3 0 312 18 1 1 4127 0 2 1 0 3580 4 27 1 0 317 4 1 1 3 10 0 316 2 0 0 3581 4 6 0 0 5451 4 0 0 2 2218 4 24 0 1 3581 4 320 18 1 3 0 0 2 0 0 1839 4 24 0 1 3580 4 15 0 0 3672 4 324 27 0 1 344 4 6 0 0 1839 4 24 0 1 3580 4 14 0 0 3672 4 328 0 0 3 2509 4 6 0 0 5451 4 1 0 1 0 0 18 1 1 4119 0 332 13 0 0 2512 4 2 0 0 3582 4 18 1 1 9 0 2 0 0 3581 4 336 6 0 0 3572 4 24 0 1 3581 4 18 0 3 0 0 24 0 1 3582 4 340 7 0 0 5401 4 26 0 0 1492 4 0 0 3 2511 4 24 1 0 259 4 344 1 1 3 1 0 2 1 0 3589 4 24 1 0 328 4 PROCEDURE 107 347 24 1 2 15 4 348 6 1 0 0 0 5 1 0 2202 4 27 0 0 369 4 24 1 2 15 4 352 6 1 0 0 0 5 1 0 2222 4 27 0 0 1851 4 1 1 3 3 0 356 0 0 2 2508 4 25 1 1 4096 0 24 0 3 0 4 26 0 2 0 512 360 0 0 0 1761 3 0 0 0 362 3 6 0 0 6275 4 4 1 0 2432 4 364 3 1 0 2404 4 26 1 3 2404 4 26 0 0 1535 4 24 0 3 1 4 368 24 1 0 33 0 26 0 0 2005 4 0 1 0 2404 4 0 0 3 0 4 372 0 1 2 2426 4 6 1 0 2428 4 4 0 0 11 4 25 1 1 4096 0 376 24 0 3 0 4 23 0 2 0 256 0 0 3 2408 4 6 1 0 2434 4 380 24 1 2 21 4 28 1 1 4 0 3 1 0 2404 4 26 1 3 2404 4 384 26 0 0 1492 4 24 1 2 13 4 6 1 0 14 0 5 1 0 2436 4 388 27 0 1 395 4 24 1 2 13 4 2 1 0 12 0 24 1 2 13 4 392 2 1 0 14 0 24 1 2 13 4 2 1 0 16 0 24 1 2 13 4 396 6 1 0 17 0 2 0 0 6267 4 24 1 2 13 4 6 1 0 15 0 400 2 0 0 6268 4 24 1 2 13 4 6 1 0 13 0 3 0 0 6266 4 404 27 0 1 711 4 26 0 0 1764 4 6 0 0 6267 4 27 0 0 411 4 408 24 1 2 13 4 6 1 0 12 0 24 1 0 413 4 24 1 2 13 4 412 6 1 0 10 0 5 1 0 2196 4 27 0 0 421 4 4 1 0 2196 4 416 5 1 0 2198 4 27 0 0 421 4 4 1 0 2198 4 5 1 0 2200 4 420 27 0 1 405 4 6 0 0 6267 4 27 0 0 432 4 0 1 0 2404 4 424 0 0 3 0 4 24 1 2 13 4 24 0 2 6 0 3 0 0 7354 4 428 24 1 2 13 4 4 1 0 5 0 2 0 0 7355 4 0 1 1 2404 4 432 6 0 0 6267 4 27 0 0 437 4 24 0 3 7354 4 6 1 0 6 0 436 24 1 0 439 4 24 1 2 13 4 6 1 0 10 0 5 1 0 2210 4 440 27 0 0 570 4 4 1 0 2210 4 5 1 0 2196 4 27 0 0 481 4 444 4 1 0 2196 4 5 1 0 2198 4 27 0 0 480 4 4 1 0 2198 4 448 5 1 0 2200 4 27 0 0 469 4 4 1 0 2200 4 5 1 0 2206 4 452 27 0 0 561 4 4 1 0 2206 4 5 1 0 2208 4 27 0 0 561 4 456 4 1 0 2208 4 5 1 0 2438 4 27 0 1 539 4 6 0 0 6267 4 460 27 0 0 464 4 24 0 3 7354 4 6 1 0 5 0 24 1 0 466 4 464 24 1 2 13 4 6 1 0 7 0 27 0 0 539 4 25 0 3 1 0 468 24 1 0 539 4 PROCEDURE 108 469 6 0 0 6267 4 27 0 0 474 4 24 0 3 7354 4 472 0 1 2 15 0 24 1 0 476 4 24 1 2 13 4 0 1 2 21 0 476 1 1 3 0 0 18 1 1 4124 0 15 0 0 2152 4 27 0 0 481 4 480 1 1 3 1 0 2 0 0 2569 4 0 0 3 2511 4 1 1 3 1 0 484 7 0 0 3582 4 6 0 0 3582 4 1 1 1 153 0 26 0 0 1839 4 488 3 0 3 2672 4 25 0 3 1 0 24 1 0 491 4 1 0 1 0 0 492 18 1 1 4119 0 13 0 0 2512 4 2 1 0 2192 4 26 1 1 2192 4 496 18 1 1 9 0 2 0 0 2570 4 6 0 0 2569 4 24 0 1 2570 4 500 18 0 3 0 0 7 0 1 2519 4 6 0 0 6268 4 27 0 1 539 4 504 6 0 0 2574 4 0 0 2 2576 4 27 1 0 539 4 6 0 0 6267 4 508 27 0 0 512 4 24 0 3 7354 4 6 1 0 5 0 24 1 0 514 4 512 24 1 2 13 4 6 1 0 7 0 18 0 1 4126 0 26 0 0 1839 4 516 2 0 0 1845 4 6 0 0 6267 4 27 0 0 522 4 24 0 3 7354 4 520 6 1 0 11 0 24 1 0 524 4 24 1 2 13 4 6 1 0 17 0 524 18 0 1 4126 0 27 0 0 539 4 26 0 0 1839 4 18 1 3 3 0 528 18 1 1 4127 0 24 0 3 0 4 2 0 0 4 22 27 1 0 536 4 532 0 0 2 2218 4 6 0 0 1845 4 18 1 3 10 0 24 1 0 538 4 536 0 0 2 2218 4 6 0 0 1845 4 14 0 2 5456 4 6 0 0 6267 4 540 27 0 0 559 4 24 0 3 7354 4 6 1 0 1 0 2 0 0 1764 4 544 24 0 1 1764 4 23 0 0 0 0 0 0 0 7354 3 24 1 0 432 4 548 26 0 0 1764 4 0 1 0 2404 4 0 0 3 0 4 24 1 2 13 4 552 24 0 2 6 0 3 0 0 7354 4 24 1 2 13 4 4 1 0 5 0 556 2 0 0 7355 4 0 1 1 2404 4 24 1 0 432 4 26 0 0 1764 4 560 24 1 0 432 4 PROCEDURE 109 561 24 1 2 13 4 6 1 0 7 0 2 0 0 2569 4 564 26 0 0 1764 4 24 1 2 13 4 6 1 0 10 0 5 1 0 2210 4 568 27 0 1 564 4 24 1 0 578 4 6 0 0 6267 4 27 0 0 575 4 572 24 0 3 7354 4 6 1 0 5 0 24 1 0 577 4 24 1 2 13 4 576 6 1 0 7 0 2 0 0 2569 4 6 0 0 2569 4 27 0 1 585 4 580 0 0 3 2511 4 6 0 0 3582 4 1 1 1 256 0 18 0 1 2 0 584 3 0 0 2569 4 2 0 0 3593 4 0 0 3 2511 4 1 0 1 3 0 588 15 0 0 2569 4 27 0 0 591 4 1 1 3 256 0 4 0 0 2569 4 592 18 0 1 4126 0 26 0 0 1839 4 2 0 0 2569 4 6 0 0 3582 4 596 1 1 1 256 0 26 0 0 1839 4 2 0 0 5451 4 6 0 0 6268 4 600 27 0 1 678 4 26 1 3 2440 4 26 1 2 2442 4 26 0 0 1786 4 604 6 0 0 2574 4 0 0 2 2576 4 27 1 1 614 4 24 1 2 13 4 608 6 1 2 5 0 18 1 3 2 0 18 1 1 4125 0 2 0 3 2673 4 612 18 1 3 10 0 2 0 3 2672 4 25 0 3 2 0 24 1 0 603 4 616 6 0 0 2574 4 0 0 2 2576 4 27 1 1 622 4 1 1 3 1 0 620 2 0 0 6268 4 24 1 0 678 4 6 0 0 3582 4 1 1 2 1280 0 624 27 0 3 648 4 0 1 0 2404 4 0 0 3 0 4 6 1 0 2444 4 628 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 632 0 1 1 2404 4 0 1 0 2404 4 0 0 3 0 4 6 1 0 2446 4 636 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 640 0 1 1 2404 4 1 1 3 9 0 0 0 2 2508 4 25 1 1 4096 0 644 24 0 3 0 4 26 0 2 0 512 0 0 0 1761 3 0 0 0 362 3 PROCEDURE 110 648 26 1 1 2448 4 26 1 3 2450 4 26 0 0 1786 4 24 1 2 13 4 652 6 1 2 5 0 2 0 1 5760 4 25 0 1 1 0 24 1 0 656 4 656 25 0 3 1 0 24 1 0 650 4 26 0 0 1786 4 24 1 2 13 4 660 6 1 2 5 0 27 0 1 625 4 25 0 1 1 0 24 1 0 658 4 664 26 1 3 2452 4 26 1 1 2454 4 26 0 0 1786 4 24 1 2 13 4 668 6 1 2 5 0 2 0 1 5920 4 25 0 1 1 0 24 1 0 672 4 672 25 0 3 1 0 24 1 0 666 4 26 0 0 1786 4 24 1 2 13 4 676 6 1 2 5 0 27 0 1 625 4 0 1 0 2404 4 0 0 3 0 4 680 0 1 2 2456 4 6 1 0 2458 4 4 0 0 9 4 25 1 1 4096 0 684 24 0 3 0 4 23 0 2 0 256 0 1 1 2404 4 26 0 0 1764 4 688 24 1 2 13 4 6 1 0 6 0 5 1 0 2212 4 27 0 0 709 4 692 24 1 2 13 4 6 1 0 5 0 5 0 0 2574 4 27 0 1 700 4 696 24 1 2 13 4 6 1 0 7 0 5 0 0 2576 4 27 0 0 739 4 700 0 1 0 2404 4 0 0 3 0 4 6 1 0 2446 4 4 0 0 9 4 704 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 2404 4 708 26 0 0 1775 4 26 0 0 1680 4 24 1 0 739 4 PROCEDURE 111 711 26 1 1 2460 4 712 26 0 0 1764 4 24 1 2 13 4 24 0 2 5 0 18 1 1 4123 0 716 1 1 3 46 0 18 1 1 5 0 24 0 0 23 4 28 1 0 2524 4 720 25 0 1 23 0 24 1 0 712 4 6 0 0 2569 4 26 0 0 1845 4 724 18 0 1 2 0 2 0 0 3593 4 0 0 3 2509 4 6 0 0 2569 4 728 18 0 1 5 0 1 1 1 100 0 3 1 0 2404 4 26 1 1 2404 4 732 1 1 3 100 0 3 0 1 2572 4 1 1 1 1 0 25 0 1 1 0 736 24 1 0 733 4 6 0 0 2569 4 2 0 0 5451 4 24 0 2 2250 4 740 24 0 3 1 4 28 1 2 74 0 0 1 0 2404 4 0 0 3 0 4 744 24 0 3 1 4 24 0 2 74 0 25 1 1 4096 0 24 0 3 0 4 748 23 0 2 0 1280 0 1 1 2404 4 PROCEDURE 112 750 26 0 0 1420 4 27 0 0 754 4 752 26 0 0 1492 4 24 1 0 750 4 6 0 0 2513 4 3 0 0 3582 4 756 2 0 0 3586 4 6 0 0 2575 4 18 0 1 4125 0 1 1 2 91 0 760 27 0 0 752 4 6 1 0 3600 4 27 0 1 782 4 1 1 3 1 0 764 2 1 0 3588 4 26 0 0 1530 4 24 1 0 763 4 PROCEDURE 113 767 26 0 0 1819 4 768 27 0 0 1260 4 24 1 2 15 4 6 1 0 0 0 5 1 0 2222 4 772 27 0 1 779 4 1 1 3 1 0 2 0 0 6277 4 26 0 0 1492 4 776 26 0 0 1819 4 27 0 1 775 4 24 1 0 1260 4 26 0 0 1514 4 780 26 0 0 1449 4 27 0 1 1070 4 0 0 3 2511 4 6 0 0 3582 4 784 5 1 0 2575 4 27 0 3 790 4 27 0 1 1140 4 6 0 0 3584 4 788 1 1 2 3 0 27 0 1 1140 4 6 0 0 3593 4 5 1 0 2575 4 792 27 0 2 797 4 1 1 3 1 0 2 1 0 3588 4 26 0 0 1530 4 796 24 1 0 793 4 27 0 1 802 4 6 0 0 7326 4 1 1 2 3 0 800 27 0 1 793 4 24 1 0 1044 4 6 1 0 2575 4 18 0 1 4126 0 804 26 0 0 1839 4 2 0 0 1845 4 24 0 1 1845 4 6 0 0 2572 4 808 27 0 0 1140 4 24 0 1 7326 4 26 0 1 810 4 0 0 0 986 3 812 0 0 0 815 3 0 0 0 1039 3 0 0 0 1014 3 PROCEDURE 114 815 26 0 0 1472 4 816 2 0 0 3572 4 1 0 1 3 0 15 1 0 2575 4 1 1 2 1 0 820 27 0 0 825 4 1 1 3 0 0 0 0 2 3572 4 15 1 0 2575 4 824 27 0 1 1140 4 6 1 0 2575 4 3 0 0 3586 4 18 0 1 8 0 828 27 0 0 832 4 6 0 0 3575 4 1 1 2 460 0 27 0 0 1140 4 832 26 0 0 1492 4 26 0 0 1819 4 27 0 0 842 4 24 1 2 15 4 836 6 1 0 0 0 5 1 0 2222 4 27 0 0 842 4 26 0 0 1514 4 840 26 0 0 1449 4 27 0 1 877 4 PROCEDURE 115 842 6 0 0 3586 4 3 0 0 3582 4 844 18 0 1 8 0 27 0 1 848 4 6 0 0 3586 4 24 1 0 894 4 848 18 0 1 4120 0 1 1 2 1 0 27 0 0 866 4 1 1 3 0 0 852 5 0 0 3572 4 1 1 2 1 0 2 0 0 3587 4 6 0 0 3586 4 856 18 1 1 4126 0 2 0 0 3591 4 6 0 0 3586 4 5 0 0 3587 4 860 2 0 0 3586 4 6 0 0 3586 4 18 1 1 4126 0 5 0 0 3591 4 864 27 0 1 866 4 26 0 0 1792 4 24 1 2 15 4 6 1 0 0 0 868 18 0 1 4124 0 18 0 1 4 0 5 1 0 2210 4 27 0 0 1260 4 872 24 1 2 15 4 6 1 0 0 0 5 1 0 2222 4 27 0 0 773 4 876 24 1 0 782 4 PROCEDURE 116 877 6 1 0 2575 4 18 0 1 4126 0 26 0 0 1839 4 880 2 0 0 1845 4 24 0 1 1845 4 6 0 0 2572 4 27 0 0 1140 4 884 26 0 0 1472 4 2 0 0 3572 4 0 0 2 3572 4 15 1 0 2575 4 888 27 0 1 1140 4 6 0 0 3586 4 5 1 0 2575 4 27 0 2 1140 4 892 6 1 0 2575 4 3 0 0 3582 4 18 1 1 4126 0 2 0 0 3587 4 896 6 0 0 3586 4 18 1 1 4126 0 3 0 0 3591 4 5 0 0 3587 4 900 27 0 0 905 4 6 0 0 3586 4 18 0 1 8 0 27 0 0 927 4 904 24 1 0 1140 4 18 1 1 2 0 27 0 0 927 4 6 0 0 3586 4 908 18 0 1 8 0 18 0 1 4120 0 1 1 2 1 0 27 0 0 1140 4 912 6 0 0 3586 4 5 1 0 2575 4 5 0 0 3572 4 1 1 2 1 0 916 2 0 0 3587 4 6 0 0 3586 4 5 0 0 3587 4 2 0 0 3586 4 920 6 0 0 3586 4 18 0 1 4126 0 5 0 0 3591 4 27 0 1 925 4 924 26 0 0 1792 4 26 0 0 1492 4 24 1 0 767 4 PROCEDURE 117 927 6 0 0 3587 4 928 26 0 0 1839 4 1 1 1 1 0 5 0 0 2569 4 27 0 3 933 4 932 1 1 3 0 0 4 0 0 2569 4 2 0 0 3587 4 6 0 0 3591 4 936 26 0 0 1839 4 2 0 0 3591 4 6 0 0 3586 4 18 0 1 8 0 940 27 0 0 943 4 1 1 3 1 0 7 0 0 3591 4 6 0 0 3587 4 944 18 0 1 5 0 4 0 0 3591 4 3 1 0 2404 4 26 1 1 2404 4 948 1 1 3 0 0 2 0 0 3594 4 6 0 1 2572 4 27 0 1 954 4 952 1 1 3 1 0 7 0 0 3594 4 25 0 1 1 0 24 1 0 950 4 956 6 0 0 3587 4 5 0 0 3591 4 3 0 0 1839 4 4 0 0 2514 4 960 18 0 1 5 0 24 0 1 3591 4 28 0 0 2572 4 6 0 0 2569 4 964 18 0 1 5 0 4 0 0 3587 4 2 1 0 2192 4 5 0 0 1839 4 968 4 0 0 3594 4 3 0 0 1845 4 7 0 0 5451 4 26 1 1 2192 4 972 25 0 1 0 0 24 1 0 975 4 24 1 0 981 4 6 0 1 2572 4 976 27 0 0 979 4 6 0 0 1845 4 7 0 1 2572 4 25 0 1 1 0 980 24 1 0 975 4 0 0 3 2511 4 6 0 0 3582 4 5 0 0 3586 4 984 27 0 0 866 4 24 1 0 925 4 PROCEDURE 118 986 1 0 1 3 0 1 1 3 0 0 988 15 1 0 2575 4 27 0 1 1014 4 6 1 0 2575 4 18 1 1 4126 0 992 26 0 0 1839 4 5 0 0 2569 4 27 0 2 1024 4 6 1 0 2578 4 996 5 1 0 2196 4 27 0 0 1008 4 6 1 0 2578 4 5 1 0 2198 4 1000 27 0 0 1007 4 6 1 0 2578 4 5 1 0 2200 4 27 0 1 1140 4 1004 0 0 2 2588 4 15 0 0 2152 4 27 0 0 1008 4 1 1 3 1 0 1008 2 0 0 1845 4 26 0 0 1472 4 3 0 0 3572 4 5 0 0 1845 4 1012 27 0 1 1140 4 24 1 0 1067 4 26 0 0 1472 4 2 0 0 3572 4 1016 1 0 1 3 0 15 1 0 2575 4 1 1 2 1 0 27 0 0 1024 4 1020 1 1 3 0 0 0 0 2 3572 4 15 1 0 2575 4 27 0 1 1140 4 1024 6 1 0 2575 4 3 0 0 3586 4 3 0 0 3582 4 18 1 1 4126 0 1028 2 0 0 3591 4 6 1 0 2578 4 5 1 0 2196 4 27 0 0 1140 4 1032 6 1 0 2578 4 5 1 0 2198 4 27 0 0 1140 4 6 1 0 2578 4 1036 5 1 0 2200 4 27 0 0 1140 4 24 1 0 1067 4 PROCEDURE 119 1039 26 0 0 1472 4 1040 2 0 0 3572 4 0 0 2 3572 4 15 1 0 2575 4 27 0 1 1140 4 1044 6 1 0 2575 4 3 0 0 3582 4 2 0 0 3586 4 6 0 0 3582 4 1048 3 0 0 3590 4 18 1 1 4126 0 26 0 0 1839 4 2 0 0 3579 4 1052 6 0 0 3593 4 5 0 0 3590 4 27 0 1 1061 4 0 0 3 2511 4 1056 6 0 0 3590 4 1 1 1 153 0 18 1 1 4126 0 26 0 0 1839 4 1060 2 0 0 3579 4 6 1 0 2575 4 18 0 1 8 0 27 0 0 1067 4 1064 6 0 0 3575 4 1 1 2 460 0 27 0 0 1140 4 26 0 0 1492 4 1068 26 0 0 1420 4 27 0 0 782 4 PROCEDURE 120 1070 24 0 1 7326 4 26 0 1 1071 4 1072 0 0 0 1076 3 0 0 0 1140 3 0 0 0 1098 3 0 0 0 1076 3 1076 0 0 3 2511 4 6 0 0 3572 4 1 1 1 1 0 7 0 0 3582 4 1080 6 0 0 3582 4 18 1 1 4126 0 5 0 0 3591 4 27 0 1 1094 4 1084 6 1 0 2578 4 5 1 0 2196 4 27 0 0 1140 4 6 1 0 2578 4 1088 5 1 0 2198 4 27 0 0 1140 4 6 1 0 2578 4 5 1 0 2200 4 1092 27 0 0 1140 4 24 1 0 925 4 6 0 0 2515 4 5 0 0 3572 4 1096 7 0 0 3582 4 24 1 0 1140 4 PROCEDURE 121 1098 6 1 0 2578 4 5 1 0 2196 4 1100 27 0 0 1111 4 6 1 0 2578 4 5 1 0 2198 4 27 0 0 1110 4 1104 6 1 0 2578 4 5 1 0 2200 4 27 0 1 1175 4 0 0 2 2588 4 1108 15 0 0 2152 4 27 0 0 1111 4 1 1 3 1 0 2 0 0 3572 4 1112 1 0 1 0 0 6 0 0 3590 4 18 1 1 4126 0 1 1 3 0 0 1116 27 1 0 1128 4 6 0 0 3590 4 5 0 0 3593 4 27 0 0 1128 4 1120 6 0 0 3582 4 5 0 0 3586 4 27 0 0 1140 4 2 0 0 3587 4 1124 6 0 0 3582 4 2 0 0 3586 4 26 0 0 1792 4 24 1 0 1140 4 1128 6 1 0 2580 4 26 0 0 1839 4 27 0 3 1140 4 3 0 0 3576 4 1132 5 0 0 2569 4 27 0 3 1140 4 6 0 0 3576 4 1 1 2 999 0 1136 27 0 2 1140 4 24 0 1 3576 4 6 0 0 2572 4 27 0 0 1144 4 1140 1 1 3 1 0 2 1 0 3588 4 26 0 0 1530 4 24 1 0 782 4 PROCEDURE 122 1144 0 0 3 2509 4 6 0 0 2569 4 18 0 1 5 0 4 0 0 3579 4 1148 3 1 0 2404 4 26 1 1 2404 4 25 0 1 0 0 24 1 0 1154 4 1152 6 0 0 5451 4 24 1 0 1156 4 24 0 1 3579 4 6 0 0 2572 4 1156 2 0 0 1550 4 1 1 3 1 0 7 0 0 5451 4 6 0 0 3572 4 1160 18 0 1 4 0 4 0 0 1550 4 24 0 1 3576 4 2 0 0 2572 4 1164 25 0 1 0 0 24 1 0 1167 4 24 1 0 1173 4 6 0 1 2572 4 1168 27 0 0 1171 4 1 1 3 1 0 7 0 1 2572 4 25 0 1 1 0 1172 24 1 0 1167 4 0 0 3 2511 4 24 1 0 1067 4 PROCEDURE 123 1175 1 0 1 0 0 1176 6 0 0 3590 4 5 0 0 2516 4 27 0 3 1140 4 6 0 0 3590 4 1180 18 1 1 4126 0 1 1 3 0 0 27 1 0 925 4 6 1 0 2575 4 1184 18 0 1 4126 0 26 0 0 1839 4 5 0 0 2569 4 27 0 3 1229 4 1188 6 0 0 3574 4 1 1 2 100 0 27 0 2 1229 4 6 1 0 2575 4 1192 24 0 1 3574 4 2 0 0 4582 4 1 0 1 3 0 15 0 0 3586 4 1196 2 0 0 1680 4 6 0 0 3586 4 18 0 1 4126 0 26 0 0 1839 4 1200 2 0 0 1819 4 24 0 1 1819 4 6 0 0 2572 4 26 0 0 1845 4 1204 3 0 0 3591 4 18 0 1 2 0 4 0 0 1680 4 2 0 0 3578 4 1208 6 0 0 3579 4 5 0 0 1819 4 27 0 0 1213 4 6 0 0 2515 4 1212 7 0 0 3591 4 26 1 1 2448 4 6 0 1 4122 4 27 0 0 1223 4 1216 18 0 1 4126 0 5 0 0 3591 4 27 0 1 1221 4 6 0 1 4123 4 1220 7 0 0 3578 4 25 0 1 2 0 24 1 0 1214 4 0 0 3 2509 4 1224 6 0 0 3578 4 24 0 1 3574 4 2 0 0 4583 4 1 1 3 2 0 1228 7 0 0 3574 4 0 0 3 2511 4 6 0 0 3572 4 1 1 1 1 0 1232 7 0 0 3586 4 26 0 0 1492 4 26 0 0 1819 4 27 0 0 1243 4 1236 24 1 2 15 4 6 1 0 0 0 5 1 0 2222 4 27 0 0 1243 4 1240 26 0 0 1514 4 26 0 0 1449 4 27 0 1 1070 4 6 0 0 3586 4 1244 5 0 0 3582 4 2 0 0 3587 4 6 0 0 3582 4 2 0 0 3586 4 1248 26 0 0 1792 4 24 1 2 15 4 6 1 0 0 0 18 0 1 4124 0 1252 18 0 1 4 0 5 1 0 2210 4 27 0 0 1260 4 24 1 2 15 4 1256 6 1 0 0 0 5 1 0 2222 4 27 0 0 773 4 27 0 1 782 4 PROCEDURE 124 1260 0 0 3 2509 4 6 1 0 2462 4 28 0 0 5406 4 6 0 0 2569 4 1264 18 0 1 5 0 1 1 1 100 0 3 1 0 2404 4 26 1 1 2404 4 1268 26 1 2 2464 4 26 1 3 2466 4 0 0 2 2152 4 6 0 1 2572 4 1272 27 0 0 1290 4 1 1 3 0 0 15 0 2 2524 4 27 0 0 1290 4 1276 0 1 0 3572 4 6 0 1 2572 4 1 0 1 0 0 18 1 1 4119 0 1280 13 0 0 2512 4 2 0 0 2192 4 18 1 1 9 0 2 0 0 2193 4 1284 1 1 3 1 0 24 0 1 2193 4 18 0 3 0 0 24 0 1 2192 4 1288 7 0 0 5401 4 0 1 1 3572 4 18 1 3 1 0 25 0 1 1 0 1292 24 1 0 1294 4 24 1 0 1298 4 25 0 3 1 0 24 1 0 1271 4 1296 25 0 2 1 0 24 1 0 1269 4 1 1 3 1000 0 18 0 1 5 0 1300 4 0 0 2569 4 3 1 0 2404 4 26 1 1 2404 4 6 0 1 2572 4 1304 27 0 0 1320 4 18 1 1 4124 0 27 0 0 1320 4 1 1 3 0 0 1308 18 1 1 4 0 1 0 1 0 0 18 1 1 4119 0 13 0 0 2512 4 1312 2 1 0 2192 4 26 1 2 2192 4 18 1 1 9 0 2 0 0 3573 4 1316 1 1 3 1 0 24 0 1 3573 4 18 0 3 0 0 7 0 2 5401 4 1320 25 0 1 1 0 24 1 0 1303 4 24 1 0 1328 4 PROCEDURE 125 1323 24 0 1 7326 4 1324 26 0 1 1324 4 0 0 0 231 3 0 0 0 164 3 0 0 0 222 3 1328 26 1 1 2468 4 26 1 2 2440 4 1 1 3 0 0 1 0 1 15 0 1332 15 0 2 2673 4 18 0 3 10 0 15 0 2 2672 4 2 0 1 3672 4 1336 25 0 1 1 0 24 1 0 1338 4 25 0 2 2 0 24 1 0 1332 4 1340 24 1 0 1353 4 0 0 3 2509 4 6 0 0 2240 4 27 0 0 1351 4 1344 1 1 3 17 0 0 0 2 2508 4 25 1 1 4096 0 24 0 3 0 4 1348 26 0 2 0 512 0 0 0 1761 3 0 0 0 362 3 1 1 3 1 0 1352 7 0 0 5451 4 26 0 0 1492 4 0 0 3 2509 4 6 0 0 6276 4 1356 1 1 1 24 0 26 0 0 1404 4 0 1 0 2404 4 0 0 3 0 4 1360 6 1 0 2470 4 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 1364 23 0 2 0 256 0 1 1 2404 4 24 0 2 3672 4 18 1 1 4123 0 1368 1 1 3 1010 0 18 1 1 5 0 24 0 3 1 4 28 0 0 74 0 1372 24 0 2 5406 4 18 1 1 4123 0 1 1 3 46 0 18 1 1 5 0 1376 24 0 3 1 4 28 0 0 1084 0 3 1 0 2404 4 26 1 3 2404 4 1380 3 1 0 2404 4 26 1 1 2404 4 26 0 0 1535 4 6 1 0 2194 4 1384 27 0 0 33 4 0 1 0 2404 4 0 0 3 0 4 0 0 2 2517 4 1388 6 1 0 2472 4 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 1392 23 0 2 0 256 0 1 1 2404 4 0 1 0 2404 4 0 0 3 0 4 1396 0 0 2 16 4 6 1 0 2474 4 4 0 0 9 4 25 1 1 4096 0 1400 24 0 3 0 4 23 0 2 0 256 0 1 1 2404 4 24 1 0 33 4 PROCEDURE 126 1404 0 0 0 0 0 18 0 1 5 0 4 0 0 8 4 25 1 1 4096 0 1408 24 0 3 0 4 23 0 2 160 0 26 0 1 1404 4 0 1 0 2404 4 1412 0 0 3 0 4 6 1 0 2476 4 4 0 0 9 4 25 1 1 4096 0 1416 24 0 3 0 4 23 0 2 0 256 0 1 1 2404 4 26 0 3 1407 4 PROCEDURE 127 1420 0 0 0 0 0 26 0 0 1819 4 27 0 0 1260 4 24 1 2 15 4 1424 6 1 0 0 0 5 1 0 2222 4 27 0 0 773 4 26 0 0 1514 4 1428 26 0 0 1449 4 26 0 1 1420 4 PROCEDURE 128 1430 0 0 0 0 0 24 1 2 13 4 1432 24 0 2 4 0 18 1 1 4123 0 1 1 3 148 0 18 1 1 5 0 1436 24 1 2 19 4 28 1 1 4 0 0 1 0 2404 4 0 0 3 0 4 1440 0 0 2 18 4 6 1 0 2478 4 4 0 0 10 4 25 1 1 4096 0 1444 24 0 3 0 4 23 0 2 0 256 0 1 1 2404 4 26 0 0 1764 4 1448 26 0 1 1430 4 PROCEDURE 129 1449 0 0 0 0 0 0 0 3 2511 4 0 1 2 2576 4 1452 1 1 3 0 0 18 1 1 2 0 1 1 2 105 0 27 0 0 1465 4 1456 1 1 1 21 0 27 0 0 1464 4 1 1 2 25 0 27 0 0 1463 4 1460 1 1 1 34 0 27 0 1 1471 4 1 1 3 1 0 1 1 1 1 0 1464 1 1 1 1 0 1 1 1 1 0 2 0 0 1472 4 6 0 0 7326 4 1468 2 0 0 3584 4 6 0 0 1472 4 2 0 0 7326 4 26 0 1 1449 4 PROCEDURE 130 1472 0 0 0 0 0 6 1 0 2575 4 18 0 1 4126 0 26 0 0 1839 4 1476 1 1 2 100 0 1 0 1 0 0 18 1 1 4119 0 13 0 0 2512 4 1480 2 0 0 2192 4 18 1 1 9 0 2 0 0 2193 4 0 0 2 2152 4 1484 24 0 1 2193 4 18 1 3 0 0 24 0 1 2192 4 15 0 0 2524 4 1488 27 0 0 1490 4 1 1 3 1 0 0 0 3 2511 4 26 0 1 1472 4 PROCEDURE 131 1492 0 0 0 0 0 26 0 0 1550 4 6 1 0 2436 4 24 1 2 21 4 1496 2 1 0 52 0 6 1 0 3588 4 24 1 2 21 4 2 1 0 50 0 1500 0 1 0 2404 4 0 0 3 0 4 0 0 2 20 4 6 1 0 2478 4 1504 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 1508 0 1 1 2404 4 6 1 0 2434 4 24 1 2 21 4 28 1 1 4 0 1512 2 1 0 3588 4 26 0 1 1492 4 PROCEDURE 132 1514 0 0 0 0 0 1 1 3 0 0 1516 2 1 0 2576 4 2 1 0 2588 4 24 0 1 6276 4 26 0 1 1519 4 1520 0 0 0 1526 3 0 0 0 1522 3 24 0 2 2296 4 24 1 2 15 4 1524 28 0 2 0 0 26 0 1 1514 4 24 0 2 2280 4 24 1 2 15 4 1528 28 0 3 0 0 26 0 1 1514 4 PROCEDURE 133 1530 0 0 0 0 0 26 0 0 1492 4 1532 26 0 0 1420 4 27 0 1 1531 4 26 0 1 1530 4 PROCEDURE 134 1535 0 0 0 0 0 1536 25 1 1 4096 0 23 0 2 1539 4 26 0 1 1535 4 0 0 0 0 0 1540 24 0 3 9 4 0 0 2 64 0 24 0 3 7 4 6 0 0 64 0 1544 24 0 3 9 4 2 0 0 64 0 18 1 1 10 0 24 0 3 7 4 1548 2 0 0 64 0 26 0 3 1539 4 PROCEDURE 135 1550 0 0 0 0 0 24 0 1 6276 4 1552 26 0 1 1552 4 0 0 0 1625 3 0 0 0 1555 3 1 1 3 0 0 1556 2 0 0 1514 4 26 1 1 2480 4 26 1 2 2482 4 0 1 0 2404 4 1560 0 0 3 0 4 24 1 2 15 4 24 0 2 0 0 24 0 3 0 4 1564 4 0 0 2 22 2 0 0 2410 4 0 1 1 2404 4 24 0 3 2410 4 1568 0 1 2 0 0 1 1 3 0 0 18 1 1 2 0 1 1 2 126 0 1572 27 0 0 1582 4 25 0 2 4098 0 24 1 0 1569 4 24 1 2 15 4 1576 6 1 1 0 0 24 1 2 21 4 2 1 1 4 0 25 0 1 2 0 1580 24 1 0 1558 4 26 0 1 1550 4 0 1 0 3594 4 0 0 3 2509 4 1584 24 0 3 0 4 6 0 0 2 22 2 1 0 2410 4 0 0 2 2518 4 1588 10 1 0 2410 4 2 1 0 2192 4 24 0 3 0 4 6 0 0 4 22 1592 3 0 0 1680 4 1 0 1 1 0 14 0 0 2193 4 1 1 3 10 0 1596 5 0 0 2193 4 7 0 0 2192 4 0 0 3 2511 4 1 0 1 3 0 1600 1 1 3 94 0 24 0 1 1680 4 18 1 1 0 0 24 1 2 15 4 1604 14 1 1 0 0 0 0 3 2509 4 6 0 0 1514 4 1 1 2 10 0 1608 27 0 0 1623 4 6 0 0 1514 4 2 0 0 7356 4 6 0 0 2192 4 1612 0 1 0 2404 4 0 0 3 0 4 24 1 2 21 4 24 0 2 0 0 1616 4 0 0 7356 4 2 0 0 2410 4 0 1 1 2404 4 24 0 3 2410 4 1620 2 1 0 37 0 1 1 3 2 0 7 0 0 1514 4 0 1 1 3594 4 1624 24 1 0 1573 4 26 1 1 2484 4 26 1 2 2482 4 0 1 0 2404 4 1628 0 0 3 0 4 24 1 2 15 4 24 0 2 0 0 24 0 3 0 4 1632 4 0 0 2 22 2 0 0 2410 4 0 1 1 2404 4 24 0 3 2410 4 1636 0 1 2 0 0 1 1 3 0 0 18 1 1 2 0 1 1 2 126 0 1640 27 0 0 1653 4 25 0 2 4098 0 24 1 0 1637 4 24 1 2 15 4 1644 6 1 1 0 0 24 1 2 21 4 2 1 1 4 0 25 0 1 2 0 1648 24 1 0 1626 4 1 1 3 126 0 24 1 2 21 4 2 1 0 46 0 1652 24 1 0 1140 4 24 0 3 0 4 6 0 0 4 22 2 0 0 1680 4 1656 1 0 1 3 0 1 1 3 94 0 24 0 1 1680 4 18 1 1 0 0 1660 24 1 2 15 4 14 1 1 0 0 24 1 2 15 4 6 1 1 0 0 1664 24 1 2 21 4 2 1 1 4 0 0 1 0 3594 4 0 0 3 2509 4 1668 24 0 3 0 4 6 0 0 2 22 1 1 1 4 0 18 0 1 3 0 1672 24 1 2 21 4 2 1 0 49 0 1 0 1 3 0 15 0 0 1680 4 1676 24 1 2 21 4 14 1 0 49 0 0 0 3 3598 4 26 0 1 1550 4 PROCEDURE 136 1680 0 0 0 0 0 26 0 0 1764 4 0 0 3 2509 4 24 1 2 13 4 1684 6 1 0 4 0 5 1 0 2214 4 27 0 0 1740 4 24 1 2 13 4 1688 6 1 0 9 0 5 0 0 2519 4 27 0 1 1681 4 24 1 2 13 4 1692 6 1 0 10 0 5 1 0 2204 4 27 0 0 1730 4 24 1 2 13 4 1696 6 1 0 6 0 5 1 0 2212 4 27 0 1 1681 4 26 0 0 1764 4 1700 26 1 1 2486 4 24 1 2 13 4 6 1 1 5 0 5 0 0 2170 4 1704 27 0 1 1708 4 6 0 0 2242 4 27 0 0 1681 4 24 1 0 1740 4 1708 4 0 0 2170 4 5 0 0 2574 4 27 0 1 1727 4 24 1 2 13 4 1712 6 1 1 7 0 5 0 0 2576 4 27 0 1 1727 4 24 1 2 13 4 1716 6 1 1 8 0 1 1 2 32 0 27 0 0 1727 4 24 1 2 13 4 1720 6 1 1 9 0 27 0 0 1726 4 24 1 2 13 4 6 1 1 11 0 1724 2 0 0 7347 4 24 1 0 1727 4 2 0 0 2242 4 25 0 1 8 0 1728 24 1 0 1701 4 24 1 0 1699 4 0 0 3 2511 4 24 1 2 13 4 1732 6 1 0 5 0 5 0 0 2574 4 27 0 1 1681 4 24 1 2 13 4 1736 6 1 0 7 0 5 0 0 2576 4 27 0 1 1681 4 26 0 1 1680 4 1740 0 1 0 2404 4 0 0 3 0 4 6 1 0 2444 4 4 0 0 9 4 1744 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 2404 4 1748 1 1 3 1 0 2 0 0 2242 4 2 0 0 7347 4 1 1 3 2 0 1752 0 0 2 2510 4 25 1 1 4096 0 24 0 3 0 4 26 0 2 0 512 1756 0 0 0 1761 3 0 0 0 1759 3 0 0 0 362 3 26 0 0 1775 4 1760 24 1 0 1681 4 25 1 1 4096 0 24 0 3 0 4 26 0 2 0 768 PROCEDURE 137 1764 0 0 0 0 0 0 1 0 2404 4 0 0 3 0 4 0 0 2 12 4 1768 6 1 0 2474 4 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 1772 23 0 2 0 256 0 1 1 2404 4 26 0 1 1764 4 PROCEDURE 138 1775 0 0 0 0 0 1776 0 1 0 2404 4 0 0 3 0 4 0 1 2 2488 4 6 1 0 2490 4 1780 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 1784 0 0 3 2408 4 26 0 1 1775 4 PROCEDURE 139 1786 0 0 0 0 0 25 0 2 2 0 1788 24 1 0 1791 4 26 0 0 1764 4 26 1 2 2460 4 26 0 1 1786 4 PROCEDURE 140 1792 0 0 0 0 0 6 0 0 3575 4 1 1 2 460 0 27 0 2 1818 4 1796 1 1 3 0 0 1 0 1 3 0 15 0 0 3586 4 2 0 0 1680 4 1800 6 0 0 3586 4 18 0 1 4126 0 26 0 0 1839 4 2 0 0 1819 4 1804 24 0 1 1819 4 6 0 0 2572 4 26 0 0 1845 4 18 0 1 2 0 1808 4 0 0 1680 4 24 0 1 3575 4 2 0 0 4122 4 6 0 0 3587 4 1812 24 0 1 3575 4 2 0 0 4123 4 0 0 3 2509 4 1 1 3 2 0 1816 7 0 0 3575 4 0 0 3 2511 4 26 0 1 1792 4 PROCEDURE 141 1819 0 0 0 0 0 1820 0 1 0 3594 4 0 0 3 2509 4 0 0 2 14 4 6 0 0 6276 4 1824 1 1 1 4 0 26 0 0 1404 4 0 1 1 3594 4 24 1 2 15 4 1828 6 1 0 0 0 5 1 0 2492 4 27 0 1 1833 4 26 0 0 1492 4 1832 24 1 0 1820 4 24 1 2 15 4 6 1 0 0 0 18 0 1 4124 0 1836 18 0 1 4 0 5 1 0 2210 4 26 0 1 1819 4 PROCEDURE 142 1839 0 0 0 0 0 1840 2 1 0 2192 4 0 0 3 2509 4 24 0 2 2172 4 12 1 0 2192 4 1844 26 0 1 1839 4 PROCEDURE 143 1845 0 0 0 0 0 2 1 0 2192 4 0 0 3 2511 4 1848 24 0 2 2152 4 12 1 0 2192 4 26 0 1 1845 4 PROCEDURE 144 1851 26 0 0 2005 4 1852 0 1 0 2404 4 0 0 3 0 4 0 1 2 2426 4 6 1 0 2428 4 1856 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 1860 0 0 3 2408 4 24 1 2 13 4 6 1 0 13 0 2 0 0 6266 4 1864 1 1 3 0 0 24 1 2 13 4 0 1 2 12 0 18 1 1 2 0 1868 1 1 2 71 0 27 0 3 625 4 24 1 2 13 4 6 1 0 17 0 1872 2 0 0 6267 4 6 1 0 2222 4 2 1 0 2202 4 24 0 2 2260 4 1876 18 1 1 4123 0 1 1 3 4 0 18 1 1 5 0 28 1 1 2258 4 1880 24 0 2 2250 4 24 0 3 1 4 28 1 2 74 0 0 1 0 2404 4 1884 0 0 3 0 4 24 0 3 1 4 24 0 2 74 0 25 1 1 4096 0 1888 24 0 3 0 4 23 0 2 0 1280 0 1 1 2404 4 26 0 0 1492 4 1892 26 0 0 1819 4 27 0 1 1891 4 26 0 0 1492 4 0 1 0 2404 4 1896 0 0 3 0 4 6 1 0 2470 4 4 0 0 11 4 25 1 1 4096 0 1900 24 0 3 0 4 23 0 2 0 256 0 1 1 2404 4 0 0 3 2509 4 1904 6 0 0 6276 4 1 1 1 24 0 26 0 0 1404 4 6 1 0 2494 4 1908 24 1 2 19 4 28 1 1 4 0 0 1 0 2404 4 0 0 3 0 4 1912 0 1 2 2496 4 6 1 0 2428 4 4 0 0 10 4 25 1 1 4096 0 1916 24 0 3 0 4 23 0 2 0 256 0 0 3 2408 4 18 1 1 10 0 1920 2 0 0 7344 4 26 0 0 2027 4 26 0 0 2027 4 24 0 2 2224 4 1924 18 1 1 4123 0 1 1 3 10 0 18 1 1 5 0 24 1 2 19 4 1928 28 1 1 4 0 26 0 0 2027 4 6 0 0 3600 4 3 0 0 5406 4 1932 24 1 2 19 4 3 1 0 5 0 24 1 2 19 4 3 1 0 13 0 1936 0 0 3 2511 4 1 1 3 1 0 1 0 1 3 0 15 0 0 3601 4 1940 14 0 0 3601 4 0 0 3 2509 4 6 0 0 3601 4 24 1 2 19 4 1944 3 1 0 7 0 24 1 2 19 4 2 1 0 15 0 1 1 3 2 0 1948 24 1 2 19 4 2 1 0 11 0 1 1 3 3 0 24 1 2 19 4 1952 2 1 0 19 0 1 1 3 4 0 24 1 2 19 4 2 1 0 17 0 1956 6 1 0 2228 4 24 1 2 19 4 2 1 0 20 0 26 0 0 2027 4 1960 6 0 0 3600 4 24 1 2 19 4 2 1 0 5 0 6 0 0 3601 4 1964 24 1 2 19 4 2 1 0 7 0 6 1 0 2228 4 24 1 2 19 4 1968 2 1 0 8 0 6 1 0 2204 4 24 1 2 19 4 2 1 0 10 0 1972 6 1 0 2498 4 24 1 2 19 4 2 1 0 12 0 24 1 2 19 4 1976 2 1 0 14 0 6 0 0 6267 4 24 1 2 19 4 2 1 0 17 0 1980 26 0 0 2027 4 26 0 0 1764 4 26 0 0 1430 4 26 0 0 1430 4 1984 6 0 0 3601 4 3 0 0 5407 4 24 1 2 13 4 2 1 0 13 0 1988 26 0 0 1430 4 6 0 0 6267 4 27 0 0 1994 4 24 1 2 13 4 1992 6 1 0 12 0 24 1 0 1996 4 24 1 2 13 4 6 1 0 10 0 1996 5 1 0 2196 4 27 0 0 2044 4 4 1 0 2196 4 5 1 0 2200 4 2000 27 0 0 2044 4 4 1 0 2200 4 5 1 0 2198 4 27 0 1 1988 4 2004 24 1 0 2044 4 PROCEDURE 145 2005 0 0 0 0 0 24 0 1 6276 4 26 0 1 2007 4 2008 0 0 0 2014 3 0 0 0 2010 3 24 0 2 2288 4 24 1 2 15 4 2012 28 0 2 0 0 24 1 0 2017 4 24 0 2 2288 4 24 1 2 15 4 2016 28 0 3 0 0 6 0 0 2574 4 18 0 1 2 0 4 0 0 2575 4 2020 3 0 0 2574 4 2 0 0 3600 4 6 0 0 2576 4 2 0 0 3601 4 2024 26 0 0 1775 4 26 0 0 1680 4 26 0 1 2005 4 PROCEDURE 146 2027 0 0 0 0 0 2028 6 1 0 2436 4 24 1 2 19 4 2 1 0 50 0 0 1 0 2404 4 2032 0 0 3 0 4 0 0 2 18 4 6 1 0 2478 4 4 0 0 10 4 2036 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 2404 4 2040 6 1 0 2494 4 24 1 2 19 4 28 1 1 4 0 26 0 1 2027 4 PROCEDURE 147 2044 6 0 0 6267 4 27 0 0 2063 4 24 1 2 13 4 6 1 0 5 0 2048 18 0 1 5 0 3 1 0 2404 4 26 1 1 2404 4 24 1 2 13 4 2052 6 1 1 12 0 5 1 0 2210 4 27 0 0 2067 4 24 1 2 13 4 2056 6 1 1 7 0 2 0 0 2027 4 24 0 1 2027 4 25 0 1 0 0 2060 24 1 0 2051 4 26 0 0 1430 4 24 1 0 2044 4 24 1 2 13 4 2064 6 1 0 10 0 5 1 0 2210 4 27 0 1 2061 4 26 0 0 1430 4 2068 24 1 2 13 4 6 1 0 6 0 5 1 0 2226 4 27 0 1 2067 4 2072 24 1 2 13 4 6 1 0 11 0 1 1 2 3 0 27 0 0 2093 4 2076 6 0 0 7347 4 2 0 0 1839 4 0 1 0 2404 4 0 0 3 0 4 2080 6 0 0 1839 4 4 1 0 2500 4 18 1 1 4118 0 6 1 0 2458 4 2084 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 2088 0 1 1 2404 4 26 0 0 1764 4 1 1 3 3 0 24 1 2 13 4 2092 2 1 0 11 0 26 0 0 1430 4 26 1 1 2486 4 24 1 2 13 4 2096 6 1 1 5 0 5 0 0 2170 4 27 0 0 2103 4 25 0 1 8 0 2100 24 1 0 2095 4 26 0 0 1764 4 24 1 0 2094 4 6 0 0 2520 4 2104 3 0 0 6000 4 3 0 0 6279 4 3 0 0 6277 4 2 0 0 35 4 2108 1 1 3 2 0 2 0 0 6278 4 26 0 0 1535 4 6 0 0 6275 4 2112 27 0 0 2120 4 6 1 0 2502 4 2 1 0 7358 4 6 0 0 7351 4 2116 27 0 1 2129 4 6 1 0 2428 4 0 1 2 2248 4 24 1 0 2123 4 2120 6 0 0 6274 4 1 1 1 10 0 18 0 1 5 0 4 0 0 7 4 2124 25 1 1 4096 0 24 0 3 0 4 23 0 2 160 0 6 0 0 6275 4 2128 27 0 0 1383 4 6 1 0 2504 4 24 1 2 13 4 2 1 0 4 0 2132 6 0 0 2521 4 24 1 2 13 4 2 1 0 7 0 6 1 0 2498 4 2136 24 1 2 13 4 2 1 0 8 0 6 0 0 3600 4 24 1 2 13 4 2140 2 1 0 11 0 6 1 0 2436 4 24 1 2 13 4 2 1 0 12 0 2144 6 1 0 2478 4 0 0 2 12 4 25 1 1 4096 0 4 0 0 7 4 2148 24 0 3 0 4 23 0 2 160 0 24 1 0 1383 4 0 0 0 0 0 SECTION 148 2152 1 0 0 0 16 0 0 0 2156 256 0 0 0 4096 0 0 0 2160 65536 0 0 0 48576 0 10 0 2164 77216 0 167 0 35456 0 2684 0 2168 67296 0 42949 0 £££££ 0 £££££ 0 2172 1 0 0 0 t 0 0 0 2176 64 0 0 0 3.8 0 0 0 2180 2710 0 0 0 186t0 0 0 0 2184 £4240 0 0 0 89680 0 9 0 2188 5.100 0 5£ 0 t+t00 0 3e9 0 2192 0 0 0 0 65764 0 67696 0 2196 65369 0 67696 0 26355 0 73515 0 2200 57273 0 53666 0 56554 0 51645 0 2204 27259 0 67517 0 46772 0 54746 0 2208 35572 0 56596 0 40000 0 55655 0 2212 45577 0 59655 0 55972 0 56596 0 2216 5.5. 0 0 0 3££ 0 0 0 2220 8000 0 5241 0 16454 0 73695 0 2224 £6£6£ 0 6£6£6 0 45577 0 59655 0 2228 £4£4£ 0 4£4£4 0 42 0 0 0 2232 15965 0 53585 0 56554 0 56595 0 2236 3030 0 30483 0 36653 0 51636 0 2240 55400 0 51735 0 36951 0 55777 0 2244 47355 0 69667 0 £8 0 0 0 2248 8000 0 5149 0 SECTION 149 2250 0 2236 3 5 3 0 0 0 5 0 2252 0 2202 3 37 3 0 0 2 5 0 0 2574 3 37 0 0 0 2 5 0 2256 0 2576 3 16405 0 4 0 1 5 0 0 2216 3 818 3 0 3 3 2 1 2260 0 2306 3 85 3 0 0 5 5 0 0 2216 3 818 3 0 3 3 2 1 2264 0 2236 3 5 3 0 0 0 5 0 0 2238 3 21 3 0 0 1 5 0 2268 0 2240 3 5 3 0 0 0 5 0 0 2242 3 5 3 0 0 0 5 0 2272 0 2244 3 21 3 0 0 1 5 0 0 2192 3 4898 0 1 3 2 2 0 2276 0 1449 3 1025 0 0 4 0 1 0 0 2216 3 786 3 0 3 1 2 1 SECTION 150 2280 0 2574 3 5 3 0 0 0 5 0 0 2578 3 5 3 0 0 0 5 0 2284 0 2580 3 3 2 0 0 0 3 0 0 2588 3 1 0 0 0 0 1 1 2288 0 2578 3 5 3 0 0 0 5 0 0 2574 3 3 0 0 0 0 3 0 2292 0 2575 3 2 0 0 0 0 2 0 0 2576 3 5 0 0 0 0 5 1 2296 0 2574 3 5 3 0 0 0 5 0 0 2576 3 5 3 0 0 0 5 0 2300 0 2578 3 5 3 0 0 0 5 0 0 2580 3 3 2 0 0 0 3 0 2304 0 2588 3 1 0 0 0 0 1 1 SECTION 151 2306 77372 0 4+006 0 2308 0 0 0 0 0 0 0 0 2312 0 0 0 0 0 0 0 0 2316 0 0 0 0 0 0 0 0 2320 0 0 0 0 0 0 0 0 2324 0 0 0 0 0 0 0 0 2328 0 0 0 0 0 0 0 0 2332 0 0 0 0 0 0 0 0 2336 0 0 0 0 0 0 0 0 2340 0 0 0 0 0 0 0 0 2344 0 0 0 0 0 0 0 0 2348 0 0 0 0 0 0 0 0 2352 0 0 0 0 0 0 0 0 2356 0 0 0 0 0 0 0 0 2360 0 0 0 0 0 0 0 0 2364 0 0 0 0 0 0 0 0 2368 0 0 0 0 0 0 0 0 2372 0 0 0 0 0 0 0 0 2376 0 0 0 0 0 0 0 0 2380 0 0 0 0 0 0 0 0 2384 0 0 0 0 0 0 0 0 2388 0 0 0 0 0 0 0 0 2392 0 0 0 0 0 0 0 0 2396 0 0 0 0 0 0 0 0 2400 0 0 0 0 0 0 0 0 SECTION 1015 2404 0 0 0 0 0 0 0 0 2408 0 0 0 0 0 0 0 0 2412 0 0 0 0 0 0 0 0 2416 0 0 0 0 40 0 80 0 2420 +0 0 £0 0 0 0 2086. 0 2424 0 0 20346 0 8000 0 5146 0 2428 0 0 12 0 0 0 20012 0 2432 0 0 9 0 0 0 20032 0 2436 7. 0 7.000 0 37455 0 75516 0 2440 0 0 384 0 0 0 2 0 2444 0 0 1e 0 0 0 22 0 2448 0 0 1++ 0 0 0 t0 0 2452 0 0 32 0 0 0 64 0 2456 £££££ 0 8 0 0 0 24 0 2460 0 0 2. 0 0 0 2002: 0 2464 0 0 2: 0 0 0 14 0 2468 0 0 1+2 0 0 0 21 0 2472 0 0 28 0 0 0 7 0 2476 0 0 1+ 0 0 0 8 0 2480 0 0 20 0 10008 0 £££. 0 2484 0 0 38 0 0 0 30 0 2488 8000 0 5141 0 0 0 11 0 2492 55573 0 72585 0 0 0 2002. 0 2496 8000 0 5142 0 83041 0 4 0 2500 0 0 t 0 0 0 12+ 0 2504 96573 0 67695 0 0 0 0 0 SECTION 1016 2508 2 0 0 0 3 0 66666 0 2512 14 0 9999 0 20000 0 1- 0 2516 10002 0 1 0 5 0 £££££ 0 2520 1.006 0 8000 0 0 0 0 0 SECTION 1017 PROCEDURE 1003 CHAPT 3 EXTRA CHAPTER 202 0 0 0 0 CHAPT 4 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 11 12 0 0 0 0 12 0 0 0 0 13 0 0 0 0 14 0 0 0 0 15 16 0 0 0 0 16 0 0 0 0 17 0 0 0 0 18 0 0 0 0 19 20 0 0 0 0 20 0 0 0 0 21 0 0 0 0 22 0 0 0 0 23 24 0 0 0 0 24 0 0 0 0 25 0 0 0 0 0 25 1 1 4096 0 28 24 0 3 0 4 23 0 2 0 1792 0 0 0 0 0 0 0 0 0 0 32 26 0 1 26 4 PROCEDURE 152 33 0 1 0 5070 4 0 0 3 0 4 1 1 3 4 0 36 0 0 2 5206 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 1024 40 0 1 1 5070 4 0 0 3 5207 4 6 1 0 5084 4 28 1 1 6204 4 44 6 0 0 6276 4 1 1 2 1 0 27 0 0 50 4 6 0 0 5069 4 48 2 0 0 5065 4 24 1 0 55 4 1 0 1 512 0 18 1 3 3 0 52 1 1 3 0 0 14 1 0 4554 4 14 1 0 4560 4 6 0 0 5067 4 56 3 0 0 6202 4 2 0 0 5064 4 6 1 0 5086 4 28 1 1 5234 4 60 1 1 3 1 0 2 0 0 7340 4 2 0 0 6272 4 2 0 0 7342 4 64 2 0 0 7343 4 2 0 0 6270 4 1 1 3 5 0 2 0 0 7327 4 68 24 0 3 0 4 6 1 0 2 22 27 0 0 229 4 3 1 0 5234 4 72 6 1 0 5088 4 28 1 1 6266 4 24 0 3 0 4 6 0 0 6 22 76 3 0 0 6275 4 6 0 0 5208 4 3 0 0 6266 4 3 0 0 6270 4 80 2 0 0 6267 4 6 1 0 5090 4 28 1 1 5354 4 0 0 2 5235 4 84 15 0 0 4792 4 27 0 0 88 4 1 1 3 2 0 2 0 0 7340 4 88 15 0 0 4710 4 1 1 2 2 0 2 0 0 6202 4 15 0 0 4718 4 92 1 1 2 4 0 27 0 0 96 4 1 1 3 2 0 2 0 0 6278 4 96 15 0 0 4715 4 2 0 0 6268 4 1 1 3 450 0 18 0 1 5 0 100 4 0 0 5234 4 24 0 3 1 4 28 1 1 74 0 2 0 0 140 4 104 26 1 3 5092 4 0 1 0 5070 4 0 0 3 0 4 6 0 0 1 4 108 24 0 3 0 4 4 0 0 6 22 2 0 0 5076 4 0 1 1 5070 4 112 24 0 3 5076 4 0 0 2 74 0 18 1 1 7 0 18 1 3 2 0 116 5 0 0 140 4 27 0 3 119 4 7 0 0 140 4 1 1 3 0 0 120 18 1 3 10 0 5 0 0 140 4 27 0 3 124 4 7 0 0 140 4 124 1 1 3 0 0 25 0 3 1 0 24 1 0 105 4 6 0 0 140 4 128 1 1 1 1 0 24 0 3 1 4 2 0 0 1129 0 6 1 0 5094 4 132 24 0 3 1 4 28 1 1 524 0 24 0 3 0 4 6 1 0 4 22 136 2 1 0 5234 4 25 1 1 4096 0 23 0 2 140 4 24 1 0 204 4 PROCEDURE 153 140 0 0 0 0 0 1 1 3 15 0 24 0 3 4706 4 23 1 0 56 0 144 24 0 3 4706 4 23 1 0 210 0 24 0 3 4706 4 23 1 0 364 0 148 24 0 3 4706 4 23 1 0 518 0 24 0 3 4706 4 23 1 0 576 0 152 24 0 3 4706 4 23 1 0 730 0 24 0 3 4706 4 23 1 0 884 0 156 24 0 3 4706 4 23 1 0 1038 0 PROCEDURE 154 158 23 0 3 4616 4 18 0 1 4 0 160 7 0 0 4706 4 6 0 0 4706 4 24 1 2 14 4 3 0 0 64 0 164 1 1 1 58 0 24 1 2 16 4 3 0 0 64 0 1 1 1 154 0 168 24 1 2 18 4 3 0 0 64 0 1 1 1 154 0 24 1 2 20 4 172 3 0 0 64 0 1 1 1 154 0 24 0 3 8 4 3 0 0 64 0 176 1 1 1 58 0 24 0 3 9 4 3 0 0 64 0 1 1 1 154 0 180 24 0 3 10 4 3 0 0 64 0 1 1 1 154 0 24 0 3 11 4 184 2 0 0 64 0 PROCEDURE 155 185 24 0 3 5 4 6 0 0 34 0 18 0 1 4124 0 188 2 0 0 6274 4 1 0 1 15 0 6 0 0 5 4 1 1 1 204 0 192 24 1 2 12 4 14 0 0 64 0 6 0 0 5 4 1 1 1 598 0 196 24 1 2 7 4 14 0 0 64 0 1 1 3 15 0 24 0 3 5 4 200 23 1 0 596 0 24 0 3 5 4 23 1 0 990 0 26 0 3 140 4 PROCEDURE 156 204 6 1 0 5096 4 28 1 1 50 4 6 1 0 5234 4 2 1 0 50 4 208 0 1 0 5070 4 0 0 3 0 4 0 1 2 5098 4 6 1 0 5100 4 212 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 216 0 0 3 5074 4 26 0 0 4110 4 24 1 2 17 4 6 1 0 10 0 220 5 1 0 1338 4 27 0 1 217 4 1 1 3 1 0 3 0 0 6000 4 224 2 0 0 58 4 6 1 0 4734 4 24 1 2 21 4 2 1 0 4 0 228 24 1 0 306 4 PROCEDURE 157 229 0 1 0 5070 4 0 0 3 0 4 0 1 2 5102 4 232 6 1 0 5100 4 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 236 23 0 2 0 256 0 0 3 5074 4 6 1 0 5096 4 28 1 1 50 4 240 6 0 0 5209 4 2 0 0 53 4 26 0 0 4121 4 24 0 2 1236 4 244 26 0 0 5063 4 0 0 3 5210 4 6 1 0 5236 4 5 1 0 1334 4 248 27 0 0 256 4 26 0 0 4249 4 26 0 0 1184 4 1 1 3 2 0 252 3 0 0 83 4 2 0 0 6278 4 2 1 0 5242 4 24 1 0 343 4 256 2 1 0 5250 4 2 1 0 5252 4 24 0 2 1272 4 26 0 0 5063 4 260 1 1 3 0 0 0 0 2 5250 4 15 0 0 4710 4 2 0 0 6202 4 264 24 0 1 6276 4 26 0 1 265 4 0 0 0 271 3 0 0 0 268 3 268 6 1 0 5252 4 1 1 2 115 0 24 1 0 273 4 6 1 0 5254 4 272 5 1 0 5104 4 27 0 1 276 4 1 1 3 2 0 24 1 0 277 4 276 1 1 3 0 0 2 0 0 6278 4 6 0 0 6266 4 27 0 1 283 4 280 6 0 0 5250 4 1 1 2 4 0 2 0 0 6202 4 6 0 0 5211 4 284 15 0 0 4772 4 2 0 0 7340 4 6 0 0 5251 4 2 0 0 1586 4 288 26 0 0 4249 4 27 0 1 294 4 6 1 0 5242 4 18 0 1 6 0 292 4 1 0 5254 4 2 1 0 5242 4 6 0 0 5238 4 18 0 1 2 0 296 4 0 0 5240 4 2 0 0 50 4 0 1 2 5242 4 26 0 0 4820 4 300 6 1 0 139 4 2 0 0 51 4 1 1 3 1 0 3 0 0 6000 4 304 2 0 0 58 4 PROCEDURE 158 305 26 0 0 4121 4 6 1 0 5086 4 28 0 0 5234 4 308 26 0 0 4110 4 24 1 2 17 4 6 1 0 6 0 5 1 0 1330 4 312 27 0 1 308 4 24 1 2 21 4 6 1 0 4 0 5 1 0 1330 4 316 27 0 0 332 4 24 0 2 1170 4 24 1 2 17 4 28 0 2 4 0 320 24 1 2 17 4 24 0 2 20 0 18 1 1 4123 0 1 1 3 30 0 324 18 1 1 5 0 28 1 1 5250 4 0 0 3 5210 4 1 1 3 1 0 328 1 0 1 3 0 15 1 0 5243 4 14 1 0 5243 4 24 1 0 343 4 PROCEDURE 159 332 24 0 2 1236 4 26 0 0 5063 4 26 0 0 4249 4 6 0 0 51 4 336 3 1 0 5243 4 1 1 1 1 0 18 0 1 2 0 2 0 0 5234 4 340 2 0 0 58 4 26 0 0 1184 4 24 1 0 326 4 PROCEDURE 160 343 6 1 0 5086 4 344 24 1 2 19 4 28 0 0 4 0 6 0 0 6270 4 27 0 0 359 4 348 0 1 0 5070 4 0 0 3 0 4 0 0 2 0 4 6 1 0 5106 4 352 4 0 0 10 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 356 0 1 1 5070 4 1 1 3 0 0 24 1 0 369 4 0 1 0 5070 4 360 0 0 3 0 4 0 1 2 5108 4 6 1 0 5110 4 4 0 0 10 4 364 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 0 3 5074 4 368 18 1 1 10 0 2 0 0 7344 4 26 0 0 4090 4 26 0 0 4090 4 372 24 0 2 4750 4 18 1 1 4123 0 1 1 3 10 0 18 1 1 5 0 376 24 1 2 19 4 28 1 1 4 0 26 0 0 4090 4 6 0 0 5238 4 380 18 0 1 2 0 4 0 0 5240 4 3 0 0 82 4 24 1 2 19 4 384 3 1 0 5 0 24 1 2 19 4 3 1 0 13 0 6 1 0 5243 4 388 2 0 0 51 4 6 0 0 1586 4 27 0 0 394 4 18 0 1 2 0 392 1 0 1 28 0 14 0 0 51 4 24 0 2 1168 4 28 1 2 5242 4 396 6 1 0 5242 4 24 1 2 19 4 3 1 0 6 0 24 1 2 19 4 400 2 1 0 14 0 1 1 3 2 0 24 1 2 19 4 2 1 0 11 0 404 1 1 3 3 0 24 1 2 19 4 3 1 0 19 0 1 1 3 2 0 408 4 0 0 6278 4 24 1 2 19 4 2 1 0 17 0 6 1 0 4751 4 412 24 1 2 19 4 2 1 0 21 0 26 0 0 4090 4 6 0 0 82 4 416 24 1 2 19 4 2 1 0 5 0 6 1 0 5242 4 24 1 2 19 4 420 2 1 0 6 0 6 0 0 5212 4 24 1 2 19 4 2 1 0 9 0 424 6 1 0 1338 4 24 1 2 19 4 2 1 0 10 0 6 0 0 6270 4 428 24 1 2 19 4 3 1 0 15 0 27 0 1 434 4 6 1 0 5112 4 432 24 1 2 19 4 3 1 0 12 0 24 1 2 19 4 2 1 0 17 0 436 26 0 0 4090 4 24 0 3 1 4 6 0 0 1129 0 2 0 0 4743 4 440 6 0 0 6270 4 27 0 1 458 4 24 0 3 1 4 24 0 2 1084 0 444 18 1 1 4123 0 1 1 3 23 0 18 1 1 5 0 24 1 2 19 4 448 28 0 1 5 0 26 0 0 4090 4 24 0 3 1 4 24 0 2 1107 0 452 18 1 1 4123 0 1 1 3 23 0 18 1 1 5 0 24 1 2 19 4 456 28 0 1 5 0 26 0 0 4090 4 24 0 2 1170 4 24 1 2 19 4 460 28 1 2 4 0 24 0 2 5250 4 18 1 1 4123 0 1 1 3 30 0 464 18 1 1 5 0 24 1 2 19 4 28 1 1 20 0 26 0 0 4090 4 468 6 0 0 4703 4 2 0 0 5979 4 0 0 3 5210 4 PROCEDURE 161 471 6 0 0 58 4 472 27 0 0 556 4 26 0 0 4110 4 1 1 3 0 0 24 1 2 17 4 476 2 1 0 46 0 24 1 2 17 4 2 1 0 48 0 2 0 0 83 4 480 24 1 2 17 4 6 1 0 9 0 26 0 0 1613 4 24 1 0 485 4 484 0 0 0 1217 3 27 0 1 490 4 6 1 0 4760 4 24 1 2 17 4 488 2 1 0 48 0 24 1 0 492 4 24 1 2 17 4 2 1 0 9 0 492 26 0 0 1050 4 26 0 0 4110 4 24 1 2 17 4 6 1 0 6 0 496 5 1 0 1336 4 27 0 0 515 4 24 1 2 17 4 6 1 0 9 0 500 26 0 0 2765 4 18 1 3 2 0 18 1 1 4127 0 24 1 2 17 4 504 4 0 0 7 0 18 1 3 2 0 18 1 1 4123 0 24 1 2 17 4 508 6 1 0 46 0 26 0 0 759 4 27 0 1 514 4 6 1 0 4746 4 512 24 1 2 17 4 2 1 0 46 0 24 1 0 492 4 24 1 2 21 4 516 6 1 0 4 0 5 1 0 1336 4 27 0 0 799 4 24 1 2 17 4 520 24 0 2 9 0 18 1 1 4123 0 1 1 3 30 0 18 1 1 5 0 524 28 1 0 63 4 2 0 0 83 4 6 0 0 63 4 26 0 0 2765 4 528 2 0 0 63 4 26 1 2 62 4 6 0 2 64 4 26 0 0 1613 4 532 24 1 0 534 4 0 0 0 1217 3 27 0 1 539 4 6 1 0 4760 4 536 24 1 2 19 4 2 1 0 48 0 24 1 0 540 4 2 0 2 64 4 540 25 0 2 1 0 24 1 0 530 4 24 0 2 64 4 18 1 1 4123 0 544 1 1 3 14 0 18 1 1 5 0 24 1 2 17 4 28 0 1 11 0 548 24 1 2 17 4 24 0 2 4 0 18 1 1 4123 0 1 1 3 34 0 552 18 1 1 5 0 24 1 2 19 4 28 1 1 4 0 24 1 0 860 4 PROCEDURE 162 556 6 1 0 5086 4 28 1 1 5234 4 26 0 0 4121 4 24 0 2 1236 4 560 26 0 0 5063 4 26 0 0 4249 4 6 0 0 5213 4 2 0 0 53 4 564 6 1 0 5236 4 5 1 0 1332 4 27 0 0 569 4 1 1 3 1 0 568 26 0 0 1206 4 6 0 0 5238 4 1 1 2 256 0 27 0 3 574 4 572 1 1 2 2201 0 27 0 3 577 4 1 1 3 2 0 26 0 0 1206 4 576 26 0 0 4239 4 1 1 3 1 0 2 0 0 83 4 6 0 0 5238 4 580 26 0 0 1613 4 24 1 0 583 4 0 0 0 1217 3 27 0 1 587 4 584 6 1 0 4760 4 2 1 0 5278 4 24 1 0 588 4 2 0 0 5238 4 588 6 1 0 5240 4 1 1 2 1 0 27 0 3 593 4 1 1 2 4 0 592 27 0 3 596 4 1 1 3 3 0 26 0 0 1206 4 26 0 0 4239 4 596 24 0 2 1170 4 24 1 2 19 4 28 1 2 4 0 24 0 2 5250 4 600 18 1 1 4123 0 1 1 3 30 0 18 1 1 5 0 24 1 2 19 4 604 28 1 1 20 0 26 0 0 4090 4 26 0 0 4121 4 6 0 0 6000 4 608 27 0 0 621 4 26 0 0 4195 4 27 0 1 615 4 24 1 2 21 4 612 6 1 0 4 0 5 1 0 1336 4 27 0 1 645 4 26 0 0 4110 4 616 24 1 2 17 4 6 1 0 6 0 5 1 0 1336 4 27 0 1 615 4 620 24 1 0 515 4 24 1 2 21 4 6 1 0 4 0 5 1 0 1336 4 624 27 0 0 799 4 24 1 2 21 4 6 1 0 4 0 18 0 1 4124 0 628 18 0 1 4 0 5 1 0 4734 4 27 0 1 645 4 6 1 0 5114 4 632 4 0 0 6275 4 3 1 0 5070 4 26 1 3 5070 4 1 1 3 1 0 636 0 0 2 5206 4 25 1 1 4096 0 24 0 3 0 4 26 0 2 0 512 640 0 0 0 642 3 0 0 0 33 1 25 1 1 4096 0 24 0 3 0 4 644 26 0 2 0 768 6 1 0 5086 4 28 1 1 5234 4 2 0 0 52 4 648 24 0 2 1246 4 26 0 0 5063 4 26 0 0 4249 4 PROCEDURE 163 651 6 0 0 5214 4 652 2 0 0 53 4 0 1 2 5236 4 26 0 0 4282 4 3 1 0 5236 4 656 18 1 1 4119 0 1 1 2 5 0 27 0 3 673 4 1 1 3 0 0 660 18 1 1 1 0 1 1 2 10 0 27 0 2 673 4 1 1 3 0 0 664 18 1 1 2 0 1 1 2 48 0 27 0 0 671 4 1 1 2 17 0 668 27 0 3 673 4 1 1 2 9 0 27 0 2 673 4 1 1 3 0 0 672 27 1 0 675 4 1 1 3 1 0 26 0 0 1206 4 6 1 0 5238 4 676 1 1 2 1 0 27 0 3 715 4 1 1 2 2 0 27 0 1 682 4 680 1 1 3 38 0 24 1 0 713 4 1 1 2 1 0 27 0 0 700 4 684 1 1 2 21 0 27 0 0 700 4 1 1 2 1 0 27 0 0 723 4 688 1 1 2 1 0 27 0 0 715 4 1 1 2 1 0 27 0 0 723 4 692 1 1 2 1 0 27 0 0 715 4 1 1 2 1 0 27 0 0 723 4 696 1 1 2 1 0 27 0 0 723 4 27 0 2 715 4 24 1 0 723 4 700 6 1 0 5242 4 26 0 0 2765 4 18 1 3 2 0 18 1 1 4126 0 704 2 1 0 5070 4 27 1 0 707 4 1 1 3 1 0 4 1 0 5070 4 708 1 1 2 5 0 27 0 2 719 4 1 1 1 5 0 18 0 3 6 0 712 26 0 0 2759 4 2 1 0 5242 4 24 1 0 723 4 1 1 3 2 0 716 26 0 0 1206 4 26 0 0 4239 4 24 1 0 723 4 1 1 3 4 0 720 26 0 0 1206 4 26 0 0 4239 4 24 1 0 726 4 6 1 0 5242 4 724 27 0 3 719 4 27 0 0 719 4 24 1 0 772 4 1 1 3 5 0 728 26 0 0 1206 4 26 0 0 4239 4 6 1 0 5240 4 27 0 3 734 4 732 1 1 2 256 0 27 0 3 737 4 1 1 3 3 0 26 0 0 1206 4 736 26 0 0 4239 4 6 1 0 5238 4 26 0 0 2765 4 18 1 3 2 0 740 18 1 1 4127 0 4 0 0 5237 4 18 1 3 2 0 18 1 1 4123 0 744 6 1 0 5276 4 26 0 0 759 4 27 0 1 748 4 26 0 0 4239 4 748 24 0 2 1140 4 24 1 2 19 4 28 1 2 6 0 24 0 2 5262 4 752 18 1 1 4123 0 1 1 3 18 0 18 1 1 5 0 24 1 2 19 4 756 28 1 1 32 0 26 0 0 4090 4 24 1 0 606 4 PROCEDURE 164 759 0 0 0 0 0 760 5 1 0 4746 4 27 0 0 770 4 1 1 3 16 0 5 0 0 6009 4 764 27 0 0 770 4 18 1 1 5 0 24 0 1 6009 4 2 0 0 6013 4 768 1 1 3 2 0 7 0 0 6009 4 0 0 3 5210 4 26 0 1 759 4 772 6 0 0 5244 4 27 0 1 778 4 6 0 0 5238 4 1 1 2 25 0 776 27 0 0 727 4 24 1 0 730 4 6 0 0 5238 4 1 1 2 5 0 780 27 0 0 795 4 1 1 2 2 0 27 0 0 795 4 1 1 2 1 0 784 27 0 0 795 4 1 1 2 3 0 27 0 0 795 4 1 1 2 4 0 788 27 0 0 795 4 1 1 2 4 0 27 0 1 727 4 6 0 0 5244 4 792 5 0 0 5215 4 27 0 2 727 4 24 1 0 730 4 6 0 0 5244 4 796 1 1 2 1 0 27 0 0 730 4 24 1 0 727 4 PROCEDURE 165 799 6 0 0 5216 4 800 3 0 0 83 4 2 0 0 53 4 6 1 0 5086 4 28 1 1 5234 4 804 6 0 0 51 4 18 0 1 2 0 2 0 0 5234 4 24 0 2 1288 4 808 26 0 0 5063 4 6 0 0 5238 4 1 1 2 1 0 27 0 3 814 4 812 1 1 2 20 0 27 0 3 817 4 1 1 3 1 0 3 0 0 5238 4 816 26 0 0 1206 4 6 0 0 5238 4 26 0 0 2765 4 2 0 0 63 4 820 0 0 3 5210 4 26 1 2 62 4 6 0 2 5239 4 26 0 0 1613 4 824 24 1 0 826 4 0 0 0 1217 3 27 0 1 830 4 6 1 0 4760 4 828 2 1 0 5278 4 6 0 2 5239 4 3 0 2 64 4 3 0 2 5239 4 832 1 1 2 256 0 27 0 3 836 4 1 1 2 2201 0 27 0 3 838 4 836 1 1 3 2 0 26 0 0 1206 4 25 0 2 1 0 24 1 0 822 4 840 6 0 2 5239 4 27 0 0 844 4 1 1 3 3 0 26 0 0 1206 4 844 24 0 2 5238 4 18 1 1 4123 0 1 1 3 15 0 18 1 1 5 0 848 24 1 2 19 4 28 0 1 9 0 24 0 2 5268 4 18 1 1 4123 0 852 1 1 3 12 0 18 1 1 5 0 24 1 2 19 4 28 1 1 38 0 856 24 0 2 1164 4 24 1 2 19 4 28 1 2 4 0 26 0 0 4121 4 860 24 1 2 21 4 6 1 0 4 0 5 1 0 1340 4 27 0 0 867 4 864 6 0 0 6000 4 27 0 1 891 4 24 1 0 905 4 6 0 0 6000 4 868 27 0 0 875 4 26 0 0 4110 4 24 1 2 17 4 6 1 0 6 0 872 5 1 0 1340 4 27 0 1 875 4 26 0 0 4110 4 6 1 0 5088 4 876 28 1 1 5234 4 24 0 2 1288 4 26 0 0 5063 4 26 0 0 4090 4 880 24 0 2 5238 4 18 1 1 4123 0 1 1 3 7 0 18 1 1 5 0 884 24 1 2 19 4 28 0 1 9 0 6 1 0 1340 4 24 1 2 19 4 888 2 1 0 6 0 26 0 0 4121 4 24 1 0 905 4 26 0 0 4110 4 892 24 1 2 17 4 6 1 0 6 0 5 1 0 1340 4 27 0 1 905 4 896 26 0 0 4090 4 24 1 2 17 4 24 0 2 4 0 18 1 1 4123 0 900 1 1 3 40 0 18 1 1 5 0 24 1 2 19 4 28 1 1 4 0 904 26 0 0 4110 4 PROCEDURE 166 905 6 1 0 5116 4 24 0 3 1 4 2 1 0 2572 0 908 24 0 3 1 4 2 1 0 2570 0 1 1 3 1 0 2 0 0 7334 4 912 6 0 0 63 4 26 0 0 2759 4 2 0 0 1326 4 6 0 0 5217 4 916 2 0 0 53 4 1 1 3 153 0 2 0 0 5973 4 6 1 0 5118 4 920 2 1 0 7356 4 0 0 3 5207 4 26 1 3 62 4 1 1 1 1 0 924 3 0 3 5980 4 25 0 3 1 0 24 1 0 923 4 0 0 3 5210 4 928 1 1 3 4097 0 2 0 0 59 4 6 0 0 6000 4 27 0 1 946 4 932 24 0 1 6276 4 26 0 1 933 4 0 0 0 936 3 0 0 0 939 3 936 24 1 2 21 4 6 1 0 4 0 24 1 0 941 4 24 1 2 21 4 940 6 1 0 8 0 26 0 0 3997 4 6 0 0 88 4 27 0 3 1364 4 944 26 0 0 1032 4 24 1 0 932 4 PROCEDURE 167 946 26 0 0 1118 4 27 0 1 951 4 948 0 1 2 1328 4 24 1 0 1008 4 26 0 0 4110 4 6 0 0 95 4 952 27 0 1 959 4 24 1 2 17 4 6 1 0 5 0 24 1 2 21 4 956 5 1 0 5 0 27 0 0 974 4 27 0 3 1007 4 26 0 0 1129 4 960 6 0 0 88 4 27 0 3 1364 4 24 0 2 1154 4 24 1 2 17 4 964 28 0 2 6 0 24 1 2 17 4 24 0 2 32 0 18 1 1 4123 0 968 1 1 3 16 0 18 1 1 5 0 28 1 1 5262 4 2 1 0 5278 4 972 26 0 0 1061 4 24 1 0 950 4 PROCEDURE 168 974 24 0 1 7327 4 26 0 1 975 4 976 0 0 0 980 3 0 0 0 988 3 0 0 0 1002 3 0 0 0 980 3 980 26 0 0 1129 4 6 0 0 88 4 27 0 3 1364 4 26 0 0 1032 4 984 26 0 0 1118 4 27 0 1 950 4 26 0 0 4110 4 24 1 0 980 4 988 26 0 0 4121 4 26 0 0 1118 4 27 0 1 950 4 26 0 0 4110 4 992 26 0 0 1129 4 6 0 0 88 4 27 0 3 1364 4 24 1 2 17 4 996 6 1 0 5 0 24 1 2 21 4 5 1 0 5 0 27 0 3 1007 4 1000 27 0 0 988 4 24 1 0 991 4 26 0 0 4121 4 26 0 0 1032 4 1004 26 0 0 1118 4 27 0 0 1003 4 24 1 0 951 4 PROCEDURE 169 1007 0 1 2 5236 4 1008 24 1 2 19 4 6 0 0 47 0 5 0 0 4735 4 27 0 0 1017 4 1012 1 1 3 0 0 18 1 1 10 0 24 1 2 19 4 2 1 0 46 0 1016 24 1 0 1020 4 18 1 1 10 0 24 1 2 19 4 2 1 0 44 0 1020 6 1 0 5238 4 24 1 2 19 4 2 1 0 48 0 1 0 1 15 0 1024 1 1 3 7453 0 3 0 0 6272 4 24 1 2 19 4 14 1 0 48 0 1028 26 0 0 4121 4 26 0 0 1118 4 27 0 0 1028 4 24 1 0 951 4 PROCEDURE 170 1032 0 0 0 0 0 6 1 0 5086 4 28 1 1 5234 4 24 0 2 1260 4 1036 26 0 0 5063 4 26 0 0 4249 4 6 0 0 7327 4 1 1 2 4 0 1040 27 0 1 1045 4 24 0 2 1154 4 24 1 2 17 4 28 0 2 6 0 1044 24 1 0 1047 4 6 0 0 51 4 2 0 0 5240 4 26 0 0 4121 4 1048 26 0 0 1061 4 26 0 1 1032 4 PROCEDURE 171 1050 0 0 0 0 0 0 1 0 5070 4 1052 0 0 3 0 4 0 0 2 16 4 6 1 0 5120 4 4 0 0 10 4 1056 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 5070 4 1060 26 0 1 1050 4 PROCEDURE 172 1061 0 0 0 0 0 26 0 0 1505 4 26 1 1 5122 4 1064 26 1 2 5120 4 1 1 3 0 0 2 1 0 5278 4 6 0 1 5236 4 1068 5 0 2 1321 4 27 0 3 1073 4 6 0 2 1320 4 5 0 1 5236 4 1072 27 0 2 1079 4 24 0 3 0 4 6 0 0 2 22 1 1 1 1 0 1076 26 0 0 1206 4 26 0 0 4239 4 24 1 0 1104 4 25 0 1 1 0 1080 24 1 0 1081 4 25 0 2 2 0 24 1 0 1067 4 6 0 0 5238 4 1084 27 0 0 1091 4 7 0 0 5976 4 6 0 0 5976 4 1 1 2 9 0 1088 27 0 3 1091 4 1 1 3 5 0 24 1 0 1076 4 6 0 0 5236 4 1092 26 0 0 1352 4 0 0 2 90 4 15 0 3 122 4 27 0 1 1089 4 1096 0 0 3 5207 4 6 0 0 90 4 7 0 3 122 4 6 0 0 5238 4 1100 27 0 0 1104 4 6 0 0 90 4 18 0 3 10 0 7 0 3 122 4 1104 0 0 3 5210 4 26 0 0 4090 4 24 0 2 1150 4 24 1 2 19 4 1108 28 1 2 4 0 1 1 3 1 0 7 0 0 59 4 24 0 2 5262 4 1112 18 1 1 4123 0 1 1 3 18 0 18 1 1 5 0 24 1 2 19 4 1116 28 1 1 32 0 26 0 1 1061 4 PROCEDURE 173 1118 0 0 0 0 0 26 0 0 4195 4 1120 27 0 0 1128 4 6 0 0 5237 4 18 0 1 4125 0 1 1 2 91 0 1124 27 0 0 1127 4 1 1 3 1 0 2 0 0 95 4 1 1 3 1 0 1128 26 0 1 1118 4 PROCEDURE 174 1129 0 0 0 0 0 6 0 0 6267 4 27 0 0 1136 4 1132 24 1 2 17 4 6 1 0 12 0 26 0 0 3997 4 26 0 1 1129 4 1136 24 1 2 17 4 6 1 0 10 0 24 1 0 1134 4 0 0 0 0 0 SECTION 175 1140 0 5236 3 5 3 0 0 0 5 0 0 5238 3 20485 0 5 0 0 5 0 1144 0 5240 3 20485 0 5 0 0 5 0 0 5242 3 20485 0 5 0 0 5 0 1148 0 5244 3 20485 0 5 0 0 5 1 0 4728 3 1 3 0 0 0 1 0 1152 0 59 3 12548 0 3 1 0 4 0 0 5236 3 16389 0 4 0 0 5 0 1156 0 5237 3 16389 0 4 0 0 5 0 0 5238 3 16389 0 4 0 0 5 0 1160 0 5239 3 16389 0 4 0 0 5 0 0 5240 3 20485 0 5 0 0 5 1 1164 0 5234 3 20485 0 5 0 0 5 0 0 5236 3 5 3 0 0 0 5 1 1168 0 51 3 16389 0 4 0 0 5 1 0 5234 3 20485 0 5 0 0 5 0 1172 0 5236 3 5 3 0 0 0 5 0 0 5238 3 20485 0 5 0 0 5 0 1176 0 5240 3 16389 0 4 0 0 5 0 0 5242 3 5 3 0 0 0 5 0 1180 0 5244 3 40970 2 10 0 0 10 0 0 5244 3 20485 0 5 0 0 5 1 PROCEDURE 176 1184 0 0 0 0 0 6 0 0 5238 4 1 1 2 4096 0 27 0 3 1190 4 1188 1 1 3 65 0 26 0 0 1206 4 6 0 0 5240 4 1 1 2 256 0 1192 27 0 3 1195 4 1 1 3 66 0 26 0 0 1206 4 6 0 0 5238 4 1196 4 0 0 5240 4 27 0 1 1200 4 1 1 3 67 0 26 0 0 1206 4 1200 6 0 0 6000 4 27 0 1 1203 4 2 1 0 5242 4 1 1 3 0 0 1204 2 0 0 52 4 26 0 1 1184 4 PROCEDURE 177 1206 0 0 0 0 0 2 0 0 54 4 1208 26 1 3 52 4 6 1 0 4728 4 4 0 0 54 4 4 0 0 53 4 1212 2 1 3 5272 4 1 1 2 2 0 7 0 0 52 4 1 1 3 0 0 1216 26 0 1 1206 4 PROCEDURE 178 1217 0 0 0 0 0 6 0 0 169 4 26 0 0 2765 4 1220 18 1 3 3 0 18 1 1 4127 0 2 1 0 4812 4 26 1 1 4812 4 1224 27 1 0 1230 4 24 0 3 1 4 6 0 1 24 0 18 0 3 2 0 1228 18 0 1 4125 0 24 1 0 1233 4 0 0 2 4740 4 24 0 3 1 4 1232 15 0 1 24 0 26 0 0 2759 4 26 0 1 1217 4 0 0 0 0 0 SECTION 179 1236 0 5236 3 5 3 0 0 0 5 0 0 5238 3 3 2 0 0 0 3 0 1240 0 5240 3 2 2 0 0 0 2 0 0 5242 3 5 3 0 0 0 5 0 1244 0 5250 3 5 11 0 0 0 5 1 0 98 3 2 0 0 0 0 2 0 1248 0 5236 3 2 3 0 0 0 2 0 0 5238 3 2 2 0 0 0 2 0 1252 0 5240 3 2 2 0 0 0 2 0 0 5242 3 4 2 0 0 0 4 0 1256 0 5244 3 4 2 0 0 0 4 0 0 5262 3 5 3 0 0 0 5 1 1260 0 98 3 6 0 0 0 0 6 0 0 5236 3 2 0 0 0 0 2 0 1264 0 5237 3 4 0 0 0 0 4 0 0 5238 3 1 0 0 0 0 1 0 1268 0 5239 3 2 0 0 0 0 2 0 0 5262 3 5 3 0 0 0 5 1 1272 0 5236 3 5 3 0 0 0 5 0 0 5238 3 3 2 0 0 0 3 0 1276 0 5240 3 2 2 0 0 0 2 0 0 5242 3 2 3 0 0 0 2 0 1280 0 5254 3 3 3 0 0 0 3 0 0 5250 3 1 0 0 0 0 1 0 1284 0 5251 3 3 0 0 0 0 3 0 0 5252 3 1 3 0 0 0 1 1 SECTION 180 1288 0 5236 3 5 3 0 0 0 5 0 0 5238 3 2 0 0 0 0 2 0 1292 0 5239 3 3 0 0 0 0 3 0 0 5240 3 3 0 0 0 0 3 0 1296 0 5241 3 3 0 0 0 0 3 0 0 5242 3 3 0 0 0 0 3 0 1300 0 5243 3 3 0 0 0 0 3 0 0 5244 3 3 0 0 0 0 3 0 1304 0 5245 3 3 0 0 0 0 3 0 0 5246 3 3 0 0 0 0 3 0 1308 0 5247 3 3 0 0 0 0 3 0 0 5248 3 3 0 0 0 0 3 0 1312 0 5249 3 3 0 0 0 0 3 0 0 5250 3 3 0 0 0 0 3 0 1316 0 5251 3 3 0 0 0 0 3 0 0 5252 3 3 0 0 0 0 3 1 SECTION 181 1320 99 0 1 0 4096 0 0 0 1324 1 0 0 0 0 0 0 0 1328 £1£1£ 0 1£1£1 0 65764 0 67696 0 1332 36978 0 55657 0 56554 0 51645 0 1336 16772 0 53585 0 27259 0 67517 0 1340 66955 0 72736 0 SECTION 182 1342 0 0 0 0 1344 0 0 0 0 0 0 0 0 1348 0 0 0 0 0 0 0 0 PROCEDURE 183 1352 0 0 0 0 0 27 0 0 1362 4 18 1 1 4127 0 24 0 3 0 4 1356 2 0 0 6 22 18 1 1 1 0 2 0 0 90 4 1 1 3 1 0 1360 24 0 0 90 4 18 0 3 0 0 2 0 0 90 4 26 0 1 1352 4 SECTION 184 PROCEDURE 185 1364 24 0 3 1 4 24 0 2 74 0 18 1 1 4123 0 1 1 3 1010 0 1368 18 1 1 5 0 28 0 0 170 4 6 1 0 5124 4 28 1 1 5326 4 1372 1 1 3 2 0 2 0 0 7328 4 1 1 3 1 0 2 0 0 6271 4 1376 6 0 0 6000 4 3 1 0 58 4 27 0 0 1389 4 0 1 0 5070 4 1380 0 0 3 0 4 24 1 2 17 4 24 0 2 6 0 3 0 0 7354 4 1384 24 1 2 17 4 4 1 0 5 0 2 0 0 7355 4 0 1 1 5070 4 1388 24 1 0 2935 4 1 1 3 1 0 2 0 0 83 4 24 1 2 21 4 1392 6 1 0 4 0 18 0 1 4124 0 18 0 1 4 0 5 1 0 4734 4 1396 27 0 0 4829 4 24 1 2 21 4 6 1 0 4 0 5 1 0 4766 4 1400 27 0 0 4829 4 24 0 1 6276 4 26 0 1 1402 4 0 0 0 1405 3 1404 0 0 0 1408 3 24 1 2 21 4 6 1 0 4 0 24 1 0 1410 4 1408 24 1 2 21 4 6 1 0 8 0 26 0 0 3997 4 26 0 0 3806 4 1412 26 0 0 1415 4 26 0 0 4121 4 24 1 0 1391 4 PROCEDURE 186 1415 0 0 0 0 0 1416 6 0 0 88 4 27 0 0 1517 4 27 0 2 1533 4 6 0 0 111 4 1420 27 0 0 1422 4 26 0 0 4243 4 6 0 0 104 4 1 1 2 85 0 1424 27 0 0 1427 4 1 1 3 0 0 2 1 0 110 4 2 0 0 59 4 1428 2 0 0 93 4 6 0 0 6000 4 27 0 1 1436 4 24 1 2 21 4 1432 6 1 0 51 0 27 0 0 1436 4 6 1 0 4760 4 2 1 0 5278 4 1436 6 0 0 6271 4 1 1 2 4 0 27 0 0 1485 4 6 0 0 5973 4 1440 1 1 1 1 0 3 0 0 5973 4 3 0 0 50 4 2 0 0 54 4 PROCEDURE 187 1444 6 1 0 5243 4 18 0 1 4126 0 3 0 0 5248 4 26 0 0 1613 4 1448 24 1 0 1450 4 0 0 0 1667 3 5 0 0 5973 4 27 0 0 1454 4 1452 6 1 0 4760 4 2 1 0 5278 4 24 0 2 4426 4 28 1 2 5242 4 1456 6 0 0 6270 4 27 0 1 1462 4 6 0 0 5248 4 5 0 0 54 4 1460 27 0 0 1462 4 26 0 0 1488 4 6 0 0 5973 4 1 1 2 256 0 1464 27 0 1 1468 4 6 0 0 50 4 2 0 0 64 4 24 1 0 1478 4 1468 24 0 1 7356 4 6 0 0 64 4 5 0 0 50 4 27 0 1 1485 4 1472 6 0 0 5973 4 1 1 2 1 0 26 0 0 2765 4 18 0 1 2 0 1476 24 0 1 7356 4 7 0 0 5979 4 0 0 3 5207 4 1 1 3 1 0 1480 7 0 0 5970 4 0 0 3 5210 4 23 0 0 1 0 0 0 0 7356 3 1484 24 1 0 1485 4 1 1 3 1 0 2 0 0 7328 4 24 1 0 1533 4 PROCEDURE 188 1488 0 0 0 0 0 6 0 0 5973 4 26 0 0 2765 4 1 0 1 0 0 1492 18 1 1 4119 0 13 0 0 5218 4 2 0 0 4812 4 18 1 1 9 0 1496 2 0 0 4813 4 0 0 2 4792 4 24 0 1 4813 4 18 1 3 0 0 1500 6 0 0 4790 4 24 0 1 4812 4 14 0 0 6151 4 0 0 3 5210 4 1504 26 0 1 1488 4 PROCEDURE 189 1505 0 0 0 0 0 6 1 0 5276 4 5 1 0 4746 4 1508 27 0 0 1515 4 6 1 0 5276 4 5 1 0 5126 4 27 0 0 1515 4 1512 6 1 0 5276 4 5 1 0 4744 4 27 0 1 1516 4 2 1 0 5276 4 1516 26 0 1 1505 4 PROCEDURE 190 1517 6 0 0 6000 4 27 0 1 1533 4 0 1 2 5236 4 1520 26 0 0 4820 4 6 1 0 139 4 5 0 0 93 4 27 0 0 1529 4 1524 6 0 0 7328 4 1 1 2 6 0 27 0 2 1533 4 6 1 0 5128 4 1528 2 1 0 5278 4 6 1 0 139 4 4 0 0 140 4 1 1 1 1 0 1532 2 0 0 93 4 PROCEDURE 191 1533 26 0 0 1505 4 6 0 0 83 4 27 0 0 1540 4 1536 6 0 0 6000 4 27 0 0 1540 4 26 0 0 1488 4 1 1 3 0 0 1540 24 0 1 7328 4 26 0 1 1541 4 0 0 0 1756 3 0 0 0 1938 3 1544 0 0 0 3607 3 0 0 0 3189 3 0 0 0 1547 3 6 0 0 5243 4 1548 0 0 2 5244 4 27 1 0 1555 4 26 0 0 3601 4 6 0 0 54 4 1552 2 0 0 5243 4 26 0 0 3625 4 24 1 0 2804 4 24 0 1 7329 4 1556 26 0 1 1556 4 0 0 0 2804 3 0 0 0 1559 3 26 0 0 1578 4 1560 26 0 0 4239 4 24 1 0 2804 4 PROCEDURE 192 1562 0 0 0 0 0 2 0 0 2765 4 1564 1 1 3 1 0 18 1 1 4118 0 15 0 0 2765 4 27 0 0 1569 4 1568 26 0 0 1582 4 26 0 1 1562 4 PROCEDURE 193 1570 0 0 0 0 0 1 1 3 84 0 1572 26 0 0 1594 4 26 0 1 1570 4 PROCEDURE 194 1574 0 0 0 0 0 1 1 3 100 0 1576 26 0 0 1594 4 26 0 1 1574 4 PROCEDURE 195 1578 0 0 0 0 0 1 1 3 105 0 1580 26 0 0 1594 4 26 0 1 1578 4 PROCEDURE 196 1582 0 0 0 0 0 1 1 3 89 0 1584 26 0 0 1594 4 26 0 1 1582 4 PROCEDURE 197 1586 0 0 0 0 0 1 1 3 99 0 1588 26 0 0 1594 4 26 0 1 1586 4 PROCEDURE 198 1590 0 0 0 0 0 1 1 3 115 0 1592 26 0 0 1594 4 26 0 1 1590 4 PROCEDURE 199 1594 0 0 0 0 0 18 1 1 4118 0 1596 6 1 0 5278 4 18 0 1 4126 0 5 1 0 5130 4 27 0 0 1612 4 1600 6 1 0 5278 4 5 1 0 5128 4 27 0 1 1604 4 2 1 0 5278 4 1604 1 1 3 0 0 18 1 1 10 0 24 1 2 165 4 18 0 1 0 0 1608 7 1 0 5278 4 1 1 3 2 0 4 0 0 165 4 2 0 0 165 4 1612 26 0 1 1594 4 PROCEDURE 200 1613 0 0 0 0 0 3 0 0 169 4 3 0 0 168 4 1616 1 1 2 256 0 27 0 3 1640 4 1 1 2 2201 0 27 0 2 1640 4 1620 6 0 0 83 4 27 0 1 1632 4 6 0 0 6266 4 27 0 1 1632 4 1624 6 0 0 6270 4 27 0 1 1632 4 26 0 0 1641 4 27 0 1 1630 4 1628 26 0 0 1578 4 24 1 0 1632 4 3 0 0 169 4 2 0 0 168 4 1632 24 0 3 1613 4 24 1 2 1 0 26 0 0 0 0 27 0 1 1639 4 1636 6 1 0 4760 4 2 1 0 5278 4 26 0 1 1613 4 3 0 0 169 4 1640 26 0 1 1613 4 PROCEDURE 201 1641 0 0 0 0 0 6 0 0 6268 4 27 0 0 1646 4 1644 6 0 0 169 4 24 1 0 1664 4 6 0 0 169 4 1 1 2 1536 0 1648 27 0 2 1665 4 6 0 0 169 4 26 0 0 2765 4 18 1 3 3 0 1652 18 1 1 4127 0 2 0 0 2765 4 27 1 0 1660 4 24 0 1 2765 4 1656 6 0 0 5456 4 18 0 3 2 0 18 0 1 4125 0 24 1 0 1663 4 1660 0 0 2 4740 4 24 0 1 2765 4 15 0 0 5456 4 26 0 0 2759 4 1664 26 0 1 1641 4 1 1 3 0 0 26 0 1 1641 4 PROCEDURE 202 1667 0 0 0 0 0 1668 6 0 0 169 4 26 0 0 2765 4 18 1 3 3 0 18 1 1 4127 0 1672 2 0 0 2765 4 27 1 0 1679 4 24 0 1 2765 4 6 0 0 120 4 1676 18 0 3 2 0 18 0 1 4125 0 24 1 0 1682 4 0 0 2 4740 4 1680 24 0 1 2765 4 15 0 0 120 4 26 0 0 2759 4 26 0 1 1667 4 PROCEDURE 203 1684 0 0 0 0 0 26 1 1 5132 4 2 0 0 108 4 2 0 0 96 4 1688 1 0 1 28 0 15 0 0 108 4 2 0 0 80 4 15 0 1 5760 4 1692 27 0 0 1699 4 5 0 0 80 4 27 0 0 1702 4 27 0 2 1699 4 1696 1 1 3 0 0 25 0 1 2 0 24 1 0 1691 4 6 0 0 96 4 1700 4 0 0 108 4 26 0 1 1684 4 6 0 0 108 4 5 0 1 5760 4 1704 27 0 3 1696 4 6 0 1 5761 4 7 0 0 96 4 24 1 0 1696 4 PROCEDURE 204 1708 0 0 0 0 0 26 1 1 5134 4 1 1 3 0 0 2 0 0 96 4 1712 1 0 1 28 0 15 0 0 108 4 2 0 0 80 4 15 0 1 620 4 1716 27 0 0 1729 4 5 0 0 80 4 27 0 3 1726 4 27 0 1 1729 4 1720 6 0 1 620 4 5 0 0 108 4 27 0 0 1724 4 27 0 2 1738 4 1724 6 0 1 621 4 7 0 0 96 4 1 1 3 0 0 25 0 1 2 0 1728 24 1 0 1715 4 1 0 1 3 0 6 0 0 96 4 15 0 0 108 4 1732 3 0 0 108 4 1 1 2 256 0 27 0 3 1737 4 6 1 0 4762 4 1736 2 1 0 5278 4 26 0 1 1708 4 4 0 1 621 4 27 0 0 1741 4 1740 27 0 2 1729 4 6 0 0 5241 4 5 0 0 5219 4 27 0 0 1753 4 1744 6 0 0 104 4 1 1 2 83 0 27 0 0 1729 4 1 1 2 1 0 1748 27 0 0 1729 4 1 1 2 1 0 27 0 0 1729 4 1 1 2 1 0 1752 27 0 0 1729 4 6 1 0 4764 4 2 1 0 5278 4 24 1 0 1729 4 PROCEDURE 205 1756 6 1 0 5240 4 5 1 0 4726 4 27 0 1 1761 4 2 1 0 140 4 1760 24 1 0 2804 4 6 1 0 5240 4 5 1 0 4722 4 27 0 1 1780 4 1764 6 1 0 5136 4 2 1 0 140 4 0 1 2 5250 4 26 0 0 4820 4 1768 6 1 0 139 4 27 0 3 1774 4 3 0 0 109 4 27 0 0 1774 4 1772 1 1 2 5 0 27 0 3 1777 4 1 1 3 5 0 2 0 0 7335 4 1776 24 1 0 3803 4 PROCEDURE 206 1777 6 0 0 109 4 2 0 0 7335 4 24 1 0 2804 4 1780 6 1 0 5240 4 5 1 0 4724 4 27 0 1 1802 4 6 1 0 5138 4 1784 28 0 0 5466 4 0 0 2 4711 4 15 1 0 5251 4 18 0 1 4124 0 1788 3 0 0 140 4 27 0 1 1791 4 1 1 3 48 0 18 0 1 3 0 1792 1 0 1 24 0 14 0 0 5251 4 24 1 0 1797 4 1 1 3 1 0 1796 3 0 0 140 4 1 1 3 1 0 2 0 0 7333 4 1 1 3 4 0 1800 2 0 0 7328 4 24 1 0 2804 4 6 1 0 5240 4 5 1 0 4748 4 1804 27 0 1 1809 4 1 1 3 5 0 2 0 0 7328 4 2 1 0 140 4 1808 24 1 0 2804 4 PROCEDURE 207 1809 6 0 0 141 4 27 0 1 1813 4 1 1 3 2 0 1812 24 1 0 1814 4 1 1 3 3 0 2 0 0 7328 4 5 0 0 88 4 1816 27 0 3 2804 4 1 1 3 2 0 2 0 0 59 4 24 1 0 1534 4 PROCEDURE 208 1820 0 0 0 0 0 0 1 2 5242 4 26 0 0 4820 4 1 1 2 103 0 1824 3 0 0 3587 4 27 0 1 1828 4 6 0 0 50 4 2 1 0 139 4 1828 6 1 0 139 4 3 0 0 54 4 1 1 2 256 0 27 0 3 1850 4 1832 1 1 2 2201 0 27 0 2 1850 4 6 1 0 5244 4 2 0 0 4195 4 1836 26 0 0 1851 4 6 0 0 6270 4 27 0 1 1846 4 6 1 0 139 4 1840 5 0 0 54 4 27 0 1 1845 4 6 1 0 5244 4 5 0 0 4195 4 1844 27 0 0 1846 4 26 0 0 1488 4 6 1 0 139 4 2 0 0 54 4 1848 24 0 2 4426 4 28 1 2 5242 4 26 0 1 1820 4 PROCEDURE 209 1851 0 0 0 0 0 1852 6 0 0 6000 4 27 0 1 1857 4 1 1 3 2 0 7 1 0 5244 4 1856 24 1 0 1899 4 6 0 0 6266 4 0 0 2 83 4 27 1 1 1899 4 1860 6 0 0 3587 4 27 0 0 1899 4 6 0 0 6270 4 27 0 1 1899 4 1864 6 1 0 139 4 2 0 0 169 4 26 0 0 1641 4 27 0 1 1887 4 1868 6 1 0 139 4 18 0 1 2 0 4 0 0 5244 4 26 1 1 5140 4 1872 2 0 0 2765 4 6 0 1 5921 4 27 0 0 1879 4 5 0 0 2765 4 1876 27 0 0 1881 4 25 0 1 2 0 24 1 0 1873 4 26 0 0 1578 4 1880 24 1 0 1899 4 6 0 1 5920 4 18 1 1 4126 0 2 1 0 139 4 1884 18 1 1 2 0 2 0 0 5244 4 24 1 0 1899 4 3 1 0 139 4 1888 18 0 1 2 0 4 0 0 5244 4 2 0 0 1684 4 6 1 0 5244 4 1892 27 0 3 1899 4 6 0 0 1684 4 26 0 0 1684 4 18 1 1 4126 0 1896 2 1 0 139 4 18 1 1 2 0 2 0 0 5244 4 6 1 0 139 4 1900 3 0 0 168 4 2 0 0 169 4 6 0 0 3587 4 27 0 1 1906 4 1904 6 1 0 139 4 24 1 0 1928 4 26 0 0 1667 4 27 0 1 1928 4 1908 6 1 0 139 4 18 0 1 2 0 4 0 0 5244 4 26 1 1 5142 4 1912 2 0 0 2765 4 6 0 1 1080 4 27 0 0 1919 4 5 0 0 2765 4 1916 27 0 0 1922 4 25 0 1 2 0 24 1 0 1913 4 6 1 0 4760 4 1920 2 1 0 5278 4 24 1 0 1937 4 6 0 1 1081 4 18 1 1 4126 0 1924 2 1 0 139 4 18 1 1 2 0 2 0 0 5244 4 24 1 0 1937 4 1928 3 1 0 139 4 18 0 1 2 0 4 0 0 5244 4 2 0 0 108 4 1932 6 1 0 5244 4 27 0 3 1937 4 26 0 0 1708 4 6 0 0 108 4 1936 2 0 0 5244 4 26 0 1 1851 4 PROCEDURE 210 1938 26 0 0 1820 4 6 0 0 54 4 1940 1 1 2 256 0 27 0 3 1946 4 1 1 2 2201 0 27 0 2 1946 4 1944 6 0 0 168 4 2 0 0 5256 4 6 0 0 5241 4 5 0 0 5219 4 1948 27 0 1 1964 4 6 1 0 110 4 27 0 0 2001 4 24 1 2 105 4 1952 0 0 2 1 0 6 0 0 4702 4 2 0 0 4639 4 0 0 3 5207 4 1956 6 0 0 104 4 1 1 2 43 0 27 0 0 1961 4 1 1 1 1 0 1960 27 0 1 1998 4 1 1 3 1 0 7 0 0 105 4 24 1 0 1998 4 1964 6 0 0 111 4 27 0 0 1967 4 26 0 0 4243 4 0 1 2 5240 4 1968 26 0 0 4820 4 6 1 0 139 4 27 0 3 2001 4 1 1 2 345 0 1972 27 0 2 2001 4 6 1 0 139 4 26 0 0 2765 4 3 0 0 104 4 1976 1 1 2 65 0 27 0 2 1990 4 6 0 0 104 4 18 0 1 3 0 1980 1 0 0 4606 4 18 1 1 10 0 3 0 0 105 4 6 0 0 104 4 1984 1 1 2 55 0 27 0 1 1996 4 6 1 0 5250 4 27 0 1 1994 4 1988 6 0 0 4700 4 24 1 0 1995 4 6 0 0 104 4 18 0 1 3 0 1992 1 0 0 4648 4 24 1 0 1981 4 6 0 0 4702 4 2 0 0 4639 4 1996 24 1 2 105 4 0 0 2 0 0 1 1 3 0 0 15 0 0 4712 4 2000 27 0 1 2005 4 PROCEDURE 211 2001 6 1 0 5144 4 2 1 0 5278 4 26 0 0 4239 4 2004 24 1 0 2804 4 18 0 1 4126 0 2 0 0 7332 4 15 0 0 4713 4 2008 18 0 1 4127 0 2 0 0 7331 4 15 0 0 4714 4 2 0 0 7330 4 2012 15 0 0 4715 4 2 0 0 111 4 15 0 0 4716 4 2 0 0 110 4 2016 2 0 0 109 4 PROCEDURE 212 2017 0 0 3 5210 4 6 0 0 5244 4 5 0 0 5220 4 2020 27 0 2 2023 4 6 0 0 5245 4 27 0 0 2024 4 26 0 0 1582 4 2024 6 0 0 104 4 1 1 2 100 0 27 0 3 2041 4 6 0 0 104 4 2028 1 1 2 132 0 27 0 2 2041 4 6 1 0 5246 4 27 0 0 2035 4 2032 1 1 2 1 0 27 0 0 2035 4 26 0 0 1570 4 6 1 0 5248 4 2036 27 0 0 2098 4 1 1 2 4 0 27 0 3 2098 4 26 0 0 1574 4 2040 24 1 0 2098 4 6 1 0 5246 4 27 0 0 2050 4 6 0 0 5244 4 2044 26 0 0 1562 4 PROCEDURE 213 2045 6 1 0 5246 4 27 0 3 2049 4 1 1 2 3 0 2048 27 0 3 2050 4 26 0 0 1570 4 6 1 0 5248 4 27 0 0 2063 4 2052 27 0 3 2061 4 1 1 2 33 0 27 0 2 2061 4 6 0 0 5248 4 2056 1 1 2 4 0 27 0 2 2063 4 1 1 3 1 0 2 0 0 5974 4 2060 24 1 0 2063 4 26 0 0 1574 4 24 1 0 2003 4 PROCEDURE 214 2063 24 0 1 7330 4 2064 26 0 1 2064 4 0 0 0 2098 3 0 0 0 2081 3 0 0 0 2086 3 2068 0 0 0 2082 3 0 0 0 2088 3 0 0 0 2089 3 0 0 0 2072 3 2072 6 0 0 5250 4 27 0 0 2078 4 6 1 0 5243 4 27 0 0 2081 4 2076 26 0 0 1578 4 24 1 0 2081 4 6 1 0 5243 4 27 0 1 2081 4 2080 26 0 0 1586 4 PROCEDURE 215 2081 26 0 0 2093 4 6 1 0 5248 4 27 0 0 2098 4 2084 26 0 0 1574 4 24 1 0 2098 4 26 0 0 2093 4 24 1 0 2098 4 2088 26 0 0 2093 4 6 1 0 5248 4 27 0 1 2098 4 26 0 0 4239 4 2092 24 1 0 2084 4 PROCEDURE 216 2093 0 0 0 0 0 6 1 0 5246 4 27 0 0 2097 4 2096 26 0 0 1570 4 26 0 1 2093 4 PROCEDURE 217 2098 24 0 1 7331 4 26 0 1 2099 4 2100 0 0 0 2107 3 0 0 0 2165 3 0 0 0 2171 3 0 0 0 2345 3 2104 0 0 0 2365 3 0 0 0 2400 3 0 0 0 2163 3 PROCEDURE 218 2107 6 0 0 54 4 2108 27 0 3 2141 4 27 0 1 2125 4 6 0 0 5248 4 27 0 1 2154 4 2112 6 1 0 5244 4 27 0 3 2118 4 27 0 1 2160 4 6 0 0 104 4 2116 27 0 0 2141 4 24 1 0 2160 4 1 1 3 0 0 1 0 1 1 0 2120 15 0 0 5244 4 1 1 2 12 0 27 0 0 2160 4 26 0 0 4239 4 2124 24 1 0 2169 4 1 1 2 256 0 27 0 3 2136 4 1 1 2 2304 0 2128 27 0 3 2160 4 27 0 0 2141 4 1 1 2 33 0 27 0 2 2141 4 2132 6 0 0 104 4 1 1 2 80 0 27 0 0 2141 4 24 1 0 2160 4 2136 6 0 0 54 4 26 0 0 1352 4 0 0 2 90 4 15 0 3 122 4 2140 27 0 1 2160 4 26 0 0 4239 4 26 0 0 1578 4 6 0 0 7331 4 2144 1 1 2 5 0 27 0 0 2398 4 6 0 0 104 4 1 1 2 40 0 2148 27 0 0 2398 4 1 1 2 93 0 27 0 0 2398 4 1 1 2 1 0 2152 27 0 0 2398 4 24 1 0 2405 4 6 0 0 104 4 1 1 2 93 0 2156 27 0 0 2141 4 6 0 0 104 4 1 1 2 97 0 27 0 0 2141 4 2160 6 0 0 109 4 27 0 0 2405 4 24 1 0 2368 4 26 0 0 3625 4 2164 24 1 0 2405 4 PROCEDURE 219 2165 6 1 0 5243 4 27 0 1 2142 4 6 1 0 5244 4 2168 27 0 0 2405 4 26 0 0 1582 4 24 1 0 2405 4 PROCEDURE 220 2171 6 0 0 104 4 2172 1 1 2 40 0 27 0 1 2181 4 6 1 0 110 4 27 0 0 2181 4 2176 6 0 0 5241 4 5 0 0 5219 4 27 0 1 2181 4 6 1 0 5246 4 2180 27 0 1 2107 4 6 0 0 6009 4 18 0 1 5 0 2 1 0 7360 4 2184 6 0 0 4708 4 2 0 0 4628 4 24 0 1 7360 4 6 0 0 6013 4 2188 18 1 3 2 0 18 1 1 4126 0 27 0 0 2203 4 4 0 0 5221 4 2192 18 0 1 1 0 5 0 0 5243 4 27 0 0 2212 4 23 0 0 2 0 2196 0 0 0 7360 3 24 1 0 2186 4 6 0 0 5241 4 5 0 0 5219 4 2200 27 0 1 2203 4 26 0 0 4239 4 26 0 0 4243 4 26 0 0 1578 4 2204 26 0 0 4239 4 6 0 0 104 4 1 1 2 42 0 27 0 0 2210 4 2208 1 1 2 1 0 27 0 1 2506 4 2 1 0 110 4 24 1 0 2506 4 2212 0 0 3 5207 4 6 0 0 104 4 1 1 2 132 0 27 0 3 2220 4 2216 1 1 2 3 0 27 0 3 2329 4 24 1 0 2405 4 27 0 0 2405 4 2220 1 1 3 0 0 18 1 3 6 0 1 1 2 5 0 27 0 3 2278 4 2224 27 0 0 2271 4 1 1 2 1 0 27 0 0 2260 4 1 1 2 3 0 2228 27 0 3 2282 4 27 0 0 2278 4 1 1 2 1 0 27 0 0 2260 4 2232 1 1 2 1 0 27 0 0 2282 4 1 1 2 1 0 27 0 0 2260 4 2236 1 1 2 1 0 27 0 0 2325 4 1 1 2 2 0 27 0 0 2260 4 2240 1 1 2 1 0 27 0 0 2278 4 1 1 2 2 0 27 0 0 2325 4 2244 1 1 2 1 0 27 0 0 2278 4 1 1 2 1 0 27 0 0 2255 4 2248 1 1 2 2 0 27 0 0 2314 4 1 1 2 2 0 27 0 0 2267 4 2252 1 1 2 1 0 27 0 1 2319 4 24 1 0 2278 4 6 0 0 104 4 2256 1 1 2 40 0 27 0 0 2333 4 1 1 2 1 0 27 0 0 2319 4 PROCEDURE 221 2260 6 0 0 104 4 1 1 2 42 0 27 0 0 2506 4 6 0 0 104 4 2264 1 1 2 42 0 27 0 3 2506 4 24 1 0 2319 4 6 0 0 104 4 2268 1 1 2 42 0 27 0 0 2506 4 24 1 0 2319 4 6 0 0 104 4 2272 1 1 2 44 0 27 0 1 2260 4 6 0 0 5250 4 1 1 2 3 0 2276 27 0 0 2506 4 24 1 0 2427 4 6 0 0 104 4 1 1 2 43 0 2280 27 0 0 2506 4 24 1 0 2263 4 6 0 0 104 4 1 1 2 48 0 2284 27 0 0 2309 4 6 0 0 104 4 1 1 2 41 0 27 0 0 2309 4 2288 6 0 0 104 4 1 1 2 44 0 27 0 0 2304 4 1 1 2 2 0 2292 27 0 0 2295 4 1 1 2 1 0 27 0 1 2405 4 6 1 0 5244 4 2296 27 0 3 2302 4 1 0 1 0 0 18 1 3 3 0 18 1 1 4127 0 2300 1 1 3 0 0 27 1 0 2405 4 26 0 0 1582 4 24 1 0 2405 4 2304 6 1 0 5250 4 1 1 2 2 0 27 0 0 2506 4 1 1 2 1 0 2308 24 1 0 2425 4 6 1 0 5250 4 27 0 3 2428 4 1 1 2 4 0 2312 27 0 2 2428 4 24 1 0 2506 4 6 0 0 4701 4 2 0 0 4628 4 2316 6 0 0 104 4 1 1 2 41 0 27 0 1 2278 4 6 1 0 5144 4 2320 2 1 0 5278 4 26 0 0 4239 4 24 0 3 1 4 2 1 0 124 0 2324 24 1 0 2205 4 6 0 0 104 4 1 1 2 44 0 27 0 3 2506 4 2328 24 1 0 2319 4 PROCEDURE 222 2329 1 1 3 0 0 18 1 3 6 0 1 1 2 17 0 2332 27 0 1 2319 4 6 1 0 5244 4 27 0 3 2123 4 27 0 0 2123 4 2336 1 1 2 256 0 27 0 2 2123 4 6 1 0 5244 4 26 0 0 1352 4 2340 0 0 2 90 4 18 1 3 10 0 15 0 3 122 4 27 0 0 2123 4 2344 24 1 0 2381 4 PROCEDURE 223 PROCEDURE 224 2345 6 0 0 54 4 27 0 1 2349 4 6 0 0 5248 4 2348 27 0 1 2357 4 1 1 2 256 0 27 0 3 2141 4 1 1 2 2201 0 2352 27 0 3 2357 4 1 1 2 2 0 27 0 3 2141 4 1 1 2 32 0 2356 27 0 2 2141 4 6 0 0 104 4 1 1 2 70 0 27 0 3 2362 4 2360 1 1 2 10 0 27 0 3 2405 4 6 0 0 5244 4 26 0 0 1562 4 2364 24 1 0 2405 4 PROCEDURE 225 2365 1 1 3 1 0 2 0 0 109 4 24 1 0 2107 4 2368 1 1 3 0 0 0 0 2 90 4 18 1 3 10 0 15 0 3 122 4 2372 27 0 0 2398 4 1 1 3 0 0 0 0 2 4814 4 24 0 1 7360 4 2376 15 0 0 6013 4 1 1 2 3 0 27 0 0 2405 4 1 1 2 1 0 2380 27 0 0 2405 4 24 0 3 0 4 6 0 0 6 22 1 0 1 0 0 2384 18 1 3 3 0 18 1 1 4127 0 24 0 3 0 4 2 0 0 6 22 2388 27 1 0 2393 4 0 0 2 90 4 6 0 0 90 4 18 1 3 10 0 2392 24 1 0 2395 4 6 0 0 90 4 0 0 2 90 4 14 0 3 150 4 2396 0 0 3 5210 4 24 1 0 2405 4 26 0 0 4243 4 24 1 0 2203 4 PROCEDURE 226 2400 6 0 0 54 4 1 1 2 256 0 27 0 3 2141 4 1 1 2 2304 0 2404 27 0 2 2141 4 PROCEDURE 227 2405 6 1 0 5252 4 27 0 1 2427 4 0 1 2 5250 4 2408 18 1 1 10 0 2 1 0 5252 4 24 0 1 7332 4 26 0 1 2411 4 2412 0 0 0 2506 3 0 0 0 2453 3 0 0 0 2430 3 0 0 0 2433 3 2416 0 0 0 2438 3 0 0 0 2448 3 0 0 0 2463 3 0 0 0 2472 3 2420 0 0 0 2475 3 0 0 0 2487 3 0 0 0 2490 3 0 0 0 2492 3 2424 0 0 0 2502 3 PROCEDURE 228 2425 27 0 0 2506 4 24 1 0 2428 4 26 0 0 4239 4 2428 26 0 0 1586 4 24 1 0 2506 4 PROCEDURE 229 2430 6 1 0 5250 4 27 0 2 2506 4 2432 24 1 0 2427 4 PROCEDURE 230 2433 6 1 0 5252 4 27 0 0 2428 4 1 1 2 50 0 2436 27 0 2 2428 4 24 1 0 2506 4 PROCEDURE 231 2438 26 1 3 5146 4 1 1 3 0 0 2440 0 1 2 5250 4 18 1 1 1 0 27 0 0 2445 4 1 1 2 1 0 2444 27 0 1 2428 4 25 0 3 1 0 24 1 0 2441 4 24 1 0 2506 4 PROCEDURE 232 2448 6 1 0 5250 4 27 0 3 2427 4 1 1 2 22 0 27 0 2 2428 4 2452 24 1 0 2506 4 PROCEDURE 233 2453 6 0 0 111 4 27 0 1 2458 4 6 0 0 96 4 2456 0 0 2 5252 4 27 1 0 2428 4 6 1 0 5252 4 3 0 0 96 4 2460 5 0 0 5220 4 27 0 2 2428 4 24 1 0 2506 4 6 1 0 5250 4 2464 27 0 3 2427 4 6 0 0 5246 4 27 0 0 2468 4 6 0 0 5222 4 2468 4 0 0 5222 4 5 1 0 5250 4 27 0 3 2427 4 24 1 0 2506 4 PROCEDURE 234 2472 6 1 0 5250 4 18 0 1 4123 0 24 1 0 2425 4 6 0 0 104 4 2476 1 1 2 54 0 27 0 1 2484 4 6 1 0 5250 4 27 0 3 2427 4 2480 27 0 0 2504 4 1 1 3 0 0 2 1 0 110 4 24 1 0 2465 4 2484 6 1 0 5252 4 5 0 0 5215 4 24 1 0 2436 4 6 1 0 5250 4 2488 27 0 0 2428 4 24 1 0 2506 4 6 1 0 5250 4 24 1 0 2425 4 2492 6 1 0 5250 4 27 0 3 2428 4 1 1 2 256 0 27 0 2 2427 4 2496 6 0 0 104 4 1 1 2 83 0 27 0 1 2506 4 6 0 0 5250 4 2500 27 0 0 2427 4 24 1 0 2506 4 6 1 0 5250 4 27 0 1 2506 4 2504 1 1 3 1 0 2 0 0 111 4 PROCEDURE 235 2506 0 0 3 5207 4 6 0 0 104 4 2508 1 1 2 20 0 27 0 3 2804 4 1 1 2 10 0 27 0 3 2521 4 2512 1 1 2 21 0 27 0 3 2804 4 1 1 2 15 0 27 0 0 2518 4 2516 1 1 2 1 0 27 0 1 2523 4 6 0 0 5223 4 2 0 0 5975 4 2520 24 1 0 2523 4 2 0 0 5975 4 24 1 0 2804 4 6 0 0 5248 4 2524 26 0 0 2765 4 3 0 0 138 4 27 0 0 2551 4 1 1 2 4 0 2528 27 0 3 2551 4 6 0 0 104 4 1 1 2 59 0 27 0 0 2536 4 2532 1 1 2 31 0 27 0 3 2551 4 1 1 2 4 0 27 0 2 2551 4 2536 26 1 3 5386 4 1 1 3 0 0 1 0 1 3 0 15 0 3 5388 4 2540 27 0 0 2545 4 5 0 0 138 4 27 0 0 2551 4 25 0 3 1 0 2544 24 1 0 2537 4 6 0 0 5970 4 18 0 1 4 0 4 0 0 138 4 2548 2 0 3 5388 4 1 1 3 1 0 7 0 0 5387 4 PROCEDURE 236 2551 0 0 3 5207 4 PROCEDURE 237 2552 6 0 0 104 4 1 1 2 70 0 27 0 3 2720 4 1 1 2 7 0 2556 27 0 3 2626 4 1 1 2 2 0 27 0 0 2626 4 27 0 2 2564 4 2560 6 1 0 5240 4 5 1 0 5148 4 27 0 1 2626 4 24 1 0 2804 4 2564 1 1 2 6 0 27 0 0 2579 4 1 1 2 2 0 27 0 0 2572 4 2568 1 1 2 7 0 27 0 0 2616 4 1 1 2 3 0 27 0 1 2576 4 2572 6 0 0 5241 4 5 0 0 5219 4 27 0 0 2626 4 24 1 0 2804 4 2576 1 1 2 53 0 27 0 0 2572 4 24 1 0 2605 4 PROCEDURE 238 2579 6 0 0 5241 4 2580 5 0 0 5219 4 27 0 0 2626 4 26 1 3 6056 4 6 0 0 54 4 2584 26 0 0 2765 4 2 0 0 82 4 1 1 3 0 0 0 0 2 4740 4 2588 15 0 3 6058 4 27 0 0 2594 4 5 0 0 82 4 27 0 0 2603 4 2592 25 0 3 1 0 24 1 0 2586 4 6 0 0 6057 4 1 1 2 48 0 2596 27 0 2 2603 4 6 0 0 5970 4 18 0 1 4 0 4 0 0 82 4 2600 2 0 3 6058 4 1 1 3 1 0 7 0 0 6057 4 0 0 3 5210 4 2604 24 1 0 2804 4 PROCEDURE 239 2605 6 0 0 104 4 1 1 2 127 0 27 0 0 2626 4 2608 1 1 1 3 0 27 0 1 2666 4 6 0 0 5246 4 1 1 2 1 0 2612 27 0 1 2666 4 6 0 0 5248 4 27 0 1 2666 4 24 1 0 2626 4 2616 0 0 3 5210 4 6 1 0 5250 4 27 0 1 2620 4 26 0 0 1586 4 2620 6 1 0 5242 4 27 0 1 2626 4 6 0 0 5244 4 27 0 0 2804 4 2624 26 0 0 1582 4 24 1 0 2804 4 PROCEDURE 240 2626 6 0 0 54 4 1 1 2 2457 0 2628 27 0 2 2804 4 6 0 0 5973 4 18 0 1 2 0 4 0 0 59 4 2632 3 0 0 168 4 5 1 0 5243 4 5 0 0 5244 4 27 0 3 2804 4 2636 6 1 0 5243 4 27 0 0 2804 4 4 0 0 5244 4 27 0 3 2804 4 2640 2 0 0 169 4 6 1 0 168 4 0 0 3 5207 4 24 1 2 5979 4 2644 1 1 0 0 0 18 1 1 10 0 3 1 0 5070 4 26 1 1 5070 4 2648 5 0 0 5979 4 18 0 1 5 0 4 0 0 5979 4 2 1 0 138 4 2652 6 0 0 5979 4 5 0 0 4704 4 27 0 0 2804 4 6 0 0 5211 4 2656 7 0 0 5979 4 6 1 0 138 4 24 1 2 5979 4 28 1 1 0 0 2660 25 0 1 4098 0 24 1 0 2662 4 6 1 0 168 4 24 0 3 0 4 2664 2 1 1 0 0 24 1 0 2804 4 PROCEDURE 241 2666 6 0 0 104 4 1 1 2 152 0 2668 27 0 1 2720 4 26 1 3 62 4 6 0 0 54 4 5 0 3 64 4 2672 27 0 0 2678 4 25 0 3 1 0 24 1 0 2670 4 26 0 0 1578 4 2676 26 0 0 4239 4 24 1 0 2680 4 24 0 3 0 4 6 1 0 6 22 2680 1 1 1 1 0 2 0 0 96 4 6 0 0 111 4 27 0 0 2687 4 2684 6 0 0 96 4 2 0 0 97 4 24 1 0 2804 4 PROCEDURE 242 2687 1 1 3 16 0 2688 18 1 1 4118 0 1 1 3 16 0 24 0 1 96 4 14 0 0 5979 4 2692 24 0 1 97 4 14 0 0 5979 4 1 1 3 0 0 1 0 1 1 0 2696 24 0 1 96 4 15 0 0 5979 4 2 0 0 96 4 24 0 1 97 4 2700 15 0 0 5979 4 3 0 0 97 4 5 0 0 96 4 27 0 0 2804 4 2704 27 0 3 2709 4 0 0 2 96 4 7 0 0 96 4 18 1 1 10 0 2708 2 0 0 97 4 26 1 3 62 4 1 0 1 1 0 1 1 3 0 0 2712 15 0 3 5980 4 5 0 0 96 4 27 0 1 2717 4 6 0 0 97 4 2716 14 0 3 5980 4 25 0 3 1 0 24 1 0 2711 4 24 1 0 2804 4 PROCEDURE 243 2720 0 0 3 5207 4 6 0 0 104 4 1 1 2 93 0 27 0 0 2732 4 2724 1 1 1 28 0 27 0 0 2752 4 1 1 1 2 0 27 0 0 2731 4 2728 1 1 2 1 0 27 0 1 2771 4 6 1 0 5150 4 4 0 0 5224 4 2732 4 1 0 5152 4 2 1 0 96 4 6 0 0 5977 4 18 0 1 5 0 2736 3 1 0 5070 4 26 1 3 5070 4 27 0 0 2747 4 6 1 3 6106 4 2740 5 1 0 96 4 27 0 0 2804 4 25 0 3 2 0 24 1 0 2739 4 2744 6 0 0 5977 4 1 1 2 50 0 27 0 2 2804 4 6 1 0 96 4 2748 2 1 3 6106 4 1 1 3 2 0 7 0 0 5977 4 24 1 0 2804 4 2752 6 0 0 5250 4 2 0 0 96 4 6 0 0 111 4 27 0 0 2734 4 2756 6 0 0 96 4 2 0 0 97 4 24 1 0 2804 4 PROCEDURE 244 2759 0 0 0 0 0 2760 2 1 0 4812 4 0 0 3 5210 4 24 0 2 4772 4 12 1 0 4812 4 2764 26 0 1 2759 4 PROCEDURE 245 2765 0 0 0 0 0 2 1 0 4812 4 0 0 3 5207 4 2768 24 0 2 4792 4 12 1 0 4812 4 26 0 1 2765 4 PROCEDURE 246 2771 6 0 0 111 4 2772 27 0 0 2804 4 6 0 0 104 4 1 1 2 51 0 27 0 0 2780 4 2776 1 1 2 2 0 27 0 0 2780 4 1 1 2 104 0 27 0 1 2804 4 2780 6 0 0 54 4 26 0 0 2765 4 3 0 0 138 4 1 1 2 100 0 2784 27 0 2 2804 4 6 1 0 6044 4 26 1 3 6044 4 27 0 0 2798 4 2788 1 1 3 0 0 1 0 1 3 0 15 0 3 6046 4 5 0 0 138 4 2792 27 0 0 2804 4 25 0 3 1 0 24 1 0 2788 4 6 0 0 6045 4 2796 1 1 2 10 0 27 0 2 2804 4 6 0 0 5970 4 18 0 1 4 0 2800 4 0 0 138 4 2 0 3 6046 4 1 1 3 1 0 7 0 0 6045 4 PROCEDURE 247 2804 6 0 0 135 4 27 0 0 2807 4 26 0 0 4239 4 0 0 3 5210 4 2808 6 0 0 5973 4 18 0 1 2 0 2 0 0 138 4 6 0 0 7328 4 2812 1 1 2 5 0 27 0 0 2828 4 6 0 0 59 4 1 1 2 256 0 2816 27 0 3 2828 4 6 0 0 7328 4 1 1 2 2 0 27 0 0 2824 4 2820 1 0 1 63 0 6 1 0 5128 4 14 1 0 5278 4 24 1 0 2825 4 2824 26 0 0 4239 4 1 1 3 153 0 5 0 0 140 4 24 1 0 2829 4 2828 6 0 0 59 4 7 0 0 138 4 24 0 2 4430 4 28 1 2 5236 4 PROCEDURE 248 2832 1 1 3 0 0 24 0 1 7328 4 26 0 1 2834 4 0 0 0 2842 3 2836 0 0 0 2862 3 0 0 0 2851 3 0 0 0 2856 3 0 0 0 2840 3 2840 2 1 0 5236 4 24 1 0 2844 4 6 0 0 59 4 27 0 1 2849 4 2844 6 0 0 4742 4 1 1 2 3 0 27 0 1 2849 4 1 1 3 1 0 2848 2 1 0 5332 4 1 1 3 0 0 24 1 0 2862 4 PROCEDURE 249 2851 6 0 0 59 4 2852 1 1 2 1 0 27 0 0 2862 4 1 1 3 2 0 24 1 0 2863 4 2856 6 0 0 59 4 27 0 1 2861 4 1 1 3 1 0 7 0 0 59 4 2860 24 1 0 2844 4 6 0 0 140 4 1 1 1 1 0 7 0 0 59 4 2864 6 0 0 83 4 27 0 0 2869 4 6 0 0 51 4 18 0 1 2 0 2868 2 1 0 5234 4 2 1 0 6004 4 PROCEDURE 250 2870 0 0 3 5207 4 6 0 0 4719 4 2872 27 0 0 2875 4 26 0 0 4033 4 24 1 0 2876 4 26 0 0 4090 4 2876 6 0 0 88 4 27 0 1 2901 4 6 0 0 6271 4 1 1 2 4 0 2880 27 0 0 2893 4 24 0 1 6271 4 6 0 0 4416 4 28 1 2 5328 4 2884 6 1 0 4768 4 24 0 1 6271 4 24 0 1 4412 4 28 1 1 5326 4 2888 6 1 0 5278 4 24 0 1 6271 4 24 0 1 4412 4 2 1 0 5324 4 2892 24 1 0 2922 4 24 0 2 5245 4 18 1 1 4123 0 1 1 3 16 0 2896 18 1 1 5 0 28 0 1 5337 4 24 0 2 4602 4 28 1 2 5332 4 2900 24 1 0 2922 4 24 0 2 4450 4 28 1 2 5328 4 1 1 3 0 0 2904 2 0 0 4742 4 6 0 0 6271 4 1 1 2 1 0 27 0 1 2914 4 2908 6 0 0 88 4 27 0 3 2914 4 6 1 0 5242 4 2 1 0 5338 4 2912 2 1 0 5334 4 24 1 0 2916 4 6 1 0 5278 4 2 1 0 5338 4 2916 24 0 2 5250 4 18 1 1 4123 0 1 1 3 28 0 18 1 1 5 0 2920 28 1 1 5340 4 24 1 0 2924 4 6 0 0 6271 4 2 0 0 4742 4 2924 1 1 3 1 0 2 0 0 4719 4 0 0 3 5210 4 1 1 3 0 0 2928 2 0 0 165 4 6 0 0 6203 4 1 0 1 15 0 14 1 0 5328 4 2932 1 1 3 0 0 2 0 0 6203 4 26 0 1 1415 4 PROCEDURE 251 2935 26 0 0 4195 4 2936 27 0 0 2958 4 6 0 0 95 4 27 0 1 2950 4 6 0 0 6267 4 2940 27 0 0 2944 4 24 0 3 7354 4 6 1 0 5 0 24 1 0 2946 4 2944 24 1 2 17 4 6 1 0 7 0 24 1 2 21 4 5 1 0 5 0 2948 27 0 0 2958 4 27 0 2 2964 4 26 0 0 4265 4 1 1 3 0 0 2952 2 0 0 83 4 26 0 0 4323 4 26 0 0 3863 4 26 0 0 1415 4 2956 26 0 0 4300 4 24 1 0 2937 4 PROCEDURE 252 2958 24 0 1 7327 4 26 0 1 2959 4 2960 0 0 0 2980 3 0 0 0 3017 3 0 0 0 3114 3 0 0 0 3091 3 PROCEDURE 253 2964 6 1 0 5238 4 24 0 1 4742 4 24 0 1 4420 4 2 1 0 5326 4 2968 0 1 2 5236 4 26 0 0 3172 4 1 1 3 7517 0 3 0 0 6272 4 2972 1 0 1 15 0 24 0 1 4742 4 24 0 1 4420 4 14 1 0 5326 4 2976 26 0 0 4121 4 26 0 0 4195 4 27 0 0 2976 4 24 1 0 2937 4 PROCEDURE 254 2980 24 1 2 21 4 6 1 0 51 0 27 0 1 3015 4 6 0 0 6271 4 2984 2 0 0 4243 4 26 0 0 4323 4 6 0 0 88 4 2 0 0 1586 4 2988 26 0 0 4176 4 6 0 0 88 4 5 0 0 1586 4 27 0 1 3010 4 2992 1 1 3 1 0 2 0 0 83 4 26 0 0 3806 4 26 0 0 4265 4 2996 6 0 0 88 4 27 0 2 3006 4 6 0 0 6267 4 27 0 0 3003 4 3000 24 0 3 7354 4 6 1 0 8 0 24 1 0 3005 4 24 1 2 17 4 3004 6 1 0 16 0 2 1 0 5242 4 26 0 0 4300 4 26 0 0 1415 4 3008 26 0 0 4121 4 24 1 0 2935 4 6 0 0 88 4 4 0 0 1586 4 3012 27 0 2 2992 4 6 0 0 4243 4 2 0 0 6271 4 1 1 3 105 0 3016 24 1 0 3058 4 PROCEDURE 255 3017 26 0 0 4265 4 24 1 2 21 4 6 1 0 4 0 3020 2 1 0 5234 4 24 1 2 21 4 6 1 0 51 0 27 0 1 3057 4 3024 26 0 0 4121 4 26 0 0 4195 4 27 0 1 3070 4 24 1 2 21 4 3028 6 1 0 51 0 27 0 1 3057 4 6 0 0 6267 4 27 0 0 3035 4 3032 24 0 3 7354 4 6 1 0 5 0 24 1 0 3037 4 24 1 2 17 4 3036 6 1 0 7 0 18 0 1 8 0 27 0 0 3040 4 26 0 0 1488 4 3040 26 0 0 4300 4 26 0 0 4265 4 6 0 0 6267 4 27 0 0 3047 4 3044 24 0 3 7354 4 6 1 0 5 0 24 1 0 3049 4 24 1 2 17 4 3048 6 1 0 7 0 5 1 0 5237 4 27 0 1 3056 4 26 0 0 4300 4 3052 26 0 0 4121 4 26 0 0 4195 4 27 0 1 2937 4 24 1 0 3057 4 3056 27 0 3 3040 4 1 1 3 84 0 18 0 1 8 0 24 0 1 4742 4 3060 24 0 1 4420 4 2 1 0 5326 4 6 0 0 6267 4 27 0 0 3067 4 3064 24 0 3 7354 4 0 1 2 4 0 24 1 0 2969 4 24 1 2 17 4 3068 0 1 2 6 0 24 1 0 2969 4 6 0 0 6267 4 27 0 0 3075 4 3072 24 0 3 7354 4 6 1 0 5 0 24 1 0 3077 4 24 1 2 17 4 3076 6 1 0 7 0 18 0 1 8 0 27 0 0 3080 4 26 0 0 1488 4 3080 26 0 0 4300 4 6 0 0 6267 4 27 0 0 3086 4 24 0 3 7354 4 3084 6 1 0 5 0 24 1 0 3088 4 24 1 2 17 4 6 1 0 7 0 3088 5 1 0 5235 4 27 0 0 3080 4 24 1 0 2935 4 PROCEDURE 256 3091 26 0 0 4323 4 3092 26 0 0 3806 4 24 1 2 21 4 6 1 0 51 0 27 0 0 3098 4 3096 1 1 3 81 0 24 1 0 3058 4 1 1 3 1 0 3 0 0 6203 4 3100 2 0 0 136 4 26 0 0 3110 4 1 1 3 0 0 2 0 0 136 4 3104 26 0 0 4121 4 1 1 3 0 0 2 0 0 83 4 26 0 0 1415 4 3108 26 0 0 4300 4 24 1 0 2935 4 PROCEDURE 257 3110 0 0 0 0 0 6 0 0 3110 4 3112 2 0 0 3863 4 24 1 0 3866 4 PROCEDURE 258 3114 24 1 2 21 4 6 1 0 51 0 3116 27 0 1 3164 4 2 0 0 88 4 24 0 1 6271 4 26 0 1 3119 4 3120 0 0 0 3132 3 0 0 0 3132 3 0 0 0 3124 3 0 0 0 3132 3 3124 6 1 0 5086 4 28 1 1 5234 4 24 0 2 4548 4 26 0 0 5063 4 3128 1 1 3 0 0 2 1 0 5254 4 2 1 0 5278 4 24 1 0 3133 4 3132 26 0 0 3806 4 26 1 1 5154 4 6 1 1 5234 4 27 0 1 3139 4 3136 25 0 1 2 0 24 1 0 3134 4 24 1 0 3158 4 1 1 3 115 0 3140 18 0 1 8 0 24 0 1 4742 4 24 0 1 4420 4 2 1 0 5326 4 3144 6 0 0 6267 4 27 0 0 3149 4 24 0 3 7354 4 0 1 2 4 0 3148 24 1 0 3151 4 24 1 2 17 4 0 1 2 6 0 26 0 0 3172 4 3152 1 1 3 7517 0 3 0 0 6272 4 1 0 1 15 0 24 0 1 4742 4 3156 24 0 1 4420 4 14 1 0 5326 4 26 0 0 4121 4 26 0 0 4195 4 3160 27 0 1 2937 4 24 1 2 21 4 6 1 0 51 0 27 0 0 3166 4 3164 1 1 3 115 0 24 1 0 3058 4 26 0 0 4176 4 1 1 3 1 0 3168 2 0 0 83 4 26 0 0 3806 4 26 0 0 1415 4 24 1 0 3158 4 PROCEDURE 259 3172 0 0 0 0 0 24 0 1 4742 4 24 0 1 4412 4 6 0 0 5341 4 3176 5 0 0 4747 4 27 0 0 3184 4 1 1 3 0 0 18 1 1 10 0 3180 24 0 1 4742 4 24 0 1 4412 4 2 1 0 5340 4 26 0 1 3172 4 3184 18 1 1 10 0 24 0 1 4742 4 24 0 1 4412 4 2 1 0 5338 4 3188 26 0 1 3172 4 PROCEDURE 260 3189 2 0 0 119 4 2 1 0 116 4 2 0 0 120 4 3192 2 0 0 7341 4 26 1 2 116 4 26 1 3 5156 4 26 1 1 5110 4 3196 6 1 0 5158 4 28 0 0 5406 4 0 0 3 5207 4 0 1 2 5240 4 3200 6 0 0 83 4 2 0 0 120 4 24 1 0 3205 4 26 0 0 4239 4 PROCEDURE 261 3204 26 0 0 3587 4 18 1 1 2 0 3 1 0 138 4 1 1 2 125 0 3208 27 0 0 3214 4 1 1 2 1 0 27 0 0 3371 4 6 0 0 120 4 3212 27 0 1 3204 4 24 1 0 3219 4 6 0 0 120 4 27 0 0 3371 4 3216 2 0 0 120 4 2 0 0 120 4 24 1 0 3204 4 6 0 0 138 4 3220 2 0 2 5406 4 PROCEDURE 262 3221 24 0 3 0 4 6 0 0 4 22 25 0 2 1 0 3224 24 1 0 3225 4 27 0 1 3245 4 6 0 0 138 4 1 1 2 122 0 3228 27 0 0 3247 4 1 1 3 5 0 2 0 0 7333 4 2 0 0 5466 4 3232 6 0 0 5467 4 27 0 0 3242 4 6 0 0 5468 4 2 0 0 7334 4 3236 6 0 0 5468 4 1 1 2 5 0 27 0 1 3245 4 1 1 3 1 0 3240 2 0 0 7341 4 24 1 0 3245 4 1 1 3 1 0 2 0 0 7333 4 3244 26 0 0 3249 4 6 0 0 138 4 24 1 0 3257 4 26 0 0 3249 4 3248 24 1 0 3268 4 PROCEDURE 263 3249 0 0 0 0 0 2 1 0 5466 4 2 1 0 5468 4 3252 2 1 0 5470 4 2 1 0 5472 4 2 1 0 5474 4 2 1 0 5476 4 3256 26 0 1 3249 4 24 0 1 7333 4 26 0 1 3258 4 0 0 0 3203 3 3260 0 0 0 3290 3 0 0 0 3354 3 0 0 0 3264 3 0 0 0 3271 3 3264 1 1 2 124 0 27 0 0 3242 4 1 1 1 2 0 27 0 1 3315 4 3268 1 1 3 2 0 2 0 0 7333 4 24 1 0 3204 4 1 1 2 124 0 3272 27 0 1 3287 4 1 1 3 2 0 7 0 0 5466 4 24 0 0 5466 4 3276 6 0 0 5468 4 27 0 0 3242 4 2 0 0 7334 4 6 0 0 7334 4 3280 1 1 2 5 0 27 0 1 3204 4 24 0 3 0 4 6 0 0 4 22 3284 1 1 1 1 0 2 0 0 7341 4 24 1 0 3204 4 1 1 1 2 0 3288 27 0 1 3315 4 24 1 0 3203 4 1 1 2 81 0 27 0 0 3310 4 3292 1 1 2 1 0 27 0 0 3308 4 1 1 2 1 0 27 0 0 3302 4 3296 1 1 2 1 0 27 0 0 3309 4 1 1 2 19 0 27 0 0 3307 4 3300 1 1 2 2 0 27 0 1 3242 4 24 0 3 0 4 6 0 0 4 22 3304 1 1 1 2 0 2 0 0 7341 4 1 1 3 1 0 1 1 1 1 0 3308 1 1 1 1 0 1 1 1 1 0 1 1 1 1 0 2 0 0 7334 4 3312 1 1 3 3 0 2 0 0 7333 4 24 1 0 3204 4 PROCEDURE 264 3315 24 0 1 7334 4 3316 26 0 1 3316 4 0 0 0 3204 3 0 0 0 3322 3 0 0 0 3331 3 3320 0 0 0 3335 3 0 0 0 3340 3 6 0 0 138 4 18 0 1 4127 0 3324 1 1 2 2 0 27 0 0 3328 4 1 1 2 3 0 27 0 3 3204 4 3328 1 1 3 91 0 2 1 0 5278 4 24 1 0 3204 4 6 1 0 139 4 3332 1 1 2 10 0 27 0 2 3328 4 24 1 0 3322 4 6 1 0 139 4 3336 27 0 0 3322 4 1 1 2 1 0 27 0 0 3322 4 24 1 0 3328 4 3340 6 0 0 138 4 1 1 2 77 0 27 0 1 3347 4 6 0 0 116 4 3344 2 0 0 117 4 2 0 0 116 4 24 1 0 3322 4 6 0 0 116 4 3348 18 0 1 1 0 4 1 0 139 4 2 0 0 116 4 1 1 3 5 0 3352 2 0 0 7333 4 24 1 0 3331 4 1 1 2 123 0 27 0 0 3363 4 3356 6 0 2 5404 4 1 1 2 82 0 27 0 0 3331 4 6 0 2 5403 4 3360 1 1 2 82 0 27 0 0 3331 4 24 1 0 3242 4 6 0 0 7334 4 3364 24 0 0 5467 4 2 0 0 5468 4 1 1 3 2 0 7 0 0 5467 4 3368 1 1 3 4 0 2 0 0 7333 4 24 1 0 3204 4 PROCEDURE 265 3371 1 1 3 125 0 3372 2 0 2 5406 4 6 0 0 7333 4 1 1 2 4 0 27 0 2 3377 4 3376 26 0 0 4239 4 6 0 0 5466 4 27 0 0 3383 4 1 1 1 2 0 3380 5 0 0 5467 4 27 0 0 3383 4 26 0 0 4239 4 6 0 0 5467 4 3384 1 1 2 12 0 27 0 3 3387 4 26 0 0 4239 4 24 0 3 0 4 3388 6 0 0 4 22 2 0 0 120 4 3 1 0 5070 4 26 1 2 5070 4 3392 3 1 0 5070 4 26 1 3 5070 4 6 0 0 7341 4 27 0 0 3422 4 3396 3 1 0 5070 4 26 1 1 5070 4 6 0 0 117 4 1 1 2 256 0 3400 27 0 3 3422 4 1 1 2 2201 0 27 0 2 3422 4 6 0 0 117 4 3404 26 0 0 1613 4 24 1 0 3407 4 0 0 0 1667 3 6 0 0 169 4 3408 0 0 3 5207 4 18 1 1 4126 0 2 0 1 5405 4 18 1 1 1 0 3412 27 0 1 3414 4 1 1 3 48 0 2 0 1 5406 4 18 1 1 1 0 3416 27 0 1 3418 4 1 1 3 48 0 2 0 1 5407 4 6 1 0 5160 4 3420 28 0 0 5240 4 24 1 0 3464 4 6 0 0 83 4 27 0 0 3481 4 3424 6 1 0 5160 4 28 0 0 5240 4 24 0 1 6276 4 26 0 1 3427 4 3428 0 0 0 3464 3 0 0 0 3430 3 6 0 0 5467 4 1 1 2 4 0 3432 27 0 2 3452 4 6 0 0 7334 4 1 1 2 1 0 27 0 1 3452 4 3436 6 0 0 5406 4 1 1 2 122 0 27 0 0 3440 4 6 0 0 5225 4 3440 1 1 1 3 0 0 0 2 5226 4 10 0 0 140 4 4 1 0 5162 4 3444 3 0 0 120 4 3 1 0 5070 4 26 1 1 5070 4 1 1 3 125 0 3448 2 0 1 5406 4 25 0 1 1 0 24 1 0 3448 4 24 1 0 3464 4 3452 26 1 1 5164 4 6 0 1 5406 4 27 0 1 3457 4 25 0 1 4097 0 3456 24 1 0 3453 4 1 1 3 125 0 2 0 1 5407 4 2 0 0 5435 4 3460 24 0 3 0 4 6 0 0 2 22 1 1 1 1 0 2 0 0 120 4 3464 6 0 2 5406 4 PROCEDURE 266 3465 18 0 1 2 0 4 0 2 5407 4 18 0 1 2 0 3468 4 0 2 5408 4 18 0 1 2 0 4 0 2 5409 4 18 0 1 2 0 3472 4 0 2 5410 4 2 1 3 5240 4 25 0 3 2 0 25 0 2 5 0 3476 24 0 3 0 4 6 0 0 4 22 1 1 2 1 0 5 0 0 120 4 3480 27 0 3 3464 4 6 1 0 5276 4 5 1 0 4746 4 27 0 1 3486 4 3484 26 0 0 3249 4 24 1 0 2804 4 6 0 0 5467 4 1 1 2 4 0 3488 27 0 2 2804 4 26 1 1 5166 4 6 0 1 5406 4 1 1 2 122 0 3492 27 0 1 3500 4 6 0 1 5407 4 25 0 1 1 0 24 1 0 3496 4 3496 1 1 2 123 0 27 0 1 3493 4 25 0 1 1 0 24 1 0 3500 4 PROCEDURE 267 3500 24 0 1 7334 4 26 0 1 3501 4 0 0 0 3533 3 0 0 0 3542 3 3504 0 0 0 3556 3 0 0 0 3579 3 0 0 0 3507 3 6 0 0 117 4 3508 1 1 2 4096 0 27 0 2 3527 4 1 1 1 3943 0 27 0 2 3529 4 3512 6 0 0 117 4 27 0 0 2804 4 26 0 0 1352 4 0 0 2 90 4 3516 15 0 3 122 4 27 0 0 3527 4 1 1 3 0 0 18 1 3 10 0 3520 15 0 3 122 4 27 0 1 3527 4 6 0 0 116 4 5 0 0 5227 4 3524 27 0 3 2804 4 26 0 0 1582 4 24 1 0 2804 4 26 0 0 1578 4 3528 24 1 0 2804 4 6 0 0 116 4 1 1 2 153 0 27 0 2 3525 4 3532 24 1 0 2804 4 PROCEDURE 268 3533 6 0 0 140 4 27 0 0 3536 4 1 1 3 3 0 3536 1 1 1 2 0 24 0 3 0 4 4 0 0 2 22 5 0 0 120 4 3540 27 0 2 2804 4 24 1 0 3584 4 PROCEDURE 269 3542 6 0 0 140 4 27 0 0 3545 4 3544 1 1 3 5 0 1 1 1 5 0 2 0 0 117 4 24 0 0 120 4 3548 6 0 0 5405 4 1 1 2 16 0 27 0 0 3553 4 6 0 0 117 4 3552 24 1 0 3537 4 6 0 0 117 4 1 1 1 1 0 24 1 0 3537 4 PROCEDURE 270 3556 26 1 2 5168 4 6 0 1 5406 4 1 1 2 125 0 27 0 0 3573 4 3560 1 1 1 109 0 27 0 0 3573 4 1 1 1 16 0 2 1 0 60 4 3564 6 1 0 116 4 18 0 1 1 0 4 1 0 61 4 2 1 0 116 4 3568 25 0 1 1 0 24 1 0 3570 4 25 0 2 1 0 24 1 0 3557 4 3572 24 1 0 3584 4 PROCEDURE 271 3573 6 0 0 140 4 27 0 1 2804 4 6 1 0 116 4 3576 5 1 0 5170 4 27 0 2 3584 4 24 1 0 2804 4 PROCEDURE 272 3579 6 0 0 140 4 3580 27 0 0 3582 4 1 1 3 20 0 1 1 1 20 0 24 1 0 3546 4 PROCEDURE 273 3584 1 1 3 91 0 2 1 0 5278 4 24 1 0 2804 4 PROCEDURE 274 3587 0 0 0 0 0 3588 1 1 3 0 0 25 0 3 1 0 24 1 0 3600 4 25 0 1 2 0 3592 24 1 0 3597 4 26 0 0 4239 4 1 1 3 125 0 18 1 1 4126 0 3596 26 0 1 3587 4 26 1 3 5156 4 24 0 0 23 4 0 1 2 5240 4 3600 26 0 1 3587 4 PROCEDURE 275 3601 0 0 0 0 0 2 1 0 139 4 6 0 0 3601 4 3604 3 0 0 3587 4 2 0 0 1820 4 24 1 0 1828 4 PROCEDURE 276 3607 2 0 0 53 4 3608 26 1 2 5120 4 6 0 2 5256 4 2 0 0 5244 4 6 1 2 5254 4 3612 26 0 0 3601 4 6 0 0 5244 4 2 0 2 5256 4 6 0 0 54 4 3616 2 0 2 5254 4 26 0 0 3625 4 6 0 0 5253 4 27 0 0 3622 4 3620 6 0 0 5244 4 26 0 0 1562 4 25 0 2 4 0 24 1 0 3609 4 3624 24 1 0 3655 4 PROCEDURE 277 3625 0 0 0 0 0 1 1 3 1 0 2 0 0 7329 4 3628 6 0 0 54 4 1 1 2 256 0 27 0 2 3652 4 6 0 0 54 4 3632 27 0 3 3647 4 27 0 0 3642 4 26 0 0 1352 4 0 0 2 90 4 3636 15 0 3 122 4 27 0 0 3647 4 18 1 3 10 0 1 1 3 0 0 3640 15 0 3 122 4 27 0 1 3647 4 6 0 0 5244 4 5 0 0 5220 4 3644 27 0 3 3654 4 26 0 0 1582 4 24 1 0 3648 4 26 0 0 1578 4 3648 26 0 0 4239 4 1 1 3 2 0 2 0 0 7329 4 24 1 0 3654 4 3652 1 1 2 2304 0 27 0 2 3647 4 26 0 1 3625 4 PROCEDURE 278 3655 6 0 0 5253 4 3656 27 0 3 3792 4 1 1 2 3 0 27 0 2 3792 4 6 0 0 5254 4 3660 27 0 0 3798 4 24 0 1 7335 4 26 0 1 3662 4 0 0 0 3668 3 3664 0 0 0 3734 3 0 0 0 3676 3 0 0 0 3755 3 0 0 0 2804 3 PROCEDURE 279 3668 6 0 0 5246 4 4 0 0 5248 4 7 0 0 55 4 6 0 0 5250 4 3672 1 1 2 2 0 27 0 1 3676 4 1 1 3 1 0 7 0 0 55 4 3676 6 0 0 5258 4 0 0 2 5260 4 27 1 1 3796 4 6 0 0 5245 4 3680 27 0 1 3790 4 6 0 0 5253 4 1 1 2 1 0 27 0 0 3685 4 3684 6 0 0 5228 4 1 1 1 16 0 5 0 0 5246 4 5 0 0 5247 4 3688 27 0 3 3788 4 4 0 0 5246 4 4 0 0 5247 4 5 0 0 5249 4 3692 27 0 3 3782 4 6 0 0 5246 4 5 0 0 5249 4 27 0 3 3782 4 PROCEDURE 280 3696 6 0 0 5248 4 1 1 2 22 0 27 0 2 3784 4 6 0 0 5246 4 3700 27 0 0 3788 4 6 0 0 5253 4 1 1 2 2 0 27 0 1 3706 4 3704 6 0 0 5249 4 27 0 1 3782 4 6 0 0 5251 4 27 0 1 3711 4 3708 5 0 0 113 4 27 0 0 3718 4 24 1 0 3732 4 1 1 2 1 0 3712 27 0 1 3778 4 6 0 0 113 4 1 1 2 2 0 27 0 0 3717 4 3716 1 1 1 3 0 2 0 0 113 4 6 0 0 5252 4 3 0 0 56 4 3720 27 0 0 2804 4 1 1 2 1 0 27 0 1 3776 4 6 0 0 55 4 3724 4 0 0 55 4 18 0 1 9 0 27 0 0 3729 4 6 1 0 5172 4 3728 2 1 0 5278 4 2 0 0 55 4 5 0 0 113 4 27 0 0 2804 4 3732 7 0 0 113 4 24 1 0 3778 4 PROCEDURE 281 3734 6 0 0 5258 4 27 0 0 3755 4 3736 18 0 1 4126 0 27 0 1 3745 4 6 0 0 5254 4 18 1 1 4126 0 3740 27 0 1 3796 4 18 1 1 2 0 5 0 0 5258 4 27 0 1 3796 4 3744 24 1 0 3752 4 6 0 0 5254 4 18 1 1 4126 0 27 0 0 3796 4 3748 6 0 0 5258 4 5 0 0 5254 4 27 0 3 3796 4 27 0 1 3755 4 3752 6 0 0 5260 4 5 0 0 5256 4 27 0 3 3794 4 6 0 0 5245 4 3756 27 0 0 3761 4 1 1 2 1 0 27 0 1 3790 4 6 0 0 5252 4 3760 27 0 0 3776 4 6 0 0 5246 4 27 0 1 3788 4 6 0 0 5247 4 3764 27 0 1 3786 4 6 0 0 5248 4 27 0 1 3784 4 6 0 0 5249 4 3768 27 0 1 3782 4 6 0 0 5250 4 27 0 0 3773 4 1 1 2 2 0 3772 27 0 1 3780 4 6 0 0 5251 4 27 0 1 3778 4 24 1 0 2804 4 PROCEDURE 282 3776 1 1 3 1 0 2 0 0 53 4 1 1 3 1 0 7 0 0 53 4 3780 1 1 3 1 0 7 0 0 53 4 1 1 3 1 0 7 0 0 53 4 3784 1 1 3 1 0 7 0 0 53 4 1 1 3 1 0 7 0 0 53 4 3788 1 1 3 1 0 7 0 0 53 4 1 1 3 1 0 7 0 0 53 4 3792 1 1 3 1 0 7 0 0 53 4 1 1 3 1 0 7 0 0 53 4 3796 1 1 3 2 0 7 0 0 53 4 1 1 3 1 0 4 0 0 53 4 3800 2 0 0 138 4 24 0 2 4430 4 28 1 2 5278 4 6 1 0 5174 4 3804 7 1 0 5278 4 24 1 0 2804 4 PROCEDURE 283 3806 0 0 0 0 0 6 1 0 5086 4 3808 28 1 1 5234 4 6 0 0 88 4 27 0 0 3935 4 24 0 1 6276 4 3812 26 0 1 3812 4 0 0 0 3815 3 0 0 0 3837 3 6 0 0 6000 4 3816 27 0 0 3819 4 24 0 2 4534 4 24 1 0 3820 4 24 0 2 4536 4 3820 26 0 0 5063 4 6 0 0 6271 4 1 1 2 2 0 27 0 1 3834 4 3824 6 0 0 88 4 27 0 3 3834 4 1 1 3 0 0 2 1 0 5242 4 3828 6 0 0 6000 4 27 0 0 3832 4 24 0 2 4542 4 24 1 0 3833 4 3832 24 0 2 4544 4 26 0 0 5063 4 1 1 3 0 0 2 1 0 5278 4 3836 26 0 1 3806 4 24 0 2 4536 4 24 1 2 21 4 28 0 2 8 0 3840 24 1 2 21 4 24 0 2 18 0 18 1 1 4123 0 1 1 3 16 0 3844 18 1 1 5 0 28 1 1 5252 4 6 1 0 5242 4 18 0 1 4 0 3848 2 1 0 5242 4 6 0 0 88 4 27 0 3 3834 4 6 0 0 6271 4 3852 1 1 2 1 0 27 0 1 3834 4 6 1 0 5252 4 2 1 0 5242 4 3856 24 1 2 21 4 24 0 2 20 0 18 1 1 4123 0 1 1 3 16 0 3860 18 1 1 5 0 28 1 1 5252 4 26 0 1 3806 4 PROCEDURE 284 3863 0 0 0 0 0 3864 6 1 0 5138 4 28 1 1 5240 4 6 0 0 6267 4 27 0 1 4333 4 3868 6 0 0 88 4 27 0 0 3889 4 24 0 2 4436 4 24 1 2 17 4 3872 28 0 2 4 0 6 0 0 136 4 27 0 0 3882 4 6 0 0 6271 4 3876 1 1 2 1 0 27 0 0 3934 4 24 1 2 17 4 6 1 0 20 0 3880 2 1 0 5250 4 24 1 0 3934 4 24 1 2 17 4 24 0 2 20 0 3884 18 1 1 4123 0 1 1 3 30 0 18 1 1 5 0 28 1 1 5250 4 3888 24 1 0 3933 4 24 0 1 6271 4 26 0 1 3890 4 0 0 0 3908 3 3892 0 0 0 3912 3 0 0 0 3916 3 0 0 0 3895 3 24 1 2 17 4 3896 24 0 2 9 0 18 1 1 4123 0 1 1 3 36 0 18 1 1 5 0 3900 28 1 0 5243 4 24 1 2 17 4 24 0 2 44 0 18 1 1 4123 0 3904 1 1 3 6 0 18 1 1 5 0 28 1 1 5274 4 26 0 1 3863 4 3908 24 0 2 4460 4 24 1 2 17 4 28 0 2 4 0 24 1 0 3925 4 3912 24 0 2 4480 4 24 1 2 17 4 28 0 2 4 0 24 1 0 3925 4 3916 24 1 2 17 4 24 0 2 12 0 18 1 1 4123 0 1 1 3 18 0 3920 18 1 1 5 0 28 1 1 5240 4 24 1 2 17 4 6 1 0 5 0 3924 2 1 0 5234 4 6 0 0 136 4 27 0 1 3934 4 24 1 2 17 4 3928 24 0 2 32 0 18 1 1 4123 0 1 1 3 18 0 18 1 1 5 0 3932 28 1 1 5262 4 2 1 0 5278 4 26 0 1 3863 4 PROCEDURE 285 3935 24 0 1 6271 4 3936 26 0 1 3936 4 0 0 0 3941 3 0 0 0 3949 3 0 0 0 3955 3 3940 0 0 0 3834 3 PROCEDURE 286 3941 24 0 2 4548 4 26 0 0 5063 4 1 1 3 0 0 3944 2 1 0 5254 4 24 0 1 6276 4 26 0 1 3946 4 0 0 0 3981 3 3948 0 0 0 3961 3 24 0 2 4566 4 26 0 0 5063 4 24 0 1 6276 4 3952 26 0 1 3952 4 0 0 0 3834 3 0 0 0 3977 3 24 0 2 4596 4 3956 26 0 0 5063 4 24 0 1 6276 4 26 0 1 3958 4 0 0 0 3993 3 3960 0 0 0 3982 3 0 0 3 5207 4 6 1 0 5242 4 18 1 1 4124 0 3964 1 1 2 16 0 27 0 0 3968 4 1 1 2 58 0 27 0 1 3969 4 3968 6 0 0 5229 4 1 1 1 74 0 0 0 3 5210 4 18 1 1 4122 0 3972 26 0 0 4282 4 2 1 0 5242 4 0 1 2 5240 4 26 0 0 4282 4 3976 2 1 0 5240 4 24 1 2 21 4 6 1 0 4 0 2 1 0 5236 4 3980 26 0 0 4257 4 24 1 0 3834 4 24 1 2 21 4 6 1 0 4 0 3984 2 1 0 5236 4 26 0 0 4257 4 1 1 3 125 0 1 0 1 3 0 3988 18 1 1 8 0 24 1 2 21 4 14 1 0 18 0 24 1 2 21 4 3992 14 1 0 6 0 24 0 2 4516 4 24 1 2 21 4 28 0 2 4 0 3996 24 1 0 3834 4 PROCEDURE 287 3997 0 0 0 0 0 5 1 0 4724 4 27 0 3 4030 4 4000 27 0 0 4023 4 4 1 0 4724 4 5 1 0 4732 4 27 0 1 4009 4 4004 6 0 0 6271 4 1 1 2 3 0 27 0 0 4030 4 1 1 3 16 0 4008 24 1 0 4028 4 4 1 0 4732 4 5 1 0 4726 4 27 0 0 4025 4 4012 27 0 3 4030 4 4 1 0 4726 4 5 1 0 4722 4 27 0 0 4024 4 4016 27 0 3 4030 4 4 1 0 4722 4 5 1 0 4748 4 27 0 1 4030 4 4020 6 0 0 83 4 27 0 1 4030 4 1 1 3 1 0 1 1 1 1 0 4024 1 1 1 1 0 1 1 1 1 0 2 0 0 6271 4 1 1 2 16 0 4028 2 0 0 88 4 26 0 1 3997 4 1 1 3 0 0 2 0 0 88 4 4032 26 0 1 3997 4 PROCEDURE 288 4033 0 0 0 0 0 6 0 0 160 4 27 0 0 4042 4 4036 6 0 0 161 4 27 0 0 4041 4 24 0 1 4742 4 24 0 1 4420 4 4040 2 1 0 5326 4 2 0 0 160 4 26 1 1 5176 4 6 1 1 5324 4 4044 27 0 0 4047 4 5 1 0 4730 4 27 0 1 4049 4 25 0 1 4098 0 4048 24 1 0 4043 4 24 0 3 0 4 6 0 0 2 22 3 1 0 5327 4 4052 1 1 3 144 0 5 0 0 4720 4 5 1 0 5327 4 27 0 2 4068 4 4056 6 0 0 4720 4 24 1 2 19 4 3 1 0 5 0 26 1 1 4720 4 4060 6 1 0 4730 4 24 1 2 19 4 2 1 1 6 0 26 0 0 4099 4 4064 6 1 0 5086 4 24 1 2 19 4 28 1 1 4 0 2 0 0 4720 4 4068 1 1 3 6 0 2 0 0 52 4 26 1 1 4720 4 24 0 2 5326 4 4072 18 1 1 4123 0 6 1 0 5327 4 18 1 1 5 0 0 1 0 5070 4 4076 0 0 3 0 4 24 1 2 19 4 24 0 2 0 0 24 0 3 0 4 4080 4 0 0 2 22 2 0 0 5076 4 0 1 1 5070 4 24 0 3 5076 4 4084 28 1 1 6 0 6 1 0 5327 4 7 0 0 4720 4 6 1 0 5124 4 4088 28 1 1 5326 4 26 0 1 4033 4 PROCEDURE 289 4090 0 0 0 0 0 6 1 0 4730 4 4092 24 1 2 19 4 2 1 0 50 0 26 0 0 4099 4 6 1 0 5086 4 4096 24 1 2 19 4 28 1 1 4 0 26 0 1 4090 4 PROCEDURE 290 4099 0 0 0 0 0 4100 0 1 0 5070 4 0 0 3 0 4 0 0 2 18 4 6 1 0 5120 4 4104 4 0 0 10 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 4108 0 1 1 5070 4 26 0 1 4099 4 PROCEDURE 291 4110 0 0 0 0 0 0 1 0 5070 4 4112 0 0 3 0 4 0 0 2 16 4 6 1 0 5178 4 4 0 0 9 4 4116 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 5070 4 4120 26 0 1 4110 4 PROCEDURE 292 4121 0 0 0 0 0 26 0 0 4289 4 24 0 1 6276 4 4124 26 0 1 4124 4 0 0 0 4135 3 0 0 0 4127 3 24 1 2 21 4 4128 6 1 0 35 0 5 0 0 161 4 7 0 0 161 4 1 1 2 1 0 4132 2 0 0 160 4 24 1 2 21 4 2 1 0 34 0 24 1 2 21 4 4136 6 1 0 4 0 5 1 0 4744 4 27 0 1 4157 4 24 0 2 4432 4 4140 26 0 0 5063 4 0 1 2 138 4 26 0 0 4820 4 6 1 0 139 4 4144 5 0 0 142 4 7 0 0 142 4 1 1 2 1 0 27 0 0 4122 4 4148 6 1 0 4744 4 24 0 1 4742 4 24 0 1 4412 4 2 1 0 5340 4 4152 6 1 0 138 4 24 0 1 4742 4 24 0 1 4420 4 2 1 0 5326 4 4156 24 1 0 4122 4 24 1 2 21 4 6 1 0 4 0 5 1 0 4766 4 4160 27 0 0 4175 4 24 1 2 21 4 0 1 2 49 0 1 1 3 0 0 4164 18 1 1 7 0 2 1 0 4812 4 26 1 1 4812 4 18 1 1 3 0 4168 2 0 0 4033 4 1 0 1 3 0 1 1 3 126 0 24 0 1 4033 4 4172 18 1 1 0 0 24 1 2 21 4 14 1 1 0 0 26 0 1 4121 4 PROCEDURE 293 4176 0 0 0 0 0 6 1 0 5180 4 28 1 1 5234 4 24 0 1 6276 4 4180 26 0 1 4180 4 0 0 0 4190 3 0 0 0 4183 3 24 0 2 4536 4 4184 24 1 2 21 4 28 0 2 8 0 6 1 0 5242 4 18 0 1 4 0 4188 2 1 0 5242 4 24 1 0 4192 4 24 0 2 4534 4 26 0 0 5063 4 4192 6 1 0 5240 4 26 0 0 3997 4 26 0 1 4176 4 PROCEDURE 294 4195 0 0 0 0 0 4196 24 1 2 21 4 6 1 0 4 0 18 0 1 4124 0 18 0 1 4 0 4200 5 1 0 4734 4 27 0 0 4206 4 24 1 2 21 4 6 1 0 4 0 4204 5 1 0 4766 4 27 0 1 4208 4 6 1 0 5182 4 24 1 0 4235 4 4208 1 1 3 0 0 2 1 0 5238 4 24 0 2 4542 4 26 0 0 5063 4 4212 24 0 1 6276 4 26 0 1 4213 4 0 0 0 4218 3 0 0 0 4216 3 4216 0 1 2 5240 4 24 1 0 4219 4 0 1 2 5238 4 1 1 3 0 0 4220 18 1 1 2 0 1 1 2 105 0 27 0 0 4232 4 1 1 1 21 0 4224 27 0 0 4231 4 1 1 2 25 0 27 0 0 4230 4 1 1 1 34 0 4228 27 0 1 4237 4 1 1 3 1 0 1 1 1 1 0 1 1 1 1 0 4232 1 1 1 1 0 2 0 0 7327 4 1 1 3 1 0 3 1 0 94 4 4236 26 0 1 4195 4 1 1 3 0 0 24 1 0 4235 4 PROCEDURE 295 4239 0 0 0 0 0 4240 6 1 0 4746 4 2 1 0 5276 4 26 0 1 4239 4 PROCEDURE 296 4243 0 0 0 0 0 4244 6 1 0 4746 4 24 0 1 4742 4 24 0 1 4412 4 2 1 0 5340 4 4248 26 0 1 4243 4 PROCEDURE 297 4249 0 0 0 0 0 1 1 3 15 0 24 0 1 6276 4 4252 26 0 1 4252 4 0 0 0 4256 3 0 0 0 4255 3 26 0 0 4257 4 4256 26 0 1 4249 4 PROCEDURE 298 4257 0 0 0 0 0 24 1 2 21 4 24 0 2 18 0 4260 18 1 1 4123 0 1 1 3 16 0 18 1 1 5 0 28 1 1 5262 4 4264 26 0 1 4257 4 PROCEDURE 299 4265 0 0 0 0 0 6 0 0 6267 4 27 0 0 4271 4 4268 24 0 3 7354 4 6 1 0 6 0 24 1 0 4273 4 24 1 2 17 4 4272 6 1 0 10 0 5 1 0 4734 4 27 0 0 4829 4 4 1 0 4734 4 4276 5 1 0 4736 4 27 0 0 4829 4 4 1 0 4736 4 5 1 0 4738 4 4280 27 0 0 4829 4 26 0 1 4265 4 PROCEDURE 300 4282 0 0 0 0 0 1 1 3 0 0 4284 27 1 0 4288 4 18 1 1 2 0 27 0 0 4285 4 18 1 1 8 0 4288 26 0 1 4282 4 PROCEDURE 301 4289 0 0 0 0 0 0 1 0 5070 4 0 0 3 0 4 4292 0 0 2 20 4 6 1 0 5178 4 4 0 0 11 4 25 1 1 4096 0 4296 24 0 3 0 4 23 0 2 0 256 0 1 1 5070 4 26 0 1 4289 4 PROCEDURE 302 4300 0 0 0 0 0 6 0 0 6267 4 27 0 0 4321 4 24 0 3 7354 4 4304 6 1 0 1 0 2 0 0 4110 4 24 0 1 4110 4 23 0 0 0 0 4308 0 0 0 7354 3 24 1 0 4320 4 26 0 0 4110 4 0 1 0 5070 4 4312 0 0 3 0 4 24 1 2 17 4 24 0 2 6 0 3 0 0 7354 4 4316 24 1 2 17 4 4 1 0 5 0 2 0 0 7355 4 0 1 1 5070 4 4320 26 0 1 4300 4 26 0 0 4110 4 26 0 1 4300 4 PROCEDURE 303 4323 0 0 0 0 0 4324 6 0 0 6267 4 27 0 0 4330 4 24 0 3 7354 4 6 1 0 6 0 4328 26 0 0 3997 4 26 0 1 4323 4 24 1 2 17 4 6 1 0 10 0 4332 24 1 0 4328 4 PROCEDURE 304 4333 0 0 3 5207 4 6 1 0 5086 4 28 1 1 5280 4 4336 6 0 0 88 4 27 0 0 4373 4 24 0 3 7354 4 6 1 0 1 0 4340 18 0 1 5 0 4 0 0 7354 4 28 1 1 5280 4 24 0 2 4450 4 4344 28 0 2 5282 4 6 0 0 6271 4 1 1 2 1 0 27 0 1 4352 4 4348 6 0 0 88 4 27 0 3 4352 4 6 1 0 5292 4 2 1 0 5242 4 4352 6 0 0 136 4 27 0 0 4367 4 6 0 0 6271 4 1 1 2 1 0 4356 27 0 0 4362 4 1 1 2 1 0 27 0 1 4364 4 6 0 0 88 4 4360 27 0 2 4389 4 24 1 0 4364 4 6 0 0 88 4 27 0 3 4389 4 4364 6 1 0 5294 4 2 1 0 5250 4 24 1 0 4389 4 24 0 2 5294 4 4368 18 1 1 4123 0 1 1 3 26 0 18 1 1 5 0 28 1 1 5250 4 4372 24 1 0 4389 4 6 0 0 6271 4 1 1 2 4 0 27 0 0 4403 4 4376 24 0 3 7354 4 6 1 0 1 0 3 0 0 4812 4 24 0 1 6271 4 4380 5 0 0 4412 4 27 0 2 4391 4 6 0 0 4812 4 18 0 1 5 0 4384 4 0 0 7354 4 28 1 1 5280 4 24 0 1 6271 4 6 0 0 4416 4 4388 28 0 2 5282 4 0 0 3 5210 4 26 0 1 3863 4 2 0 0 4813 4 4392 6 0 0 136 4 27 0 1 4400 4 6 0 0 4813 4 18 0 1 5 0 4396 4 0 0 7354 4 24 0 1 6271 4 4 0 0 4412 4 28 1 1 5262 4 4400 24 0 1 6271 4 6 0 0 4412 4 24 1 0 4383 4 24 0 3 7354 4 4404 6 1 0 1 0 1 1 2 6 0 18 0 1 5 0 4 0 0 7354 4 4408 1 1 1 7 0 28 1 0 5243 4 24 1 0 4389 4 0 0 0 0 0 SECTION 305 4412 18 0 18 0 18 0 1+ 0 4416 1+ 0 116+ 3 1180 3 119. 3 4420 + 0 16 0 16 0 1t 0 4424 2t 0 0 0 SECTION 306 4426 0 54 3 8707 0 2 2 0 3 0 4428 0 5978 3 8194 0 2 0 0 2 1 0 138 3 20485 0 5 0 0 5 1 4432 0 138 3 5 3 0 0 0 5 0 0 138 3 5 3 0 0 0 5 1 SECTION 307 4436 0 5234 3 20485 0 5 0 0 5 0 0 5236 3 5 3 0 0 0 5 0 4440 0 6005 3 20485 0 5 0 0 5 0 0 5240 3 5 3 0 0 0 5 0 4444 0 6004 3 40970 2 10 0 0 10 0 0 5242 3 5 3 0 0 0 5 0 4448 0 5248 3 16389 0 4 0 0 5 1 0 5234 3 20485 0 5 0 0 5 0 4452 0 5236 3 5 3 0 0 0 5 0 0 5240 3 5 3 0 0 0 5 0 4456 0 5242 3 5 3 0 0 0 5 0 0 5248 3 20485 0 5 0 0 5 1 SECTION 308 4460 0 5234 3 20485 0 5 0 0 5 0 0 5236 3 5 3 0 0 0 5 0 4464 0 5240 3 5 3 0 0 0 5 0 0 5242 3 5 3 0 0 0 5 0 4468 0 5244 3 21765 14 5 5 0 5 0 0 5246 3 8962 0 2 3 0 2 0 4472 0 5248 3 12803 0 3 2 0 3 0 0 5250 3 40970 14 10 0 0 10 0 4476 0 5254 3 5 3 0 0 0 5 0 0 5256 3 20485 0 5 0 0 5 1 SECTION 309 4480 0 5234 3 20485 0 5 0 0 5 0 0 5236 3 5 3 0 0 0 5 0 4484 0 5254 3 20485 0 5 0 0 5 0 0 5256 3 20485 0 5 0 0 5 0 4488 0 5258 3 20485 0 5 0 0 5 0 0 5260 3 20485 0 5 0 0 5 0 4492 0 5253 3 8962 0 2 3 0 2 0 0 5245 3 12803 0 3 2 0 3 0 4496 0 5246 3 8962 0 2 3 0 2 0 0 5247 3 12803 0 3 2 0 3 0 4500 0 5248 3 8962 0 2 3 0 2 0 0 5249 3 12803 0 3 2 0 3 0 4504 0 5250 3 5121 0 1 4 0 1 0 0 5251 3 8962 0 2 3 0 2 0 4508 0 5252 3 8962 0 2 3 0 2 1 SECTION 310 4510 0 5234 3 20485 0 5 0 0 5 0 4512 0 5236 3 5 3 0 0 0 5 0 0 6004 3 20485 0 5 0 0 5 0 4516 0 5240 3 5 3 0 0 0 5 0 0 5242 3 5 3 0 0 0 5 0 4520 0 5244 3 5 3 0 0 0 5 0 0 5246 3 5 3 0 0 0 5 0 4524 0 5248 3 5 3 0 0 0 5 0 0 5250 3 5 3 0 0 0 5 0 4528 0 5252 3 5 3 0 0 0 5 0 0 5254 3 5 3 0 0 0 5 0 4532 0 5256 3 5 3 0 0 0 5 1 SECTION 311 4534 0 5236 3 5 3 0 0 0 5 0 4536 0 5240 3 5 3 0 0 0 5 0 0 5242 3 3 3 0 0 0 3 0 4540 0 5250 3 5 11 0 0 0 5 1 0 5236 3 5 3 0 0 0 5 0 4544 0 5240 3 5 3 0 0 0 5 0 0 5250 3 5 3 0 0 0 5 1 SECTION 312 4548 0 5236 3 6 3 0 0 0 6 0 0 5240 3 3 3 0 0 0 3 0 4552 0 5242 3 3 3 0 0 0 3 0 0 5244 3 5 14 0 0 0 5 0 4556 0 5246 3 1 0 0 0 0 1 0 0 5248 3 2 0 0 0 0 2 0 4560 0 5250 3 10 14 0 0 0 10 0 0 5262 3 5 3 0 0 0 5 0 4564 0 5270 3 5 3 0 0 0 5 1 SECTION 313 4566 0 5236 3 6 3 0 0 0 6 0 4568 0 5254 3 3 0 0 0 0 3 0 0 5256 3 5 0 0 0 0 5 0 4572 0 5258 3 3 0 0 0 0 3 0 0 5260 3 5 0 0 0 0 5 0 4576 0 5253 3 1 0 0 0 0 1 0 0 5245 3 1 0 0 0 0 1 0 4580 0 5246 3 2 0 0 0 0 2 0 0 5247 3 2 0 0 0 0 2 0 4584 0 5248 3 2 0 0 0 0 2 0 0 5249 3 2 0 0 0 0 2 0 4588 0 5250 3 1 0 0 0 0 1 0 0 5251 3 1 0 0 0 0 1 0 4592 0 5252 3 1 0 0 0 0 1 0 0 5262 3 5 3 0 0 0 5 1 SECTION 314 4596 0 5236 3 6 3 0 0 0 6 0 0 5240 3 5 3 0 0 0 5 0 4600 0 5262 3 5 3 0 0 0 5 1 SECTION 315 4602 0 5243 3 16389 0 4 0 0 5 0 4604 0 5244 3 16389 12 4 0 0 5 1 SECTION 316 4606 6e11 0 8e19 0 4608 e11 0 9e11 0 t122 0 +322 0 4612 £000 0 11t11 0 12000 0 13t91 0 SECTION 317 4616 1te11 0 1+000 0 1:e11 0 21422 0 4620 22e11 0 23522 0 25e11 0 26622 0 4624 27e22 0 295e2 0 5e2 0 2ee39 0 4628 e:1 0 e41 0 2++32 0 2:531 0 4632 3153t 0 114 0 35e1e 0 e43 0 4636 36991 0 e13 0 37719 0 e91 0 4640 38e11 0 39117 0 3t112 0 3e11: 0 4644 e14 0 3:e22 0 3.822 0 40e11 0 4648 41819 0 822 0 43e22 0 45000 0 4652 4+e42 0 4.:+2 0 e12 0 4£e42 0 4656 50e+2 0 e92 0 52e42 0 53+62 0 4660 54e.2 0 e11 0 55e6t 0 e.1 0 4664 56162 0 57e1e 0 e.1 0 59000 0 4668 5t22: 0 222 0 5:e16 0 5.915 0 4672 60e25 0 61e95 0 e62 0 63e26 0 4676 83e91 0 e11 0 84e32 0 8653t 0 4680 e62 0 8e000 0 8£e91 0 90000 0 4684 94e91 0 e11 0 95000 0 96+1£ 0 4688 e.1 0 97e22 0 98e4t 0 e42 0 4692 99e22 0 9te12 0 9ee22 0 9+e31 0 4696 9:e1e 0 e43 0 9.511 0 ££000 0 4700 e19 0 e:9 0 e11 0 t0t 1 4704 4t 1 tt 3 188. 3 0 0 4708 e:1 0 0 0 SECTION 318 4710 2 0 10000 0 4712 £££ 0 70 0 7 0 8 0 4716 80 0 £00 0 4 0 0 0 4720 0 0 0 0 SECTION 319 4722 26355 0 73515 0 4724 57273 0 53666 0 65369 0 67696 0 4728 0 0 5e000 0 7. 0 7.000 0 4732 35572 0 65667 0 40000 0 55655 0 4736 46772 0 54746 0 35572 0 56596 0 4740 3££ 0 ££+00 0 0 0 0 0 4744 55573 0 72585 0 :5:5: 0 5:5:5 0 4748 37455 0 75516 0 £6£6£ 0 6£6£6 0 4752 45577 0 59655 0 £4£4£ 0 4£4£4 0 4756 42 0 0 0 15965 0 53585 0 4760 :5:69 0 5:5:5 0 :5:59 0 5:5:5 0 4764 :5:5e 0 5:5:5 0 16454 0 73695 0 4768 148. 3 10 0 55972 0 56596 0 SECTION 320 4772 1 0 0 0 16 0 0 0 4776 256 0 0 0 4096 0 0 0 4780 65536 0 0 0 48576 0 10 0 4784 77216 0 167 0 35456 0 2684 0 4788 67296 0 42949 0 £££££ 0 £££££ 0 4792 1 0 0 0 t 0 0 0 4796 64 0 0 0 3.8 0 0 0 4800 2710 0 0 0 186t0 0 0 0 4804 £4240 0 0 0 89680 0 9 0 4808 5.100 0 5£ 0 t+t00 0 3e9 0 4812 0 0 0 0 3£ 0 0 0 4816 16773 0 53585 0 56554 0 67695 0 PROCEDURE 321 4820 0 0 0 0 0 1 1 3 0 0 2 1 0 138 4 4 1 0 138 4 4824 18 1 1 2 0 2 1 0 138 4 27 1 1 4823 4 6 1 0 138 4 4828 26 0 1 4820 4 PROCEDURE 322 4829 0 0 3 5210 4 1 1 3 1 0 7 0 0 5973 4 4832 0 0 3 5207 4 6 0 0 4742 4 1 1 2 3 0 27 0 1 4838 4 4836 1 1 3 1 0 2 0 0 5332 4 26 0 0 4033 4 6 0 0 5973 4 4840 18 0 1 2 0 2 0 0 138 4 24 0 2 4430 4 28 1 2 5330 4 4844 24 1 2 21 4 6 1 0 4 0 18 0 1 4124 0 18 0 1 4 0 4848 5 1 0 4734 4 27 0 0 4859 4 24 1 2 21 4 6 1 0 4 0 4852 5 1 0 4766 4 27 0 0 4862 4 6 1 0 5126 4 3 0 0 6272 4 4856 2 1 0 5338 4 26 0 0 4289 4 24 1 0 4844 4 6 1 0 4770 4 4860 24 1 2 21 4 2 1 0 4 0 6 1 0 4734 4 2 1 0 5332 4 4864 26 0 0 4033 4 26 0 0 5059 4 26 1 1 5184 4 26 1 2 5186 4 4868 24 0 3 0 4 6 0 0 2 22 26 0 0 2759 4 0 0 3 5207 4 4872 18 1 1 4127 0 24 0 3 0 4 2 0 0 6 22 18 1 1 1 0 4876 2 0 0 2759 4 1 1 3 1 0 24 0 1 2759 4 18 0 3 0 0 4880 3 0 0 2759 4 18 1 3 2 0 18 1 1 4120 0 15 0 3 122 4 4884 27 0 0 4904 4 24 0 3 0 4 6 0 0 6 22 1 0 1 0 0 4888 18 1 3 3 0 18 1 1 4127 0 24 0 3 0 4 2 0 0 6 22 4892 27 1 1 4895 4 0 0 2 2759 4 24 1 0 4897 4 0 0 2 2759 4 4896 18 1 3 10 0 15 0 3 150 4 27 0 1 4904 4 24 0 3 0 4 4900 6 0 0 2 22 2 0 2 6004 4 25 0 2 1 0 24 1 0 4904 4 4904 25 0 1 1 0 24 1 0 4868 4 PROCEDURE 323 4906 6 0 0 5230 4 3 0 0 6203 4 4908 24 0 0 5970 4 7 0 0 5979 4 26 1 3 62 4 6 0 3 5980 4 4912 18 0 1 9 0 18 0 1 4119 0 5 0 0 5999 4 27 0 3 4917 4 4916 7 0 0 5999 4 25 0 3 1 0 24 1 0 4911 4 1 1 3 1 0 4920 7 0 0 5999 4 6 0 0 5979 4 2 0 0 5978 4 6 0 0 5999 4 4924 2 0 0 5979 4 PROCEDURE 324 4925 26 0 0 4090 4 26 0 0 4090 4 6 1 0 4750 4 4928 24 1 2 19 4 2 1 0 4 0 1 1 3 6 0 24 1 2 19 4 4932 2 0 0 10 0 26 0 0 4090 4 6 1 0 4752 4 24 1 2 19 4 4936 2 1 0 4 0 26 0 0 4090 4 26 1 1 5188 4 26 1 2 5190 4 4940 6 0 1 170 4 24 1 2 19 4 2 1 2 5 0 25 0 2 2 0 4944 24 1 0 4950 4 6 1 0 4730 4 24 1 2 19 4 2 1 0 52 0 4948 26 0 0 4099 4 26 1 2 5190 4 25 0 1 1 0 24 1 0 4940 4 4952 26 0 0 4099 4 26 0 0 4090 4 26 0 0 4090 4 24 1 2 21 4 4956 6 1 0 4 0 5 1 0 4770 4 27 0 0 4969 4 24 1 2 21 4 4960 24 0 2 4 0 18 1 1 4123 0 1 1 3 50 0 18 1 1 5 0 4964 24 1 2 19 4 28 1 1 4 0 26 0 0 4090 4 26 0 0 4289 4 4968 24 1 0 4955 4 6 0 0 6270 4 27 0 0 4981 4 0 1 0 5070 4 4972 0 0 3 0 4 0 1 2 5192 4 6 1 0 5194 4 4 0 0 10 4 4976 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 5070 4 4980 24 1 0 4997 4 0 1 0 5070 4 0 0 3 0 4 6 1 0 5196 4 4984 4 0 0 10 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 4988 0 1 1 5070 4 0 1 0 5070 4 0 0 3 0 4 6 1 0 5198 4 4992 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 4996 0 1 1 5070 4 6 1 0 62 4 2 1 0 5406 4 6 0 0 6000 4 5000 27 0 0 33 4 6 0 0 6270 4 27 0 0 5006 4 6 0 0 6268 4 5004 27 0 0 5038 4 24 1 0 5021 4 6 0 0 7347 4 27 0 0 5038 4 5008 2 0 0 4090 4 0 1 0 5070 4 0 0 3 0 4 6 0 0 4090 4 5012 4 1 0 5146 4 18 1 1 4118 0 6 1 0 5200 4 4 0 0 9 4 5016 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 5070 4 5020 26 0 0 4110 4 24 1 2 17 4 6 1 0 4 0 5 1 0 4818 4 5024 27 0 0 5038 4 4 1 0 4818 4 5 1 0 4738 4 27 0 0 5035 4 5028 4 1 0 4738 4 5 1 0 4816 4 27 0 0 5035 4 4 1 0 4816 4 5032 5 1 0 4770 4 27 0 0 5038 4 24 1 0 5020 4 1 1 3 1 0 5036 2 0 0 6269 4 24 1 0 33 4 2 0 0 6269 4 6 0 0 6270 4 5040 27 0 0 5050 4 0 1 0 5070 4 0 0 3 0 4 6 1 0 5198 4 5044 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 5048 0 1 1 5070 4 24 1 0 33 4 0 1 0 5070 4 0 0 3 0 4 5052 6 1 0 5202 4 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 5056 23 0 2 0 256 0 1 1 5070 4 24 1 0 33 4 PROCEDURE 325 5059 0 0 0 0 0 5060 6 0 0 5059 4 2 0 0 4033 4 24 1 0 4056 4 PROCEDURE 326 5063 0 0 0 0 0 5064 24 1 2 0 4 28 0 3 4 0 26 0 1 5063 4 24 1 2 21 4 5068 6 0 0 0 0 28 0 2 4 0 SECTION 1018 5070 0 0 0 0 5072 0 0 0 0 0 0 0 0 5076 0 0 0 0 0 0 0 0 5080 0 0 0 0 0 0 0 0 5084 0 0 2002t 0 0 0 2002. 0 5088 0 0 20014 0 0 0 20378 0 5092 0 0 1+2 0 0 0 20254 0 5096 0 0 20078 0 8000 0 5141 0 5100 0 0 11 0 8000 0 5146 0 5104 0 0 73000 0 0 0 2+ 0 5108 8000 0 5142 0 0 0 12 0 5112 83041 0 4 0 0 0 9 0 5116 £££££ 0 £££££ 0 0 0 . 0 5120 0 0 8 0 0 0 4 0 5124 0 0 2002+ 0 £5£5£ 0 5£5£5 0 5128 25569 0 7 0 :5:5: 0 5:5 0 5132 0 0 t0 0 0 0 1++ 0 5136 1 0 1 0 0 0 20028 0 5140 0 0 32 0 0 0 64 0 5144 0 0 51000 0 0 0 t 0 5148 0 0 53000 0 ££802 0 7£: 0 5152 0 0 66666 0 6 0 2+ 0 5156 0 0 5 0 0 0 2003+ 0 5160 0 0 20012 0 2 0 1. 0 5164 1+ 0 0 0 0 0 0 0 5168 0 0 e 0 48576 0 10 0 5172 27464 0 7 0 30000 0 7 0 5176 2+ 0 2 0 0 0 7 0 5180 0 0 20008 0 0 0 1 0 5184 1 0 64 0 0 0 +8 0 5188 0 0 3£2 0 0 0 30 0 5192 2 0 t 0 0 0 23 0 5196 0 0 21 0 0 0 22 0 5200 0 0 25 0 0 0 1e 0 5204 0 0 0 0 SECTION 1019 5206 2 0 0 0 5208 70000 0 6700 0 66666 0 2- 0 5212 £££££ 0 5500 0 5600 0 4096 0 5216 5300 0 7200 0 14 0 53000 0 5220 8192 0 4000 0 4095 0 1- 0 5224 66.64 0 3- 0 3 0 8191 0 5228 5- 0 40.6 0 £££00 0 0 0 5232 0 0 0 0 SECTION 1020 PROCEDURE 1004 CHAPT 5 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 11 12 0 0 0 0 12 0 0 0 0 13 0 0 0 0 14 0 0 0 0 15 16 0 0 0 0 16 0 0 0 0 17 0 0 0 0 18 0 0 0 0 19 20 0 0 0 0 20 0 0 0 0 21 0 0 0 0 22 0 0 0 0 23 24 0 0 0 0 24 0 0 0 0 25 0 0 0 0 0 25 1 1 4096 0 28 24 0 3 0 4 23 0 2 0 1792 0 0 0 0 0 0 0 0 0 0 32 26 0 1 26 4 PROCEDURE 327 33 0 1 0 5102 4 0 0 3 0 4 1 1 3 5 0 36 0 0 2 5190 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 1024 40 0 1 1 5102 4 6 1 0 16 4 2 1 0 30 4 6 1 0 5116 4 44 24 1 2 15 4 28 0 0 0 0 24 0 2 718 4 24 1 2 15 4 48 28 1 2 2 0 PROCEDURE 328 49 6 1 0 5118 4 28 0 0 5357 4 6 1 0 5120 4 52 2 1 0 7362 4 6 1 0 5120 4 2 1 0 7364 4 1 1 3 1 0 56 2 0 0 5238 4 6 0 0 6057 4 27 0 0 64 4 2 0 0 5235 4 60 1 1 3 10 0 2 0 0 5237 4 24 0 2 6056 4 26 0 0 101 4 64 1 1 3 8 0 2 0 0 5237 4 6 0 0 6045 4 27 0 0 71 4 68 2 0 0 5235 4 24 0 2 6044 4 26 0 0 101 4 26 1 3 5406 4 72 1 1 3 1 0 18 1 1 4118 0 15 0 3 5357 4 7 0 3 5357 4 76 25 0 3 1 0 24 1 0 72 4 6 0 0 5387 4 27 0 0 85 4 80 2 0 0 5235 4 1 1 3 2 0 2 0 0 5238 4 24 0 2 5386 4 84 26 0 0 101 4 1 1 3 2 0 7 0 0 5978 4 4 0 0 4982 4 88 5 0 0 5978 4 3 0 0 766 4 27 0 0 95 4 18 0 1 5 0 92 4 0 0 5978 4 24 1 2 4897 4 28 1 1 0 0 6 0 0 4897 4 96 4 0 0 766 4 2 0 0 5978 4 6 0 0 6270 4 27 0 0 142 4 100 24 1 0 151 4 PROCEDURE 329 101 0 0 0 0 0 3 0 0 5234 4 7 0 0 5235 4 104 26 1 1 5234 4 24 0 3 0 4 6 0 1 2 0 18 0 1 4124 0 108 2 0 0 5236 4 1 0 1 1 0 24 0 1 5236 4 15 0 0 5979 4 112 18 1 1 4 0 24 0 3 0 4 14 0 1 2 0 25 0 1 1 0 116 24 1 0 105 4 1 1 3 0 0 2 0 0 5236 4 26 1 2 5406 4 120 1 1 3 1 0 7 0 0 5236 4 26 1 1 5234 4 24 0 3 0 4 124 6 0 1 2 0 18 0 1 4124 0 5 0 0 5236 4 27 0 1 137 4 128 24 0 1 5236 4 6 0 0 5356 4 24 0 1 5237 4 18 0 3 0 0 132 24 0 3 0 4 7 0 1 2 0 6 0 0 5238 4 24 0 1 5236 4 136 7 0 0 5356 4 25 0 1 1 0 24 1 0 123 4 25 0 2 1 0 140 24 1 0 120 4 26 0 1 101 4 PROCEDURE 330 142 0 1 0 5102 4 0 0 3 0 4 144 0 1 2 5122 4 6 1 0 5124 4 4 0 0 10 4 25 1 1 4096 0 148 24 0 3 0 4 23 0 2 0 256 0 0 3 5106 4 6 0 0 6275 4 152 27 0 1 161 4 6 0 0 6274 4 1 1 1 10 0 18 0 1 5 0 156 4 0 0 7 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 160 0 160 0 0 3 5191 4 6 1 0 5126 4 28 0 0 5234 4 6 1 0 5128 4 164 28 0 0 5406 4 6 1 0 5130 4 28 0 0 5206 4 1 1 3 1 0 168 7 0 0 5970 4 1 1 3 998 0 4 0 0 5970 4 3 0 0 5239 4 172 1 1 1 1 0 3 0 0 5240 4 1 1 1 1 0 2 0 0 5241 4 176 6 1 0 5132 4 4 0 0 6275 4 3 1 0 5102 4 26 1 3 5102 4 PROCEDURE 331 180 26 0 0 4749 4 24 1 2 19 4 6 1 0 6 0 5 1 0 752 4 184 27 0 0 198 4 24 1 2 19 4 6 1 0 4 0 5 1 0 5134 4 188 27 0 1 180 4 1 1 3 4 0 0 0 2 5192 4 25 1 1 4096 0 192 24 0 3 0 4 26 0 2 0 512 0 0 0 195 3 25 1 1 4096 0 196 24 0 3 0 4 26 0 2 0 768 24 0 2 610 4 24 1 2 19 4 200 28 0 2 4 0 24 0 2 610 4 24 1 2 19 4 28 1 2 2 0 204 6 1 0 5210 4 18 0 1 2 0 4 1 0 5213 4 2 0 0 5346 4 208 6 1 0 5214 4 2 1 0 5354 4 6 0 0 6275 4 27 0 0 241 4 212 6 0 0 6270 4 27 0 1 239 4 6 0 0 7351 4 27 0 1 222 4 216 6 1 0 5136 4 0 1 2 762 4 4 0 0 7 4 25 1 1 4096 0 220 24 0 3 0 4 23 0 2 160 0 0 0 3 5191 4 6 1 0 5138 4 224 24 1 2 13 4 2 1 0 4 0 6 0 0 5193 4 24 1 2 13 4 228 2 1 0 7 0 6 1 0 5140 4 24 1 2 13 4 2 1 0 8 0 232 6 0 0 5346 4 24 1 2 13 4 2 1 0 11 0 6 1 0 4882 4 236 24 1 2 13 4 2 1 0 12 0 26 0 0 4780 4 6 1 0 5142 4 240 2 1 0 7358 4 26 0 0 597 4 6 0 0 6270 4 27 0 1 254 4 244 0 1 0 5102 4 0 0 3 0 4 0 1 2 5144 4 6 1 0 5136 4 248 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 252 0 0 3 5106 4 24 1 0 264 4 0 1 0 5102 4 0 0 3 0 4 256 0 0 2 0 4 6 1 0 5146 4 4 0 0 11 4 25 1 1 4096 0 260 24 0 3 0 4 23 0 2 0 256 0 1 1 5102 4 24 1 0 275 4 264 24 0 2 620 4 24 1 2 21 4 28 1 2 4 0 26 0 0 4280 4 268 6 0 0 4856 4 24 1 2 21 4 2 1 0 5 0 6 1 0 4882 4 272 24 1 2 21 4 2 1 0 6 0 26 0 0 4280 4 24 0 2 628 4 276 24 1 2 21 4 28 1 2 4 0 24 1 2 21 4 2 1 0 16 0 280 26 0 0 4280 4 26 0 0 4749 4 24 0 2 610 4 24 1 2 19 4 284 28 0 2 4 0 6 1 0 5210 4 26 0 0 4737 4 2 0 0 5356 4 288 24 0 2 610 4 24 1 2 19 4 28 1 2 2 0 26 0 0 597 4 292 24 0 2 636 4 24 1 2 21 4 28 1 2 4 0 26 0 0 4280 4 PROCEDURE 332 296 0 0 2 5194 4 10 0 0 5977 4 1 1 1 204 0 2 0 0 5334 4 300 6 0 0 6009 4 18 0 3 3 0 18 0 1 4127 0 4 0 0 5999 4 304 4 0 0 5999 4 3 0 0 5274 4 2 0 0 5273 4 6 0 0 6009 4 308 3 0 0 6010 4 2 0 0 6011 4 26 1 2 6008 4 26 1 1 5148 4 312 26 0 0 4749 4 24 1 2 19 4 6 1 0 6 0 5 1 0 756 4 316 27 0 0 458 4 24 0 2 660 4 24 1 2 19 4 28 0 2 4 0 320 24 1 2 19 4 6 1 0 46 0 5 1 0 4814 4 3 1 0 766 4 324 27 0 0 401 4 6 0 0 5210 4 1 1 2 25 0 27 0 0 355 4 328 6 0 0 5212 4 26 0 0 4737 4 5 0 0 5970 4 27 0 3 368 4 332 6 1 0 4814 4 24 1 2 19 4 2 1 0 46 0 2 1 0 766 4 336 6 0 0 6011 4 24 0 3 0 4 5 0 0 4 22 18 0 1 5 0 340 4 0 0 750 4 24 0 3 0 4 4 0 0 4 22 24 0 0 24 4 344 28 0 0 6012 4 1 1 2 2 0 7 0 0 6009 4 7 0 0 6010 4 348 7 0 0 6011 4 24 0 3 22 4 7 0 0 5 0 1 1 1 1 0 352 7 0 0 5273 4 7 0 0 5274 4 24 1 0 401 4 6 0 0 5212 4 356 18 0 1 2 0 1 0 1 8 0 24 0 1 6011 4 14 0 0 6012 4 360 6 0 0 5216 4 26 0 0 4737 4 1 0 1 7 0 24 0 1 6011 4 364 14 0 0 6012 4 6 0 0 5214 4 26 0 0 4737 4 24 1 0 375 4 PROCEDURE 333 368 6 0 0 5210 4 1 1 2 3 0 27 0 0 378 4 1 1 2 1 0 372 27 0 1 401 4 6 0 0 5214 4 26 0 0 4737 4 18 1 3 2 0 376 18 1 1 4126 0 2 0 0 5242 4 6 0 0 5273 4 1 1 1 1 0 380 24 0 1 6011 4 2 0 0 6013 4 1 0 1 8 0 6 0 0 5214 4 384 26 0 0 4737 4 1 0 1 7 0 1 1 1 2 0 14 1 2 6012 4 388 1 0 1 16 0 6 0 0 6011 4 5 0 0 6010 4 18 0 1 4 0 392 14 1 2 6012 4 1 1 3 0 0 24 0 1 6011 4 5 0 0 6012 4 396 24 0 1 6011 4 2 0 0 6012 4 1 1 3 2 0 7 0 0 6011 4 400 7 0 0 5273 4 PROCEDURE 334 401 24 0 2 660 4 24 1 2 19 4 28 1 2 2 0 404 26 0 0 597 4 6 1 0 766 4 27 0 0 312 4 25 0 2 2 0 408 24 1 0 409 4 26 1 3 5150 4 6 1 3 5210 4 26 0 0 4737 4 412 2 1 3 5210 4 25 0 3 2 0 24 1 0 410 4 1 0 1 8 0 416 6 1 0 5212 4 18 0 1 3 0 14 1 2 6010 4 6 0 0 5210 4 420 1 1 2 19 0 27 0 1 429 4 6 0 0 5212 4 26 0 0 4743 4 424 0 0 3 5191 4 1 0 1 8 0 18 0 1 3 0 14 1 2 6010 4 428 24 1 0 434 4 6 1 0 5214 4 1 1 1 2 0 7 1 2 6010 4 432 3 1 0 5214 4 7 1 0 5214 4 6 1 0 5210 4 18 0 1 1 0 436 2 1 0 5210 4 6 1 0 5208 4 18 0 1 4122 0 2 1 0 5208 4 440 24 0 2 672 4 0 1 0 5102 4 0 0 3 0 4 24 1 2 21 4 444 24 0 2 0 0 24 0 3 0 4 4 0 0 2 22 2 0 0 5108 4 448 0 1 1 5102 4 24 0 3 5108 4 28 1 2 4 0 25 0 1 12 0 452 24 1 0 312 4 6 1 0 4882 4 24 1 2 21 4 2 1 0 52 0 456 26 0 0 4280 4 24 1 0 311 4 PROCEDURE 335 458 24 0 3 0 4 6 0 0 2 22 460 27 0 0 465 4 6 1 0 4882 4 24 1 2 21 4 2 1 1 4 0 464 26 0 0 4280 4 24 0 2 684 4 24 1 2 19 4 28 0 2 4 0 468 6 1 0 5128 4 28 1 1 5550 4 26 0 0 4210 4 24 0 2 684 4 472 24 1 2 19 4 28 1 2 2 0 26 0 0 597 4 26 0 0 4749 4 476 24 1 2 19 4 6 1 0 6 0 5 1 0 5152 4 27 0 1 512 4 480 24 0 2 690 4 24 1 2 19 4 28 0 2 8 0 6 1 0 5152 4 484 2 1 0 5208 4 2 1 0 5210 4 24 0 2 686 4 24 1 2 19 4 488 28 1 2 4 0 24 1 2 19 4 2 1 0 8 0 PROCEDURE 336 491 26 1 1 5998 4 492 24 0 3 0 4 2 0 0 2 22 6 0 1 5212 4 1 1 2 1 0 496 27 0 0 503 4 1 1 2 1 0 27 0 1 507 4 1 1 3 32 0 500 18 1 1 4118 0 1 1 3 32 0 14 0 1 5980 4 25 0 1 1 0 504 24 1 0 494 4 6 0 1 5213 4 27 0 0 510 4 6 1 0 4814 4 508 24 1 2 19 4 2 1 0 46 0 26 0 0 597 4 26 0 0 4749 4 PROCEDURE 337 512 26 0 0 4647 4 26 0 0 4647 4 24 1 0 517 4 26 0 0 597 4 516 26 0 0 4749 4 24 1 2 19 4 6 1 0 12 0 5 1 0 4794 4 520 27 0 0 772 4 4 1 0 4794 4 5 1 0 4790 4 27 0 0 772 4 524 4 1 0 4790 4 5 1 0 4792 4 27 0 0 772 4 PROCEDURE 338 527 24 1 2 19 4 528 6 1 0 14 0 18 0 1 4 0 24 1 2 19 4 2 1 0 2 0 532 24 1 2 19 4 2 1 0 14 0 24 0 2 648 4 24 1 2 19 4 536 28 0 2 2 0 24 0 2 648 4 24 1 2 19 4 28 1 2 2 0 540 24 1 2 19 4 6 1 0 46 0 5 1 0 4814 4 27 0 0 515 4 544 26 0 0 597 4 6 1 0 5210 4 26 0 0 4737 4 2 1 0 5210 4 548 6 1 0 5214 4 26 0 0 4737 4 2 1 0 5214 4 6 1 0 5208 4 552 26 0 0 4737 4 3 1 0 5208 4 24 0 3 0 4 2 0 0 2 22 556 6 1 0 5212 4 27 0 0 582 4 26 1 2 5154 4 6 0 2 6004 4 560 5 1 0 5208 4 27 0 0 582 4 25 0 2 1 0 24 1 0 559 4 564 1 1 3 2 0 7 0 0 6011 4 7 1 0 5210 4 7 0 0 5273 4 PROCEDURE 339 568 6 1 0 5210 4 18 0 3 5 0 1 0 1 1 0 24 0 0 5214 4 572 15 0 0 5979 4 18 0 1 2 0 4 0 0 5273 4 1 1 2 1 0 576 18 0 1 3 0 4 1 0 5208 4 24 0 1 6011 4 2 1 0 6010 4 580 6 0 0 4966 4 24 1 0 583 4 6 0 0 4917 4 0 0 2 5195 4 584 10 1 0 5210 4 4 1 0 5214 4 2 0 1 5550 4 6 0 0 5214 4 588 24 0 3 0 4 2 0 0 4 22 6 0 2 5288 4 24 0 0 5208 4 592 2 0 0 5406 4 6 0 0 5210 4 4 0 0 5210 4 7 0 2 5288 4 596 24 1 0 516 4 PROCEDURE 340 597 0 0 0 0 0 24 1 2 19 4 24 0 2 0 0 600 18 1 1 4123 0 1 1 3 52 0 18 1 1 5 0 24 1 2 17 4 604 28 1 1 0 0 1 0 1 15 0 24 1 2 17 4 14 0 0 2 0 608 26 0 0 4134 4 26 0 1 597 4 SECTION 341 610 0 5206 3 5 3 0 0 0 5 0 612 0 5208 3 181 3 0 0 11 5 0 0 5210 3 9493 2 2 5 1 5 0 616 0 5212 3 37 3 0 0 2 5 0 0 5214 3 21 3 0 0 1 5 1 620 0 760 3 5 3 0 0 0 5 0 0 758 3 5 3 0 0 0 5 0 624 0 4856 3 5 0 0 0 0 5 0 0 763 3 833 0 0 3 4 1 0 628 0 5210 3 1795 2 0 7 0 3 0 0 5212 3 770 3 0 3 0 2 0 632 0 5214 3 5 3 0 0 0 5 0 0 4882 3 5 3 0 0 0 5 1 636 0 5975 3 16389 0 4 0 0 5 0 0 5974 3 16389 0 4 0 0 5 0 640 0 5212 3 5 3 0 0 0 5 0 0 5970 3 16389 0 4 0 0 5 0 644 0 5999 3 16389 0 4 0 0 5 0 0 4882 3 5 3 0 0 0 5 1 648 0 5216 3 5 3 0 0 0 5 0 0 5206 3 85 3 0 0 5 5 0 652 0 5208 3 17733 2 4 5 4 5 0 0 5210 3 17717 2 4 5 3 5 0 656 0 5212 3 17669 2 4 5 0 5 0 0 5214 3 17717 2 4 5 3 5 1 660 0 5206 3 5 3 0 0 0 5 0 0 5208 3 245 3 0 0 15 5 0 664 0 5210 3 17685 2 4 5 1 5 0 0 5212 3 17701 2 4 5 2 5 0 668 0 5214 3 17701 2 4 5 2 5 0 0 5216 3 17669 2 4 5 0 5 1 672 0 5208 3 5 3 0 0 0 5 0 0 5210 3 17669 2 4 5 0 5 0 676 0 5212 3 17669 2 4 5 0 5 0 0 5214 3 17669 2 4 5 0 5 0 680 0 5234 3 16389 0 4 0 0 5 0 0 5216 3 17669 2 4 5 0 5 1 SECTION 342 684 0 5206 3 5 3 0 0 0 5 0 0 5208 3 21 3 0 0 1 5 0 688 0 5210 3 16389 0 4 0 0 5 0 0 5212 3 16405 0 4 0 1 5 0 692 0 5213 3 20501 0 5 0 1 5 0 0 5214 3 20501 0 5 0 1 5 0 696 0 5215 3 20501 0 5 0 1 5 0 0 5216 3 20501 0 5 0 1 5 0 700 0 5217 3 20501 0 5 0 1 5 0 0 5218 3 20501 0 5 0 1 5 0 704 0 5219 3 20501 0 5 0 1 5 0 0 5220 3 20501 0 5 0 1 5 0 708 0 5221 3 20501 0 5 0 1 5 0 0 5222 3 20501 0 5 0 1 5 0 712 0 5223 3 20501 0 5 0 1 5 0 0 5224 3 20501 0 5 0 1 5 0 716 0 5225 3 20501 0 5 0 1 5 1 0 758 3 101 3 0 0 6 5 0 720 0 5999 3 1089 0 0 4 4 1 0 0 5980 3 5201 0 1 4 5 1 0 724 0 5981 3 5201 0 1 4 5 1 0 0 5982 3 5201 0 1 4 5 1 0 728 0 5983 3 5201 0 1 4 5 1 0 0 5984 3 5201 0 1 4 5 1 0 732 0 5985 3 5201 0 1 4 5 1 0 0 5986 3 5201 0 1 4 5 1 0 736 0 5987 3 5201 0 1 4 5 1 0 0 5988 3 5201 0 1 4 5 1 0 740 0 5989 3 5201 0 1 4 5 1 0 0 5990 3 5201 0 1 4 5 1 0 744 0 5991 3 5201 0 1 4 5 1 0 0 5992 3 5201 0 1 4 5 1 0 748 0 5993 3 5201 0 1 4 5 1 1 SECTION 343 750 177. 3 0 0 752 65764 0 67696 0 36978 0 55657 0 756 16772 0 53585 0 45577 0 59655 0 760 £6£6£ 0 6£6£6 0 8000 0 5149 0 764 0 0 0 0 PROCEDURE 344 766 6 0 0 5234 4 6 0 0 5235 4 PROCEDURE 345 768 0 0 0 0 0 6 0 0 768 4 2 0 0 4099 4 24 1 0 4108 4 PROCEDURE 346 772 26 0 0 768 4 26 0 0 1011 4 1 1 3 0 0 2 0 0 5007 4 776 6 0 0 5273 4 1 1 1 1 0 3 0 0 5275 4 1 1 1 4 0 780 2 0 0 5273 4 6 0 0 5978 4 18 0 1 5 0 4 0 0 4897 4 784 3 1 0 5102 4 26 1 1 5102 4 6 0 0 4896 4 2 0 0 5352 4 788 6 1 0 4884 4 2 1 0 5278 4 1 1 3 1 0 2 0 0 5345 4 792 2 0 0 6008 4 6 1 0 5156 4 28 1 1 50 4 1 1 3 65 0 796 2 1 0 5260 4 2 1 0 5262 4 26 0 0 4301 4 1 1 3 1 0 800 2 1 0 5276 4 2 0 0 5343 4 2 0 0 5230 4 PROCEDURE 347 803 6 0 0 5273 4 804 18 0 1 5 0 2 1 0 5234 4 26 1 3 5234 4 24 0 3 0 4 808 6 1 0 6 22 2 0 0 5232 4 26 0 0 4332 4 25 0 3 1 0 812 24 1 0 807 4 1 1 3 3 0 7 0 0 5239 4 7 0 0 5240 4 816 7 0 0 5241 4 1 1 3 0 0 1 0 1 1 0 24 0 0 5345 4 820 15 0 0 5979 4 3 0 0 5285 4 4 0 0 5285 4 2 0 0 5237 4 824 6 0 0 5239 4 18 0 1 2 0 4 0 0 5237 4 2 0 0 5238 4 828 6 1 0 5158 4 2 1 0 5246 4 2 1 0 5248 4 6 1 0 4898 4 832 2 1 0 5250 4 2 1 0 5244 4 26 0 0 4332 4 26 0 0 3129 4 836 1 1 3 1792 0 2 0 0 5231 4 6 0 0 4968 4 26 0 0 963 4 840 26 0 0 4332 4 26 0 0 4332 4 6 0 0 5021 4 26 0 0 3928 4 PROCEDURE 348 844 0 0 3 5191 4 24 0 3 7366 4 6 1 0 6 0 5 1 0 4794 4 848 27 0 1 852 4 1 1 3 1 0 2 0 0 5276 4 24 1 0 868 4 852 4 1 0 4794 4 5 1 0 4788 4 27 0 0 895 4 26 0 0 913 4 856 24 0 3 7366 4 6 1 0 15 0 18 0 1 4124 0 2 0 0 5281 4 860 1 1 3 2 0 2 0 0 5276 4 24 0 3 7366 4 6 1 0 6 0 864 5 1 0 4790 4 27 0 0 867 4 PROCEDURE 349 PROCEDURE 350 866 1 1 3 1 0 1 1 1 1 0 868 1 1 1 1 0 3 1 0 5261 4 2 0 0 7336 4 24 1 2 17 4 872 6 1 0 13 0 PROCEDURE 351 873 26 0 0 4737 4 3 1 0 5263 4 3 0 0 5244 4 876 5 0 0 5356 4 27 0 1 880 4 6 0 0 5277 4 2 0 0 6271 4 880 6 0 0 5277 4 2 0 0 5245 4 26 0 0 923 4 26 0 0 4301 4 884 1 1 3 128 0 2 0 0 5280 4 6 0 0 6270 4 27 0 0 891 4 888 2 0 0 5007 4 6 0 0 6202 4 27 0 0 892 4 26 0 0 4647 4 892 26 0 0 4125 4 26 0 0 967 4 24 1 0 979 4 6 0 0 7336 4 896 1 1 2 7 0 27 0 0 884 4 1 1 3 7 0 3 1 0 5261 4 900 2 0 0 7336 4 2 1 0 5262 4 2 0 0 5276 4 24 1 0 883 4 PROCEDURE 352 904 24 0 1 7336 4 26 0 1 905 4 0 0 0 1206 3 0 0 0 3458 3 908 0 0 0 3134 3 0 0 0 979 3 0 0 0 979 3 0 0 0 979 3 912 0 0 0 3561 3 PROCEDURE 353 913 0 0 0 0 0 1 1 3 0 0 0 0 2 4886 4 916 15 0 0 5277 4 27 0 0 922 4 2 0 0 5276 4 2 1 0 5230 4 920 2 1 0 5232 4 26 0 0 4332 4 26 0 1 913 4 PROCEDURE 354 923 0 0 0 0 0 924 1 0 1 0 0 6 0 0 5244 4 18 1 1 4119 0 13 0 0 5196 4 928 2 0 0 938 4 18 1 1 9 0 2 0 0 944 4 0 0 2 4858 4 932 24 0 1 944 4 18 1 3 0 0 24 0 1 938 4 15 0 0 6151 4 936 2 0 0 6203 4 26 0 1 923 4 PROCEDURE 355 938 0 0 0 0 0 2 0 0 5233 4 940 6 0 0 5237 4 2 0 0 5232 4 26 0 0 4332 4 26 0 1 938 4 PROCEDURE 356 944 0 0 0 0 0 2 0 0 5234 4 1 1 3 1 0 2 0 0 5235 4 948 26 0 0 4725 4 26 0 1 944 4 PROCEDURE 357 950 0 0 0 0 0 2 0 0 5234 4 952 6 0 0 5287 4 27 0 0 956 4 26 0 0 3625 4 26 0 1 950 4 956 26 0 0 3666 4 26 0 1 950 4 PROCEDURE 358 958 0 0 0 0 0 2 0 0 5234 4 960 2 0 0 5235 4 26 0 0 4725 4 26 0 1 958 4 PROCEDURE 359 963 0 0 0 0 0 964 2 0 0 5233 4 26 0 0 4332 4 26 0 1 963 4 PROCEDURE 360 967 0 0 0 0 0 968 6 1 0 5160 4 24 1 2 17 4 28 1 1 2 0 26 0 1 967 4 PROCEDURE 361 972 0 0 0 0 0 2 0 0 5233 4 6 0 0 5238 4 2 0 0 5232 4 976 26 0 0 4332 4 26 0 1 972 4 26 0 0 972 4 PROCEDURE 362 979 26 0 0 4099 4 980 24 0 3 7366 4 6 1 0 6 0 5 1 0 4792 4 27 0 3 904 4 984 26 0 0 1011 4 24 0 3 7366 4 6 1 0 6 0 5 1 0 4792 4 988 27 0 0 1070 4 4 1 0 4792 4 5 1 0 4790 4 27 0 0 1070 4 992 4 1 0 4790 4 5 1 0 4794 4 27 0 0 1070 4 4 1 0 4794 4 996 5 1 0 4788 4 27 0 0 895 4 4 1 0 4788 4 5 1 0 4798 4 1000 27 0 1 1005 4 1 1 3 1 0 2 0 0 5282 4 26 0 0 1056 4 1004 24 1 0 1083 4 4 1 0 4798 4 5 1 0 4796 4 27 0 1 904 4 1008 26 0 0 4125 4 26 0 0 967 4 24 1 0 979 4 PROCEDURE 363 1011 0 0 0 0 0 1012 26 0 0 967 4 6 1 0 5508 4 24 1 2 17 4 2 1 0 2 0 1016 6 1 0 5510 4 24 1 2 17 4 2 1 0 6 0 6 1 0 5512 4 1020 24 1 2 17 4 2 1 0 10 0 6 1 0 5514 4 18 0 1 4124 0 1024 24 1 2 17 4 2 1 0 12 0 6 1 0 5516 4 24 1 2 17 4 1028 2 1 0 16 0 6 1 0 5512 4 5 1 0 4796 4 27 0 1 1036 4 1032 6 1 0 5518 4 24 1 2 17 4 2 1 0 16 0 24 1 0 1039 4 1036 6 1 0 5518 4 24 1 2 17 4 2 1 0 48 0 6 1 0 5512 4 1040 5 1 0 4794 4 27 0 0 1046 4 6 1 0 5520 4 24 1 2 17 4 1044 2 1 0 20 0 24 1 0 1049 4 6 1 0 5520 4 24 1 2 17 4 1048 2 1 0 20 0 24 0 2 5522 4 18 1 1 4123 0 1 1 3 26 0 1052 18 1 1 5 0 24 1 2 17 4 28 1 1 22 0 26 0 1 1011 4 PROCEDURE 364 1056 0 0 0 0 0 6 0 0 7336 4 1 1 2 7 0 27 0 1 1069 4 1060 6 1 0 4796 4 2 1 0 5260 4 2 0 0 5232 4 6 0 0 5277 4 1064 2 0 0 5233 4 26 0 0 4316 4 1 1 3 6 0 2 1 0 5261 4 1068 26 0 0 4301 4 26 0 1 1056 4 PROCEDURE 365 1070 26 0 0 1056 4 24 1 2 17 4 1072 6 1 0 13 0 2 0 0 5269 4 24 0 0 5345 4 6 0 0 5979 4 1076 18 0 1 4126 0 26 0 0 4743 4 5 0 0 5269 4 27 0 2 844 4 1080 1 1 1 1 0 27 0 1 844 4 0 0 3 5191 4 26 0 0 913 4 1084 26 0 0 1087 4 26 0 0 1098 4 24 1 0 1132 4 PROCEDURE 366 1087 0 0 0 0 0 1088 26 1 2 5150 4 6 0 2 5247 4 18 0 3 2 0 18 1 1 4127 0 1092 1 0 2 4 0 18 0 3 2 0 2 0 2 5247 4 25 0 2 2 0 1096 24 1 0 1089 4 26 0 1 1087 4 PROCEDURE 367 1098 0 0 0 0 0 6 1 0 5150 4 1100 2 1 0 5234 4 2 0 0 5246 4 2 0 0 5236 4 26 1 3 5236 4 1104 6 0 3 4887 4 2 1 0 5260 4 6 0 3 5239 4 2 1 0 5263 4 1108 26 0 0 4301 4 6 0 3 4890 4 2 0 0 5276 4 24 0 0 5234 4 1112 6 1 0 5246 4 2 1 0 5264 4 6 0 0 5264 4 5 0 0 5265 4 1116 27 0 0 1126 4 6 0 0 4890 4 18 0 1 5 0 4 0 3 4893 4 1120 4 0 0 5264 4 28 0 0 5230 4 26 0 0 4332 4 23 0 0 4 0 1124 0 0 0 5264 3 24 1 0 1117 4 1 1 3 1 0 7 0 0 5236 4 1128 23 0 0 2 0 0 0 0 5234 3 24 1 0 1103 4 26 0 1 1098 4 PROCEDURE 368 1132 1 1 3 1 0 2 1 0 5261 4 1 1 3 1001 0 4 0 0 5345 4 1136 2 1 0 5263 4 26 0 0 4301 4 6 0 0 5277 4 24 0 1 5345 4 1140 2 0 0 5371 4 6 1 0 4810 4 2 1 0 5260 4 2 1 0 5262 4 1144 26 0 0 4316 4 1 1 3 1 0 4 0 0 5345 4 3 0 0 5345 4 1148 6 0 0 5282 4 27 0 0 795 4 24 1 0 1152 4 PROCEDURE 369 1151 24 1 0 1158 4 1152 26 0 0 4363 4 6 0 0 4914 4 2 1 0 5208 4 6 0 0 1151 4 1156 2 0 0 4512 4 24 1 0 4406 4 1 1 3 1 0 2 0 0 6203 4 1160 26 0 0 4647 4 26 0 0 4134 4 6 0 0 5356 4 2 0 0 5269 4 1164 26 0 0 3717 4 2 0 0 5978 4 6 0 0 6271 4 2 0 0 5976 4 1168 6 1 0 4816 4 24 1 2 21 4 2 1 0 4 0 6 1 0 4882 4 1172 24 1 2 21 4 2 1 0 6 0 26 0 0 4280 4 26 0 0 4749 4 1176 24 1 2 19 4 6 1 0 4 0 5 1 0 5162 4 27 0 0 1189 4 1180 24 1 2 19 4 24 0 2 4 0 18 1 1 4123 0 1 1 3 50 0 1184 18 1 1 5 0 24 1 2 21 4 28 1 1 4 0 26 0 0 4280 4 1188 24 1 0 1175 4 24 0 2 5550 4 18 1 1 4123 0 1 1 3 100 0 1192 18 1 1 5 0 24 1 2 21 4 28 1 1 0 0 6 0 0 6270 4 1196 27 0 1 33 4 0 1 0 5102 4 0 0 3 0 4 6 1 0 5164 4 1200 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 1204 0 1 1 5102 4 24 1 0 33 4 PROCEDURE 370 1206 1 1 3 1 0 2 0 0 5333 4 1208 26 0 0 4377 4 6 1 0 5208 4 2 1 0 5230 4 2 0 0 5236 4 1212 2 0 0 5259 4 6 0 0 5344 4 27 0 0 979 4 27 0 3 979 4 1216 1 1 2 17 0 27 0 2 979 4 6 0 0 5344 4 2 0 0 7337 4 1220 6 0 0 5284 4 2 0 0 7338 4 6 0 0 5247 4 1 1 2 148 0 1224 27 0 2 1231 4 6 0 0 5249 4 1 1 2 56 0 27 0 2 1231 4 1228 6 0 0 5251 4 1 1 2 218 0 27 0 3 1267 4 PROCEDURE 371 1231 26 0 0 1087 4 1232 6 0 0 5251 4 5 0 0 5250 4 18 0 3 3 0 18 0 1 4127 0 1236 4 0 0 5249 4 4 0 0 5247 4 2 0 0 1087 4 0 0 2 4886 4 1240 15 0 0 5277 4 1 1 2 2 0 5 0 0 1087 4 4 0 0 4954 4 1244 26 0 0 3928 4 26 0 0 913 4 26 0 0 1098 4 1 1 3 1 0 1248 2 0 0 5276 4 2 0 0 5236 4 6 1 0 5166 4 28 1 1 50 4 1252 6 1 0 4792 4 24 1 2 15 4 2 1 0 2 0 2 1 0 5246 4 1256 2 1 0 5248 4 26 0 0 4647 4 6 1 0 4898 4 2 1 0 5250 4 1260 1 1 3 3 0 7 0 0 5239 4 7 0 0 5240 4 7 0 0 5241 4 1264 1 1 3 6 0 2 1 0 5261 4 26 0 0 4301 4 PROCEDURE 372 1267 1 1 3 0 0 1268 24 0 1 7337 4 26 0 1 1269 4 0 0 0 1286 3 0 0 0 1301 3 1272 0 0 0 1377 3 0 0 0 1410 3 0 0 0 1480 3 0 0 0 1951 3 1276 0 0 0 2152 3 0 0 0 2255 3 0 0 0 2402 3 0 0 0 2582 3 1280 0 0 0 2768 3 0 0 0 2767 3 0 0 0 2766 3 0 0 0 2765 3 1284 0 0 0 2928 3 0 0 0 2975 3 PROCEDURE 373 1286 6 0 0 5284 4 1 1 2 8 0 1288 27 0 3 1294 4 1 1 2 2 0 27 0 2 1298 4 6 0 0 4935 4 1292 26 0 0 944 4 26 0 0 4371 4 24 0 1 5284 4 6 0 0 4915 4 1296 26 0 0 958 4 24 1 0 979 4 6 0 0 4926 4 26 0 0 963 4 1300 24 1 0 1294 4 PROCEDURE 374 1301 6 1 0 5220 4 2 1 0 5286 4 6 0 0 5284 4 1304 1 1 2 4 0 27 0 2 1330 4 6 0 0 5221 4 27 0 0 1313 4 1308 24 0 0 5284 4 6 0 0 4915 4 2 1 0 5234 4 26 0 0 3625 4 1312 24 1 0 979 4 6 0 0 5284 4 1 1 2 2 0 27 0 2 1318 4 1316 6 1 0 5220 4 27 0 3 1325 4 PROCEDURE 375 1318 6 0 0 4902 4 5 0 0 5220 4 1320 27 0 3 1325 4 24 0 0 5284 4 6 0 0 4929 4 4 0 0 5220 4 1324 24 1 0 1429 4 24 0 0 5284 4 6 0 0 4915 4 2 0 0 5234 4 1328 26 0 0 3666 4 24 1 0 979 4 PROCEDURE 376 1330 26 0 0 4707 4 6 1 0 5168 4 1332 28 0 0 5212 4 6 0 0 5284 4 1 1 2 8 0 27 0 2 1356 4 1336 6 1 0 5260 4 0 1 2 5262 4 27 1 1 1341 4 6 1 0 5266 4 1340 27 0 0 1344 4 6 0 0 4930 4 26 0 0 963 4 24 1 0 1346 4 1344 6 0 0 5010 4 26 0 0 972 4 6 0 0 4935 4 26 0 0 950 4 1348 6 1 0 5260 4 0 1 2 5262 4 27 1 1 1353 4 6 0 0 4911 4 1352 24 1 0 978 4 26 0 0 4716 4 6 0 0 4923 4 24 1 0 1296 4 PROCEDURE 377 1356 27 0 1 1362 4 6 1 0 5260 4 0 1 2 5262 4 27 1 1 1346 4 1360 6 0 0 5011 4 24 1 0 1345 4 6 0 0 4944 4 26 0 0 963 4 1364 6 1 0 5260 4 0 1 2 5262 4 27 1 0 1370 4 26 0 0 4716 4 1368 6 0 0 4916 4 26 0 0 958 4 6 0 0 4972 4 26 0 0 963 4 PROCEDURE 378 1372 6 1 0 5168 4 28 0 0 5212 4 6 0 0 4925 4 26 0 0 950 4 1376 24 1 0 979 4 PROCEDURE 379 1377 2 1 0 5216 4 24 0 1 7338 4 26 0 1 1379 4 1380 0 0 0 1393 3 0 0 0 1390 3 0 0 0 1390 3 0 0 0 1390 3 1384 0 0 0 1396 3 0 0 0 1390 3 0 0 0 1390 3 0 0 0 979 3 1388 0 0 0 979 3 0 0 0 1390 3 24 0 0 5284 4 6 0 0 4988 4 1392 24 1 0 1296 4 6 0 0 4994 4 26 0 0 1404 4 24 1 0 979 4 1396 26 0 0 4707 4 6 0 0 4992 4 26 0 0 1404 4 26 0 0 4716 4 1400 6 0 0 4994 4 26 0 0 958 4 6 0 0 4993 4 24 1 0 978 4 PROCEDURE 380 1404 0 0 0 0 0 1 1 2 8 0 26 0 0 972 4 6 0 0 4990 4 1408 26 0 0 958 4 26 0 1 1404 4 PROCEDURE 381 1410 24 0 1 7338 4 26 0 1 1411 4 1412 0 0 0 1422 3 0 0 0 1434 3 0 0 0 1422 3 0 0 0 1434 3 1416 0 0 0 1432 3 0 0 0 1454 3 0 0 0 1466 3 0 0 0 1466 3 1420 0 0 0 1469 3 0 0 0 1472 3 PROCEDURE 382 1422 6 1 0 5220 4 27 0 2 1426 4 1424 1 1 3 4128 0 7 1 0 5220 4 24 0 0 5284 4 6 0 0 4939 4 1428 5 0 0 5220 4 2 0 0 5233 4 26 0 0 4332 4 24 1 0 979 4 1432 6 0 0 4935 4 24 1 0 2020 4 6 1 0 5220 4 27 0 2 1426 4 1436 18 1 1 4118 0 1 1 3 0 0 15 0 0 4900 4 2 0 0 4332 4 1440 15 0 0 4999 4 15 0 0 4999 4 15 0 0 4999 4 15 0 0 4999 4 1444 18 0 1 4127 0 2 1 0 5220 4 5 0 0 4332 4 27 0 0 1451 4 1448 24 0 0 5284 4 4 0 0 4939 4 26 0 0 963 4 1 1 2 1 0 1452 7 0 0 5284 4 24 1 0 1426 4 PROCEDURE 383 1454 6 1 0 5220 4 26 0 0 4743 4 1456 2 1 0 5220 4 0 0 3 5191 4 24 0 2 4818 4 12 1 0 5220 4 1460 27 0 2 1464 4 2 1 0 5220 4 5 1 0 5220 4 1 1 1 1024 0 1464 4 0 0 4944 4 24 1 0 1429 4 PROCEDURE 384 1466 24 0 0 5284 4 6 0 0 4938 4 1468 24 1 0 1296 4 PROCEDURE 385 1469 6 0 0 4947 4 4 1 0 5220 4 24 1 0 1429 4 PROCEDURE 386 1472 6 0 0 4938 4 26 0 0 972 4 6 0 0 5012 4 26 0 0 3928 4 1476 6 0 0 4961 4 26 0 0 963 4 6 0 0 4962 4 24 1 0 978 4 PROCEDURE 387 1480 6 0 0 5284 4 1 1 2 4 0 27 0 0 1484 4 26 0 0 4086 4 1484 6 0 0 5212 4 2 0 0 5288 4 26 0 0 3942 4 2 0 0 5348 4 1488 18 1 3 6 0 3 0 0 5288 4 1 1 2 7 0 27 0 0 1510 4 1492 1 1 2 4 0 27 0 0 1510 4 1 1 2 4 0 27 0 0 1661 4 1496 1 1 2 5 0 27 0 1 1512 4 6 0 0 5284 4 1 1 2 1 0 1500 27 0 1 1512 4 6 0 0 5214 4 26 0 0 4737 4 2 0 0 5212 4 1504 2 0 0 5214 4 6 0 0 4974 4 26 0 0 944 4 6 0 0 4980 4 1508 26 0 0 963 4 24 1 0 1512 4 1 1 1 8 0 2 0 0 5288 4 1512 6 0 3 6012 4 18 0 1 4124 0 4 0 0 6009 4 2 0 0 5349 4 1516 24 0 1 5349 4 6 0 0 6013 4 2 0 0 5349 4 6 0 0 5284 4 1520 18 0 3 5 0 4 0 0 5288 4 18 0 3 3 0 0 0 2 4913 4 1524 15 0 0 5220 4 18 0 1 2 0 1 0 0 1872 4 0 1 0 5290 4 1528 1 1 3 0 0 1 0 1 3 0 24 0 3 5292 4 15 0 0 0 0 1532 18 1 3 1 0 18 1 1 4126 0 18 0 1 3 0 18 1 3 6 0 1536 2 0 0 5295 4 18 1 3 1 0 2 0 0 5294 4 6 0 0 7337 4 1540 1 1 2 14 0 27 0 0 2883 4 6 0 0 5284 4 1 1 2 4 0 1544 27 0 1 1649 4 26 0 0 4377 4 26 0 0 4086 4 6 1 0 5213 4 1548 26 0 0 4737 4 2 1 0 5212 4 6 0 0 5288 4 1 1 2 3 0 1552 27 0 0 1603 4 1 1 2 1 0 27 0 0 1600 4 1 1 2 9 0 1556 27 0 0 1640 4 1 1 2 5 0 27 0 0 1640 4 1 1 2 1 0 1560 27 0 1 1683 4 6 0 0 4916 4 4 0 0 5348 4 26 0 0 938 4 1564 26 0 0 1631 4 27 0 0 1571 4 6 0 0 4921 4 1 1 1 8 0 1568 26 0 0 3928 4 26 0 0 1618 4 24 1 0 1574 4 6 0 0 4921 4 1572 1 1 1 4 0 26 0 0 3928 4 6 0 0 5999 4 26 0 0 4023 4 1576 1 1 3 1001 0 18 0 1 2 0 2 0 0 5232 4 PROCEDURE 388 1579 6 0 0 4955 4 1580 26 0 0 963 4 6 0 0 5032 4 26 0 0 3928 4 6 0 0 5348 4 1584 2 0 0 5232 4 26 0 0 963 4 26 0 0 3747 4 1 1 1 1 0 1588 2 0 0 5232 4 26 0 0 963 4 6 0 0 5349 4 1 1 1 1 0 1592 2 0 0 5232 4 26 0 0 963 4 6 0 0 5242 4 18 0 3 7 0 1596 4 0 0 4921 4 26 0 0 963 4 26 0 0 1942 4 24 1 0 979 4 1600 26 0 0 1631 4 27 0 0 1603 4 26 0 0 1618 4 2 1 0 5216 4 1604 6 0 0 4974 4 26 0 0 944 4 6 0 0 4927 4 5 0 0 5349 4 1608 1 1 2 1 0 26 0 0 938 4 6 0 0 5288 4 1 1 2 4 0 1612 27 0 0 1614 4 6 0 0 4934 4 4 0 0 4975 4 26 0 0 963 4 1616 6 0 0 5349 4 24 1 0 1684 4 PROCEDURE 389 1618 0 0 0 0 0 6 0 0 4935 4 1620 26 0 0 950 4 6 0 0 4916 4 26 0 0 950 4 26 0 0 4716 4 1624 1 1 3 1 0 2 1 0 5216 4 6 0 0 4946 4 26 0 0 958 4 1628 6 1 0 5260 4 2 1 0 5212 4 26 0 1 1618 4 PROCEDURE 390 1631 0 0 0 0 0 1632 26 0 0 4707 4 1 1 2 1 0 24 0 1 5242 4 18 0 3 0 0 1636 1 1 1 16 0 18 0 1 9 0 3 1 0 5286 4 26 0 1 1631 4 PROCEDURE 391 1640 6 0 0 4935 4 26 0 0 972 4 24 1 0 1784 4 PROCEDURE 392 1643 0 0 0 0 0 1644 6 0 0 5273 4 2 0 0 5232 4 6 0 0 4930 4 26 0 0 963 4 1648 26 0 1 1643 4 24 0 1 7338 4 26 0 1 1650 4 0 0 0 1700 3 1652 0 0 0 1784 3 0 0 0 1679 3 0 0 0 1679 3 0 0 0 1696 3 1656 0 0 0 1785 3 0 0 0 1757 3 0 0 0 1757 3 0 0 0 1757 3 1660 0 0 0 1757 3 6 0 0 5284 4 1 1 2 2 0 27 0 0 1673 4 1664 27 0 2 1679 4 26 0 0 1643 4 6 0 0 5029 4 26 0 0 972 4 1668 6 0 0 5028 4 26 0 0 963 4 6 0 0 5014 4 26 0 0 963 4 1672 24 1 0 1700 4 26 0 0 1643 4 6 0 0 5030 4 26 0 0 963 4 1676 6 0 0 5014 4 26 0 0 963 4 24 1 0 1784 4 PROCEDURE 393 1679 26 0 0 4377 4 1680 6 1 0 5213 4 26 0 0 4737 4 2 0 0 5212 4 26 0 0 3747 4 1684 4 0 0 4935 4 26 0 0 938 4 6 0 0 5288 4 1 1 2 24 0 1688 27 0 1 1784 4 6 0 0 4963 4 26 0 0 963 4 6 0 0 5036 4 1692 26 0 0 963 4 6 0 0 4980 4 26 0 0 963 4 24 1 0 1784 4 1696 6 0 0 4935 4 26 0 0 972 4 1 1 3 1 0 24 1 0 1785 4 PROCEDURE 394 1700 6 0 0 5288 4 1 1 2 12 0 27 0 1 1732 4 6 0 0 5295 4 1704 2 0 0 4879 4 1 0 1 7 0 15 0 3 6012 4 15 0 3 6012 4 1708 1 1 2 2 0 4 0 0 4921 4 18 0 1 5 0 2 1 0 5294 4 1712 1 1 2 64 0 2 1 0 5286 4 6 0 0 4916 4 26 0 0 950 4 1716 6 0 0 5348 4 4 0 0 4918 4 26 0 0 938 4 6 0 0 5022 4 1720 26 0 0 972 4 6 1 0 5294 4 2 1 0 5286 4 6 0 0 4916 4 1724 26 0 0 950 4 6 0 0 5027 4 26 0 0 972 4 6 0 0 5197 4 1728 26 0 0 963 4 6 0 0 4879 4 2 0 0 5295 4 24 1 0 1784 4 1732 1 1 2 8 0 27 0 0 1784 4 6 1 0 5212 4 18 0 1 5 0 1736 4 0 0 5346 4 2 1 0 5286 4 26 0 0 1838 4 3 0 0 1838 4 1740 27 0 1 1752 4 26 0 0 4707 4 6 0 0 5216 4 27 0 0 1752 4 1744 6 1 0 5213 4 26 0 0 4737 4 2 1 0 5212 4 1 1 3 1 0 1748 2 1 0 5216 4 6 0 0 4935 4 26 0 0 944 4 24 1 0 1784 4 1752 6 0 0 4935 4 26 0 0 950 4 6 0 0 1838 4 27 0 1 1802 4 1756 24 1 0 1788 4 26 0 0 4377 4 6 1 0 5213 4 26 0 0 4737 4 1760 3 1 0 5212 4 27 0 1 1769 4 6 1 0 5262 4 18 0 1 5 0 1764 4 1 0 5220 4 2 1 0 5286 4 6 0 0 4935 4 26 0 0 950 4 1768 24 1 0 1784 4 PROCEDURE 395 1769 6 0 0 5284 4 1 1 2 9 0 27 0 3 1775 4 1772 6 0 0 4935 4 26 0 0 944 4 24 1 0 1784 4 6 0 0 4916 4 1776 26 0 0 958 4 6 1 0 5262 4 18 0 1 5 0 2 1 0 5286 4 1780 6 0 0 4917 4 26 0 0 950 4 6 0 0 4970 4 26 0 0 963 4 PROCEDURE 396 1784 26 0 0 1838 4 3 0 0 1838 4 27 0 1 1802 4 26 0 0 4707 4 1788 6 0 0 5284 4 1 1 2 3 0 27 0 3 1802 4 6 0 0 4963 4 1792 26 0 0 963 4 6 1 0 5213 4 26 0 0 4737 4 2 1 0 5212 4 1796 2 1 0 5214 4 6 0 0 4974 4 26 0 0 944 4 6 0 0 4980 4 1800 26 0 0 963 4 26 0 0 1838 4 6 0 0 5288 4 1 1 2 15 0 1804 27 0 1 1812 4 6 0 0 5284 4 1 1 2 3 0 27 0 1 1826 4 1808 26 0 0 1643 4 6 0 0 5014 4 26 0 0 963 4 24 1 0 1826 4 1812 6 0 0 5288 4 1 1 2 2 0 27 0 0 1817 4 1 1 2 1 0 1816 27 0 1 1822 4 6 0 0 5284 4 1 1 2 2 0 27 0 1 1822 4 1820 6 0 0 4935 4 26 0 0 938 4 6 1 0 5294 4 2 1 0 5286 4 1824 6 0 0 4916 4 26 0 0 950 4 6 0 0 5348 4 4 0 0 4917 4 1828 26 0 0 938 4 26 0 0 3129 4 1 1 3 256 0 2 0 0 5231 4 1832 6 0 0 4968 4 26 0 0 963 4 6 0 0 1838 4 27 0 1 1849 4 1836 26 0 0 4716 4 24 1 0 1484 4 PROCEDURE 397 1838 0 0 0 0 0 26 0 0 4099 4 1840 24 0 3 7366 4 6 0 0 7 0 5 0 0 4813 4 27 0 1 1848 4 1844 1 1 3 1 0 2 0 0 5333 4 26 0 0 4377 4 1 1 3 0 0 1848 26 0 1 1838 4 6 0 0 5284 4 1 1 2 1 0 27 0 1 1858 4 1852 6 0 0 5288 4 1 1 2 15 0 27 0 1 1864 4 6 0 0 5031 4 1856 26 0 0 972 4 24 1 0 1864 4 1 1 2 4 0 27 0 0 1864 4 1860 1 1 2 1 0 27 0 0 1869 4 26 0 0 1942 4 24 1 0 980 4 1864 26 0 0 2064 4 6 0 0 5284 4 1 1 2 1 0 27 0 0 980 4 1868 24 1 0 979 4 26 0 0 1942 4 24 1 0 979 4 0 0 0 0 0 SECTION 398 1872 10£16 0 11£1t 0 1271+ 0 12£1. 0 1876 13720 0 14024 0 14722 0 14£26 0 1880 15720 0 16728 0 16£20 0 18796 0 1884 19720 0 19£26 0 1t76t 0 1e776 0 1888 1+£6. 0 20£2t 0 21£2. 0 22730 0 1892 22£32 0 23734 0 24038 0 24136 0 1896 2425t 0 2475+ 0 24£3t 0 25734 0 1900 2673+ 0 26£34 0 287tt 0 29734 0 1904 29£3t 0 2+£70 0 32£0t 0 3370+ 0 1908 3470. 0 3570: 0 36714 0 36£0+ 0 1912 38£68 0 3970: 0 3t76+ 0 3+70t 0 1916 40£02 0 41£06 0 42708 0 44710 0 1920 44£12 0 46£62 0 48782 0 48£64 0 1924 49762 0 4e774 0 52£60 0 5425. 0 1928 54760 0 58£66 0 5+£72 0 64042 0 1932 64744 0 74046 0 74748 0 8474t 0 1936 9404. 0 94150 0 94256 0 94758 0 1940 t4052 0 t4754 0 PROCEDURE 399 1942 0 0 0 0 0 6 0 0 5259 4 1944 1 1 2 1 0 3 0 0 5259 4 27 0 0 1948 4 1 1 3 8 0 1948 4 0 0 4929 4 26 0 0 972 4 26 0 1 1942 4 PROCEDURE 400 1951 24 0 1 7338 4 1952 26 0 1 1952 4 0 0 0 1965 3 0 0 0 1963 3 0 0 0 1965 3 1956 0 0 0 1964 3 0 0 0 1991 3 0 0 0 2022 3 0 0 0 2100 3 1960 0 0 0 2121 3 0 0 0 2130 3 0 0 0 2133 3 PROCEDURE 401 1963 1 1 3 1 0 1964 1 1 1 1 0 2 0 0 5318 4 2 1 0 5216 4 26 0 0 4377 4 1968 1 1 3 0 0 2 1 0 5216 4 6 0 0 4974 4 26 0 0 944 4 1972 26 0 0 4716 4 24 0 0 5284 4 6 0 0 4975 4 26 0 0 944 4 1976 6 0 0 5318 4 27 0 0 979 4 1 1 2 1 0 27 0 0 1984 4 1980 26 0 0 4086 4 6 0 0 5013 4 26 0 0 963 4 26 0 0 2064 4 1984 6 0 0 5260 4 1 1 2 100 0 27 0 2 979 4 26 0 0 4716 4 1988 6 0 0 4919 4 26 0 0 3985 4 24 1 0 979 4 PROCEDURE 402 1991 26 0 0 4707 4 1992 6 1 0 5220 4 27 0 0 1997 4 4 0 0 4921 4 18 0 1 5 0 1996 24 1 0 2001 4 26 0 0 4371 4 26 0 0 4086 4 26 0 0 2072 4 2000 6 0 0 4921 4 2 1 0 5286 4 6 0 0 4916 4 26 0 0 950 4 2004 6 1 0 5220 4 27 0 1 2012 4 26 0 0 2086 4 6 0 0 4917 4 2008 26 0 0 958 4 26 0 0 2064 4 PROCEDURE 403 2010 6 0 0 5014 4 26 0 0 963 4 2012 26 0 0 4716 4 6 0 0 5216 4 27 0 0 2019 4 1 1 3 0 0 2016 2 1 0 5216 4 6 0 0 5035 4 24 1 0 2020 4 6 0 0 4973 4 2020 26 0 0 944 4 24 1 0 979 4 PROCEDURE 404 2022 6 1 0 5220 4 2 0 0 5347 4 2024 26 0 0 4377 4 26 0 0 2072 4 6 0 0 5296 4 27 0 0 2030 4 2028 1 1 3 1 0 2 0 0 5296 4 6 0 0 5264 4 27 0 0 2036 4 2032 1 1 3 1 0 3 0 0 5264 4 5 0 0 5296 4 7 1 0 5262 4 2036 26 0 0 4716 4 2 1 0 5216 4 6 0 0 4974 4 26 0 0 944 4 2040 6 0 0 4980 4 26 0 0 963 4 6 0 0 5347 4 27 0 1 2048 4 2044 26 0 0 4371 4 6 0 0 4916 4 26 0 0 958 4 24 1 0 2050 4 2048 4 0 0 4930 4 26 0 0 963 4 6 0 0 4963 4 26 0 0 963 4 2052 26 0 0 2086 4 6 0 0 5264 4 3 0 0 5216 4 27 0 1 2060 4 2056 6 0 0 5296 4 27 0 0 2060 4 1 1 3 1 0 7 1 0 5214 4 2060 6 0 0 4973 4 24 0 0 5296 4 5 0 0 4933 4 24 1 0 2020 4 PROCEDURE 405 2064 0 0 0 0 0 6 0 0 5259 4 1 1 2 1 0 3 0 0 5259 4 2068 27 0 1 2071 4 6 0 0 5015 4 26 0 0 972 4 26 0 1 2064 4 PROCEDURE 406 2072 0 0 0 0 0 6 1 0 5212 4 2 0 0 5294 4 6 1 0 5214 4 2076 2 0 0 5295 4 6 1 0 5216 4 2 0 0 5296 4 6 1 0 5218 4 2080 2 0 0 5297 4 6 1 0 5220 4 2 0 0 5298 4 6 0 0 5222 4 2084 2 0 0 5224 4 26 0 1 2072 4 PROCEDURE 407 2086 0 0 0 0 0 6 0 0 5294 4 2088 2 1 0 5212 4 6 0 0 5295 4 2 1 0 5214 4 6 0 0 5296 4 2092 2 1 0 5216 4 6 0 0 5297 4 2 1 0 5218 4 6 0 0 5298 4 2096 2 1 0 5220 4 6 0 0 5224 4 2 0 0 5222 4 26 0 1 2086 4 PROCEDURE 408 2100 26 0 0 4086 4 26 0 0 4707 4 6 0 0 4957 4 26 0 0 944 4 2104 6 0 0 4958 4 26 0 0 963 4 6 0 0 5266 4 27 0 0 2117 4 2108 6 0 0 4918 4 26 0 0 2746 4 6 0 0 5260 4 27 0 1 2117 4 2112 6 0 0 5262 4 27 0 0 2119 4 4 0 0 4932 4 26 0 0 963 4 2116 24 1 0 2119 4 6 0 0 4918 4 26 0 0 3694 4 26 0 0 2064 4 2120 24 1 0 979 4 PROCEDURE 409 2121 6 0 0 4959 4 2 0 0 5234 4 6 1 0 5220 4 2124 27 0 0 2127 4 2 1 0 5286 4 24 1 0 1328 4 2 1 0 5218 4 2128 6 0 0 4959 4 24 1 0 2020 4 6 0 0 4960 4 26 0 0 938 4 2132 24 1 0 979 4 PROCEDURE 410 2133 26 0 0 4086 4 6 1 0 5218 4 2 0 0 5272 4 2136 2 1 0 5218 4 6 0 0 4974 4 26 0 0 944 4 6 0 0 5272 4 2140 2 0 0 5266 4 6 0 0 4919 4 26 0 0 2746 4 26 0 0 4377 4 2144 6 0 0 4917 4 26 0 0 958 4 6 0 0 5272 4 2 0 0 5266 4 2148 6 0 0 5016 4 26 0 0 2746 4 26 0 0 1942 4 24 1 0 979 4 PROCEDURE 411 2152 6 0 0 5284 4 1 1 2 3 0 27 0 2 2160 4 24 0 0 5284 4 2156 6 0 0 4902 4 2 1 0 5286 4 6 0 0 4936 4 24 1 0 1327 4 2160 27 0 1 2163 4 6 1 0 5220 4 24 1 0 2157 4 PROCEDURE 412 2163 1 1 2 4 0 2164 27 0 2 2209 4 6 0 0 5218 4 27 0 1 2173 4 6 0 0 5212 4 2168 0 0 2 5214 4 27 1 1 2173 4 1 1 3 6 0 4 0 0 4938 4 2172 26 0 0 972 4 PROCEDURE 413 2173 6 0 0 5284 4 1 1 2 6 0 27 0 0 2200 4 2176 26 0 0 4707 4 24 0 0 5284 4 6 0 0 4900 4 3 0 0 5310 4 2180 2 1 0 5286 4 6 0 0 4936 4 26 0 0 950 4 6 0 0 5284 4 2184 1 1 2 6 0 27 0 0 2207 4 24 0 0 5284 4 6 0 0 4899 4 2188 2 0 0 5311 4 26 0 0 2226 4 26 0 0 4716 4 6 0 0 5218 4 2192 27 0 1 2198 4 6 0 0 5212 4 0 0 2 5214 4 27 1 1 2198 4 2196 6 0 0 4912 4 24 1 0 978 4 PROCEDURE 414 2198 6 0 0 4966 4 24 1 0 1296 4 2200 6 0 0 5220 4 2 0 0 5272 4 26 0 0 4377 4 6 1 0 5168 4 2204 28 0 0 5212 4 6 0 0 5220 4 24 1 0 2179 4 6 0 0 5272 4 2208 24 1 0 2188 4 PROCEDURE 415 2209 27 0 0 2212 4 6 1 0 5170 4 24 1 0 2213 4 2212 5 1 0 5170 4 2 1 0 5286 4 6 0 0 4916 4 26 0 0 950 4 2216 1 1 3 0 0 26 0 0 4023 4 6 0 0 5198 4 26 0 0 963 4 2220 6 0 0 5284 4 1 1 2 7 0 27 0 1 979 4 26 0 0 4023 4 2224 6 0 0 5199 4 24 1 0 1429 4 PROCEDURE 416 2226 0 0 0 0 0 6 0 0 5977 4 2228 18 0 1 5 0 3 1 0 5102 4 26 1 2 5102 4 27 0 0 2237 4 2232 6 1 0 5310 4 5 1 2 6106 4 27 0 0 2239 4 25 0 2 2 0 2236 24 1 0 2232 4 1 1 3 83 0 26 0 0 3972 4 1 1 3 1000 0 2240 18 0 1 2 0 4 0 0 5999 4 4 0 0 5999 4 1 1 2 1 0 2244 2 0 0 5286 4 24 0 3 0 4 6 0 0 4 22 2 1 0 5108 4 2248 0 0 2 5194 4 10 1 0 5108 4 2 0 0 5287 4 6 0 0 4916 4 2252 2 0 0 5234 4 26 0 0 3709 4 26 0 1 2226 4 PROCEDURE 417 2255 6 0 0 5284 4 2256 1 1 2 8 0 27 0 3 2290 4 26 0 0 4707 4 26 0 0 4023 4 2260 6 0 0 5284 4 1 1 2 10 0 27 0 0 2264 4 6 0 0 5200 4 2264 5 0 0 5201 4 26 0 0 963 4 6 0 0 5284 4 1 1 2 10 0 2268 27 0 0 2287 4 6 0 0 4918 4 2 1 0 5234 4 6 1 0 5220 4 2272 27 0 1 2280 4 26 0 0 4377 4 26 0 0 4725 4 0 0 3 5202 4 2276 1 1 2 1 0 7 1 0 5208 4 0 0 3 5191 4 24 1 0 2283 4 2280 2 1 0 5286 4 6 0 0 4918 4 26 0 0 950 4 26 0 0 4716 4 2284 6 0 0 5284 4 1 1 2 8 0 27 0 0 2288 4 6 0 0 5203 4 2288 1 1 1 4 0 3 0 0 5284 4 2 0 0 5235 4 26 0 0 3759 4 2292 26 0 0 2297 4 24 0 0 5284 4 6 0 0 4947 4 2 0 0 5234 4 2296 24 1 0 2851 4 PROCEDURE 418 2297 0 0 0 0 0 6 1 0 5212 4 27 0 0 2383 4 2300 1 1 2 999 0 27 0 2 2383 4 6 1 0 5214 4 27 0 1 2308 4 2304 6 0 0 5244 4 5 0 0 5212 4 27 0 2 2373 4 24 1 0 2323 4 2308 24 0 3 0 4 6 1 0 2 22 18 0 1 5 0 4 0 0 4897 4 2312 3 1 0 5102 4 26 1 2 5102 4 25 0 2 0 0 24 1 0 2317 4 2316 24 1 0 2323 4 6 0 0 5208 4 24 0 3 0 4 5 0 2 1 0 2320 27 0 0 2374 4 25 0 2 2 0 24 1 0 2317 4 6 1 0 5212 4 2324 26 0 0 4743 4 18 0 1 2 0 2 0 0 5252 4 6 1 0 5214 4 2328 26 0 0 4743 4 1 1 1 2 0 7 0 0 5252 4 0 0 3 5191 4 2332 6 0 0 5351 4 3 1 0 5102 4 26 1 2 5102 4 27 0 0 2352 4 2336 1 1 2 300 0 27 0 3 2341 4 1 1 3 120 0 26 0 0 3972 4 2340 26 0 1 2297 4 6 0 2 327 4 5 0 0 5252 4 27 0 3 2352 4 PROCEDURE 419 2344 6 0 2 327 4 2 0 2 330 4 6 0 2 328 4 2 0 2 331 4 2348 6 0 2 329 4 2 0 2 332 4 25 0 2 4099 0 24 1 0 2341 4 2352 6 0 0 5252 4 2 0 2 330 4 6 1 0 5208 4 2 0 2 331 4 2356 6 1 0 5214 4 3 0 2 332 4 27 0 0 2371 4 1 1 3 1 0 2360 2 0 0 5231 4 6 0 0 5025 4 18 0 1 4 0 4 0 0 5352 4 2364 2 0 2 332 4 1 1 3 10 0 5 0 0 5025 4 3 0 0 5025 4 2368 27 0 1 2371 4 1 1 2 1 0 7 0 0 5352 4 1 1 3 3 0 2372 7 0 0 5351 4 26 0 1 2297 4 PROCEDURE 420 2374 24 1 2 24 4 0 0 2 0 0 2376 18 1 3 30 0 2 1 0 5212 4 18 1 3 10 0 2 1 0 5214 4 2380 24 0 3 0 4 6 0 0 4 22 26 0 0 2384 4 26 0 1 2297 4 PROCEDURE 421 2384 0 0 0 0 0 2 0 0 5348 4 24 0 3 0 4 6 1 0 2 22 2388 2 1 0 5252 4 6 0 0 5253 4 5 0 0 5348 4 27 0 0 2401 4 2392 18 0 1 5 0 4 0 0 5348 4 1 1 1 2 0 24 0 3 5348 4 2396 28 1 1 0 0 1 1 2 2 0 7 0 0 5252 4 7 0 0 5253 4 2400 26 1 1 5252 4 26 0 1 2384 4 PROCEDURE 422 2402 24 0 1 7338 4 26 0 1 2403 4 2404 0 0 0 2419 3 0 0 0 2416 3 0 0 0 2495 3 0 0 0 2504 3 2408 0 0 0 2518 3 0 0 0 2529 3 0 0 0 2500 3 0 0 0 2412 3 2412 2 1 0 5216 4 6 0 0 5009 4 26 0 0 944 4 24 1 0 2534 4 PROCEDURE 423 2416 6 0 0 5244 4 2 0 0 5243 4 24 1 0 1429 4 26 0 0 4707 4 2420 26 1 2 5172 4 26 0 0 1838 4 27 0 1 2433 4 6 0 0 5212 4 2424 2 0 2 5288 4 6 0 0 5216 4 18 0 1 4 0 7 0 2 5288 4 2428 6 1 0 5214 4 2 0 2 5289 4 25 0 2 2 0 24 1 0 2421 4 2432 26 0 0 4099 4 26 0 0 4716 4 24 0 3 0 4 6 0 0 4 22 2436 2 0 0 5221 4 6 0 0 5212 4 1 1 2 1000 0 27 0 3 2442 4 2440 1 1 3 0 0 24 1 0 2444 4 1 1 3 0 0 2 1 0 5214 4 2444 2 1 0 5216 4 2 1 0 5218 4 2 0 0 5220 4 6 0 0 4955 4 2448 26 0 0 944 4 6 0 0 5221 4 27 0 0 980 4 18 0 3 3 0 2452 18 0 1 4127 0 2 0 0 5252 4 6 0 0 5017 4 5 0 0 5252 4 2456 26 0 0 3928 4 6 1 0 5220 4 2 1 0 7356 4 1 0 1 7 0 2460 24 0 1 7356 4 15 0 0 5288 4 3 0 0 5212 4 2 0 0 5269 4 2464 26 0 0 3717 4 18 1 1 4127 0 27 0 1 2469 4 18 1 1 1 0 2468 24 1 0 2474 4 26 0 0 3747 4 1 1 1 1 0 2 0 0 5268 4 2472 2 1 0 5212 4 24 1 0 2486 4 3 0 0 5268 4 27 0 0 2478 4 2476 1 1 2 1 0 7 0 0 5268 4 24 0 1 7356 4 6 0 0 5288 4 2480 18 0 1 4124 0 27 0 0 2484 4 1 1 3 2 0 2 0 0 5231 4 2484 24 0 1 7356 4 6 0 0 5289 4 2 1 0 5214 4 2 0 0 5234 4 2488 26 0 0 4660 4 26 0 0 4676 4 26 0 0 4332 4 23 0 0 2 0 2492 0 0 0 7356 3 24 1 0 2459 4 24 1 0 980 4 PROCEDURE 424 2495 6 1 0 5174 4 2496 28 0 0 5214 4 6 0 0 4956 4 26 0 0 944 4 24 1 0 979 4 2500 1 1 3 0 0 2 0 0 5347 4 6 0 0 4916 4 24 1 0 2509 4 PROCEDURE 425 2504 6 0 0 4930 4 4 0 0 5220 4 26 0 0 963 4 2 0 0 5347 4 2508 6 0 0 4921 4 2 0 0 5234 4 26 0 0 2550 4 6 0 0 5347 4 2512 27 0 0 2851 4 26 0 0 4676 4 26 0 0 4332 4 6 0 0 1838 4 2516 2 0 0 5007 4 24 1 0 980 4 PROCEDURE 426 2518 26 0 0 4707 4 26 0 0 1838 4 2520 3 0 0 5347 4 27 0 0 2525 4 6 0 0 5007 4 2 0 0 1838 4 2524 24 1 0 2527 4 6 0 0 4916 4 26 0 0 958 4 26 0 0 4716 4 2528 24 1 0 2508 4 PROCEDURE 427 2529 26 0 0 2550 4 6 0 0 5009 4 2 0 0 5234 4 2532 26 0 0 4676 4 26 0 0 4332 4 6 0 0 4956 4 26 0 0 3928 4 2536 26 0 0 4377 4 1 1 3 0 0 2 0 0 5234 4 PROCEDURE 428 2539 6 0 0 5212 4 2540 2 0 0 5269 4 26 0 0 3717 4 3 0 0 5268 4 27 0 0 2545 4 2544 1 1 2 1 0 7 0 0 5268 4 26 0 0 2297 4 26 0 0 4676 4 2548 26 0 0 4332 4 24 1 0 2536 4 PROCEDURE 429 2550 0 0 0 0 0 6 1 0 6056 4 2552 2 1 0 7354 4 0 0 2 4906 4 1 1 3 0 0 24 0 1 7354 4 2556 15 0 0 6058 4 27 0 0 2563 4 5 1 0 5212 4 27 0 0 2565 4 2560 23 0 0 1 0 0 0 0 7354 3 24 1 0 2554 4 1 1 3 114 0 2564 26 0 0 3972 4 24 0 1 7354 4 6 0 0 6058 4 18 1 1 4124 0 2568 3 0 0 5288 4 1 1 1 1001 0 2 0 0 5212 4 18 1 3 6 0 2572 2 0 0 5214 4 6 0 0 5288 4 5 0 0 5285 4 27 0 0 2579 4 2576 4 0 0 5285 4 26 0 0 4023 4 24 1 0 2580 4 6 0 0 5237 4 2580 2 0 0 5268 4 26 0 1 2550 4 PROCEDURE 430 2582 24 0 1 7338 4 26 0 1 2583 4 2584 0 0 0 2604 3 0 0 0 2635 3 0 0 0 2662 3 0 0 0 2673 3 2588 0 0 0 2693 3 0 0 0 2725 3 0 0 0 2726 3 0 0 0 2733 3 2592 0 0 0 2594 3 0 0 0 2595 3 5 0 0 4957 4 4 0 0 4918 4 2596 2 0 0 4737 4 26 0 0 4707 4 6 1 0 5216 4 27 0 0 2601 4 2600 6 0 0 4937 4 4 0 0 4737 4 26 0 0 2746 4 24 1 0 979 4 PROCEDURE 431 2604 26 0 0 4707 4 6 1 0 5220 4 2 0 0 5286 4 26 0 0 4371 4 2608 6 1 0 5220 4 2 0 0 5287 4 6 0 0 5286 4 27 0 3 2614 4 2612 6 0 0 5287 4 27 0 2 2617 4 6 0 0 4957 4 7 0 0 5286 4 2616 7 0 0 5287 4 6 1 0 5266 4 1 1 2 4 0 27 0 3 2624 4 2620 6 0 0 4916 4 2 0 0 5234 4 26 0 0 3625 4 24 1 0 2630 4 2624 6 0 0 4955 4 24 0 0 5266 4 5 0 0 4933 4 2 0 0 5234 4 2628 26 0 0 3625 4 24 1 0 979 4 6 0 0 5266 4 2 0 0 5236 4 2632 6 0 0 4938 4 26 0 0 4036 4 24 1 0 979 4 PROCEDURE 432 2635 1 1 3 0 0 2636 2 1 0 5216 4 6 1 0 5212 4 0 1 2 5214 4 27 1 0 2652 4 2640 6 0 0 5218 4 3 0 0 5266 4 1 1 2 4 0 27 0 2 2647 4 2644 6 0 0 4964 4 26 0 0 958 4 24 1 0 979 4 1 1 3 0 0 2648 2 1 0 5218 4 6 0 0 4965 4 26 0 0 958 4 24 1 0 2630 4 2652 6 0 0 5218 4 3 0 0 5266 4 1 1 2 4 0 27 0 2 2630 4 2656 6 0 0 4939 4 26 0 0 972 4 6 0 0 4964 4 24 0 0 5218 4 2660 5 0 0 4933 4 24 1 0 978 4 PROCEDURE 433 2662 6 0 0 5218 4 2 0 0 5266 4 2664 2 0 0 5218 4 6 0 0 5212 4 0 0 2 5214 4 27 1 0 2670 4 2668 6 0 0 4916 4 26 0 0 958 4 6 0 0 4921 4 26 0 0 2746 4 2672 24 1 0 979 4 PROCEDURE 434 2673 26 0 0 4086 4 26 0 0 4707 4 6 0 0 4903 4 2676 18 0 1 5 0 2 1 0 5310 4 26 0 0 2226 4 26 0 0 4716 4 2680 2 1 0 5218 4 6 0 0 4966 4 26 0 0 958 4 6 0 0 5018 4 2684 26 0 0 3928 4 6 0 0 4957 4 2 1 0 5286 4 6 0 0 4917 4 2688 26 0 0 950 4 6 0 0 4921 4 26 0 0 2746 4 26 0 0 1942 4 2692 24 1 0 979 4 PROCEDURE 435 2693 6 1 0 5220 4 27 0 2 2697 4 1 1 3 4096 0 2696 7 0 0 5220 4 6 0 0 5218 4 3 0 0 5236 4 1 1 2 4 0 2700 27 0 2 2720 4 6 0 0 4967 4 5 0 0 5220 4 24 0 0 5218 4 2704 5 0 0 4933 4 26 0 0 963 4 PROCEDURE 436 2706 6 1 0 5212 4 0 1 2 5214 4 2708 27 1 1 2715 4 6 0 0 5017 4 26 0 0 3928 4 6 0 0 5284 4 2712 1 1 2 8 0 27 0 1 979 4 24 1 0 980 4 1 1 3 7 0 2716 2 0 0 5284 4 2 0 0 5236 4 2 1 0 5218 4 24 1 0 2255 4 2720 6 0 0 4969 4 5 0 0 5220 4 26 0 0 963 4 26 0 0 4036 4 2724 24 1 0 2706 4 PROCEDURE 437 2725 6 0 0 4937 4 4 0 0 4916 4 18 1 1 4118 0 2728 6 0 0 5218 4 2 0 0 5266 4 18 1 1 10 0 26 0 0 2746 4 2732 24 1 0 979 4 PROCEDURE 438 2733 26 0 0 4707 4 2 1 0 5218 4 2 1 0 5216 4 2736 6 0 0 5009 4 26 0 0 944 4 26 0 0 1838 4 27 0 0 2743 4 2740 1 1 3 0 0 2 1 0 5212 4 2 1 0 5214 4 6 1 0 5266 4 2744 2 1 0 5218 4 24 1 0 2693 4 PROCEDURE 439 2746 0 0 0 0 0 2 0 0 4737 4 2748 6 0 0 5266 4 1 1 2 4 0 27 0 2 2760 4 26 0 0 4032 4 2752 6 0 0 4737 4 4 0 0 5266 4 4 0 0 5266 4 2 0 0 5233 4 2756 6 0 0 5275 4 2 0 0 5232 4 26 0 0 4332 4 26 0 1 2746 4 2760 6 0 0 5266 4 2 0 0 5236 4 6 0 0 4737 4 26 0 0 4036 4 2764 26 0 1 2746 4 PROCEDURE 440 2765 1 1 3 10 0 1 1 1 10 0 1 1 1 10 0 2768 1 1 2 1 0 4 0 0 5284 4 3 0 0 5234 4 1 1 2 23 0 2772 27 0 0 2861 4 1 1 2 9 0 27 0 2 2881 4 6 0 0 5212 4 2776 27 0 0 2813 4 3 0 0 5269 4 1 1 2 999 0 27 0 1 2800 4 2780 6 1 0 4880 4 27 0 0 2800 4 18 1 1 4122 0 27 0 0 2787 4 2784 2 0 0 5288 4 26 0 0 3942 4 24 1 0 2797 4 18 1 1 2 0 2788 27 0 0 2793 4 2 1 0 4880 4 6 0 0 5275 4 4 1 0 4881 4 2792 24 1 0 2797 4 6 1 0 4881 4 2 0 0 5212 4 26 0 0 3747 4 2796 1 1 1 1 0 2 1 0 5214 4 2 1 0 5212 4 24 1 0 2810 4 2800 6 0 0 5346 4 18 0 1 4126 0 1 1 2 144 0 27 0 1 2807 4 2804 26 0 0 3717 4 18 0 3 1 0 24 1 0 2814 4 26 0 0 3717 4 2808 5 0 0 5285 4 27 0 1 2813 4 6 0 0 5285 4 4 0 0 5285 4 2812 24 1 0 2814 4 1 1 3 0 0 2 0 0 5268 4 6 0 0 5216 4 2816 1 1 2 2 0 27 0 1 2821 4 1 1 3 1 0 3 0 0 5216 4 2820 7 1 0 5214 4 6 0 0 5234 4 3 0 0 2297 4 18 0 3 1 0 2824 0 0 2 4838 4 15 0 0 5216 4 18 0 3 2 0 0 0 2 4900 4 2828 15 0 0 5218 4 18 0 3 1 0 18 0 1 3 0 3 0 0 5234 4 2832 18 0 1 4123 0 27 0 0 2841 4 6 0 0 5234 4 27 0 1 2838 4 2836 1 1 3 2 0 2 0 0 5231 4 1 1 3 0 0 5 0 0 5234 4 2840 2 0 0 5234 4 2 1 0 5216 4 2 1 0 5218 4 6 0 0 5234 4 2844 5 0 0 4954 4 27 0 0 2849 4 6 0 0 2297 4 1 1 2 27 0 2848 27 0 1 2853 4 PROCEDURE 441 2849 26 0 0 2297 4 26 0 0 4660 4 26 0 0 4676 4 2852 24 1 0 1430 4 6 0 0 5220 4 27 0 0 2850 4 18 0 1 4127 0 2856 26 0 0 4737 4 2 0 0 5218 4 6 0 0 5234 4 26 0 0 944 4 2860 24 1 0 979 4 PROCEDURE 442 2861 6 0 0 5218 4 0 0 2 5216 4 27 1 1 2775 4 2864 2 0 0 5268 4 6 0 0 4969 4 2 0 0 5234 4 26 0 0 4676 4 2868 26 0 0 4332 4 26 0 0 4371 4 6 0 0 5212 4 27 0 0 2878 4 2872 2 0 0 5269 4 26 0 0 3717 4 3 0 0 5268 4 4 0 0 5268 4 2876 27 0 0 2878 4 1 1 2 1 0 2 0 0 5268 4 2 0 0 5234 4 2880 24 1 0 2850 4 PROCEDURE 443 2881 26 0 0 4707 4 24 1 0 1483 4 26 0 0 4716 4 2884 6 0 0 5214 4 2 1 0 5212 4 2 1 0 5214 4 2 1 0 5216 4 2888 2 1 0 5218 4 26 0 0 4707 4 6 0 0 5284 4 1 1 2 3 0 2892 27 0 1 2900 4 6 0 0 4974 4 26 0 0 944 4 6 0 0 4980 4 2896 26 0 0 963 4 2 0 0 5284 4 26 0 0 1838 4 24 1 0 1822 4 2900 1 1 2 1 0 27 0 1 2920 4 PROCEDURE 444 2902 0 0 2 4901 4 24 0 1 5212 4 2904 15 0 0 5550 4 18 0 1 4127 0 1 1 2 2 0 4 0 0 4921 4 2908 2 0 0 5287 4 2 0 0 5286 4 6 0 0 4916 4 26 0 0 950 4 2912 26 0 0 4716 4 6 0 0 4973 4 26 0 0 944 4 6 1 0 5220 4 2916 4 0 0 4930 4 26 0 0 963 4 6 0 0 4980 4 26 0 0 963 4 2920 26 0 0 4377 4 6 1 0 5213 4 26 0 0 4737 4 2 1 0 5212 4 2924 2 1 0 5214 4 2 1 0 5216 4 2 1 0 5218 4 24 1 0 2893 4 PROCEDURE 445 2928 2 1 0 5216 4 24 0 1 7338 4 26 0 1 2930 4 0 0 0 2940 3 2932 0 0 0 2944 3 0 0 0 2944 3 0 0 0 2944 3 0 0 0 979 3 2936 0 0 0 2944 3 0 0 0 2947 3 0 0 0 2950 3 0 0 0 2954 3 2940 6 0 0 4930 4 26 0 0 963 4 6 0 0 4944 4 24 1 0 1429 4 2944 24 0 0 5284 4 6 0 0 4982 4 24 1 0 1296 4 1 1 3 0 0 2948 26 0 0 2962 4 24 1 0 979 4 6 0 0 4987 4 26 0 0 2962 4 2952 6 0 0 4989 4 24 1 0 978 4 6 0 0 4987 4 26 0 0 2962 4 2956 6 0 0 4996 4 26 0 0 972 4 6 0 0 4989 4 26 0 0 972 4 2960 6 0 0 4997 4 24 1 0 978 4 PROCEDURE 446 2962 0 0 0 0 0 27 0 0 2965 4 2964 26 0 0 972 4 1 1 3 1 0 2 1 0 5216 4 6 0 0 4916 4 2968 26 0 0 958 4 26 0 0 4377 4 1 1 3 1 0 2 1 0 5216 4 2972 6 0 0 4922 4 26 0 0 958 4 26 0 1 2962 4 PROCEDURE 447 2975 24 0 1 7338 4 2976 26 0 1 2976 4 0 0 0 2986 3 0 0 0 3083 3 0 0 0 3069 3 2980 0 0 0 3053 3 0 0 0 3078 3 0 0 0 3020 3 0 0 0 3024 3 2984 0 0 0 3037 3 0 0 0 3047 3 6 1 0 5220 4 2 1 0 5286 4 2988 26 0 0 4707 4 26 1 2 5176 4 26 0 0 1838 4 27 0 1 3000 4 2992 6 1 0 5212 4 18 0 1 2 0 4 1 0 5214 4 2 0 2 5288 4 2996 6 1 0 5208 4 2 0 2 5289 4 25 0 2 2 0 24 1 0 2990 4 PROCEDURE 448 3000 24 0 3 0 4 6 0 0 4 22 3 1 0 5228 4 18 0 3 3 0 3004 18 0 1 4127 0 2 0 0 5257 4 6 1 0 5286 4 27 0 1 3012 4 3008 26 0 0 4716 4 6 0 0 4916 4 26 0 0 958 4 24 1 0 3015 4 3012 6 0 0 4930 4 4 0 0 5286 4 26 0 0 963 4 6 0 0 5257 4 3016 2 1 0 5286 4 6 0 0 4935 4 26 0 0 950 4 24 1 0 3083 4 3020 6 1 0 5354 4 2 1 0 5286 4 6 0 0 4916 4 24 1 0 1375 4 3024 26 0 0 4086 4 6 1 0 5212 4 2 0 0 5288 4 26 0 0 3942 4 3028 4 0 0 4916 4 26 0 0 938 4 26 0 0 3129 4 1 1 3 2304 0 3032 2 0 0 5231 4 6 0 0 4968 4 26 0 0 963 4 26 0 0 1942 4 3036 24 1 0 979 4 2 1 0 5216 4 26 0 0 4377 4 1 1 3 0 0 3040 2 1 0 5216 4 6 0 0 4974 4 26 0 0 944 4 26 0 0 4716 4 3044 6 0 0 5033 4 26 0 0 944 4 24 1 0 1980 4 2 1 0 5216 4 3048 6 0 0 5220 4 27 0 0 3051 4 6 0 0 5204 4 4 0 0 5034 4 3052 24 1 0 2020 4 PROCEDURE 449 3053 6 0 0 4981 4 26 0 0 963 4 6 0 0 5024 4 3056 26 0 0 3928 4 6 0 0 5019 4 26 0 0 3928 4 26 0 0 963 4 3060 26 0 0 4023 4 6 0 0 5003 4 26 0 0 963 4 26 0 0 4023 4 3064 6 0 0 5001 4 26 0 0 963 4 6 0 0 5020 4 26 0 0 3928 4 3068 24 1 0 979 4 PROCEDURE 450 3069 26 0 0 4377 4 6 1 0 5212 4 2 0 0 5269 4 3072 26 0 0 3717 4 2 0 0 5257 4 6 0 0 5252 4 2 1 0 5286 4 3076 26 0 0 4086 4 24 1 0 3006 4 2 1 0 5216 4 2 1 0 5218 4 3080 26 0 0 4086 4 6 0 0 4974 4 26 0 0 944 4 PROCEDURE 451 3083 26 0 0 3129 4 3084 6 0 0 5284 4 1 1 2 3 0 27 0 2 3122 4 24 0 1 5284 4 3088 6 0 0 5003 4 2 0 0 5231 4 6 0 0 4971 4 26 0 0 963 4 3092 6 0 0 5284 4 1 1 2 2 0 27 0 0 979 4 PROCEDURE 452 3095 6 1 0 5228 4 3096 18 0 1 5 0 27 0 0 980 4 3 1 0 5102 4 26 1 3 5102 4 3100 24 0 0 25 4 0 0 2 5288 4 1 1 3 0 0 18 1 1 8 0 3104 3 0 0 5212 4 2 0 0 5269 4 18 1 1 2 0 2 0 0 5214 4 3108 26 0 0 3717 4 3 0 0 5268 4 27 0 0 3112 4 1 1 2 1 0 3112 7 0 0 5268 4 6 0 3 5289 4 2 1 0 5208 4 2 0 0 5234 4 3116 26 0 0 2297 4 26 0 0 4676 4 26 0 0 4332 4 25 0 3 2 0 3120 24 1 0 3100 4 24 1 0 980 4 24 0 0 5284 4 6 0 0 4997 4 3124 2 0 0 5231 4 6 0 0 4968 4 26 0 0 963 4 26 0 0 1942 4 3128 24 1 0 979 4 PROCEDURE 453 3129 0 0 0 0 0 6 0 0 4981 4 26 0 0 963 4 3132 26 0 0 4023 4 26 0 1 3129 4 PROCEDURE 454 3134 6 1 0 5118 4 28 0 0 5289 4 3136 26 0 0 3272 4 26 0 0 3309 4 1 1 3 0 0 PROCEDURE 455 3139 26 0 0 3309 4 3140 1 1 3 1 0 2 0 0 5264 4 2 1 0 5332 4 26 1 2 5294 4 3144 6 0 0 5258 4 1 1 2 81 0 27 0 0 3163 4 1 1 2 1 0 3148 27 0 0 3160 4 1 1 2 1 0 27 0 1 3153 4 1 1 3 16 0 3152 24 1 0 3158 4 1 1 2 1 0 27 0 0 3161 4 1 1 2 19 0 3156 27 0 0 3162 4 1 1 3 15 0 2 0 2 5289 4 PROCEDURE 456 3159 1 1 3 1 0 3160 1 1 1 1 0 1 1 1 1 0 1 1 1 1 0 1 1 1 1 0 3164 3 0 2 5296 4 2 0 0 7339 4 26 0 0 3309 4 1 1 2 123 0 3168 27 0 0 3174 4 6 1 0 5332 4 18 0 1 2 0 4 0 0 5258 4 3172 2 1 0 5332 4 24 1 0 3166 4 PROCEDURE 457 3174 18 1 1 10 0 2 1 0 5330 4 3176 6 1 0 5333 4 26 0 0 4737 4 27 0 3 3180 4 7 0 2 5289 4 3180 0 1 2 5330 4 1 1 3 0 0 PROCEDURE 458 3182 26 0 0 3309 4 1 1 2 122 0 3184 27 0 0 3196 4 1 1 2 2 0 27 0 0 3211 4 1 1 2 1 0 3188 27 0 0 3218 4 24 0 1 7339 4 26 0 1 3190 4 0 0 0 3334 3 3192 0 0 0 3344 3 0 0 0 3362 3 0 0 0 3386 3 0 0 0 3418 3 3196 1 1 3 1 0 2 0 0 5295 4 26 0 0 3200 4 24 1 0 3138 4 PROCEDURE 459 3200 0 0 0 0 0 6 1 0 5260 4 24 0 0 5294 4 24 0 0 5289 4 3204 18 0 3 0 0 4 1 0 5262 4 2 1 0 5260 4 2 1 0 5262 4 3208 1 1 3 1 0 7 0 0 5294 4 26 0 1 3200 4 PROCEDURE 460 3211 26 0 0 3309 4 3212 26 0 0 3200 4 26 1 2 5294 4 6 0 2 5296 4 2 0 0 7339 4 3216 6 0 0 5258 4 24 1 0 3183 4 PROCEDURE 461 3218 26 0 0 3200 4 6 0 0 5266 4 3220 27 0 0 3229 4 6 0 0 5281 4 27 0 0 3227 4 1 1 3 0 0 3224 5 1 0 5260 4 2 1 0 5260 4 24 1 0 3229 4 5 0 0 5260 4 3228 2 0 0 5260 4 24 0 3 7366 4 6 1 0 7 0 2 0 0 5265 4 3232 26 0 0 4134 4 26 0 0 3250 4 6 0 0 5265 4 27 0 1 979 4 3236 26 0 0 4099 4 26 0 0 3272 4 1 1 3 0 0 26 0 0 3309 4 3240 1 1 2 122 0 27 0 0 3246 4 6 0 0 5295 4 27 0 1 3213 4 3244 6 0 0 5258 4 24 1 0 3183 4 2 0 0 5289 4 2 1 0 5290 4 3248 2 1 0 5292 4 24 1 0 3139 4 PROCEDURE 462 3250 0 0 0 0 0 6 0 0 5261 4 3252 2 0 0 5233 4 6 0 0 5260 4 24 0 0 5302 4 2 0 0 5231 4 3256 6 0 0 5281 4 27 0 1 3264 4 6 0 0 5265 4 27 0 1 3264 4 3260 1 1 3 2 0 5 0 0 5302 4 3 0 0 5302 4 27 0 1 3271 4 3264 6 1 0 5260 4 27 0 2 3270 4 6 0 0 5261 4 27 0 1 3270 4 3268 1 1 3 128 0 7 0 0 5232 4 26 0 0 4332 4 26 0 1 3250 4 PROCEDURE 463 3272 0 0 0 0 0 6 1 0 5168 4 28 0 0 5260 4 6 1 0 5508 4 3276 24 1 2 17 4 2 1 0 2 0 6 1 0 5510 4 24 1 2 17 4 3280 2 1 0 6 0 24 0 2 5514 4 18 1 1 4123 0 1 1 3 18 0 3284 18 1 1 5 0 24 1 2 17 4 28 1 1 12 0 6 1 0 5532 4 3288 24 1 2 17 4 2 1 0 48 0 24 0 2 5534 4 18 1 1 4123 0 3292 1 1 3 16 0 18 1 1 5 0 24 1 2 17 4 28 1 1 32 0 3296 6 0 0 5302 4 27 0 1 3299 4 2 0 0 5230 4 24 1 2 17 4 3300 6 1 0 46 0 5 1 0 4814 4 27 0 0 3229 4 26 1 3 5120 4 3304 0 1 2 5514 4 1 1 3 2 0 2 0 0 5272 4 2 0 0 5294 4 3308 26 0 1 3272 4 PROCEDURE 464 3309 0 0 0 0 0 18 1 1 2 0 2 1 0 5258 4 3312 25 0 3 2 0 24 1 0 3319 4 24 0 0 5272 4 0 1 2 5514 4 3316 1 1 3 2 0 7 0 0 5272 4 26 1 3 5120 4 6 1 0 5258 4 3320 26 0 1 3309 4 PROCEDURE 465 3321 0 0 0 0 0 1 1 2 122 0 27 0 0 3327 4 3324 1 1 2 2 0 27 0 0 3327 4 1 1 2 1 0 26 0 1 3321 4 PROCEDURE 466 3328 0 0 0 0 0 6 1 0 5262 4 18 0 1 1 0 4 1 0 5259 4 3332 2 1 0 5262 4 26 0 1 3328 4 PROCEDURE 467 3334 6 0 0 5264 4 27 0 0 3339 4 3336 1 1 3 8 0 24 0 0 5294 4 7 0 0 5289 4 6 1 0 5262 4 3340 18 0 1 2 0 4 0 0 5258 4 2 1 0 5262 4 24 1 0 3182 4 PROCEDURE 468 3344 6 0 0 5258 4 1 1 2 16 0 27 0 0 3357 4 6 0 0 5264 4 3348 27 0 0 3352 4 1 1 3 1 0 24 0 0 5294 4 7 0 0 5289 4 3352 6 1 0 5262 4 4 1 0 5262 4 4 1 0 5259 4 2 1 0 5262 4 3356 24 1 0 3181 4 6 0 0 5294 4 27 0 1 3181 4 1 1 3 1 0 3360 2 0 0 5266 4 24 1 0 3181 4 PROCEDURE 469 3362 6 0 0 5258 4 1 1 2 16 0 3364 27 0 1 3379 4 6 0 0 5294 4 27 0 1 3370 4 1 1 3 1 0 3368 2 0 0 5266 4 24 1 0 3182 4 1 1 3 1 0 24 0 0 5294 4 3372 24 0 0 5289 4 18 0 3 0 0 0 0 3 5202 4 5 1 0 5262 4 3376 2 1 0 5262 4 0 0 3 5191 4 24 1 0 3182 4 PROCEDURE 470 3379 6 0 0 5264 4 3380 27 0 0 3384 4 1 1 3 4 0 24 0 0 5294 4 7 0 0 5289 4 3384 26 0 0 3328 4 24 1 0 3182 4 PROCEDURE 471 3386 6 0 0 5258 4 1 1 2 16 0 3388 27 0 1 3392 4 1 1 3 1 0 2 0 0 5267 4 24 1 0 3393 4 3392 26 0 0 3328 4 26 0 0 3309 4 26 0 0 3321 4 27 0 1 3386 4 3396 18 1 1 10 0 2 1 0 5268 4 6 1 0 5262 4 26 0 0 4737 4 3400 2 1 0 5262 4 0 1 2 5268 4 6 0 0 5267 4 27 0 0 3416 4 3404 6 0 0 5294 4 27 0 0 3413 4 1 1 3 1 0 24 0 0 5294 4 3408 24 0 0 5289 4 18 0 3 0 0 5 1 0 5262 4 2 1 0 5262 4 3412 24 1 0 3415 4 PROCEDURE 472 3413 1 1 3 1 0 2 0 0 5266 4 2 0 0 5267 4 3416 6 0 0 5258 4 24 1 0 3183 4 PROCEDURE 473 3418 6 0 0 5258 4 1 1 2 77 0 3420 27 0 0 3427 4 1 1 1 77 0 26 0 0 3321 4 27 0 0 3449 4 3424 26 0 0 3328 4 26 0 0 3309 4 24 1 0 3418 4 PROCEDURE 474 3427 18 1 1 10 0 3428 2 1 0 5332 4 6 1 0 5262 4 26 0 0 4737 4 2 0 0 5269 4 3432 26 1 2 5302 4 26 0 0 3717 4 3 0 2 5230 4 27 0 0 3438 4 3436 1 1 2 1 0 7 0 2 5230 4 6 0 0 5269 4 18 0 1 2 0 3440 7 0 2 5230 4 1 1 3 0 0 2 1 0 5262 4 0 1 2 5332 4 3444 26 0 0 3309 4 26 0 0 3321 4 27 0 0 3451 4 26 0 0 3328 4 3448 24 1 0 3444 4 26 1 2 5302 4 2 0 2 5230 4 18 1 1 10 0 3452 2 1 0 5268 4 6 1 0 5262 4 26 0 0 4737 4 2 1 0 5262 4 3456 0 1 2 5268 4 24 1 0 3416 4 PROCEDURE 475 3458 24 0 2 5056 4 28 0 2 5508 4 3460 24 0 2 5056 4 24 1 2 17 4 28 1 2 2 0 6 1 0 5528 4 3464 24 1 2 17 4 2 1 0 48 0 24 0 2 5530 4 18 1 1 4123 0 3468 1 1 3 16 0 18 1 1 5 0 24 1 2 17 4 28 1 1 32 0 3472 26 0 0 4134 4 PROCEDURE 476 3473 26 1 2 5176 4 6 0 2 5209 4 26 0 0 4737 4 3476 2 0 2 5209 4 25 0 2 1 0 24 1 0 3474 4 26 1 2 5154 4 3480 6 0 2 5222 4 1 1 2 100 0 27 0 3 3487 4 1 1 2 899 0 3484 27 0 2 3487 4 6 0 0 5200 4 7 0 2 5223 4 25 0 2 2 0 3488 24 1 0 3480 4 1 1 3 0 0 0 0 2 5281 4 15 0 0 4886 4 3492 27 0 1 3499 4 6 0 0 5225 4 27 0 1 3498 4 6 0 0 5223 4 3496 27 0 1 3498 4 6 0 0 4916 4 2 0 0 5232 4 6 0 0 5222 4 3500 2 0 0 5269 4 26 0 0 3717 4 PROCEDURE 477 3502 3 0 0 5230 4 27 0 0 3506 4 3504 1 1 2 1 0 7 0 0 5230 4 6 0 0 5269 4 18 0 1 2 0 3508 7 0 0 5230 4 6 0 0 5209 4 27 0 0 3515 4 1 1 2 1 0 3512 27 0 0 3514 4 6 0 0 4957 4 4 0 0 4921 4 2 0 0 5233 4 3516 6 0 0 5219 4 27 0 0 3523 4 1 1 2 2 0 27 0 0 3521 4 3520 6 0 0 4959 4 4 0 0 4917 4 7 0 0 5233 4 PROCEDURE 478 3523 6 0 0 5210 4 3524 27 0 0 3527 4 6 0 0 4959 4 7 0 0 5233 4 6 0 0 5218 4 3528 18 0 1 1 0 4 0 0 5216 4 18 0 1 1 0 4 0 0 5217 4 3532 18 0 1 1 0 4 0 0 5211 4 7 0 0 5233 4 6 0 0 5221 4 3536 27 0 0 3544 4 1 1 3 0 0 5 0 0 5233 4 27 0 0 3542 4 3540 2 0 0 5233 4 24 1 0 3544 4 PROCEDURE 479 3542 1 1 3 128 0 7 0 0 5230 4 3544 6 0 0 5223 4 2 0 0 5231 4 6 0 0 5220 4 27 0 0 3556 4 3548 7 0 0 5343 4 6 0 0 5343 4 1 1 2 2 0 27 0 1 3556 4 3552 1 1 2 1 0 2 0 0 5343 4 6 0 0 4957 4 7 0 0 5231 4 3556 6 0 0 5221 4 27 0 0 1430 4 2 0 0 5343 4 2 0 0 5343 4 3560 24 1 0 1430 4 PROCEDURE 480 3561 26 0 0 967 4 24 0 3 7366 4 6 1 0 9 0 3564 26 0 0 4737 4 2 1 0 5214 4 24 0 3 7366 4 6 1 0 7 0 3568 26 0 0 4737 4 3 1 0 5213 4 0 0 2 5214 4 27 1 0 3591 4 3572 1 1 2 100 0 27 0 3 3576 4 6 0 0 5200 4 7 1 0 5214 4 3576 6 1 0 4796 4 3 1 0 5260 4 2 1 0 5262 4 6 1 0 5213 4 3580 2 0 0 5232 4 6 1 0 5214 4 2 0 0 5233 4 2 0 0 5230 4 3584 26 0 0 4316 4 6 1 0 5512 4 24 1 2 17 4 2 1 0 8 0 3588 6 1 0 5514 4 24 1 2 17 4 2 1 0 10 0 26 1 3 5178 4 3592 6 1 3 5519 4 27 0 3 3619 4 2 0 0 5232 4 6 1 3 5517 4 3596 2 0 0 5233 4 24 0 2 5086 4 0 1 0 5102 4 0 0 3 0 4 3600 24 1 2 17 4 24 0 2 0 0 24 0 3 0 4 4 0 0 6 22 3604 2 0 0 5108 4 0 1 1 5102 4 24 0 3 5108 4 28 1 2 12 0 3608 26 0 0 4332 4 25 0 3 4 0 24 1 0 3592 4 6 0 0 5512 4 3612 24 1 2 17 4 2 0 0 8 0 6 0 0 5514 4 24 1 2 17 4 3616 2 0 0 10 0 26 0 0 4134 4 24 1 0 979 4 1 1 3 85 0 3620 24 1 2 17 4 2 1 3 14 0 24 1 2 17 4 2 1 3 12 0 3624 24 1 0 3617 4 PROCEDURE 481 3625 0 0 0 0 0 26 1 3 5246 4 6 0 0 5239 4 3628 2 1 0 5212 4 1 1 3 1 0 2 1 0 5216 4 26 0 0 3634 4 3632 7 0 0 5247 4 26 0 1 3625 4 PROCEDURE 482 3634 0 0 0 0 0 25 0 3 0 0 3636 24 1 0 3638 4 24 1 0 3646 4 6 0 0 5287 4 5 0 3 111 4 3640 27 0 1 3644 4 6 1 3 110 4 5 1 0 5286 4 27 0 0 3649 4 3644 25 0 3 2 0 24 1 0 3638 4 6 1 0 5286 4 2 1 3 110 4 3648 1 1 3 2 0 2 0 0 4737 4 24 0 3 0 4 6 0 0 6 22 3652 1 1 2 180 0 27 0 3 3657 4 18 0 3 3 0 18 0 1 4127 0 3656 24 1 0 3658 4 1 1 1 180 0 2 1 0 5214 4 6 0 0 5237 4 3660 2 0 0 5268 4 2 1 0 5218 4 26 0 0 4676 4 26 0 0 4332 4 3664 6 0 0 4737 4 26 0 1 3634 4 PROCEDURE 483 3666 0 0 0 0 0 26 1 3 5248 4 3668 6 0 0 5249 4 27 0 0 3675 4 6 1 0 5286 4 5 0 3 50 4 3672 27 0 0 3682 4 25 0 3 1 0 24 1 0 3670 4 6 1 0 5286 4 3676 2 0 3 50 4 6 0 0 5249 4 2 1 0 5214 4 1 1 3 1 0 3680 7 0 0 5249 4 24 1 0 3685 4 24 0 3 0 4 6 0 0 6 22 3684 2 1 0 5214 4 6 0 0 5240 4 2 1 0 5212 4 2 1 0 5216 4 3688 2 1 0 5218 4 6 0 0 5237 4 2 0 0 5268 4 26 0 0 4676 4 3692 26 0 0 4332 4 26 0 1 3666 4 PROCEDURE 484 3694 0 0 0 0 0 2 0 0 5234 4 3696 6 1 0 5212 4 2 0 0 5269 4 26 0 0 3717 4 3 0 0 5286 4 3700 1 1 2 1 0 7 0 0 5286 4 6 1 0 5262 4 2 0 0 5287 4 3704 6 0 0 5269 4 18 0 1 2 0 7 0 0 5286 4 26 0 0 3709 4 3708 26 0 1 3694 4 PROCEDURE 485 3709 0 0 0 0 0 26 1 3 5250 4 6 0 0 5241 4 3712 2 1 0 5212 4 2 1 0 5216 4 26 0 0 3634 4 7 0 0 5251 4 3716 26 0 1 3709 4 PROCEDURE 486 3717 0 0 0 0 0 6 0 0 5269 4 27 0 0 3733 4 3720 1 1 2 100 0 27 0 2 3734 4 1 0 1 1 0 1 1 3 0 0 3724 24 0 0 5269 4 15 0 0 5550 4 2 0 0 5252 4 0 0 2 4959 4 3728 24 0 0 5269 4 15 0 0 5550 4 1 0 1 1 0 24 0 0 5252 4 3732 15 0 0 5979 4 26 0 1 3717 4 PROCEDURE 487 3734 1 1 2 899 0 27 0 3 3740 4 3736 27 0 1 3742 4 2 0 0 5269 4 6 0 0 5285 4 26 0 1 3717 4 3740 1 1 1 999 0 18 0 1 2 0 1 0 0 5980 4 18 1 1 10 0 3744 5 0 0 4910 4 2 0 0 5252 4 24 1 0 3730 4 PROCEDURE 488 3747 0 0 0 0 0 3748 26 1 3 6010 4 1 0 1 1031 0 1 1 3 0 0 15 0 3 6012 4 3752 5 0 0 5212 4 27 0 0 3756 4 25 0 3 2 0 24 1 0 3750 4 3756 6 0 3 6012 4 18 0 1 4125 0 26 0 1 3747 4 PROCEDURE 489 3759 0 0 0 0 0 3760 6 0 0 5222 4 27 0 1 3846 4 6 0 0 5212 4 1 1 2 1000 0 3764 27 0 2 3868 4 6 0 0 5212 4 27 0 0 3808 4 2 0 0 5269 4 3768 26 0 0 3717 4 18 1 1 4127 0 27 0 1 3857 4 18 1 1 1 0 3772 3 0 0 5268 4 5 0 0 5285 4 27 0 1 3793 4 PROCEDURE 490 3775 6 0 0 5236 4 3776 27 0 0 3790 4 1 1 2 4 0 27 0 2 3786 4 6 0 0 5235 4 3780 27 0 0 3790 4 6 0 0 4928 4 5 0 0 5275 4 5 0 0 5236 4 3784 26 0 0 938 4 24 1 0 3788 4 6 0 0 5009 4 26 0 0 4036 4 3788 1 1 3 0 0 2 0 0 5236 4 6 0 0 5237 4 2 0 0 5268 4 3792 26 0 1 3759 4 PROCEDURE 491 3793 26 0 0 3919 4 27 0 1 3801 4 6 0 0 5008 4 3796 5 0 0 5268 4 5 0 0 5268 4 1 1 1 1 0 26 0 0 938 4 3800 24 1 0 3791 4 26 0 0 4086 4 6 0 0 4916 4 4 0 0 5268 4 3804 4 0 0 5268 4 1 1 2 1 0 26 0 0 938 4 24 1 0 3889 4 PROCEDURE 492 3808 6 0 0 5236 4 27 0 0 3844 4 1 1 2 4 0 27 0 2 3831 4 3812 6 0 0 5235 4 27 0 0 3842 4 6 1 0 5214 4 27 0 3 3821 4 3816 6 0 0 4927 4 5 0 0 5275 4 5 0 0 5236 4 26 0 0 938 4 3820 24 1 0 3835 4 26 0 0 4086 4 26 0 0 4032 4 6 0 0 4916 4 3824 4 0 0 5236 4 4 0 0 5236 4 2 0 0 5233 4 6 0 0 5275 4 3828 2 0 0 5232 4 26 0 0 4332 4 24 1 0 3840 4 6 1 0 5214 4 3832 27 0 3 3837 4 6 0 0 5008 4 26 0 0 4036 4 2 0 0 5236 4 3836 24 1 0 3916 4 26 0 0 4086 4 6 0 0 4916 4 26 0 0 4036 4 3840 2 0 0 5236 4 24 1 0 3889 4 6 1 0 5214 4 27 0 3 3821 4 3844 26 0 0 4032 4 24 1 0 3916 4 PROCEDURE 493 3846 26 0 0 3919 4 27 0 1 3850 4 3848 6 1 0 5214 4 27 0 2 3854 4 26 0 0 4086 4 6 0 0 4916 4 3852 26 0 0 3985 4 24 1 0 3889 4 6 0 0 5008 4 26 0 0 3985 4 3856 24 1 0 3916 4 PROCEDURE 494 3857 26 0 0 3919 4 27 0 1 3861 4 6 1 0 5214 4 3860 27 0 2 3866 4 26 0 0 4086 4 26 0 0 3963 4 6 0 0 4974 4 3864 26 0 0 963 4 24 1 0 3889 4 26 0 0 3963 4 24 1 0 3916 4 PROCEDURE 495 3868 26 0 0 3919 4 27 0 1 3872 4 6 1 0 5214 4 27 0 2 3882 4 3872 26 0 0 4086 4 26 0 0 4004 4 6 0 0 4927 4 5 0 0 5212 4 3876 1 1 1 1000 0 26 0 0 963 4 6 0 0 4974 4 26 0 0 963 4 3880 2 1 0 5212 4 24 1 0 3889 4 26 0 0 4004 4 6 0 0 4927 4 3884 5 0 0 5212 4 1 1 1 1000 0 26 0 0 963 4 2 1 0 5212 4 3888 24 1 0 3916 4 PROCEDURE 496 3889 6 0 0 5236 4 27 0 0 3904 4 1 1 2 4 0 3892 27 0 2 3902 4 26 0 0 4032 4 6 0 0 4917 4 4 0 0 5236 4 3896 4 0 0 5236 4 2 0 0 5233 4 6 0 0 5275 4 2 0 0 5232 4 3900 26 0 0 4332 4 24 1 0 3904 4 6 0 0 4917 4 26 0 0 4036 4 3904 6 1 0 5214 4 27 0 2 3909 4 6 0 0 5214 4 4 0 0 4932 4 3908 26 0 0 963 4 2 1 0 5214 4 2 0 0 5236 4 6 0 0 5022 4 3912 26 0 0 972 4 26 0 0 1942 4 6 0 0 5023 4 26 0 0 972 4 3916 1 1 3 0 0 2 0 0 5268 4 26 0 1 3759 4 PROCEDURE 497 3919 0 0 0 0 0 3920 6 0 0 5236 4 27 0 0 3925 4 1 1 2 4 0 27 0 2 3926 4 3924 6 0 0 5235 4 26 0 1 3919 4 1 1 3 1 0 26 0 1 3919 4 PROCEDURE 498 3928 0 0 0 0 0 27 0 3 3933 4 4 0 0 5277 4 5 0 0 5245 4 3932 24 1 0 3935 4 5 0 0 5277 4 4 0 0 5245 4 2 0 0 5233 4 3936 6 0 0 5244 4 18 0 1 2 0 4 0 0 5237 4 2 0 0 5232 4 3940 26 0 0 4332 4 26 0 1 3928 4 PROCEDURE 499 3942 0 0 0 0 0 26 1 3 6008 4 3944 6 0 3 6013 4 27 0 0 3953 4 18 1 3 2 0 18 1 1 4126 0 3948 4 0 0 4935 4 5 0 0 5288 4 27 0 0 3955 4 25 0 3 2 0 3952 24 1 0 3944 4 1 1 3 93 0 26 0 0 3972 4 24 0 3 0 4 3956 6 0 0 6 22 18 0 3 3 0 18 0 1 4127 0 4 0 0 5999 4 3960 4 0 0 5999 4 1 1 1 1 0 26 0 1 3942 4 PROCEDURE 500 3963 0 0 0 0 0 3964 26 0 0 3747 4 1 1 1 1 0 5 0 0 4927 4 2 0 0 5233 4 3968 5 0 0 5233 4 26 0 0 938 4 2 0 0 5212 4 26 0 1 3963 4 PROCEDURE 501 3972 0 0 0 0 0 18 1 1 4126 0 4 1 0 4814 4 18 1 1 2 0 3976 24 1 2 15 4 2 1 0 46 0 6 0 0 5026 4 27 0 1 3983 4 3980 1 1 3 1 0 2 0 0 5007 4 26 0 0 4134 4 26 0 0 4647 4 3984 26 0 1 3972 4 PROCEDURE 502 3985 0 0 0 0 0 2 0 0 5292 4 26 1 3 6044 4 3988 6 0 0 6045 4 27 0 0 3997 4 1 0 1 3 0 1 1 3 0 0 3992 15 0 3 6046 4 5 1 0 5212 4 27 0 0 3999 4 25 0 3 1 0 3996 24 1 0 3991 4 1 1 3 76 0 26 0 0 3972 4 6 0 3 6046 4 4000 26 0 0 4054 4 2 0 0 5222 4 2 1 0 5212 4 26 0 1 3985 4 PROCEDURE 503 4004 0 0 0 0 0 6 0 0 5243 4 2 0 0 5269 4 26 0 0 3717 4 4008 3 0 0 5268 4 5 0 0 5285 4 27 0 0 4019 4 6 0 0 5268 4 4012 26 0 0 4023 4 6 0 0 5243 4 18 0 1 2 0 2 0 0 5232 4 4016 6 0 0 5008 4 26 0 0 963 4 26 0 1 4004 4 6 0 0 5243 4 4020 18 0 1 2 0 4 0 0 5237 4 24 1 0 4015 4 PROCEDURE 504 4023 0 0 0 0 0 4024 27 0 0 4029 4 2 0 0 5233 4 1 1 3 1 0 5 0 0 5233 4 4028 5 0 0 5233 4 4 0 0 5008 4 26 0 0 938 4 26 0 1 4023 4 PROCEDURE 505 4032 0 0 0 0 0 1 1 3 0 0 26 0 0 4023 4 26 0 1 4032 4 PROCEDURE 506 4036 0 0 0 0 0 2 0 0 5292 4 26 1 3 5386 4 25 0 3 0 0 4040 24 1 0 4042 4 24 1 0 4049 4 1 0 1 3 0 1 1 3 0 0 4044 15 0 3 5388 4 5 0 0 5236 4 27 0 0 4051 4 25 0 3 1 0 4048 24 1 0 4043 4 1 1 3 100 0 26 0 0 3972 4 6 0 3 5388 4 4052 26 0 0 4054 4 26 0 1 4036 4 PROCEDURE 507 4054 0 0 0 0 0 2 0 0 4004 4 4056 6 0 0 5292 4 27 0 0 4067 4 6 0 0 4004 4 18 0 1 4124 0 4060 5 0 0 5285 4 27 0 0 4065 4 4 0 0 5285 4 26 0 0 4023 4 4064 24 1 0 4072 4 6 0 0 5237 4 24 1 0 4072 4 6 0 0 4004 4 4068 18 0 1 4124 0 3 0 0 5232 4 4 0 0 5232 4 1 1 2 1 0 4072 2 0 0 5232 4 6 0 0 4004 4 18 1 1 4124 0 1 1 1 1001 0 4076 18 0 1 2 0 7 0 0 5232 4 1 1 3 0 0 18 1 1 2 0 4080 0 0 2 4902 4 15 0 0 5292 4 14 0 0 5292 4 6 0 0 5292 4 4084 26 0 0 963 4 26 0 1 4054 4 PROCEDURE 508 4086 0 0 0 0 0 6 0 0 5259 4 4088 27 0 0 4090 4 1 1 3 8 0 4 0 0 4937 4 26 0 0 972 4 4092 6 0 0 5259 4 27 0 1 4096 4 6 0 0 4936 4 26 0 0 938 4 4096 1 1 3 1 0 7 0 0 5259 4 26 0 1 4086 4 PROCEDURE 509 4099 0 0 0 0 0 4100 24 0 3 7366 4 6 1 0 1 0 2 0 0 4737 4 24 0 1 4737 4 4104 23 0 0 0 0 0 0 0 7366 3 24 1 0 4108 4 26 0 0 4749 4 4108 1 1 3 0 0 1 0 1 15 0 24 0 3 7366 4 15 1 0 2 0 4112 2 0 0 5007 4 24 0 3 7366 4 14 1 0 2 0 6 1 0 5180 4 4116 28 1 1 5506 4 24 0 3 7366 4 24 0 2 0 0 18 1 1 4123 0 4120 24 0 3 7366 4 6 1 0 1 0 18 1 1 5 0 28 1 1 5506 4 4124 26 0 1 4099 4 PROCEDURE 510 4125 0 0 0 0 0 24 1 2 19 4 6 1 0 4 0 4128 24 1 2 19 4 2 1 0 2 0 24 1 2 19 4 2 1 0 4 0 4132 26 0 0 4134 4 26 0 1 4125 4 PROCEDURE 511 4134 0 0 0 0 0 6 1 0 4882 4 4136 24 1 2 17 4 2 1 0 50 0 24 1 2 17 4 6 1 0 46 0 4140 26 0 0 4291 4 27 0 0 4147 4 24 1 2 17 4 6 1 0 48 0 4144 27 0 0 4195 4 26 0 0 4291 4 27 0 1 4165 4 23 0 0 0 0 4148 0 0 0 7364 3 24 1 0 4151 4 24 1 0 4193 4 24 1 2 17 4 4152 6 1 0 6 0 27 0 0 4193 4 18 0 1 4120 0 1 1 2 91 0 4156 27 0 0 4193 4 24 1 2 17 4 6 1 0 7 0 24 0 1 7364 4 4160 2 0 0 6246 4 23 0 0 1 0 0 0 0 7364 3 24 1 0 4193 4 4164 24 1 0 4193 4 24 1 2 17 4 6 1 0 32 0 5 1 0 5182 4 4168 27 0 1 4173 4 1 0 1 63 0 24 1 2 17 4 14 1 0 48 0 4172 24 1 0 4195 4 23 0 0 0 0 0 0 0 7362 3 24 1 0 4177 4 4176 24 1 0 4190 4 24 1 2 17 4 6 1 0 6 0 27 0 0 4190 4 4180 18 0 1 4120 0 1 1 2 91 0 27 0 0 4190 4 24 1 2 17 4 4184 6 1 0 7 0 24 0 1 7362 4 2 0 0 6256 4 23 0 0 1 0 4188 0 0 0 7362 3 24 1 0 4190 4 6 0 0 7343 4 1 1 1 1 0 4192 2 0 0 7343 4 1 1 3 1 0 2 0 0 5007 4 6 1 0 6202 4 4196 27 0 1 4202 4 6 0 0 5007 4 27 0 0 4208 4 6 0 0 5026 4 4200 27 0 1 4202 4 26 0 0 4210 4 6 0 0 5280 4 24 1 2 17 4 4204 2 1 0 1 0 26 0 0 4233 4 1 1 3 1 0 3 0 0 5280 4 4208 2 0 0 5026 4 26 0 1 4134 4 PROCEDURE 512 4210 0 0 0 0 0 6 1 0 16 4 4212 2 1 0 4878 4 6 0 0 8 4 2 0 0 16 4 5 0 0 8 4 4216 1 1 2 64 0 2 0 0 17 4 24 1 2 17 4 2 1 0 0 0 4220 6 0 0 6275 4 27 0 0 4226 4 6 1 0 5116 4 24 1 2 17 4 4224 28 1 1 0 0 24 1 0 4229 4 6 1 0 4882 4 24 1 2 17 4 4228 2 1 0 2 0 26 0 0 4233 4 6 1 0 4878 4 2 1 0 16 4 4232 26 0 1 4210 4 PROCEDURE 513 4233 0 0 0 0 0 6 0 0 6275 4 27 0 0 4252 4 4236 24 1 2 17 4 24 0 2 0 0 18 1 1 4123 0 1 1 3 50 0 4240 18 1 1 5 0 0 1 0 5102 4 0 0 3 0 4 24 1 2 13 4 4244 24 0 2 0 0 4 0 0 7358 4 2 0 0 5108 4 0 1 1 5102 4 4248 24 0 3 5108 4 28 1 1 4 0 26 0 0 4769 4 26 0 1 4233 4 4252 6 0 0 6274 4 1 1 2 9 0 27 0 0 4271 4 6 0 0 4959 4 4256 24 1 2 17 4 2 0 0 1 0 24 1 2 17 4 24 0 2 0 0 4260 24 1 2 13 4 29 0 1 0 0 1 1 3 4 0 18 0 1 5 0 4264 4 0 0 7 4 0 0 2 12 4 25 1 1 4096 0 24 0 3 0 4 4268 23 0 2 160 0 0 0 3 5191 4 26 0 1 4233 4 24 1 2 17 4 4272 24 0 2 0 0 18 1 1 4123 0 1 1 3 54 0 18 1 1 5 0 4276 24 1 2 13 4 28 1 1 0 0 1 1 3 9 0 24 1 0 4263 4 PROCEDURE 514 4280 0 0 0 0 0 0 1 0 5102 4 0 0 3 0 4 0 0 2 20 4 4284 6 1 0 5132 4 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 4288 23 0 2 0 256 0 1 1 5102 4 26 0 1 4280 4 PROCEDURE 515 4291 0 0 0 0 0 4292 18 0 1 4126 0 18 0 1 2 0 1 1 1 93 0 5 1 0 4814 4 4296 27 0 1 4300 4 6 0 0 7342 4 1 1 1 1 0 2 0 0 7342 4 4300 26 0 1 4291 4 PROCEDURE 516 4301 0 0 0 0 0 26 1 2 5278 4 6 1 0 5260 4 4304 4 1 0 4804 4 24 1 2 21 4 2 1 2 4 0 6 1 0 5262 4 4308 24 1 2 21 4 2 1 2 6 0 6 0 0 5277 4 24 1 2 21 4 4312 2 1 2 9 0 24 1 2 21 4 2 1 2 10 0 24 1 0 4350 4 PROCEDURE 517 4316 0 0 0 0 0 26 1 2 5278 4 6 1 0 5260 4 24 1 2 21 4 4320 2 1 2 4 0 6 1 0 5262 4 24 1 2 21 4 2 1 2 6 0 4324 6 0 0 5232 4 24 1 2 21 4 2 1 2 9 0 6 0 0 5233 4 4328 24 1 2 21 4 2 1 2 11 0 6 0 0 4316 4 24 1 0 4349 4 PROCEDURE 518 4332 0 0 0 0 0 6 0 0 5276 4 7 0 0 5277 4 26 1 2 5278 4 4336 6 0 0 5230 4 24 1 2 21 4 2 1 2 5 0 6 0 0 5231 4 4340 24 1 2 21 4 2 1 2 7 0 6 0 0 5232 4 24 1 2 21 4 4344 2 1 2 9 0 6 0 0 5233 4 24 1 2 21 4 2 1 2 11 0 4348 6 0 0 4332 4 2 0 0 4301 4 PROCEDURE 519 4350 25 0 2 8 0 24 1 0 4357 4 4352 6 1 0 4882 4 24 1 2 21 4 2 1 2 4 0 26 0 0 4280 4 4356 26 1 2 5184 4 24 0 3 0 4 6 1 0 4 22 2 1 0 5278 4 4360 2 0 0 5231 4 2 1 0 5232 4 26 0 1 4301 4 PROCEDURE 520 4363 0 0 0 0 0 4364 6 0 0 5278 4 27 0 0 4370 4 26 1 2 5278 4 6 0 0 4363 4 4368 2 0 0 4301 4 24 1 0 4352 4 26 0 1 4363 4 PROCEDURE 521 4371 0 0 0 0 0 4372 26 0 0 4099 4 1 1 3 1 0 2 0 0 5333 4 26 0 0 4377 4 4376 26 0 1 4371 4 PROCEDURE 522 4377 0 0 0 0 0 6 0 0 5333 4 27 0 1 4386 4 4380 26 0 0 4707 4 26 0 0 4099 4 24 0 3 7366 4 6 1 0 6 0 4384 5 1 0 4812 4 27 0 1 980 4 24 0 2 5038 4 28 0 2 5508 4 4388 24 0 2 5038 4 24 1 2 17 4 28 1 2 2 0 6 1 0 5526 4 4392 24 1 2 17 4 2 1 0 28 0 6 1 0 5528 4 24 1 2 17 4 4396 2 1 0 48 0 24 0 2 5530 4 18 1 1 4123 0 1 1 3 16 0 4400 18 1 1 5 0 24 1 2 17 4 28 1 1 32 0 6 1 0 5210 4 4404 5 1 0 4812 4 27 0 0 4512 4 1 1 3 0 0 2 1 0 5254 4 4408 25 0 1 0 0 24 1 0 4411 4 24 1 0 4453 4 24 0 3 0 4 4412 6 0 1 1 0 5 1 0 5208 4 27 0 0 4446 4 27 0 2 4453 4 4416 6 1 0 4814 4 2 1 0 5254 4 26 0 0 4421 4 26 0 0 4632 4 4420 24 1 0 4406 4 PROCEDURE 523 4421 0 0 0 0 0 24 0 3 0 4 6 0 1 0 0 4424 3 0 0 5234 4 24 0 3 0 4 2 0 1 1 0 6 1 0 5254 4 4428 27 0 1 4437 4 1 0 1 3 0 15 0 0 5208 4 1 1 2 2 0 4432 27 0 1 4437 4 24 0 3 0 4 6 0 0 2 22 26 0 0 2384 4 4436 24 1 0 4443 4 6 0 0 5244 4 18 0 3 10 0 4 0 0 5277 4 4440 5 0 0 5245 4 24 0 3 0 4 2 0 1 0 0 25 0 1 2 0 4444 24 1 0 4445 4 26 0 1 4421 4 PROCEDURE 524 4446 26 0 0 4421 4 24 0 3 0 4 4448 6 0 1 1 0 5 0 0 5208 4 27 0 1 4495 4 26 0 0 4632 4 4452 24 1 0 4446 4 PROCEDURE 525 4453 6 0 0 5351 4 27 0 0 4512 4 6 0 0 330 4 4456 27 0 0 4512 4 5 1 0 5208 4 27 0 0 4462 4 27 0 2 4512 4 4460 6 1 0 4814 4 2 1 0 5254 4 6 0 0 332 4 18 0 1 6 0 4464 18 0 1 4127 0 27 0 0 4471 4 24 0 3 0 4 5 1 0 2 22 4468 27 0 2 4471 4 1 1 3 121 0 26 0 0 3972 4 6 0 0 331 4 4472 2 0 0 5234 4 6 0 0 332 4 27 0 0 4484 4 18 0 1 4124 0 4476 2 0 0 4421 4 6 0 0 5277 4 5 0 0 5245 4 0 0 2 4906 4 4480 24 0 1 4421 4 18 1 3 0 0 24 0 3 332 4 14 0 0 0 0 4484 6 0 0 5351 4 1 1 2 3 0 3 0 0 5351 4 27 0 1 4490 4 4488 2 0 0 330 4 24 1 0 4493 4 24 0 2 333 4 4 1 0 5350 4 4492 28 0 0 330 4 6 1 0 5254 4 27 0 1 4419 4 6 0 0 5351 4 4496 27 0 0 4509 4 6 0 0 5208 4 5 0 0 330 4 27 0 0 4507 4 4500 27 0 3 4509 4 6 0 0 5234 4 27 0 0 4504 4 26 0 0 4632 4 4504 6 1 0 4814 4 2 1 0 5254 4 24 1 0 4462 4 26 0 0 4632 4 4508 24 1 0 4462 4 24 0 2 5096 4 24 1 2 17 4 28 1 2 2 0 PROCEDURE 526 4512 1 1 3 0 0 0 1 2 5212 4 26 0 0 4698 4 2 1 0 5212 4 4516 2 0 0 5222 4 1 0 1 1 0 15 1 0 5214 4 1 1 2 12 0 4520 27 0 1 4528 4 1 1 3 1 0 2 0 0 5222 4 6 1 0 5214 4 4524 18 0 1 4127 0 27 0 2 4527 4 1 1 1 1 0 2 1 0 5214 4 PROCEDURE 527 4528 6 1 0 5544 4 5 1 0 4814 4 3 1 0 5332 4 27 0 0 4557 4 4532 6 1 0 5530 4 5 1 0 5186 4 27 0 1 4557 4 6 1 0 5210 4 4536 5 1 0 4812 4 27 0 0 4626 4 6 0 0 5211 4 5 0 0 5205 4 4540 27 0 0 4626 4 1 1 2 336 0 27 0 0 4626 4 1 1 2 4080 0 4544 27 0 0 4626 4 1 1 2 48 0 27 0 0 4626 4 6 0 0 6204 4 4548 1 1 2 40 0 27 0 2 4626 4 6 0 0 5277 4 18 0 1 5 0 4552 4 0 0 5208 4 24 0 1 6204 4 2 1 0 6206 4 1 1 3 2 0 4556 7 0 0 6204 4 26 0 0 4134 4 6 1 0 5213 4 1 1 2 256 0 4560 27 0 3 4567 4 1 1 2 2201 0 27 0 2 4567 4 0 0 3 5202 4 4564 6 0 0 5200 4 7 1 0 5214 4 0 0 3 5191 4 6 1 0 5210 4 4568 5 1 0 4812 4 27 0 0 4583 4 0 1 2 5210 4 26 0 0 4698 4 4572 2 1 0 5210 4 6 1 0 5211 4 18 1 1 4127 0 2 0 0 5344 4 4576 18 1 1 1 0 1 1 1 1 0 2 0 0 5284 4 PROCEDURE 528 4579 6 0 0 5344 4 4580 26 0 0 4737 4 1 1 1 1 0 2 0 0 5344 4 6 1 0 5332 4 4584 27 0 1 4587 4 2 0 0 5344 4 24 1 0 979 4 24 0 2 4858 4 4588 12 1 0 5214 4 2 1 0 5214 4 24 0 2 4858 4 12 1 0 5218 4 4592 2 1 0 5218 4 6 0 0 5344 4 1 1 2 2 0 27 0 0 4621 4 4596 1 1 2 3 0 27 0 0 4624 4 1 1 2 2 0 27 0 0 4621 4 4600 1 1 2 1 0 27 0 0 4621 4 1 1 2 3 0 27 0 3 4618 4 4604 1 1 2 3 0 27 0 3 4621 4 27 0 0 4613 4 1 1 2 1 0 4608 27 0 0 4621 4 6 0 0 5284 4 1 1 2 7 0 27 0 0 4624 4 4612 24 1 0 4621 4 6 0 0 5284 4 1 1 2 3 0 27 0 3 4621 4 4616 1 1 3 0 0 24 1 0 4624 4 24 0 2 4858 4 12 1 0 5220 4 4620 2 1 0 5220 4 24 0 2 4858 4 12 1 0 5213 4 2 1 0 5212 4 4624 2 0 0 5333 4 26 0 1 4377 4 1 1 3 101 0 1 0 1 24 0 4628 18 0 1 3 0 24 1 2 17 4 14 0 0 49 0 24 1 0 4557 4 PROCEDURE 529 4632 0 0 0 0 0 6 1 0 5254 4 27 0 1 4637 4 6 1 0 6202 4 4636 27 0 0 4644 4 24 0 2 5090 4 24 1 2 15 4 28 1 2 2 0 4640 6 1 0 5254 4 24 1 2 15 4 2 1 0 46 0 26 0 0 4647 4 4644 1 1 3 0 0 2 0 0 5234 4 26 0 1 4632 4 PROCEDURE 530 4647 0 0 0 0 0 4648 6 1 0 4882 4 24 1 2 15 4 2 1 0 50 0 6 1 0 14 4 4652 2 1 0 16 4 26 0 0 4134 4 6 1 0 30 4 2 1 0 16 4 4656 6 1 0 5160 4 24 1 2 15 4 28 1 1 2 0 26 0 1 4647 4 PROCEDURE 531 4660 0 0 0 0 0 1 1 3 0 0 5 1 0 5214 4 27 0 0 4675 4 4664 27 0 3 4675 4 2 1 0 5214 4 1 1 3 128 0 7 0 0 5268 4 4668 6 1 0 5216 4 1 1 2 2 0 27 0 1 4675 4 1 1 2 1 0 4672 7 1 0 5214 4 1 1 3 1 0 2 1 0 5216 4 26 0 1 4660 4 PROCEDURE 532 4676 0 0 0 0 0 6 0 0 5234 4 2 0 0 5233 4 6 1 0 5212 4 4680 18 0 1 2 0 4 0 0 5268 4 2 0 0 5232 4 6 1 0 5216 4 4684 27 0 0 4690 4 1 1 2 2 0 27 0 1 4689 4 1 1 3 1 0 4688 7 1 0 5214 4 6 0 0 4937 4 24 0 1 5218 4 4 0 0 4933 4 4692 4 0 0 5214 4 1 0 1 15 0 15 0 0 5233 4 14 0 0 5233 4 4696 1 1 3 0 0 26 0 1 4676 4 PROCEDURE 533 4698 0 0 0 0 0 1 1 3 0 0 4700 2 1 0 5252 4 6 1 0 5252 4 18 1 1 2 0 2 1 0 5252 4 4704 27 1 1 4701 4 6 1 0 5252 4 26 0 1 4698 4 PROCEDURE 534 4707 0 0 0 0 0 4708 24 0 2 5212 4 18 1 1 4123 0 1 1 3 8 0 18 1 1 5 0 4712 28 1 1 5260 4 6 0 0 5222 4 2 0 0 5223 4 26 0 1 4707 4 PROCEDURE 535 4716 0 0 0 0 0 24 0 2 5260 4 18 1 1 4123 0 1 1 3 8 0 4720 18 1 1 5 0 28 1 1 5212 4 6 0 0 5223 4 2 0 0 5222 4 4724 26 0 1 4716 4 PROCEDURE 536 4725 0 0 0 0 0 6 1 0 5218 4 2 0 0 5236 4 4728 26 0 0 3759 4 6 0 0 5236 4 2 1 0 5218 4 6 1 0 5214 4 4732 27 0 2 4734 4 26 0 0 4660 4 26 0 0 4676 4 26 0 0 4332 4 4736 26 0 1 4725 4 PROCEDURE 537 4737 0 0 0 0 0 2 1 0 4878 4 0 0 3 5191 4 4740 24 0 2 4858 4 12 1 0 4878 4 26 0 1 4737 4 PROCEDURE 538 4743 0 0 0 0 0 4744 2 1 0 4878 4 0 0 3 5202 4 24 0 2 4838 4 12 1 0 4878 4 4748 26 0 1 4743 4 PROCEDURE 539 4749 0 0 0 0 0 0 1 0 5102 4 0 0 3 0 4 4752 0 0 2 18 4 6 1 0 5188 4 4 0 0 10 4 25 1 1 4096 0 4756 24 0 3 0 4 23 0 2 0 256 0 1 1 5102 4 0 1 0 5102 4 4760 0 0 3 0 4 24 1 2 19 4 24 0 2 6 0 3 0 0 7366 4 4764 24 1 2 19 4 4 1 0 5 0 2 0 0 7367 4 0 1 1 5102 4 4768 26 0 1 4749 4 PROCEDURE 540 4769 0 0 0 0 0 23 0 0 50 0 0 0 0 7358 3 4772 24 1 0 4779 4 6 1 0 4882 4 24 1 2 13 4 2 1 0 306 0 4776 26 0 0 4780 4 6 1 0 5142 4 2 1 0 7358 4 26 0 1 4769 4 PROCEDURE 541 4780 0 0 0 0 0 6 1 0 5132 4 0 0 2 12 4 25 1 1 4096 0 4784 4 0 0 7 4 24 0 3 0 4 23 0 2 160 0 26 0 1 4780 4 SECTION 542 4788 37455 0 75516 0 26355 0 73515 0 4792 57273 0 53666 0 65369 0 67696 0 4796 35572 0 65667 0 40000 0 55655 0 4800 46772 0 54746 0 35572 0 56596 0 4804 75500 0 73786 0 56554 0 56595 0 4808 0 0 6+000 0 7554. 0 73786 0 4812 0 0 53000 0 :5:5: 0 5:5:5 0 4816 7554£ 0 73786 0 1 0 0 0 4820 2 0 0 0 4 0 0 0 4824 8 0 0 0 10 0 0 0 4828 20 0 0 0 40 0 0 0 4832 80 0 0 0 100 0 0 0 4836 200 0 0 0 SECTION 543 4838 1 0 0 0 4840 16 0 0 0 256 0 0 0 4844 4096 0 0 0 65536 0 0 0 4848 48576 0 10 0 77216 0 167 0 4852 35456 0 2684 0 67296 0 42949 0 4856 £££££ 0 £££££ 0 1 0 0 0 4860 t 0 0 0 64 0 0 0 4864 3.8 0 0 0 2710 0 0 0 4868 186t0 0 0 0 £4240 0 0 0 4872 89680 0 9 0 5.100 0 5£ 0 4876 t+t00 0 3e9 0 0 0 0 0 4880 0 0 0 0 SECTION 544 4882 7. 0 7.000 0 4884 0 0 90 0 1 0 45 0 4888 45 0 44 0 4 0 4 0 4892 2 0 6. 3 32 3 6. 3 4896 t0: 1 4t 1 e4 0 e4 0 4900 3 0 7£££0 0 1£££ 0 66666 0 4904 66.64 0 66666 0 3££ 0 1000 0 4908 3£ 0 0 0 SECTION 545 4910 175e 3 t8006 0 4912 +8006 0 7 0 £££££ 0 £££££ 0 4916 60000 0 40000 0 50000 0 30000 0 4920 70000 0 20000 0 90000 0 t0000 0 4924 e0000 0 :0000 0 2t001- 0 8+000- 0 4928 80000- 0 t000 0 1.000 0 1t000 0 4932 1+000 0 0 0 2000 0 4000 0 4936 6000 0 8000 0 28000 0 38000 0 4940 22000- 0 26000- 0 2t000- 0 2.000- 0 4944 12000 0 £0000 0 .0000 0 14000 0 4948 e0000- 0 e2000- 0 e4000- 0 e6000- 0 4952 e8000- 0 et000- 0 88000- 0 t0000- 0 4956 t2000- 0 10000 0 2t00t- 0 80000 0 4960 88000 0 1.001 0 48000 0 2t005- 0 4964 t8000- 0 68000 0 +0000 0 90000- 0 4968 74000- 0 70000- 0 2e016- 0 t4000- 0 4972 2e017- 0 +0000- 0 84000- 0 :2000- 0 4976 +4000- 0 +6000- 0 ++000- 0 +.000- 0 4980 2e01e- 0 9e000- 0 t0t 1 1 0 4984 £0000- 0 £8000- 0 .8000- 0 .0008- 0 4988 .0000- 0 £0008- 0 40000- 0 48000- 0 4992 58000- 0 40008- 0 50000- 0 60000- 0 4996 .0004- 0 £8004- 0 68000- 0 407+ 0 5000 400 0 6808t 0 500 0 409+ 0 5004 200 0 300 0 t6000- 0 0 0 SECTION 546 5008 86000- 0 82000- 0 28006 0 38006 0 5012 e8002- 0 1t002 0 22005- 0 6004 0 5016 20001 0 88001- 0 e4002- 0 88007- 0 5020 t5££e- 0 t1££t- 0 20006 0 86006- 0 5024 74002- 0 0 0 0 0 8+006- 0 5028 1t00t 0 30002 0 1t014 0 4002 0 5032 88005- 0 :6000- 0 8000- 0 +t000- 0 5036 1.001 0 0 0 SECTION 547 SECTION 548 5038 0 5206 3 5 3 0 0 0 5 0 5040 0 5208 3 1365 2 0 5 5 5 0 0 5210 3 69 3 0 0 4 5 0 5044 0 5212 3 53 3 0 0 3 5 0 0 5214 3 17669 6 4 5 0 5 0 5048 0 5216 3 6162 2 1 8 1 2 0 0 5218 3 9987 2 2 7 0 3 0 5052 0 5220 3 36954 6 9 0 5 10 0 0 4880 3 5 3 0 0 0 5 1 SECTION 549 5056 0 5206 3 5 3 0 0 0 5 0 0 5208 3 85 0 0 0 5 5 0 5060 0 5222 3 16405 0 4 0 1 5 0 0 5223 3 16405 0 4 0 1 5 0 5064 0 5224 3 16405 0 4 0 1 5 0 0 5225 3 16405 0 4 0 1 5 0 5068 0 5209 3 4882 0 1 3 1 2 0 0 5210 3 8707 0 2 2 0 3 0 5072 0 5211 3 4898 0 1 3 2 2 0 0 5216 3 8723 0 2 2 1 3 0 5076 0 5217 3 4898 0 1 3 2 2 0 0 5218 3 8723 0 2 2 1 3 0 5080 0 5219 3 1057 0 0 4 2 1 0 0 5220 3 4882 0 1 3 1 2 0 5084 0 5221 3 4882 0 1 3 1 2 1 SECTION 550 5086 0 5233 3 16405 12 4 0 1 5 0 5088 0 5232 3 12548 0 3 1 0 4 1 SECTION 551 5090 0 5254 3 515 3 0 2 0 3 0 5092 0 5234 3 21 0 0 0 1 5 0 0 4808 3 1 3 0 0 0 1 1 5096 0 5206 3 3 3 0 0 0 3 0 0 5234 3 21 0 0 0 1 5 0 5100 0 4808 3 1 3 0 0 0 1 1 SECTION 552 SECTION 1021 5102 0 0 0 0 5104 0 0 0 0 0 0 0 0 5108 0 0 0 0 0 0 0 0 5112 0 0 0 0 0 0 0 0 5116 0 0 20032 0 0 0 2000. 0 5120 0 0 t 0 8000 0 5142 0 5124 0 0 11 0 0 0 20078 0 5128 0 0 20064 0 0 0 20022 0 5132 0 0 8 0 50000 0 56596 0 5136 0 0 12 0 96573 0 67695 0 5140 83041 0 4 0 0 0 12+ 0 5144 8000 0 5146 0 0 0 2+ 0 5148 0 0 30 0 0 0 6 0 5152 66955 0 72736 0 0 0 4 0 5156 0 0 20244 0 . 0 . 0 5160 0 0 20030 0 55972 0 56596 0 5164 0 0 21 0 0 0 20118 0 5168 0 0 20008 0 25 0 80000 0 5172 0 0 28 0 0 0 20006 0 5176 0 0 14 0 0 0 20 0 5180 0 0 2002+ 0 17171 0 71717 0 5184 0 0 90 0 15355 0 73695 0 5188 0 0 7 0 SECTION 1022 5190 2 0 0 0 5192 1 0 8000 0 10 0 32 0 5196 14 0 +4000- 0 38084 0 20084 0 5200 2- 0 10080 0 66666 0 1- 0 5204 2000- 0 48300 0 SECTION 1023 PROCEDURE 1005 CHAPT 6 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 11 12 0 0 0 0 12 0 0 0 0 13 0 0 0 0 14 0 0 0 0 15 16 0 0 0 0 16 0 0 0 0 17 0 0 0 0 18 0 0 0 0 19 20 0 0 0 0 20 0 0 0 0 21 0 0 0 0 22 0 0 0 0 23 24 0 0 0 0 24 0 0 0 0 25 0 0 0 0 0 25 1 1 4096 0 28 24 0 3 0 4 23 0 2 0 1792 0 0 0 0 0 0 0 0 0 0 32 26 0 1 26 4 PROCEDURE 553 33 0 1 0 4194 4 0 0 3 0 4 1 1 3 6 0 36 0 0 2 4266 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 1024 40 0 1 1 4194 4 24 1 2 21 4 24 0 2 0 0 18 1 1 4123 0 44 1 1 3 100 0 18 1 1 5 0 28 1 1 5038 4 24 0 2 6008 4 48 18 1 1 4123 0 1 1 3 36 0 18 1 1 5 0 28 0 0 5138 4 52 6 0 0 6270 4 27 0 0 64 4 0 1 0 4194 4 0 0 3 0 4 56 0 1 2 4208 4 6 1 0 4210 4 4 0 0 11 4 25 1 1 4096 0 60 24 0 3 0 4 23 0 2 0 256 0 1 1 4194 4 24 1 0 73 4 64 0 1 0 4194 4 0 0 3 0 4 0 1 2 4212 4 6 1 0 4214 4 68 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 72 0 0 3 4198 4 6 1 0 4216 4 28 0 0 4998 4 6 1 0 4218 4 76 24 1 2 15 4 28 0 0 0 0 1 1 3 0 0 2 0 0 5406 4 80 24 0 2 5357 4 18 1 1 4123 0 1 1 3 14 0 18 1 1 5 0 84 28 0 0 5003 4 6 1 0 4220 4 28 0 0 5357 4 26 1 3 4222 4 88 6 0 0 5970 4 18 0 1 5 0 1 1 1 1 0 3 1 0 4194 4 92 26 1 1 4194 4 1 1 3 0 0 1 0 1 1 0 15 0 1 5979 4 96 2 0 0 5000 4 24 0 3 0 4 6 0 0 2 22 2 0 0 4999 4 100 1 1 3 16 0 18 1 1 4118 0 15 0 1 5979 4 18 1 1 4126 0 104 27 1 1 107 4 24 0 1 5000 4 6 0 0 5002 4 4 0 3 5372 4 108 2 0 0 5001 4 2 0 0 5002 4 PROCEDURE 554 110 26 0 0 206 4 6 0 0 5001 4 112 4 0 0 5002 4 24 0 1 5000 4 5 0 0 5356 4 27 0 3 118 4 116 24 0 1 5000 4 7 0 0 5356 4 25 0 3 1 0 24 1 0 120 4 120 25 0 1 1 0 24 1 0 93 4 26 1 1 5998 4 26 1 2 4222 4 124 1 1 3 16 0 18 1 1 4118 0 15 0 1 5980 4 27 0 0 132 4 128 6 0 1 5357 4 2 0 2 5372 4 6 0 1 5003 4 7 0 1 5357 4 132 25 0 2 1 0 24 1 0 134 4 25 0 1 1 0 24 1 0 124 4 136 6 0 0 5334 4 2 0 0 5001 4 2 0 0 4999 4 6 0 0 5999 4 140 2 0 0 5000 4 2 0 0 5002 4 26 0 0 206 4 6 0 0 5001 4 144 4 0 0 5002 4 2 0 1 5356 4 1 1 3 214 0 5 0 1 5356 4 148 27 0 3 150 4 7 0 1 5356 4 1 1 3 220 0 5 0 0 5357 4 152 27 0 3 154 4 7 0 0 5357 4 6 1 0 4216 4 28 0 0 4998 4 156 6 0 0 5999 4 1 1 2 7 0 27 0 3 160 4 1 1 3 0 0 160 1 1 1 7 0 2 0 0 5999 4 26 0 0 964 4 26 0 0 964 4 164 26 0 0 964 4 24 1 2 21 4 6 1 0 5 0 2 0 0 5000 4 168 24 1 2 21 4 6 1 0 7 0 2 0 0 5001 4 6 1 0 4220 4 172 28 0 0 4966 4 0 1 0 4194 4 0 0 3 0 4 0 1 2 4224 4 176 6 1 0 4226 4 4 0 0 10 4 25 1 1 4096 0 24 0 3 0 4 180 23 0 2 0 256 0 1 1 4194 4 0 1 0 4194 4 0 0 3 0 4 184 0 0 2 4267 4 6 1 0 4228 4 4 0 0 10 4 25 1 1 4096 0 188 24 0 3 0 4 23 0 2 0 256 0 1 1 4194 4 6 1 0 1264 4 192 24 1 2 19 4 2 1 0 4 0 6 1 0 1300 4 24 1 2 19 4 196 2 1 0 6 0 6 1 0 1265 4 24 1 2 19 4 2 1 0 9 0 200 1 1 3 3 0 24 1 2 19 4 2 1 0 10 0 26 0 0 1060 4 204 26 0 0 271 4 24 1 0 297 4 PROCEDURE 555 206 0 0 0 0 0 26 1 2 4230 4 208 6 0 2 5038 4 27 0 0 222 4 18 0 1 9 0 18 0 1 4119 0 212 5 0 0 4999 4 27 0 1 222 4 6 0 0 5001 4 7 0 2 5406 4 216 1 1 3 0 0 24 0 0 24 4 0 0 2 5038 4 15 0 0 1366 4 220 18 0 1 4127 0 7 0 0 5002 4 25 0 2 1 0 24 1 0 208 4 224 26 1 2 6008 4 6 0 0 6009 4 27 0 0 270 4 1 1 3 0 0 228 1 0 1 8 0 15 0 2 6012 4 18 0 1 4125 0 5 0 0 4999 4 232 27 0 1 268 4 0 0 2 1361 4 15 0 2 6013 4 1 1 2 3 0 236 27 0 0 242 4 1 1 2 1 0 27 0 0 242 4 1 1 2 15 0 240 27 0 1 259 4 24 1 0 268 4 6 0 2 6012 4 18 0 1 4124 0 244 4 0 0 6009 4 2 0 0 7356 4 1 0 1 7 0 15 0 2 6012 4 248 18 0 1 1 0 4 0 0 5000 4 24 0 1 7356 4 2 0 0 6013 4 252 15 0 2 6012 4 4 0 0 5001 4 4 0 0 5002 4 2 0 0 271 4 256 5 0 0 271 4 24 0 1 7356 4 2 0 0 6012 4 6 0 0 5000 4 260 18 0 1 4 0 4 0 0 5001 4 4 0 0 5002 4 2 0 2 6013 4 264 1 0 1 7 0 15 0 2 6012 4 18 0 3 1 0 7 0 0 5002 4 268 25 0 2 2 0 24 1 0 227 4 26 0 1 206 4 PROCEDURE 556 271 0 0 0 0 0 272 6 0 0 5000 4 24 1 2 19 4 3 1 0 5 0 24 1 2 19 4 276 2 1 0 13 0 6 0 0 5001 4 24 1 2 19 4 3 1 0 7 0 280 24 1 2 19 4 2 1 0 15 0 1 1 3 2 0 24 1 2 19 4 284 2 1 0 11 0 1 1 3 3 0 24 1 2 19 4 3 1 0 19 0 288 1 1 3 2 0 4 0 0 6278 4 24 1 2 19 4 2 1 0 17 0 292 6 1 0 1265 4 24 1 2 19 4 2 1 0 21 0 26 0 0 1060 4 296 26 0 1 271 4 PROCEDURE 557 297 6 1 0 4218 4 24 1 2 15 4 28 1 1 0 0 300 26 1 1 4232 4 26 0 0 999 4 25 0 1 1 0 24 1 0 301 4 304 6 0 0 6011 4 5 0 0 6010 4 18 0 3 3 0 18 0 1 4127 0 308 2 0 0 999 4 6 0 0 6010 4 18 0 3 3 0 18 0 1 4127 0 312 2 0 0 1060 4 1 1 3 128 0 2 0 0 1365 4 24 0 2 1470 4 316 24 1 2 15 4 28 1 2 0 0 6 0 0 6278 4 27 0 0 326 4 320 24 0 2 1308 4 18 1 1 4123 0 1 1 3 6 0 18 1 1 5 0 324 24 1 2 15 4 28 1 1 40 0 26 0 0 999 4 26 0 0 999 4 328 6 1 0 1265 4 24 1 2 19 4 2 1 0 5 0 1 1 3 85 0 332 24 1 2 19 4 2 1 0 7 0 6 0 0 5000 4 24 1 2 19 4 336 2 1 0 9 0 6 0 0 5001 4 24 1 2 19 4 2 1 0 11 0 340 6 1 0 1274 4 24 1 2 19 4 2 1 0 12 0 26 0 0 1060 4 344 24 0 2 3780 4 3 1 0 4194 4 26 1 3 4194 4 24 0 2 1698 4 348 3 1 0 4194 4 26 1 2 4194 4 24 0 2 4156 4 3 1 0 4194 4 352 26 1 1 4194 4 6 1 0 4234 4 2 1 0 7360 4 6 1 0 4236 4 356 2 1 0 7354 4 6 0 0 3780 4 18 0 3 2 0 2 0 0 1689 4 360 6 0 0 4156 4 18 0 3 2 0 2 0 0 1695 4 26 0 0 1568 4 364 26 0 0 1568 4 24 0 3 0 4 6 1 0 2 22 2 1 0 1470 4 368 24 0 3 0 4 6 1 0 4 22 2 1 0 1472 4 26 0 0 964 4 372 24 1 2 21 4 24 0 2 4 0 18 1 1 4123 0 1 1 3 10 0 376 18 1 1 5 0 28 1 1 4946 4 6 0 0 6011 4 5 0 0 6010 4 380 18 0 3 3 0 18 0 1 4127 0 2 1 0 4959 4 6 0 0 6010 4 384 18 0 3 3 0 18 0 1 4127 0 2 1 0 4957 4 1 1 3 0 0 388 3 1 0 4961 4 7 1 0 4957 4 PROCEDURE 558 390 24 0 2 4946 4 18 1 1 4123 0 392 1 1 3 16 0 18 1 1 5 0 24 1 2 19 4 28 1 1 4 0 396 2 0 0 5998 4 6 0 0 5976 4 24 1 2 19 4 2 1 0 21 0 400 6 0 0 5978 4 24 1 2 19 4 2 1 0 23 0 26 1 2 5998 4 404 26 1 1 4238 4 6 0 2 5357 4 27 0 1 409 4 6 1 0 1296 4 408 3 0 2 5357 4 24 1 2 19 4 2 1 1 25 0 1 1 3 32 0 412 18 1 1 4118 0 15 0 2 5980 4 27 0 0 420 4 1 1 3 0 0 416 24 1 2 19 4 5 1 1 25 0 24 1 2 19 4 2 1 1 25 0 420 25 0 1 2 0 24 1 0 422 4 25 0 2 1 0 24 1 0 405 4 424 6 0 0 5000 4 24 1 2 19 4 2 1 0 39 0 6 0 0 5001 4 428 24 1 2 19 4 2 1 0 41 0 6 1 0 4240 4 24 1 2 19 4 432 2 1 0 42 0 6 1 0 5138 4 27 0 0 493 4 26 1 1 5138 4 436 26 1 2 4242 4 1 1 3 0 0 0 0 2 1361 4 15 0 1 5143 4 440 1 1 2 19 0 27 0 1 491 4 6 0 1 5142 4 18 1 1 4124 0 444 4 0 0 5139 4 2 0 0 1060 4 1 0 1 8 0 24 0 1 1060 4 448 15 0 0 5142 4 27 0 0 457 4 18 0 1 4125 0 5 0 0 5999 4 452 27 0 0 456 4 27 0 3 456 4 1 1 3 0 0 24 1 0 457 4 456 4 0 0 5999 4 2 0 0 999 4 15 0 1 5142 4 18 0 1 4125 0 460 27 0 0 467 4 5 0 0 5999 4 27 0 0 466 4 27 0 3 466 4 464 1 1 3 0 0 24 1 0 467 4 4 0 0 5999 4 2 0 0 1568 4 468 1 0 1 7 0 15 0 1 5142 4 18 1 1 4125 0 6 0 0 1568 4 472 18 0 3 3 0 4 0 0 999 4 18 1 3 13 0 24 1 2 19 4 476 2 1 2 45 0 1 0 1 7 0 24 0 1 1060 4 15 0 0 5142 4 480 1 1 1 2 0 18 1 1 4125 0 6 0 0 1568 4 18 0 3 3 0 484 4 0 0 999 4 18 1 3 13 0 24 1 2 19 4 2 1 2 47 0 488 25 0 2 4 0 24 1 0 491 4 24 1 0 493 4 25 0 1 2 0 492 24 1 0 437 4 26 0 0 1060 4 PROCEDURE 559 494 26 1 1 1470 4 26 1 2 1472 4 496 26 0 0 1568 4 24 0 3 0 4 6 1 0 2 22 2 1 0 1470 4 500 24 0 3 0 4 6 1 0 4 22 2 1 0 1472 4 26 1 2 4244 4 504 6 1 2 4947 4 27 0 0 508 4 6 1 0 1208 4 24 1 0 509 4 508 6 1 0 1210 4 2 1 2 4966 4 25 0 2 2 0 24 1 0 504 4 512 6 0 0 5976 4 26 0 0 1077 4 2 0 0 5976 4 0 0 3 4268 4 516 24 0 2 1444 4 24 1 2 15 4 28 1 2 2 0 26 0 0 999 4 520 26 0 0 999 4 6 1 0 4955 4 2 1 0 4968 4 PROCEDURE 560 523 6 1 0 4957 4 524 2 0 0 5006 4 6 1 0 4955 4 2 0 0 5007 4 6 1 0 4220 4 528 28 0 0 4966 4 26 1 2 5998 4 1 1 3 32 0 18 1 1 4118 0 532 15 0 2 5980 4 27 0 0 537 4 1 1 3 0 0 5 0 2 5357 4 536 24 1 0 538 4 6 0 2 5357 4 26 0 0 1077 4 2 0 2 4966 4 540 0 0 3 4268 4 6 0 2 5357 4 5 0 0 4269 4 27 0 3 546 4 544 1 1 3 1 0 3 0 0 4976 4 25 0 2 1 0 24 1 0 530 4 548 6 0 2 4965 4 2 1 0 1316 4 6 0 0 1316 4 1 1 2 1286 0 552 27 0 2 557 4 1 1 3 1286 0 2 0 0 1316 4 6 1 0 1316 4 556 2 0 2 4965 4 6 0 0 4976 4 27 0 0 570 4 6 0 0 7342 4 560 1 1 1 1 0 2 0 0 7342 4 6 1 0 4246 4 26 1 2 4232 4 564 24 1 2 15 4 3 1 2 40 0 25 0 2 2 0 24 1 0 564 4 568 1 1 3 1 0 24 1 0 571 4 1 1 3 0 0 2 0 0 6271 4 572 24 0 2 1416 4 24 1 2 15 4 28 1 2 2 0 26 0 0 999 4 576 26 0 0 999 4 24 0 2 1394 4 24 1 2 15 4 28 1 2 2 0 580 26 0 0 999 4 6 1 0 4248 4 28 0 0 4966 4 PROCEDURE 561 583 6 1 0 6008 4 584 27 0 0 711 4 2 1 0 7356 4 26 1 1 4250 4 26 0 0 964 4 588 0 1 0 4194 4 0 0 3 0 4 24 1 2 21 4 24 0 2 0 0 592 24 0 3 0 4 4 0 0 2 22 2 0 0 4200 4 0 1 1 4194 4 596 24 0 3 4200 4 24 0 2 4 0 18 1 1 4123 0 1 1 3 12 0 600 18 1 1 5 0 28 1 1 4946 4 6 1 0 4949 4 3 0 0 1206 4 604 1 1 2 32 0 27 0 0 646 4 1 1 2 128 0 27 0 0 645 4 608 1 1 2 96 0 27 0 0 643 4 1 1 2 16 0 27 0 0 632 4 612 1 1 2 16 0 27 0 0 634 4 1 1 2 16 0 27 0 0 636 4 616 1 1 2 16 0 27 0 0 630 4 1 1 2 32 0 27 0 1 622 4 620 1 1 3 192 0 24 1 0 647 4 1 1 2 32 0 27 0 1 626 4 624 1 1 3 80 0 24 1 0 647 4 1 1 2 16 0 27 0 1 648 4 628 1 1 3 224 0 24 1 0 647 4 1 1 3 32 0 24 1 0 647 4 632 1 1 3 176 0 24 1 0 647 4 1 1 3 208 0 24 1 0 647 4 636 1 1 3 128 0 2 1 0 4957 4 2 1 0 4952 4 2 1 0 4954 4 640 1 1 2 1 0 2 1 0 4951 4 24 1 0 664 4 1 1 3 16 0 644 24 1 0 647 4 1 1 3 48 0 1 1 1 48 0 2 1 0 4949 4 648 6 1 0 4957 4 27 0 0 653 4 1 1 3 0 0 2 1 0 4957 4 652 24 1 0 655 4 1 1 3 128 0 2 1 0 4957 4 1 0 1 16 0 656 24 0 1 7356 4 15 0 0 6013 4 18 0 1 4124 0 18 0 3 1 0 660 2 1 0 4951 4 1 0 1 15 0 24 0 1 7356 4 15 0 0 6013 4 664 2 1 0 4955 4 24 0 2 1668 4 0 1 0 4194 4 0 0 3 0 4 668 24 1 2 19 4 24 0 2 0 0 24 0 3 0 4 4 0 0 2 22 672 2 0 0 4200 4 0 1 1 4194 4 24 0 3 4200 4 28 1 2 4 0 676 26 1 2 4232 4 6 1 2 4949 4 26 0 0 1077 4 2 0 2 4966 4 680 25 0 2 2 0 24 1 0 677 4 6 0 0 1206 4 18 0 1 4127 0 684 26 0 0 1077 4 18 0 1 1 0 2 0 0 1206 4 0 0 3 4268 4 PROCEDURE 562 688 6 0 0 4974 4 27 0 0 692 4 6 1 0 1210 4 24 1 0 693 4 692 6 1 0 1208 4 2 1 0 4974 4 6 1 0 4951 4 18 0 3 3 0 696 18 0 1 4127 0 2 0 0 4968 4 24 0 2 1500 4 24 1 2 15 4 700 28 1 2 2 0 26 0 0 999 4 23 0 0 2 0 0 0 0 7356 3 704 24 1 0 706 4 24 1 0 710 4 25 0 1 12 0 24 1 0 588 4 708 26 0 0 1060 4 24 1 0 586 4 26 0 0 1060 4 24 0 2 1512 4 712 24 1 2 15 4 28 1 2 2 0 26 0 0 999 4 PROCEDURE 563 715 26 1 2 6010 4 716 25 0 2 0 0 24 1 0 719 4 24 1 0 800 4 26 1 1 4250 4 720 6 1 0 6008 4 2 1 0 7356 4 0 0 2 1361 4 1 1 3 0 0 724 24 0 1 7356 4 15 0 0 5143 4 1 1 2 19 0 27 0 1 741 4 728 24 0 1 7356 4 6 0 0 5142 4 18 0 1 4124 0 4 0 0 5139 4 732 24 0 3 0 4 5 0 0 4 22 27 0 1 741 4 1 1 2 1 0 736 2 1 0 4969 4 2 1 0 4971 4 2 0 0 1568 4 2 0 0 4966 4 740 24 1 0 762 4 23 0 0 2 0 0 0 0 7356 3 24 1 0 723 4 744 6 0 2 6012 4 27 0 2 748 4 6 1 2 6012 4 24 1 0 754 4 748 18 0 1 8 0 18 0 1 4120 0 3 0 0 4966 4 2 0 0 1206 4 752 24 0 1 4966 4 6 0 0 5406 4 2 0 0 4966 4 6 0 2 6013 4 756 18 1 1 4127 0 2 1 0 4971 4 18 1 1 1 0 3 0 0 1568 4 760 18 0 3 1 0 2 1 0 4969 4 PROCEDURE 564 762 24 0 2 1438 4 0 1 0 4194 4 764 0 0 3 0 4 24 1 2 19 4 24 0 2 0 0 24 0 3 0 4 768 4 0 0 2 22 2 0 0 4200 4 0 1 1 4194 4 24 0 3 4200 4 772 28 1 2 4 0 6 0 0 4966 4 26 0 0 1077 4 2 0 0 4966 4 776 6 1 0 4971 4 26 0 0 1077 4 2 0 0 4970 4 6 0 0 1206 4 780 26 0 0 1077 4 2 0 0 1206 4 0 0 3 4268 4 24 0 2 1524 4 784 24 1 2 15 4 28 1 2 2 0 6 0 2 6012 4 27 0 2 791 4 788 6 0 0 4270 4 24 1 2 15 4 2 1 0 4 0 26 0 0 999 4 792 25 0 2 2 0 24 1 0 796 4 26 0 0 1060 4 24 1 0 800 4 796 25 0 1 6 0 24 1 0 720 4 26 0 0 1060 4 24 1 0 719 4 PROCEDURE 565 800 26 1 1 1470 4 26 1 2 1472 4 26 0 0 1568 4 26 0 0 1568 4 804 26 0 0 1568 4 24 1 0 806 4 PROCEDURE 566 806 6 1 0 1266 4 24 1 2 15 4 808 2 1 0 2 0 6 1 0 1268 4 24 1 2 15 4 2 1 0 4 0 812 6 1 0 1288 4 24 1 2 15 4 2 1 0 6 0 26 1 1 4230 4 816 26 0 0 999 4 26 1 2 4250 4 6 0 1 5406 4 27 0 0 842 4 820 26 0 0 1077 4 2 0 0 1207 4 24 0 3 0 4 6 0 0 2 22 824 26 0 0 1077 4 2 0 0 1206 4 24 0 2 1540 4 0 1 0 4194 4 828 0 0 3 0 4 24 1 2 15 4 24 0 2 0 0 24 0 3 0 4 832 4 0 0 4 22 2 0 0 4200 4 0 1 1 4194 4 24 0 3 4200 4 836 28 1 2 2 0 0 0 3 4268 4 25 0 2 4 0 24 1 0 842 4 840 26 0 0 999 4 26 1 2 4250 4 25 0 1 1 0 24 1 0 818 4 844 26 0 0 999 4 24 1 0 884 4 PROCEDURE 567 846 24 0 2 1546 4 24 1 2 15 4 848 28 1 2 2 0 26 0 0 999 4 26 1 1 4250 4 26 1 2 4214 4 852 24 0 0 24 4 0 0 2 5388 4 27 1 0 857 4 26 0 0 910 4 856 26 0 0 920 4 25 0 2 1 0 24 1 0 852 4 26 0 0 999 4 860 6 1 0 4252 4 2 1 0 7366 4 6 1 0 4254 4 2 1 0 7360 4 864 3 1 0 4194 4 26 1 1 4194 4 24 1 0 33 4 PROCEDURE 568 867 24 0 2 1550 4 868 24 1 2 15 4 28 1 2 2 0 26 0 0 999 4 0 0 2 6045 4 872 27 1 0 846 4 26 1 1 4250 4 26 1 2 4232 4 24 0 0 24 4 876 0 0 2 6046 4 27 1 0 880 4 26 0 0 910 4 26 0 0 920 4 880 25 0 2 1 0 24 1 0 875 4 26 0 0 999 4 24 1 0 846 4 PROCEDURE 569 884 24 0 2 1554 4 24 1 2 15 4 28 1 2 2 0 26 0 0 999 4 888 26 1 1 4250 4 26 1 2 6056 4 25 0 2 0 0 24 1 0 893 4 892 24 1 0 867 4 1 1 3 0 0 0 0 2 1304 4 15 0 2 6058 4 896 27 0 0 906 4 2 0 0 1208 4 6 0 2 6058 4 18 1 1 4124 0 900 2 0 0 1206 4 18 1 3 6 0 24 0 1 1206 4 4 0 0 5371 4 904 2 0 0 1207 4 26 0 0 920 4 25 0 2 1 0 24 1 0 894 4 908 26 0 0 999 4 24 1 0 867 4 PROCEDURE 570 910 0 0 0 0 0 18 1 1 6 0 912 2 0 0 1206 4 18 1 1 2 0 24 0 1 1206 4 4 0 0 5371 4 916 2 0 0 1207 4 18 1 1 2 0 2 0 0 1208 4 26 0 1 910 4 PROCEDURE 571 920 0 0 0 0 0 6 0 0 1206 4 26 0 0 1077 4 2 0 0 1206 4 924 6 0 0 1207 4 26 0 0 1077 4 2 0 0 1207 4 6 0 0 1208 4 928 26 0 0 1077 4 2 0 0 1208 4 0 0 3 4268 4 24 0 2 1558 4 932 0 1 0 4194 4 0 0 3 0 4 24 1 2 15 4 24 0 2 0 0 936 24 0 3 0 4 4 0 0 2 22 2 0 0 4200 4 0 1 1 4194 4 940 24 0 3 4200 4 28 1 2 2 0 25 0 1 6 0 24 1 0 946 4 944 26 0 0 999 4 26 1 1 4250 4 26 0 1 920 4 PROCEDURE 572 947 0 0 0 0 0 948 0 1 0 4194 4 0 0 3 0 4 0 0 2 18 4 6 1 0 4256 4 952 4 0 0 10 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 956 0 1 1 4194 4 26 0 1 947 4 PROCEDURE 573 958 0 0 0 0 0 25 0 2 8 0 960 24 1 0 963 4 26 0 0 964 4 26 1 2 4258 4 26 0 1 958 4 PROCEDURE 574 964 0 0 0 0 0 0 1 0 4194 4 0 0 3 0 4 0 0 2 20 4 968 6 1 0 4256 4 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 972 23 0 2 0 256 0 1 1 4194 4 26 0 1 964 4 PROCEDURE 575 975 0 0 0 0 0 976 24 1 2 19 4 24 0 2 4 0 18 1 1 4123 0 1 1 3 50 0 980 18 1 1 5 0 24 1 2 21 4 28 1 1 4 0 6 1 0 1260 4 984 24 1 2 21 4 2 1 0 52 0 0 1 0 4194 4 0 0 3 0 4 988 0 0 2 20 4 6 1 0 4242 4 4 0 0 11 4 25 1 1 4096 0 992 24 0 3 0 4 23 0 2 0 256 0 1 1 4194 4 6 1 0 4260 4 996 24 1 2 21 4 28 0 0 0 0 26 0 1 975 4 PROCEDURE 576 999 0 0 0 0 0 1000 0 0 3 4268 4 6 1 0 1260 4 24 1 2 15 4 2 1 0 52 0 1004 6 0 0 1365 4 24 1 2 15 4 2 1 0 0 0 1 1 3 1 0 1008 2 0 0 1365 4 6 0 0 6275 4 27 0 0 1027 4 24 1 2 15 4 1012 24 0 2 0 0 18 1 1 4123 0 1 1 3 50 0 18 1 1 5 0 1016 0 1 0 4194 4 0 0 3 0 4 24 1 2 13 4 24 0 2 0 0 1020 4 0 0 7358 4 2 0 0 4200 4 0 1 1 4194 4 24 0 3 4200 4 1024 28 1 1 4 0 26 0 0 1089 4 24 1 0 1055 4 6 0 0 6274 4 1028 1 1 2 9 0 27 0 0 1046 4 6 0 0 4271 4 24 1 2 15 4 1032 2 0 0 1 0 24 1 2 15 4 24 0 2 0 0 24 1 2 13 4 1036 29 0 1 0 0 1 1 3 4 0 18 0 1 5 0 4 0 0 7 4 1040 0 0 2 12 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 160 0 1044 0 0 3 4268 4 24 1 0 1055 4 24 1 2 15 4 24 0 2 0 0 1048 18 1 1 4123 0 1 1 3 54 0 18 1 1 5 0 24 1 2 13 4 1052 28 1 1 0 0 1 1 3 9 0 24 1 0 1038 4 6 1 0 4218 4 1056 24 1 2 15 4 28 0 0 0 0 2 0 0 4999 4 26 0 1 999 4 PROCEDURE 577 1060 0 0 0 0 0 6 1 0 1260 4 24 1 2 19 4 2 1 0 52 0 1064 0 1 0 4194 4 0 0 3 0 4 0 0 2 18 4 6 1 0 4242 4 1068 4 0 0 10 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 1072 0 1 1 4194 4 6 1 0 4260 4 24 1 2 19 4 28 0 0 0 0 1076 26 0 1 1060 4 PROCEDURE 578 1077 0 0 0 0 0 2 1 0 1316 4 0 0 3 4272 4 1080 24 0 2 1338 4 12 1 0 1316 4 26 0 1 1077 4 PROCEDURE 579 1083 0 0 0 0 0 1084 2 1 0 1316 4 0 0 3 4268 4 24 0 2 1318 4 12 1 0 1316 4 1088 26 0 1 1083 4 PROCEDURE 580 1089 0 0 0 0 0 23 0 0 50 0 0 0 0 7358 3 1092 24 1 0 1099 4 6 1 0 1260 4 24 1 2 13 4 2 1 0 306 0 1096 26 0 0 1100 4 6 1 0 4262 4 2 1 0 7358 4 26 0 1 1089 4 PROCEDURE 581 1100 0 0 0 0 0 6 1 0 4242 4 0 0 2 12 4 25 1 1 4096 0 1104 4 0 0 7 4 24 0 3 0 4 23 0 2 160 0 26 0 1 1100 4 SECTION 582 1108 0 0 0 0 0 0 0 0 1112 0 0 0 0 0 0 0 0 1116 0 0 0 0 0 0 0 0 1120 0 0 0 0 0 0 0 0 1124 0 0 0 0 0 0 0 0 1128 0 0 0 0 0 0 0 0 1132 0 0 0 0 0 0 0 0 1136 0 0 0 0 0 0 0 0 1140 0 0 0 0 0 0 0 0 1144 0 0 0 0 0 0 0 0 1148 0 0 0 0 0 0 0 0 1152 0 0 0 0 0 0 0 0 1156 0 0 0 0 0 0 0 0 1160 0 0 0 0 0 0 0 0 1164 0 0 0 0 0 0 0 0 1168 0 0 0 0 0 0 0 0 1172 0 0 0 0 0 0 0 0 1176 0 0 0 0 0 0 0 0 1180 0 0 0 0 0 0 0 0 1184 0 0 0 0 0 0 0 0 1188 0 0 0 0 0 0 0 0 1192 0 0 0 0 0 0 0 0 1196 0 0 0 0 0 0 0 0 1200 0 0 0 0 0 0 0 0 1204 0 0 0 0 SECTION 583 1206 7734. 0 564.6 0 1208 85572 0 7 0 6566 0 0 0 1212 6544. 0 646 0 7674. 0 5 0 1216 96669 0 67695 0 97378 0 5 0 1220 97273 0 56596 0 3654. 0 63665 0 1224 16773 0 53585 0 7554£ 0 73786 0 1228 35572 0 56596 0 1654. 0 73695 0 1232 55172 0 51695 0 34.69 0 51637 0 1236 35572 0 66747 0 65769 0 67696 0 1240 46455 0 516 0 95951 0 72556 0 1244 9544. 0 5 0 3554. 0 697 0 1248 86755 0 737 0 .6656 0 72734 0 1252 65362 0 52636 0 97955 0 725 0 1256 25973 0 7 0 56554 0 67695 0 1260 7. 0 7.000 0 35871 0 5t005 0 1264 £6£6£ 0 6£6£6 0 25553 0 7 0 1268 6654. 0 73596 0 96653 0 676 0 1272 46955 0 55547 0 27243 0 67517 0 1276 +7200 0 64695 0 23000 0 44104 0 1280 5644+ 0 59735 0 36972 0 537 0 1284 97353 0 72765 0 20000 0 58557 0 1288 16973 0 72735 0 35572 0 65667 0 1292 66663 0 72676 0 36978 0 55657 0 1296 186t0 0 0 0 SECTION 584 1298 5.5. 0 0 0 1300 45577 0 59655 0 15965 0 53585 0 1304 3££ 0 7£££0 0 3030 0 30483 0 1308 20059 0 67737 0 37454 0 65536 0 1312 0 0 55540 0 SECTION 585 1314 1 0 0 0 1316 0 0 0 0 SECTION 586 1318 1 0 0 0 1320 t 0 0 0 64 0 0 0 1324 3.8 0 0 0 2710 0 0 0 1328 186t0 0 0 0 £4240 0 0 0 1332 89680 0 9 0 5.100 0 5£ 0 1336 t+t00 0 3e9 0 1 0 0 0 1340 16 0 0 0 256 0 0 0 1344 4096 0 0 0 65536 0 0 0 1348 48576 0 10 0 77216 0 167 0 1352 35456 0 2684 0 67296 0 42949 0 1356 £££££ 0 £££££ 0 SECTION 587 1358 7 0 80000 0 1360 0 0 3£ 0 £0000 0 7£ 0 1364 80 0 0 0 3£££0 0 0 0 SECTION 588 SECTION 589 1368 0 1224 3 20 3 0 0 1 4 0 0 1242 3 1 3 0 0 0 1 0 1372 0 4954 3 1057 3 0 4 2 1 0 0 1228 3 53 3 0 0 3 5 0 1376 0 4956 3 4898 0 1 3 2 2 0 0 1230 3 117 3 0 0 7 5 0 1380 0 1232 3 37 3 0 0 2 5 0 0 4958 3 4898 0 1 3 2 2 0 1384 0 1260 3 101 3 0 0 6 5 1 0 4970 3 5 0 0 0 0 5 0 1388 0 4969 3 5 0 0 0 0 5 0 0 4966 3 5 0 0 0 0 5 0 1392 0 4968 3 5 0 0 0 0 5 1 SECTION 590 1394 0 1228 3 20 3 0 0 1 4 0 1396 0 1244 3 547 3 0 2 2 3 0 0 1246 3 356 3 0 1 6 4 0 1400 0 1248 3 292 3 0 1 2 4 0 0 1288 3 101 3 0 0 6 5 0 1404 0 1222 3 37 3 0 0 2 5 0 0 1234 3 101 3 0 0 6 5 0 1408 0 1236 3 5 3 0 0 0 5 0 0 1252 3 69 3 0 0 4 5 0 1412 0 1254 3 21 3 0 0 1 5 0 0 1224 3 165 3 0 0 10 5 1 SECTION 591 1416 0 1254 3 53 3 0 0 3 5 0 0 1250 3 802 3 0 3 2 2 0 1420 0 1224 3 36 3 0 0 2 4 0 0 1242 3 1 3 0 0 0 1 0 1424 0 4966 3 16421 4 4 0 2 5 0 0 4967 3 16421 4 4 0 2 5 0 1428 0 4968 3 16421 4 4 0 2 5 0 0 4969 3 16421 4 4 0 2 5 0 1432 0 4970 3 16421 4 4 0 2 5 0 0 4971 3 16421 4 4 0 2 5 0 1436 0 4972 3 16421 4 4 0 2 5 1 0 4966 3 5 0 0 0 0 5 0 1440 0 4968 3 5 3 0 0 0 5 0 0 4970 3 5 3 0 0 0 5 1 SECTION 592 1444 0 1206 3 69 3 0 0 4 5 0 0 4966 3 547 3 0 2 2 3 0 1448 0 1212 3 372 3 0 1 7 4 0 0 1214 3 547 3 0 2 2 3 0 1452 0 4968 3 547 3 0 2 2 3 0 0 1216 3 117 3 0 0 7 5 0 1456 0 1218 3 515 3 0 2 0 3 0 0 4950 3 1057 3 0 4 2 1 0 1460 0 1294 3 117 3 0 0 7 5 0 0 1262 3 4 3 0 0 0 4 0 1464 0 5978 3 1025 0 0 4 0 1 0 0 1262 3 1025 3 0 4 0 1 0 1468 0 5976 3 12548 0 3 1 0 4 1 SECTION 593 1470 0 1364 3 16389 0 4 0 0 5 0 1472 0 1238 3 21 3 0 0 1 5 0 0 1240 3 260 3 0 1 0 4 0 1476 0 5000 3 53 0 0 0 3 5 0 0 1242 3 53 3 0 0 3 5 0 1480 0 1222 3 1 3 0 0 0 1 0 0 5001 3 16437 0 4 0 3 5 0 1484 0 1224 3 244 3 0 0 15 4 0 0 1242 3 1 3 0 0 0 1 0 1488 0 5999 3 1057 0 0 4 2 1 0 0 1228 3 53 3 0 0 3 5 0 1492 0 1060 3 1057 0 0 4 2 1 0 0 1230 3 101 3 0 0 6 5 0 1496 0 1232 3 37 3 0 0 2 5 0 0 999 3 1057 0 0 4 2 1 1 SECTION 594 1500 0 4946 3 101 3 0 0 6 5 0 0 1206 3 12484 0 3 0 12 4 0 1504 0 4972 3 12756 0 3 1 13 4 0 0 4974 3 691 3 0 2 11 3 0 1508 0 4970 3 12740 0 3 1 12 4 0 0 4968 3 12740 0 3 1 12 4 1 1512 0 1230 3 21 3 0 0 1 5 0 0 1232 3 37 3 0 0 2 5 0 1516 0 1288 3 37 3 0 0 2 5 0 0 1222 3 37 3 0 0 2 5 0 1520 0 1224 3 117 3 0 0 7 5 0 0 1254 3 101 3 0 0 6 5 1 1524 0 1206 3 20565 0 5 0 5 5 0 0 4966 3 12724 0 3 1 11 4 0 1528 0 1568 3 1233 0 0 4 13 1 0 0 4970 3 12660 0 3 1 7 4 1 1532 0 4946 3 5 3 0 0 0 5 0 0 4948 3 5 3 0 0 0 5 0 1536 0 4950 3 5 3 0 0 0 5 0 0 4952 3 5 3 0 0 0 5 1 SECTION 595 1540 0 1206 3 4914 0 1 3 3 2 0 0 1262 3 1 3 0 0 0 1 0 1544 0 1207 3 12548 0 3 1 0 4 1 0 1276 3 5 3 0 0 0 5 0 1548 0 1278 3 5 3 0 0 0 5 1 0 1280 3 5 3 0 0 0 5 0 1552 0 1282 3 5 3 0 0 0 5 1 0 1284 3 5 3 0 0 0 5 0 1556 0 1286 3 5 3 0 0 0 5 1 0 1208 3 16389 0 4 0 0 5 0 1560 0 1262 3 4 3 0 0 0 4 0 0 1206 3 1025 0 0 4 0 1 0 1564 0 1262 3 1025 3 0 4 0 1 0 0 1207 3 12548 0 3 1 0 4 1 PROCEDURE 596 1568 0 0 0 0 0 24 0 3 0 4 6 0 0 4 22 2 0 0 1680 4 1572 24 0 1 1680 4 1 1 3 0 0 2 0 0 1684 4 24 1 2 19 4 1576 24 0 2 0 0 3 0 0 1060 4 1 1 1 48 0 18 0 1 5 0 1580 4 0 0 1060 4 2 1 0 7356 4 24 0 3 1682 4 6 0 2 0 0 1584 2 0 0 1685 4 0 1 2 1688 4 18 1 3 3 0 0 1 0 1686 4 1588 23 0 0 1 0 0 0 0 7360 3 24 1 0 1599 4 6 1 0 4234 4 1592 2 1 0 7360 4 24 0 3 1682 4 6 0 3 1 0 18 1 3 2 0 1596 2 0 0 1689 4 25 0 3 1 0 24 1 0 1599 4 6 0 0 1686 4 1600 1 1 2 6 0 27 0 0 1585 4 1 1 2 1 0 27 0 1 1632 4 1604 0 1 2 1694 4 18 1 3 6 0 0 1 0 1692 4 23 0 0 1 0 1608 0 0 0 7354 3 24 1 0 1618 4 6 1 0 4236 4 2 1 0 7354 4 1612 24 0 3 1682 4 6 0 1 1 0 18 1 3 2 0 2 0 0 1695 4 1616 25 0 1 1 0 24 1 0 1618 4 6 0 0 1692 4 1 1 2 63 0 1620 27 0 0 1604 4 1 1 1 1 0 27 0 1 1630 4 6 1 0 1682 4 1624 24 0 3 7356 4 2 1 0 4 0 24 0 3 7356 4 2 1 0 6 0 1628 26 0 0 1060 4 26 0 1 1568 4 6 1 0 1692 4 2 1 0 1686 4 1632 6 0 0 1686 4 1 1 2 1 0 27 0 0 1637 4 1 1 2 4 0 1636 27 0 1 1641 4 1 0 1 15 0 15 0 0 1685 4 5 0 0 1684 4 1640 14 0 0 1685 4 6 0 0 1685 4 24 0 3 7356 4 2 1 0 7 0 1644 6 0 0 1686 4 24 0 3 7356 4 2 1 0 5 0 25 0 2 1 0 1648 24 1 0 1649 4 23 0 0 4 0 0 0 0 7356 3 24 1 0 1582 4 1652 26 0 0 1060 4 24 1 0 1575 4 SECTION 597 1654 0 5014 3 5 0 0 0 0 5 0 1656 0 1358 3 5 0 0 0 0 5 0 0 5000 3 5 0 0 0 0 5 0 1660 0 5001 3 5 0 0 0 0 5 0 0 1224 3 5 3 0 0 0 5 1 1664 0 1232 3 5 3 0 0 0 5 0 0 5014 3 16437 0 4 0 3 5 1 1668 0 4946 3 5 3 0 0 0 5 0 0 4948 3 20 3 0 0 1 4 0 1672 0 4954 3 5 3 0 0 0 5 0 0 4950 3 5 3 0 0 0 5 0 1676 0 4952 3 5 3 0 0 0 5 0 0 4956 3 5 3 0 0 0 5 1 SECTION 598 1680 0 0 0 0 0 0 4£000 0 1684 30 0 0 0 30 0 0 0 1688 30 0 0 0 30 0 0 0 1692 30 0 0 0 30 0 0 0 1696 30 0 0 0 PROCEDURE 599 PROCEDURE 600 PROCEDURE 601 PROCEDURE 602 PROCEDURE 603 PROCEDURE 604 1698 1 1 3 0 0 27 0 0 1747 4 1700 24 0 2 1974 4 2 0 0 1724 4 24 0 2 1976 4 2 0 0 1727 4 1704 24 0 2 1980 4 2 0 0 1743 4 1 1 2 4 0 7 0 0 1973 4 1708 7 0 0 1981 4 1 1 3 0 0 27 0 0 1712 4 24 1 0 1714 4 1712 6 0 0 1973 4 2 0 0 1971 4 24 0 3 1974 4 6 0 0 0 0 1716 27 0 0 1764 4 1 1 3 2 0 7 0 0 1976 4 24 0 3 1974 4 1720 6 1 0 0 0 24 0 3 1976 4 2 1 0 0 0 23 0 0 2 0 1724 0 0 0 1974 3 24 1 0 1714 4 23 0 0 2 0 0 0 0 1976 3 1728 24 1 0 1730 4 24 1 0 1734 4 6 1 0 1978 4 24 0 3 1976 4 1732 2 1 0 0 0 24 1 0 1726 4 24 0 3 1980 4 6 0 0 1 0 1736 5 0 0 1978 4 27 0 0 1742 4 4 0 0 1978 4 18 0 0 0 0 1740 1 1 2 516 0 27 0 2 1750 4 23 0 0 2 0 0 0 0 1980 3 1744 24 1 0 1734 4 1 1 3 0 0 1 1 2 4 0 1 1 1 87 0 1748 24 0 3 1982 4 24 1 0 0 0 24 0 3 1980 4 6 0 0 0 0 1752 24 0 3 1982 4 3 0 0 28 0 24 0 3 1982 4 3 0 0 0 0 1756 0 0 2 1987 4 14 0 0 1987 4 6 0 0 1987 4 24 0 3 1982 4 1760 2 0 0 1 0 1 1 3 0 0 24 0 3 1982 4 24 1 0 1 0 PROCEDURE 605 1764 1 0 1 15 0 24 0 3 1974 4 15 0 0 1 0 2 1 0 1698 4 1768 24 0 3 1698 4 6 0 0 37 0 2 0 0 1986 4 24 0 3 1976 4 1772 6 0 0 1 0 24 0 3 1982 4 2 1 0 30 0 26 1 2 1698 4 1776 24 0 3 1982 4 26 0 0 0 0 24 0 3 1986 4 6 0 0 0 0 1780 27 0 0 1790 4 26 1 2 1982 4 1 1 3 14 0 24 0 3 1982 4 1784 23 1 2 128 0 1 1 3 0 0 24 0 3 1982 4 2 1 2 128 0 1788 25 0 2 2 0 24 1 0 1782 4 24 0 3 1986 4 6 0 0 1 0 1792 27 0 0 1801 4 18 0 3 3 0 2 0 0 1698 4 26 1 2 1982 4 1796 1 1 3 14 0 24 0 3 1698 4 23 1 2 2 0 25 0 2 2 0 1800 24 1 0 1797 4 24 0 3 1986 4 6 0 0 10 0 3 0 0 1698 4 1804 18 1 1 4127 0 24 0 3 1698 4 18 1 0 0 0 24 0 3 1982 4 1808 7 1 0 0 0 24 0 3 1986 4 26 1 2 18 0 26 1 3 1982 4 1812 25 0 3 3 0 25 0 3 3 0 24 1 0 1822 4 26 1 3 1982 4 1816 24 0 3 1986 4 6 1 2 34 0 27 0 2 1822 4 25 0 3 3 0 PROCEDURE 606 1820 25 0 2 1 0 24 1 0 1858 4 24 0 3 1986 4 6 0 2 34 0 1824 18 1 1 4124 0 2 0 0 1709 4 18 1 1 2 0 1 1 3 0 0 1828 18 1 1 2 0 27 0 0 1858 4 1 1 2 128 0 27 0 0 1858 4 1832 1 1 1 128 0 3 0 0 1710 4 18 1 1 4127 0 18 1 3 1 0 1836 18 0 3 3 0 2 0 0 1711 4 18 1 3 3 0 2 0 0 1712 4 1840 6 0 0 1709 4 27 0 1 1843 4 6 0 0 1984 4 24 0 3 1710 4 1844 2 0 0 64 0 24 0 3 1711 4 6 0 0 0 0 5 0 0 1710 4 1848 27 0 1 1852 4 6 0 0 1978 4 24 0 3 1711 4 2 1 0 0 0 1852 1 0 1 1 0 1 1 3 0 0 24 0 3 1712 4 18 1 0 0 0 1856 24 0 3 1711 4 14 1 0 2 0 25 0 2 1 0 24 1 0 1813 4 PROCEDURE 607 1860 24 0 3 1986 4 26 1 2 16 0 24 0 3 1986 4 6 1 2 20 0 1864 2 1 0 1698 4 26 1 3 1698 4 1 1 3 14 0 24 0 3 1982 4 1868 23 1 3 0 0 25 0 3 2 0 24 1 0 1867 4 26 1 3 1698 4 1872 6 0 0 1698 4 5 0 0 1986 4 27 0 1 1878 4 25 0 3 500 0 1876 24 1 0 1878 4 24 1 0 1883 4 1 1 3 0 0 24 0 3 1982 4 1880 2 1 3 0 0 25 0 3 2 0 24 1 0 1879 4 PROCEDURE 608 1883 1 1 3 0 0 1884 27 0 0 1890 4 6 0 0 1698 4 5 0 0 1967 4 27 0 3 1890 4 1888 6 1 0 1990 4 24 1 0 1891 4 6 1 0 1988 4 2 1 0 1712 4 1892 26 1 1 1712 4 26 1 3 1712 4 24 0 3 1982 4 6 1 3 0 0 PROCEDURE 609 1896 2 1 0 1708 4 6 0 0 1708 4 27 0 0 1916 4 5 0 0 1978 4 1900 27 0 0 1930 4 6 0 0 1708 4 4 0 0 1709 4 2 0 0 1711 4 1904 0 0 2 1987 4 15 0 0 1708 4 27 0 0 1911 4 6 0 0 1708 4 1908 5 0 0 1699 4 27 0 0 1918 4 1 1 3 0 0 15 0 0 1711 4 1912 27 0 0 1916 4 6 0 0 1711 4 5 0 0 1698 4 27 0 0 1922 4 1916 25 0 3 2 0 24 1 0 1894 4 6 0 0 1698 4 18 1 1 4123 0 1920 4 0 0 1711 4 24 1 0 1925 4 6 0 0 1708 4 18 1 1 4123 0 1924 4 0 0 1699 4 18 1 1 5 0 2 1 0 1698 4 24 0 3 1982 4 1928 2 1 3 0 0 24 1 0 1893 4 5 0 0 1698 4 7 0 0 1699 4 PROCEDURE 610 1932 24 0 3 1712 4 6 1 0 0 0 3 1 0 1992 4 27 0 0 1955 4 1936 5 1 0 1978 4 27 0 0 1958 4 6 1 0 1992 4 5 1 0 1698 4 1940 27 0 3 1947 4 6 1 0 1698 4 24 0 3 1982 4 2 1 1 0 0 1944 6 1 0 1992 4 2 1 0 1698 4 24 1 0 1950 4 6 1 0 1992 4 1948 24 0 3 1982 4 2 1 1 0 0 25 0 1 2 0 24 1 0 1955 4 1952 1 1 3 81 0 24 0 3 1982 4 24 1 0 0 0 1 1 3 2 0 1956 7 0 0 1712 4 24 1 0 1932 4 6 1 0 1698 4 24 0 3 1982 4 1960 2 1 1 0 0 6 1 0 1978 4 24 0 3 1982 4 2 1 1 2 0 1964 25 0 2 2 0 24 1 0 1862 4 24 1 0 1723 4 0 1 0 0 0 1968 6 0 0 1698 4 1 1 3 0 0 SECTION 611 1970 0 0 0 0 1972 0 0 0 0 2 0 0 0 1976 0 0 0 0 £££££ 0 £££££ 0 1980 0 0 0 0 0 0 6 0 1984 ££££ 0 £0000 0 0 0 1£££ 0 1988 0 0 0 0 0 0 0 0 1992 0 0 0 0 0 0 0 0 PROCEDURE 612 PROCEDURE 613 1996 1 1 3 0 0 27 0 0 2008 4 1 1 3 0 0 1 1 2 1 0 2000 7 0 0 2244 4 1 1 3 0 0 5 0 0 2011 4 7 0 0 2302 4 2004 1 1 3 0 0 1 1 2 0 0 7 0 0 2044 4 7 0 0 2261 4 2008 24 0 3 2020 4 26 0 0 0 0 24 1 0 2048 4 0 0 2 0 0 2012 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2016 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2020 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2024 0 0 0 1 0 0 0 0 0 0 PROCEDURE 614 2026 24 0 3 2044 4 28 0 0 250 0 2028 24 0 3 2044 4 24 1 0 250 0 6 1 0 2042 4 24 0 3 2066 4 2032 28 0 0 80 0 6 1 0 2040 4 24 0 3 2044 4 28 0 0 0 0 2036 1 1 3 0 0 24 0 3 2039 4 24 1 0 1 0 0 0 0 0 0 2040 0 0 0 16 0 0 0 0 54 0 0 0 0 70 0 0 0 0 40 0 2044 0 0 0 0 0 0 0 0 0 0 SECTION 615 2046 40- 0 0 0 PROCEDURE 616 2048 24 1 2 2046 4 24 0 2 25 0 18 1 1 4123 0 1 1 3 28 0 2052 18 1 1 5 0 28 1 0 1997 4 24 1 2 2046 4 24 0 2 5 0 2056 18 1 1 4123 0 1 1 3 20 0 18 1 1 5 0 28 1 0 2046 4 2060 6 1 0 2004 4 2 1 0 2058 4 1 1 3 1996 4 18 1 3 3 0 2064 18 1 1 4127 0 2 0 0 2056 4 18 1 3 1 0 3 0 0 2057 4 2068 27 0 0 2076 4 1 1 3 0 0 27 0 0 2076 4 3 0 0 2047 4 2072 6 0 0 2228 4 2 0 0 2118 4 1 1 3 1500 0 7 0 0 2238 4 2076 24 0 1 2050 4 3 0 0 1997 4 24 0 1 2050 4 6 0 0 1996 4 2080 2 0 0 2061 4 6 0 0 2050 4 4 0 0 2050 4 2 0 0 2063 4 2084 24 0 0 2063 4 2 1 0 2066 4 1 1 3 0 0 2 0 0 2078 4 2088 1 0 1 1 0 24 0 3 2020 4 15 0 0 27 0 1 1 2 9 0 2092 3 0 0 2060 4 27 0 1 2099 4 1 1 3 1 0 7 0 0 2119 4 2096 7 0 0 2122 4 6 0 0 2226 4 2 0 0 2223 4 PROCEDURE 617 2099 6 0 0 2063 4 2100 2 0 0 2014 4 6 0 0 2050 4 3 0 0 2016 4 1 1 1 4 0 2104 2 0 0 2017 4 26 1 1 2014 4 26 1 3 2016 4 2 1 1 2068 4 2108 1 1 3 0 0 27 0 0 2117 4 1 1 3 0 0 0 0 2 2230 4 2112 24 0 1 2050 4 15 0 0 1996 4 24 0 1 2050 4 14 0 0 1996 4 2116 1 1 3 0 0 6 0 0 2008 4 27 0 0 2151 4 6 0 0 2007 4 2120 26 0 0 2216 4 25 0 1 2 0 6 0 0 2009 4 26 0 0 2216 4 2124 6 0 1 2067 4 27 0 1 2130 4 6 0 1 2066 4 6 0 1 2066 4 2128 7 0 0 2238 4 24 1 0 2140 4 2 0 0 2014 4 6 0 1 2066 4 2132 0 0 2 2230 4 24 0 1 2014 4 15 0 0 1996 4 24 0 1 2014 4 2136 14 0 0 1996 4 6 0 1 2067 4 7 0 1 2067 4 1 1 3 0 0 2140 2 0 3 1998 4 25 0 1 2 0 25 0 3 1 0 24 1 0 2124 4 2144 6 0 0 2060 4 27 0 0 2149 4 1 1 3 1 0 7 0 0 2198 4 2148 1 1 3 2 0 1 1 1 2 0 1 1 1 1 0 4 0 0 2050 4 2152 2 0 0 2014 4 0 1 2 2230 4 24 0 1 2050 4 18 1 3 0 0 2156 2 0 0 2013 4 24 0 1 2014 4 18 1 3 0 0 2 0 0 2015 4 2160 26 1 3 2044 4 2 0 0 2044 4 6 0 0 2014 4 5 0 0 2050 4 2164 27 0 0 2179 4 6 0 0 2014 4 2 0 0 2021 4 26 1 1 2020 4 2168 0 0 2 2024 4 6 0 1 1997 4 27 0 1 2173 4 15 0 0 2230 4 2172 7 0 0 2227 4 18 1 3 1 0 25 0 1 1 0 24 1 0 2169 4 2176 1 1 3 0 0 5 0 0 2227 4 7 0 0 2015 4 PROCEDURE 618 2179 6 0 0 2050 4 2180 2 0 0 2021 4 26 1 1 2020 4 0 0 2 2024 4 1 1 3 8190 0 2184 5 0 0 2238 4 2 0 0 2238 4 6 0 1 1997 4 5 0 0 2238 4 2188 27 0 2 2191 4 6 0 0 2232 4 14 0 0 2239 4 18 1 3 1 0 2192 25 0 1 1 0 24 1 0 2186 4 6 0 0 2008 4 0 0 2 2230 4 2196 27 0 0 2201 4 1 1 3 0 0 24 1 0 2200 4 1 1 3 34 0 2200 1 1 1 16 0 24 0 1 2050 4 15 0 0 1996 4 1 1 2 506 0 2204 27 0 2 2206 4 1 1 3 0 0 1 1 1 506 0 24 0 1 2050 4 2208 14 0 0 1996 4 1 1 3 40 0 18 0 1 5 0 1 1 1 0 0 2212 28 0 0 2100 4 6 1 0 2230 4 2 1 0 2098 4 24 1 0 2240 4 PROCEDURE 619 2216 0 0 0 0 0 18 1 1 4124 0 2 0 1 2069 4 18 1 3 3 0 2220 2 0 1 2073 4 18 1 3 1 0 18 1 1 3 0 3 0 1 2068 4 2224 2 0 1 2072 4 26 0 1 2216 4 2 0 1 2068 4 0 0 0 0 0 2228 27 0 0 2150 4 1 1 3 0 0 SECTION 620 2230 £££££ 0 £££££ 0 2232 1£££ 0 1- 0 0 0 8 0 2236 0 0 t 0 2- 0 0 0 PROCEDURE 621 2240 6 0 0 2230 4 3 0 0 2012 4 5 0 3 2100 4 27 0 1 2270 4 2244 24 1 0 2245 4 24 1 0 2249 4 24 1 0 2253 4 24 1 0 2261 4 2248 24 1 0 2249 4 1 1 3 83 0 24 0 3 2020 4 24 1 0 0 0 2252 24 1 0 2244 4 1 1 3 0 0 24 0 3 2020 4 2 1 0 30 0 2256 1 1 2 1 0 7 0 0 2244 4 6 0 0 2011 4 7 0 0 2302 4 2260 24 1 0 2270 4 1 1 3 0 0 24 0 3 2020 4 2 0 0 30 0 2264 6 0 3 2100 4 5 0 0 2230 4 27 0 0 2249 4 1 1 3 0 0 2268 1 1 2 1 0 7 0 0 2244 4 1 1 3 1 0 2 1 0 2018 4 2272 6 0 0 2014 4 2 0 0 2021 4 PROCEDURE 622 2274 1 1 3 0 0 0 0 2 2018 4 2276 15 0 0 2227 4 27 0 1 2321 4 6 0 0 2013 4 5 0 0 2015 4 2280 27 0 2 2295 4 1 1 3 0 0 15 0 0 2013 4 27 0 0 2321 4 2284 1 1 3 0 0 6 0 0 2015 4 5 0 0 2018 4 2 0 0 2142 4 2288 0 0 2 2239 4 15 0 0 2142 4 27 0 1 2295 4 0 0 2 2013 4 2292 15 0 0 2142 4 5 0 0 2142 4 27 0 1 2321 4 1 1 3 0 0 2296 2 1 0 2022 4 0 0 2 2024 4 26 1 1 2020 4 15 0 0 2018 4 2300 27 0 0 2310 4 6 0 1 1997 4 27 0 1 2306 4 1 1 3 0 0 2304 15 0 0 2230 4 24 1 0 2322 4 2 1 0 2142 4 6 0 0 2142 4 2308 7 0 0 2022 4 1 1 3 0 0 18 1 3 1 0 25 0 1 1 0 2312 24 1 0 2299 4 6 0 3 2101 4 5 0 0 2022 4 27 0 3 2321 4 2316 5 0 0 2012 4 27 0 2 2321 4 7 0 0 2012 4 6 0 0 2018 4 2320 2 0 0 2025 4 1 1 3 1 0 7 0 0 2018 4 6 0 0 2015 4 2324 5 0 0 2018 4 27 0 2 2274 4 25 0 3 2 0 6 0 0 2012 4 2328 5 0 0 2230 4 27 0 0 2240 4 6 0 3 2099 4 5 0 0 2012 4 2332 2 0 0 2022 4 5 0 0 2025 4 7 0 0 2015 4 6 0 0 2025 4 2336 7 0 0 2227 4 1 1 3 0 0 PROCEDURE 623 2338 0 0 2 2232 4 15 0 3 2098 4 2340 27 0 0 2347 4 4 0 3 2099 4 5 0 0 2232 4 27 0 3 2347 4 2344 6 0 0 2012 4 2 0 0 2019 4 24 1 0 2348 4 6 0 0 2022 4 2348 4 0 3 2098 4 2 0 0 2142 4 6 0 0 2012 4 2 0 0 2143 4 2352 6 0 0 2019 4 4 0 3 2098 4 2 0 0 2019 4 1 1 3 0 0 PROCEDURE 624 2356 26 1 1 2020 4 26 1 2 2044 4 0 0 2 2024 4 15 0 0 2025 4 2360 27 0 0 2375 4 6 0 1 1997 4 2 1 0 2140 4 6 0 0 2019 4 2364 3 0 2 2066 4 4 0 0 2140 4 3 0 2 2067 4 2 0 0 2019 4 2368 24 0 3 2020 4 6 0 0 28 0 5 0 0 2063 4 27 0 2 2380 4 2372 4 0 0 2063 4 2 0 0 2023 4 2 0 1 1997 4 18 1 3 1 0 2376 25 0 2 2 0 25 0 1 1 0 24 1 0 2359 4 24 1 0 2388 4 2380 6 0 1 1997 4 24 0 0 2023 4 7 0 0 2067 4 2 0 2 2066 4 2384 6 0 0 2023 4 1 1 1 2 0 2 0 2 2067 4 24 1 0 2374 4 PROCEDURE 625 PROCEDURE 626 2388 24 0 3 2020 4 6 0 0 30 0 24 0 3 2020 4 2 1 0 28 0 2392 6 0 0 2143 4 27 0 1 2403 4 25 0 3 4098 0 24 1 0 2397 4 2396 1 1 3 0 0 6 1 2 2100 4 3 1 2 2098 4 5 1 0 2230 4 2400 27 0 0 2414 4 25 0 2 2 0 24 1 0 2397 4 6 1 2 2096 4 2404 5 1 0 2142 4 27 0 3 2412 4 4 1 0 2142 4 3 1 2 2098 4 2408 5 1 0 2230 4 27 0 0 2412 4 25 0 2 4098 0 24 1 0 2403 4 2412 6 1 0 2142 4 2 1 2 2098 4 6 0 0 2015 4 27 0 1 2240 4 2416 1 1 3 0 0 2 0 0 2062 4 PROCEDURE 627 2418 6 0 0 2063 4 7 0 0 2237 4 2420 7 0 0 2236 4 26 1 1 2062 4 26 1 3 2236 4 6 0 1 2067 4 2424 5 0 1 2066 4 2 0 0 2013 4 6 0 3 2067 4 24 0 3 2020 4 2428 5 0 0 26 0 1 1 2 2 0 27 0 1 2435 4 6 0 0 2013 4 2432 5 0 3 2066 4 3 0 0 2013 4 2 0 3 2076 4 25 0 3 2 0 2436 24 1 0 2426 4 25 0 1 2 0 24 1 0 2422 4 6 0 3 2057 4 2440 27 0 0 2452 4 3 0 0 2013 4 18 0 1 4 0 24 0 3 2020 4 2444 2 0 0 43 0 24 0 1 2013 4 6 0 0 2064 4 4 0 3 2066 4 2448 24 0 0 2013 4 3 0 0 2065 4 24 0 3 2020 4 7 0 0 43 0 PROCEDURE 628 2452 24 0 1 2063 4 6 0 0 2064 4 3 0 0 2044 4 1 1 1 54 0 2456 24 0 3 2045 4 3 0 0 28 0 24 0 3 2045 4 3 0 0 5 0 2460 24 0 3 2045 4 2 0 0 0 0 24 0 3 2044 4 1 1 3 0 0 2464 24 0 3 2045 4 3 0 0 2 0 1 1 1 54 0 24 0 3 2045 4 2468 2 0 0 1 0 1 1 3 0 0 PROCEDURE 629 2470 24 0 2 2140 4 5 0 0 2044 4 2472 27 0 3 2475 4 1 1 2 170 0 27 0 3 2480 4 24 0 2 2140 4 2476 5 0 0 2066 4 27 0 3 2500 4 1 1 2 156 0 27 0 2 2500 4 2480 1 1 3 250 0 0 0 2 2232 4 15 0 0 2044 4 1 1 2 2030 4 2484 7 0 0 2030 4 7 0 0 2033 4 2 0 0 2472 4 5 0 0 2472 4 2488 7 0 0 2031 4 7 0 0 2034 4 7 0 0 2037 4 6 0 0 2044 4 2492 1 1 1 250 0 7 0 0 2040 4 7 0 0 2042 4 24 0 2 2030 4 2496 18 1 1 4123 0 1 1 1 110 0 18 1 1 5 0 24 1 0 2026 4 2500 24 0 2 2030 4 7 0 0 2040 4 7 0 0 2042 4 24 1 0 2030 4 2504 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2508 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 PROCEDURE 630 2512 6 0 0 10 0 18 1 1 4126 0 PROCEDURE 631 2514 1 1 2 1 0 27 0 1 2520 4 2516 1 0 1 3 0 14 0 0 2928 4 14 0 0 2664 4 14 0 0 2710 4 2520 1 1 3 0 0 27 0 1 2528 4 6 1 0 2948 4 2 1 0 2936 4 2524 6 0 0 2885 4 2 0 0 2882 4 6 1 0 2932 4 2 1 0 2930 4 2528 1 1 3 2 0 18 1 1 4118 0 15 0 0 10 0 27 0 0 2539 4 2532 6 1 0 2930 4 2 1 0 2924 4 6 1 0 2932 4 2 1 0 2926 4 2536 1 1 2 4096 0 7 0 0 2891 4 24 1 0 2541 4 1 0 1 12 0 2540 14 1 0 2928 4 6 0 0 11 0 27 0 1 2545 4 1 0 1 48 0 2544 14 1 0 2928 4 6 1 0 12 0 2 1 0 2512 4 24 1 0 2578 4 SECTION 632 2548 36653 0 51636 0 0 0 5.7:0 0 2552 1 0 0 0 16 0 0 0 2556 256 0 0 0 4096 0 0 0 2560 65536 0 0 0 PROCEDURE 633 PROCEDURE 634 2562 0 0 0 2583 4 0 0 2 5 0 2564 0 0 0 2578 4 16 0 0 4101 0 0 0 0 2548 4 1 0 0 5 0 2568 0 0 0 2512 4 0 0 0 53 0 0 0 0 2513 4 0 0 0 21 0 2572 0 0 0 0 0 0 0 0 21 0 0 0 0 2928 4 1 0 0 305 0 2576 0 0 0 2928 4 17 0 0 563 0 PROCEDURE 635 2578 1 1 3 0 0 1 1 2 1 0 2580 7 0 0 2572 4 24 0 2 2566 4 24 0 3 20 0 28 1 2 0 0 2584 1 1 3 16 0 4 0 0 20 0 2 0 0 2574 4 26 1 1 16 0 2588 0 0 3 2934 4 6 0 1 20 0 18 1 1 4124 0 18 1 3 3 0 2592 2 0 0 2583 4 18 1 3 13 0 2 0 0 2578 4 24 0 2 2552 4 2596 12 0 0 2578 4 2 0 0 2578 4 24 0 2 2562 4 24 0 3 2574 4 2600 28 1 2 0 0 0 0 3 2550 4 1 1 3 4 0 7 0 0 2574 4 2604 25 0 1 2 0 24 1 0 2588 4 1 1 3 7805 0 24 0 3 20 0 2608 3 1 0 14 0 24 0 3 2574 4 2 1 0 0 0 24 0 2 2566 4 2612 2 0 0 2731 4 2 0 0 2562 4 24 0 2 2578 4 2 0 0 2892 4 2616 26 0 0 2878 4 24 0 2 20 0 4 0 0 17 0 18 1 1 4123 0 2620 1 1 1 30 0 18 1 1 5 0 28 0 0 2580 4 6 0 0 11 0 2624 27 0 0 2629 4 1 1 3 0 0 27 0 0 2629 4 1 1 3 0 0 2628 27 0 1 2631 4 6 0 0 2628 4 2 0 0 2935 4 6 0 0 2583 4 2632 24 0 3 20 0 3 0 0 122 0 27 0 0 2642 4 1 1 3 8191 0 2636 18 1 1 4118 0 6 0 0 15 0 24 0 1 17 0 15 0 0 18 0 2640 24 0 3 2562 4 2 0 0 5 0 PROCEDURE 636 2642 26 1 1 2562 4 1 1 3 8 0 2644 2 0 0 2563 4 26 1 3 2562 4 6 0 0 5 0 27 0 0 2729 4 2648 2 0 0 2563 4 26 1 2 2562 4 24 1 2 2923 4 24 0 2 4 0 2652 3 0 0 2566 4 1 1 1 48 0 2 0 0 2567 4 24 0 3 2562 4 2656 26 0 0 0 0 1 1 3 12 0 18 0 1 5 0 4 0 0 2566 4 2660 1 1 1 1 0 28 1 0 2568 4 26 0 0 2793 4 25 0 1 1 0 2664 1 1 3 128 0 4 0 0 2573 4 27 0 1 2669 4 26 0 0 2793 4 2668 24 1 0 2676 4 PROCEDURE 637 2669 6 0 0 2569 4 5 0 0 2922 4 27 0 1 2674 4 2672 3 0 1 34 0 24 1 0 2719 4 1 1 3 128 0 2 0 1 34 0 2676 1 0 1 3 0 15 0 1 34 0 18 1 1 2 0 14 0 1 33 0 2680 1 0 1 3 0 1 1 3 0 0 15 0 1 33 0 2 0 0 2563 4 2684 6 0 0 2569 4 1 1 2 4 0 27 0 0 2689 4 1 1 2 5 0 2688 27 0 1 2691 4 6 0 0 2563 4 3 0 0 2935 4 6 0 0 2563 4 2692 26 0 0 2912 4 2 1 0 2612 4 24 0 3 2566 4 6 1 0 0 0 2696 2 1 0 2614 4 1 0 1 3 0 15 0 1 34 0 26 0 0 2912 4 2700 18 0 1 0 0 2 1 0 2616 4 1 0 1 15 0 6 1 0 2614 4 2704 14 0 1 34 0 1 1 1 0 0 24 0 2 2950 4 24 0 3 2574 4 2708 28 1 2 2 0 PROCEDURE 638 2709 6 0 0 2573 4 1 1 1 128 0 27 0 0 2717 4 2712 1 1 3 101 0 18 0 1 2 0 1 0 1 63 0 24 0 3 2574 4 2716 14 1 0 4 0 1 1 3 4 0 7 0 0 2574 4 24 0 1 2571 4 2720 6 0 0 18 0 4 0 0 2570 4 3 0 1 65 0 1 1 2 2 0 2724 4 0 0 2572 4 2 0 1 66 0 25 0 1 1 0 25 0 2 1 0 2728 24 1 0 2730 4 24 1 0 2734 4 23 0 0 12 0 0 0 0 2566 3 2732 24 1 0 2657 4 24 1 0 2650 4 6 0 0 2581 4 27 0 0 2754 4 2736 6 1 0 2936 4 2 1 1 34 0 2 1 1 66 0 25 0 1 2 0 2740 6 0 0 2935 4 27 0 1 2768 4 6 0 0 14 0 1 1 1 9 0 2744 3 0 0 2569 4 2 0 0 2573 4 1 1 3 1 0 7 0 0 5 0 2748 25 0 2 4097 0 24 0 2 2956 4 2 0 0 2566 4 6 0 0 2772 4 2752 2 0 0 2729 4 24 1 0 2662 4 1 1 3 6 0 7 0 0 2730 4 2756 1 1 2 12 0 7 0 0 2657 4 1 1 1 4 0 7 0 0 2661 4 2760 6 0 0 2771 4 2 0 0 2729 4 6 0 0 2922 4 3 0 0 2569 4 2764 2 0 0 2573 4 1 1 3 0 0 6 0 0 6 0 24 1 0 2647 4 2768 1 1 3 1 0 7 0 0 5 0 24 1 0 2754 4 24 1 0 2773 4 2772 24 1 0 2768 4 PROCEDURE 639 2773 6 0 0 5 0 4 0 0 6 0 18 0 1 5 0 2776 27 0 0 2858 4 3 1 0 18 0 7 1 0 18 0 24 0 2 98 0 2780 24 0 3 2562 4 3 1 0 28 0 24 0 3 2562 4 3 0 0 0 0 2784 1 1 3 44 0 24 0 3 2562 4 7 0 0 1 0 1 1 3 7710 0 2788 24 0 3 2574 4 2 1 0 2 0 1 1 3 0 0 24 0 3 2562 4 2792 24 1 0 1 0 PROCEDURE 640 2793 0 0 0 0 0 6 0 0 2897 4 2 0 0 2889 4 2796 6 0 0 2571 4 27 0 2 2822 4 6 0 0 2569 4 5 0 0 2922 4 2800 27 0 0 2804 4 6 0 0 14 0 1 1 1 9 0 2 0 0 2569 4 2804 6 0 3 2582 4 27 0 1 2814 4 25 0 3 2 0 24 1 0 2804 4 2808 25 0 3 4098 0 1 1 2 1 0 2 1 1 34 0 2 1 1 66 0 2812 25 0 1 2 0 24 1 0 2727 4 2 0 0 2572 4 6 0 3 2583 4 2816 2 0 0 2571 4 6 0 3 2592 4 2 0 0 2570 4 25 0 3 2 0 2820 24 1 0 2842 4 24 1 0 2842 4 6 0 0 2569 4 1 1 2 14 0 2824 27 0 1 2828 4 6 0 0 14 0 1 1 1 9 0 2 0 0 2569 4 2828 6 0 0 2569 4 1 1 2 15 0 27 0 1 2845 4 1 1 3 5 0 2832 3 0 0 2569 4 3 0 0 15 0 1 1 2 5 0 27 0 0 2837 4 2836 2 0 0 2573 4 26 0 0 2878 4 1 1 3 6 0 1 1 2 0 0 2840 3 0 0 2569 4 3 0 0 15 0 1 1 2 5 0 27 0 0 2845 4 2844 2 0 0 2573 4 26 0 0 2878 4 6 0 0 2569 4 26 0 0 2905 4 2848 27 0 1 2852 4 6 0 0 2896 4 2 0 0 2889 4 26 0 0 2878 4 2852 6 0 0 2569 4 5 0 0 2922 4 27 0 1 2858 4 6 0 0 2895 4 2856 2 0 0 2889 4 26 0 0 2878 4 6 0 0 2898 4 2 0 0 2889 4 2860 26 0 0 2878 4 1 1 3 84 0 24 0 3 2562 4 24 1 0 0 0 2864 24 0 3 2578 4 6 0 0 0 0 5 0 0 2922 4 27 0 0 2869 4 2868 4 0 0 2922 4 18 0 1 4 0 4 0 0 2578 4 1 1 2 64 0 2872 2 0 1 34 0 24 0 3 2578 4 5 0 0 0 0 24 0 3 2578 4 2876 2 0 0 0 0 26 0 1 2793 4 PROCEDURE 641 2878 0 0 0 0 0 6 1 0 2924 4 2880 2 1 0 2578 4 26 0 0 2886 4 6 1 0 2926 4 2 1 0 2578 4 2884 26 0 0 2886 4 26 0 1 2878 4 PROCEDURE 642 2886 0 0 0 0 0 24 0 3 2578 4 2888 6 0 0 0 0 24 1 0 2899 4 27 0 0 2864 4 23 0 0 1 0 2892 0 0 0 2578 3 24 1 0 2887 4 26 0 1 2886 4 18 0 1 4127 0 2896 26 0 0 2905 4 5 0 0 2569 4 24 1 0 2899 4 27 0 2 2891 4 2900 2 0 0 2614 4 5 0 0 2614 4 24 0 3 2578 4 2 0 0 0 0 2904 24 1 0 2891 4 PROCEDURE 643 2905 0 0 0 0 0 1 1 2 7 0 27 0 0 2911 4 2908 1 1 2 1 0 27 0 0 2911 4 1 1 2 3 0 26 0 1 2905 4 PROCEDURE 644 2912 0 0 0 0 0 18 1 1 4127 0 18 1 3 1 0 1 1 2 10 0 2916 27 0 3 2918 4 1 1 1 6 0 1 1 1 10 0 18 0 3 1 0 2920 18 1 3 3 0 26 0 1 2912 4 SECTION 645 2922 ££££ 0 40- 0 2924 40 0 80 0 +0 0 £0 0 2928 36965 0 647 0 £0 0 +0 0 2932 80 0 40 0 66666 0 0 0 2936 74000 0 70740- 0 0 0 0 0 2940 0 0 0 0 0 0 0 0 2944 0 0 0 0 0 0 0 0 2948 78000 0 70780- 0 PROCEDURE 646 2950 0 0 0 2614 4 1 0 0 515 0 2952 0 0 0 2612 4 0 0 0 4627 0 0 0 0 2616 4 16 0 0 4611 0 2956 7 0 3 4978 0 0 0 0 6 0 PROCEDURE 647 PROCEDURE 648 2958 1 0 1 0 0 24 0 1 20 0 2960 1 1 3 0 0 7 0 0 3179 4 7 0 0 3238 4 2 0 0 2958 4 2964 5 0 0 2958 4 7 0 0 3177 4 7 0 0 3180 4 7 0 0 3182 4 2968 7 0 0 3236 4 7 0 0 3239 4 7 0 0 3241 4 1 1 3 0 0 2972 1 1 3 2 0 1 1 2 0 0 27 0 0 2978 4 24 0 3 3246 4 2976 6 0 0 1 0 18 0 1 5 0 24 0 3 3246 4 4 0 0 0 0 2980 2 1 0 3262 4 6 0 0 9 0 4 0 0 9 0 7 0 0 2984 4 2984 6 0 0 18 0 4 0 0 8 0 2 0 0 8 0 6 1 0 3262 4 2988 27 0 0 3019 4 18 1 1 4127 0 2 1 0 3262 4 27 1 0 2987 4 2992 18 1 1 1 0 3 0 0 10 0 6 1 0 3262 4 24 0 0 10 0 2996 18 0 0 0 0 2 1 0 3262 4 6 0 0 0 0 27 0 0 3004 4 3000 24 0 3 3246 4 23 0 3 128 0 1 1 2 14 0 27 0 1 3017 4 3004 26 1 3 3260 4 6 0 0 1 0 27 0 1 3010 4 24 0 3 20 0 3008 2 1 0 10 0 24 1 0 3030 4 24 0 3 3246 4 24 0 3 30 0 3012 23 0 3 10 0 1 1 2 14 0 27 0 0 3023 4 25 0 3 8 0 3016 24 1 0 3010 4 1 1 3 0 0 1 1 2 1 0 1 1 2 3 0 3020 1 1 1 85 0 24 0 3 3246 4 24 1 0 0 0 24 0 3 3246 4 3024 6 0 0 30 0 18 0 3 1 0 18 0 1 4127 0 1 1 1 1 0 3028 24 0 3 20 0 7 1 0 10 0 2 0 0 1 0 6 0 0 10 0 3032 1 1 1 64 0 18 0 0 6 0 24 0 3 20 0 7 1 0 10 0 3036 1 1 3 0 0 PROCEDURE 649 3037 6 0 0 5 0 18 0 3 1 0 2 0 0 3247 4 3040 6 0 0 3253 4 27 0 0 3053 4 24 1 1 3045 4 24 0 2 2958 4 3044 3 0 0 3250 4 1 1 3 126 0 24 1 2 3257 4 2 0 0 16 0 3048 6 1 0 3248 4 28 1 1 2958 4 24 0 2 3250 4 24 1 2 3257 4 3052 28 0 3 0 0 PROCEDURE 650 3053 26 1 1 3246 4 6 1 1 34 0 27 0 3 3101 4 3056 1 1 1 0 0 18 1 1 4118 0 18 1 1 1 0 2 0 0 3249 4 3060 18 1 1 4 0 2 0 0 3252 4 18 1 1 1 0 2 0 0 3248 4 3064 18 1 1 2 0 2 0 0 3251 4 18 1 1 2 0 2 0 0 3250 4 3068 6 0 0 3253 4 27 0 0 3095 4 PROCEDURE 651 3070 6 0 0 3248 4 1 1 2 7 0 3072 27 0 0 3077 4 1 1 2 1 0 27 0 0 3077 4 1 1 2 3 0 3076 27 0 1 3095 4 26 1 2 3254 4 6 1 2 2958 4 5 0 0 3252 4 3080 27 0 0 3084 4 25 0 2 2 0 24 1 0 3078 4 1 1 3 1 0 3084 24 0 3 3250 4 3 0 0 0 0 18 1 1 4127 0 6 0 0 3251 4 3088 1 1 2 128 0 27 0 0 3094 4 1 1 3 0 0 18 1 1 1 0 3092 24 1 2 3251 4 2 0 0 0 0 2 1 2 2958 4 PROCEDURE 652 3095 6 0 0 3249 4 3096 18 0 1 2 0 4 0 0 3250 4 18 0 1 2 0 4 0 0 3251 4 3100 2 0 1 35 0 25 0 1 2 0 24 1 0 3054 4 6 0 0 3253 4 3104 27 0 0 3113 4 26 1 2 3254 4 6 1 2 2958 4 27 0 0 3110 4 3108 1 1 3 0 0 24 1 0 3020 4 25 0 2 2 0 24 1 0 3106 4 3112 1 1 1 0 0 PROCEDURE 653 3113 24 0 3 20 0 6 0 0 122 0 27 0 0 3148 4 3116 24 0 2 0 0 1 1 2 0 0 3 0 0 3186 4 2 0 0 3245 4 3120 6 0 0 20 0 7 0 0 3184 4 7 0 0 3243 4 1 1 3 0 0 3124 1 1 2 8 0 18 0 1 4 0 1 0 1 16 0 15 0 0 3161 4 3128 27 0 0 3130 4 14 0 0 3234 4 1 1 3 0 0 1 0 1 1 0 3132 15 0 0 3161 4 1 1 2 4 0 27 0 0 3142 4 24 0 2 3162 4 3136 18 1 1 4123 0 1 1 3 26 0 18 1 1 5 0 24 0 3 20 0 3140 28 0 0 154 0 24 1 0 3148 4 24 0 2 3187 4 18 1 1 4123 0 3144 1 1 3 62 0 18 1 1 5 0 24 0 3 20 0 28 0 0 120 0 3148 2 0 0 16 0 24 0 2 2958 4 24 0 3 3246 4 2 0 0 5 0 PROCEDURE 654 3152 26 1 1 3262 4 24 0 2 98 0 24 0 3 3246 4 3 1 0 28 0 3156 24 0 3 3246 4 2 0 0 0 0 1 1 3 0 0 24 0 3 3246 4 3160 24 1 0 1 0 0 0 0 0 0 PROCEDURE 655 3162 0 0 0 0 0 1 1 3 0 0 3164 1 1 2 64 0 24 0 3 2958 4 5 0 0 2 0 18 1 1 4118 0 3168 1 1 3 9 0 18 0 1 5 0 24 0 3 2958 4 4 0 0 1 0 3172 25 1 1 4096 0 24 0 3 2967 4 23 0 2 159 0 26 0 1 2958 4 3176 0 0 0 0 0 24 0 3 178 0 28 0 0 214 0 6 1 0 176 0 3180 24 0 3 178 0 28 0 0 2958 4 24 0 3 178 0 24 1 0 204 0 3184 0 0 0 154 0 0 0 0 14 0 0 0 0 0 0 PROCEDURE 656 3187 0 0 0 0 0 3188 24 0 3 2958 4 24 1 2 2 0 24 0 2 0 0 2 0 0 3006 4 3192 6 1 0 3004 4 0 1 2 3004 4 24 0 3 3006 4 14 1 0 0 0 3196 24 0 3 2958 4 6 0 0 4 0 18 0 0 5 0 24 0 3 2958 4 3200 24 1 2 3 0 28 1 1 0 0 6 0 0 3006 4 24 0 3 2958 4 3204 24 1 2 3 0 29 0 1 0 0 2 0 0 3006 4 1 1 2 64 0 3208 24 0 3 2958 4 5 0 0 3 0 18 1 1 4118 0 1 1 3 4 0 3212 18 0 1 5 0 24 0 3 2958 4 4 0 0 1 0 25 1 1 4096 0 3216 24 0 3 3004 4 23 0 2 160 0 24 0 3 3006 4 0 1 2 0 0 3220 1 1 3 2 0 7 0 0 3006 4 18 1 3 2 0 1 1 3 0 0 3224 18 1 3 6 0 1 1 2 30 0 27 0 0 2963 4 1 1 2 32 0 3228 27 0 0 3003 4 1 1 3 0 0 27 1 1 2993 4 24 1 0 2989 4 3232 26 0 1 2958 4 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 3236 24 0 3 178 0 28 0 0 214 0 6 1 0 176 0 24 0 3 178 0 3240 28 0 0 2958 4 24 0 3 178 0 24 1 0 204 0 0 0 0 120 0 3244 0 0 0 48 0 0 0 0 0 0 SECTION 657 3246 0 0 0 0 3248 0 0 20010 0 0 0 30000- 0 3252 0 0 0 0 0 0 10 0 3256 40- 0 40- 0 0 0 0 0 3260 0 0 18 0 0 0 0 0 3264 0 0 0 0 0 0 0 0 3268 0 0 0 0 PROCEDURE 658 3270 24 0 3 3624 4 6 1 0 26 0 3272 2 1 0 3648 4 1 1 2 2 0 7 0 0 3636 4 7 0 0 3637 4 3276 1 1 3 0 0 6 0 0 15 0 2 0 0 14 0 6 0 0 2 0 3280 18 0 1 4 0 0 0 2 10 0 10 0 0 3631 4 4 0 0 3631 4 3284 24 0 3 3624 4 4 0 0 2 0 18 0 1 5 0 4 0 0 12 0 3288 2 1 0 3634 4 26 1 1 3636 4 1 0 1 16 0 24 0 3 3624 4 3292 15 0 1 1 0 5 0 0 3638 4 27 0 0 3302 4 4 0 0 3638 4 3296 5 0 0 3635 4 27 0 3 3306 4 24 0 3 3624 4 6 1 1 0 0 3300 24 0 3 3624 4 2 1 1 2 0 25 0 1 4098 0 24 1 0 3291 4 3304 11 0 3 7 0 8 1 0 7 0 25 1 1 4096 0 6 1 0 3634 4 3308 24 0 3 3624 4 2 1 1 2 0 1 0 1 15 0 15 0 0 3635 4 3312 24 0 3 3624 4 3 1 0 30 0 7 0 0 3304 4 7 0 0 3305 4 3316 2 0 0 3630 4 24 0 3 3624 4 6 0 1 1 0 24 0 3 3624 4 3320 2 1 0 28 0 1 1 2 4 0 7 0 0 3369 4 7 0 0 3374 4 3324 7 0 0 3361 4 PROCEDURE 659 3325 24 0 3 3624 4 26 0 0 0 0 1 1 3 0 0 3328 5 0 0 3304 4 24 0 3 3624 4 2 0 2 20 0 24 0 3 3624 4 3332 6 0 2 9 0 24 0 3 3624 4 5 0 2 7 0 27 0 1 3339 4 3336 5 0 0 3305 4 24 0 3 3624 4 2 0 2 7 0 1 1 3 0 0 3340 5 0 0 3305 4 24 0 3 3624 4 2 0 2 9 0 PROCEDURE 660 3343 6 0 0 1 0 3344 18 0 3 13 0 24 0 3 3624 4 2 0 3 29 0 6 0 0 10 0 3348 18 0 1 4 0 4 0 0 8 0 24 0 3 3624 4 2 1 3 44 0 3352 24 0 2 0 0 24 0 3 3624 4 2 0 3 37 0 6 0 0 12 0 3356 24 0 3 3624 4 2 0 3 39 0 24 0 3 3624 4 2 1 3 46 0 3360 24 0 3 3624 4 6 0 0 3 0 3 0 0 15 0 24 0 3 3624 4 3364 2 0 3 40 0 1 1 3 0 0 24 0 3 3624 4 2 0 3 42 0 3368 24 0 3 3624 4 6 0 0 1 0 18 0 1 4125 0 1 1 2 126 0 3372 27 0 0 3376 4 24 0 3 3624 4 0 1 1 0 0 24 1 0 3377 4 3376 1 0 1 0 0 0 0 3 3639 4 24 0 3 3624 4 24 0 3 30 0 3380 0 1 0 30 0 PROCEDURE 661 3381 0 0 3 3624 4 6 0 0 0 0 27 0 0 3390 4 3384 6 0 0 10 0 26 1 3 3628 4 24 0 3 3624 4 23 1 3 128 0 3388 25 0 3 2 0 24 1 0 3386 4 6 0 0 1 0 27 0 0 3411 4 3392 18 0 3 3 0 2 0 0 3627 4 6 0 0 10 0 26 1 3 3628 4 3396 24 0 3 3627 4 23 1 3 2 0 25 0 3 2 0 24 1 0 3396 4 3400 6 0 0 1 0 1 1 2 3 0 26 1 3 3628 4 27 0 0 3407 4 3404 6 0 0 3627 4 1 1 1 2 0 2 0 0 3626 4 24 0 3 3626 4 3408 2 1 3 0 0 25 0 3 2 0 24 1 0 3407 4 1 1 3 0 0 3412 1 1 2 0 0 1 1 2 4 0 18 0 1 5 0 1 1 1 80 0 3416 4 0 0 20 0 24 0 3 3624 4 28 1 1 0 0 PROCEDURE 662 3419 6 1 0 3648 4 3420 24 0 3 3624 4 2 1 0 0 0 26 1 3 18 0 1 0 1 1027 0 3424 15 1 3 34 0 27 0 3 3465 4 2 0 0 3627 4 6 0 0 10 0 3428 18 0 1 4 0 4 0 3 66 0 24 0 3 3627 4 2 0 0 64 0 3432 6 0 3 35 0 27 0 0 3465 4 6 0 3 34 0 18 0 1 4124 0 3436 1 1 2 7 0 27 0 0 3442 4 1 1 2 1 0 27 0 0 3442 4 3440 1 1 2 3 0 27 0 1 3446 4 24 0 3 3627 4 2 0 0 0 0 3444 24 1 0 3454 4 2 0 0 0 0 1 1 1 5 0 27 0 0 3450 4 3448 1 1 2 7 0 27 0 1 3454 4 24 0 3 3627 4 6 0 0 64 0 3452 24 0 3 3627 4 2 0 0 65 0 6 0 3 34 0 18 0 1 6 0 3456 18 0 1 4120 0 1 1 2 128 0 27 0 0 3465 4 1 1 1 128 0 3460 2 0 0 3627 4 6 0 0 10 0 18 0 1 4 0 24 0 3 3627 4 3464 2 0 0 64 0 1 1 3 0 0 25 0 3 2 0 24 1 0 3423 4 3468 2 1 0 3634 4 24 0 3 3624 4 2 0 0 5 0 25 1 2 0 0 PROCEDURE 663 3472 26 1 1 3634 4 26 1 2 16 0 0 0 2 3633 4 6 0 2 20 0 3476 2 0 1 99 0 15 0 2 20 0 2 0 1 100 0 25 0 1 2 0 3480 25 0 2 2 0 24 1 0 3474 4 2 0 0 98 0 6 0 0 5 0 3484 4 0 0 5 0 18 0 1 5 0 24 0 3 3624 4 2 1 0 28 0 3488 1 0 1 1027 0 15 1 2 34 0 27 0 2 3494 4 25 0 2 2 0 3492 24 1 0 3491 4 24 1 0 3498 4 2 0 1 99 0 25 0 1 1 0 3496 25 0 2 2 0 24 1 0 3489 4 6 0 0 19 0 24 0 3 3624 4 3500 2 0 0 29 0 1 0 1 3 0 15 0 2 34 0 2 0 1 99 0 3504 5 0 1 99 0 1 1 2 64 0 2 0 1 100 0 25 0 1 2 0 3508 25 0 2 2 0 24 1 0 3502 4 6 0 0 1 0 18 0 3 3 0 3512 2 0 1 99 0 5 0 1 99 0 1 1 2 2 0 3 0 1 100 0 3516 1 1 2 2 0 3 0 1 101 0 1 1 2 2 0 2 0 1 102 0 3520 6 0 0 14 0 2 0 1 103 0 24 1 1 3624 4 24 0 3 3624 4 3524 26 0 0 0 0 24 0 3 3624 4 6 0 0 26 0 1 1 1 5 0 3528 2 0 0 14 0 PROCEDURE 664 3529 1 1 2 2 0 7 0 0 3643 4 24 0 2 3650 4 3532 24 0 3 3643 4 28 1 2 0 0 6 0 0 3642 4 27 0 3 3541 4 3536 27 0 1 3540 4 1 1 3 7710 0 24 0 3 3643 4 2 1 0 6 0 3540 26 0 0 3606 4 24 0 3 3624 4 26 0 0 0 0 1 1 3 76 0 3544 18 0 1 5 0 4 0 0 20 0 24 0 3 3624 4 28 1 1 0 0 3548 24 0 3 3624 4 26 0 0 0 0 26 0 0 3606 4 PROCEDURE 665 3551 24 1 1 3639 4 3552 26 1 1 16 0 6 1 1 20 0 2 1 0 3634 4 24 0 2 0 0 3556 5 0 0 3634 4 26 1 2 3634 4 26 1 3 3634 4 27 0 1 3564 4 3560 25 0 2 200 0 25 0 3 500 0 24 1 0 3564 4 24 1 0 3572 4 3564 25 0 3 180 0 1 1 3 0 0 6 0 0 3565 4 2 0 0 3564 4 3568 24 0 3 3624 4 2 1 3 0 0 25 0 3 2 0 24 1 0 3568 4 3572 6 0 0 10 0 24 0 3 3624 4 23 1 2 0 0 25 0 2 2 0 3576 24 1 0 3573 4 25 0 1 2 0 24 1 0 3553 4 1 1 3 0 0 3580 27 0 0 3589 4 6 0 0 11 0 27 0 0 3589 4 24 0 3 3624 4 3584 6 0 0 43 0 18 0 1 4124 0 7 0 0 3588 4 1 1 3 1500 0 3588 7 0 0 19 0 PROCEDURE 666 3589 6 0 0 3630 4 18 1 1 4123 0 24 0 2 0 0 3592 18 1 1 5 0 24 0 3 3624 4 2 1 0 26 0 24 0 2 146 0 3596 24 0 3 3624 4 2 1 0 28 0 1 1 3 146 0 24 0 3 3624 4 3600 2 0 0 1 0 1 1 3 0 0 24 0 3 3624 4 26 0 0 0 0 3604 6 0 0 3630 4 24 1 0 214 0 PROCEDURE 667 3606 0 0 0 0 0 24 0 3 3624 4 3608 6 0 1 35 0 1 1 1 2 0 24 0 3 3624 4 2 0 1 7 0 3612 24 0 2 3617 4 24 0 3 3624 4 2 0 1 42 0 24 0 3 3624 4 3616 24 1 0 0 0 1 1 3 0 0 24 0 3 3624 4 3 0 1 7 0 3620 24 0 3 3624 4 2 0 1 42 0 26 0 1 3606 4 0 0 0 0 0 SECTION 668 3624 0 0 14 0 0 0 0 0 3628 0 0 6 0 0 0 30 0 3632 0 0 1£££ 0 0 0 0 0 3636 0 0 0 0 £0000 0 66666 0 3640 35.5. 0 517 0 0 0 0 0 3644 35500 0 54517 0 0 0 0 0 3648 0 0 0 0 PROCEDURE 669 3650 0 0 0 3644 4 3 0 0 5 0 3652 0 0 0 138 0 2 0 0 1026 0 0 0 0 138 0 2 0 0 1554 0 3656 0 0 0 138 0 2 0 0 2066 0 0 0 0 3640 4 3 0 0 290 0 3660 0 0 0 156 0 0 0 0 20 0 0 0 0 3640 4 19 0 0 786 0 3664 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 PROCEDURE 670 3668 28 1 1 3672 4 24 0 3 3672 4 24 1 0 0 0 1 1 3 0 0 3672 0 0 0 0 0 2 0 0 48 0 24 0 1 16 0 6 0 0 20 0 3676 24 0 3 3672 4 2 1 0 28 0 24 0 3 3672 4 26 0 0 0 0 3680 24 1 2 3716 4 6 1 0 12 0 5 1 0 3718 4 27 0 1 3678 4 3684 24 0 2 98 0 24 0 3 3672 4 26 0 0 0 0 23 0 0 2 0 3688 0 0 0 16 0 24 1 0 3674 4 24 1 0 3697 4 2 0 0 3684 4 3692 1 1 2 23 0 7 0 0 3689 4 7 0 0 3718 4 6 0 0 200 0 3696 24 1 0 3676 4 26 1 2 18 0 6 0 2 67 0 27 0 0 3704 4 3700 2 0 0 3674 4 1 1 3 15 0 24 0 3 3674 4 23 1 0 0 0 3704 25 0 2 2 0 24 1 0 3698 4 6 0 0 3717 4 1 1 2 0 0 3708 24 0 3 3672 4 3 0 1 35 0 24 0 3 3672 4 2 0 1 7 0 3712 2 0 0 16 0 24 1 1 3672 4 6 1 0 3672 4 24 1 0 3668 4 SECTION 671 3716 40- 0 88017- 0 16773 0 53585 0 3720 0 0 0 0 PROCEDURE 672 3722 0 0 0 0 0 28 1 1 204 0 3724 24 1 0 3674 4 28 1 1 214 0 6 0 0 3673 4 1 1 1 152 0 3728 18 0 1 5 0 24 0 3 20 0 28 1 1 0 0 6 1 0 3734 4 3732 24 1 0 3723 4 0 0 0 0 0 0 0 0 0 0 2 0 0 10 0 3736 7 0 0 3707 4 24 0 2 16 0 2 0 0 3688 4 24 0 3 3672 4 3740 6 0 0 64 0 2 0 0 198 0 24 0 3 3672 4 6 0 0 124 0 3744 2 0 0 199 0 6 0 0 11 0 27 0 0 3766 4 1 1 3 0 0 3748 27 0 0 3766 4 6 0 0 3776 4 2 0 0 3690 4 1 0 1 15 0 3752 15 0 0 3778 4 24 0 3 3672 4 3 0 0 2 0 2 0 0 200 0 3756 24 0 3 200 0 1 1 3 0 0 24 0 3 3672 4 2 0 0 1 0 3760 24 0 3 20 0 5 0 0 165 0 4 0 0 3779 4 1 1 2 0 0 3764 24 0 3 3672 4 6 0 0 47 0 24 0 3 20 0 6 0 0 122 0 3768 27 0 0 3773 4 6 0 0 3777 4 18 0 1 5 0 24 0 3 20 0 3772 24 1 0 169 0 6 0 0 3777 4 18 0 1 5 0 24 1 0 3725 4 3776 6 0 0 3671 4 2 0 0 286 0 0 0 0 0 0 26 0 1 0 0 SECTION 673 3780 39249 0 904£ 0 9276 0 8209 0 3784 1009 0 1249 0 1209 0 8076 0 3788 1200 0 £208 0 £249 0 1e3+1 0 3792 1209 0 104£ 0 8241 0 201 0 3796 8209 0 1009 0 1041 0 21040 0 3800 9208 0 1201 0 77 0 £+40 0 3804 1049 0 9079 0 93+0 0 83+1 0 3808 8209 0 1009 0 9209 0 100£ 0 3812 9249 0 9276 0 8249 0 9249 0 3816 9241 0 9241 0 8248 0 8241 0 3820 9209 0 9249 0 8249 0 8041 0 3824 38249 0 1201 0 823£ 0 3e£££ 0 3828 .+0 0 38 0 38000 0 3.:e6 0 SECTION 674 3832 39181 0 13e£ 0 9:e6 0 £200 0 3836 0 0 0 0 8209 0 1219 0 3840 38000 0 .08 0 48 0 49 0 3844 28041 0 £249 0 1249 0 9249 0 3848 333e6 0 1609 0 1249 0 9209 0 3852 9.79 0 9241 0 9209 0 9249 0 3856 9249 0 9208 0 1241 0 6:e6 0 3860 249 0 1+41 0 9249 0 9249 0 3864 8041 0 9248 0 9249 0 8049 0 3868 .:e6 0 1009 0 1009 0 .49 0 3872 8041 0 249 0 1180 0 0 0 3876 249 0 9276 0 83+8 0 8049 0 3880 8:e6 0 8248 0 36041 0 36:e6 0 3884 9049 0 9209 0 1249 0 9248 0 3888 9389 0 9049 0 9001 0 9249 0 3892 9049 0 8249 0 9249 0 6249 0 3896 9249 0 9249 0 8:e6 0 31249 0 3900 9249 0 9049 0 9001 0 9249 0 3904 1241 0 1208 0 9246 0 9249 0 3908 9049 0 9049 0 9249 0 9009 0 3912 9208 0 9241 0 19249 0 e:89 0 3916 820e 0 £20e 0 1636 0 9209 0 3920 9041 0 .:e6 0 9249 0 9209 0 3924 8009 0 9200 0 6 0 3.:e6 0 SECTION 675 3928 10041 0 9.49 0 9240 0 11249 0 3932 120t 0 8289 0 :e6 0 0 0 3936 0 0 28t28 0 28t38 0 28t00 0 3940 9402 0 t280 0 8249 0 9041 0 3944 1081 0 1249 0 t400 0 t3+£ 0 3948 9250 0 8092 0 e209 0 11248 0 3952 8278 0 36:81 0 1201 0 9249 0 3956 11.82 0 2:e6 0 448 0 8249 0 3960 9208 0 11041 0 10276 0 1040 0 3964 1009 0 1140t 0 241 0 924t 0 3968 10250 0 9081 0 9241 0 1049 0 3972 9236 0 11089 0 t40t 0 12236 0 3976 £058 0 8678 0 9249 0 t049 0 3980 1012 0 1249 0 8248 0 t048 0 3984 £281 0 91+t 0 1249 0 9249 0 3988 9249 0 83+8 0 9208 0 11041 0 3992 1249 0 9041 0 8248 0 9249 0 3996 8201 0 1040 0 200 0 11+0 0 4000 0 0 38 0 0 0 38 0 4004 28t28 0 £e6 0 SECTION 676 4006 2049 0 9249 0 4008 89£6 0 980+ 0 t452 0 11209 0 4012 2281 0 11201 0 t281 0 8008 0 4016 8001 0 39000 0 10480 0 10081 0 4020 9248 0 8249 0 1476 0 41 0 4024 1041 0 9208 0 8249 0 820£ 0 4028 1.40 0 £241 0 1409 0 9241 0 4032 11e6 0 10291 0 t240 0 :e6 0 4036 9201 0 30240 0 2048 0 411 0 4040 e:e6 0 36288 0 £67£ 0 140 0 4044 t05 0 51e6 0 36080 0 28400 0 4048 502: 0 2:146 0 502: 0 t28 0 4052 140 0 28t05 0 28 0 28e68 0 4056 :e6 0 2028 0 10000 0 7 0 4060 £+0 0 0 0 3. 0 8209 0 SECTION 677 4064 6:e2 0 12089 0 8089 0 1049 0 4068 9208 0 1001 0 .:e6 0 241 0 4072 9208 0 124£ 0 1208 0 8248 0 4076 1210 0 8411 0 2211 0 107t 0 4080 8.41 0 1804e 0 8240 0 t289 0 4084 288 0 t240 0 t049 0 1201 0 4088 1£002 0 £262 0 2250 0 1108t 0 4092 208 0 9.78 0 8:e6 0 9042 0 4096 .79 0 10200 0 92+6 0 t292 0 4100 10052 0 10202 0 83e6 0 t00t 0 4104 8092 0 200t 0 2410 0 10491 0 4108 £202 0 36:81 0 9049 0 104£ 0 4112 479 0 39291 0 11248 0 1201 0 4116 900t 0 8041 0 3944e 0 1088 0 4120 10236 0 1108e 0 19.50 0 8041 0 4124 83£9 0 1040 0 6:e6 0 36:e6 0 4128 38000 0 3£ 0 3£ 0 .00 0 4132 28000 0 t00 0 28000 0 3.:e6 0 SECTION 678 4136 9.+0 0 32441 0 3904t 0 £089 0 4140 8251 0 12241 0 241 0 1089 0 4144 £000 0 451 0 409 0 1e6 0 4148 t27t 0 848£ 0 9209 0 1t40e 0 4152 1028e 0 10242 0 1048 0 38£e6 0 SECTION 679 4156 1:7+. 0 6188 0 2080+ 0 +31£ 0 4160 :£££ 0 1.7:£ 0 1:79: 0 1.79. 0 4164 1££9£ 0 1£787 0 62:+ 0 1++1. 0 4168 .1e. 0 2075+ 0 1t1££ 0 3££.0 0 4172 61t1 0 21398 0 18£££ 0 18£9: 0 4176 .5t0 0 16£££ 0 3£186 0 1e£££ 0 4180 15617 0 3.21: 0 £79. 0 108.0 0 4184 20£££ 0 3££££ 0 11452 0 13706 0 4188 143+t 0 1.759 0 12t£. 0 91+6 0 4192 e61+ 0 2e£e£ 0 SECTION 1024 4194 0 0 0 0 4196 0 0 0 0 0 0 0 0 4200 0 0 0 0 0 0 0 0 4204 0 0 0 0 0 0 0 0 4208 4 0 t 0 0 0 23 0 4212 8000 0 5146 0 0 0 11 0 4216 0 0 20028 0 0 0 20032 0 4220 0 0 2000. 0 0 0 0 0 4224 6 0 t 0 0 0 24 0 4228 0 0 27 0 1 0 64 0 4232 0 0 t 0 0 0 6 0 4236 0 0 3 0 0 0 . 0 4240 36653 0 51636 0 0 0 8 0 4244 0 0 4 0 :5:5: 0 5:5:5 0 4248 0 0 2001£ 0 0 0 30 0 4252 9+3 0 0 0 0 0 28 0 4256 0 0 7 0 0 0 90 0 4260 0 0 20034 0 0 0 12+ 0 4264 0 0 28 0 SECTION 1025 4266 2 0 1 0 4268 0 0 2001 0 5767 0 80000 0 4272 66666 0 +4000- 0 SECTION 1026 PROCEDURE 1006 CHAPT 7 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 11 12 0 0 0 0 12 0 0 0 0 13 0 0 0 0 14 0 0 0 0 15 16 0 0 0 0 16 0 0 0 0 17 0 0 0 0 18 0 0 0 0 19 20 0 0 0 0 20 0 0 0 0 21 0 0 0 0 22 0 0 0 0 23 24 0 0 0 0 24 0 0 0 0 25 0 0 0 0 0 25 1 1 4096 0 28 24 0 3 0 4 23 0 2 0 1792 0 0 0 0 0 0 0 0 0 0 32 26 0 1 26 4 PROCEDURE 680 33 0 1 0 2948 4 0 0 3 0 4 1 1 3 7 0 36 0 0 2 3032 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 1024 40 0 1 1 2948 4 6 0 0 6279 4 27 0 0 45 4 6 1 0 5406 4 44 2 1 0 5000 4 24 0 2 1776 4 24 1 2 15 4 28 1 2 0 0 48 6 0 0 6278 4 27 0 0 59 4 6 1 0 2962 4 24 1 2 15 4 52 2 1 0 12 0 6 1 0 1700 4 24 1 2 15 4 2 1 0 14 0 56 1 0 1 15 0 24 1 2 15 4 14 1 0 10 0 0 1 0 2948 4 60 0 0 3 0 4 24 1 2 15 4 24 0 2 0 0 25 1 1 4096 0 64 24 0 3 0 4 23 0 2 0 1280 0 1 1 2948 4 6 1 0 2964 4 68 24 1 2 15 4 28 1 1 0 0 6 0 0 6279 4 27 0 1 497 4 72 6 1 0 2966 4 28 1 1 3040 4 6 1 0 2968 4 2 1 0 7354 4 76 26 1 2 2970 4 26 0 0 1478 4 24 1 2 21 4 24 0 2 4 0 80 18 1 1 4123 0 1 1 3 8 0 18 1 1 5 0 28 1 1 4946 4 84 24 0 3 1 4 2 0 0 74 0 6 1 0 4946 4 18 1 1 4126 0 88 5 1 0 1640 4 27 0 0 101 4 6 1 0 2972 4 4 0 0 6275 4 92 3 1 0 2948 4 26 1 3 2948 4 1 1 3 8 0 0 0 2 3032 4 96 25 1 1 4096 0 24 0 3 0 4 26 0 2 0 512 0 0 0 33 1 100 0 0 0 76 3 24 1 2 21 4 6 1 0 1 0 2 0 0 1204 4 104 26 1 2 2970 4 24 1 2 21 4 6 1 2 4 0 18 1 1 4126 0 108 5 1 0 1640 4 27 0 1 126 4 18 1 1 2 0 1 1 2 70 0 112 27 0 0 126 4 1 1 2 1 0 27 0 0 126 4 27 0 3 119 4 116 1 1 2 8 0 27 0 0 130 4 24 1 0 126 4 24 1 2 21 4 120 6 1 2 7 0 2 0 0 3040 4 24 1 2 21 4 6 1 2 9 0 124 24 0 1 3040 4 2 0 0 3040 4 25 0 2 8 0 24 1 0 105 4 128 26 0 0 1478 4 24 1 0 104 4 0 1 0 2948 4 0 0 3 0 4 132 0 1 2 2974 4 6 1 0 2976 4 4 0 0 11 4 25 1 1 4096 0 136 24 0 3 0 4 23 0 2 0 256 0 1 1 2948 4 26 0 0 1478 4 140 6 0 0 1204 4 24 1 2 21 4 5 1 0 1 0 27 0 3 130 4 144 27 0 1 139 4 24 0 2 5406 4 18 1 1 4123 0 1 1 3 100 0 148 18 1 1 5 0 28 1 1 3040 4 1 1 3 204 0 2 0 0 4040 4 152 24 0 1 5999 4 6 0 0 4041 4 24 0 1 5999 4 2 0 0 5371 4 156 24 0 2 5372 4 18 1 1 4123 0 6 0 0 5999 4 18 1 1 5 0 160 28 0 0 4042 4 24 0 1 5999 4 6 0 0 5356 4 2 0 0 4041 4 164 2 0 0 6273 4 PROCEDURE 681 165 6 0 0 5000 4 24 1 2 19 4 2 1 0 7 0 168 6 0 0 5001 4 24 1 2 19 4 2 1 0 9 0 6 1 0 1688 4 172 24 1 2 19 4 2 1 0 4 0 26 0 0 1591 4 26 1 2 2968 4 176 26 1 1 2978 4 6 0 1 3040 4 26 0 0 639 4 25 0 1 1 0 180 24 1 0 177 4 26 1 1 2980 4 6 0 1 5980 4 26 0 0 639 4 184 25 0 1 1 0 24 1 0 182 4 26 1 1 2982 4 6 0 1 6206 4 188 26 0 0 639 4 25 0 1 1 0 24 1 0 187 4 26 1 1 2984 4 192 6 0 1 5038 4 26 0 0 639 4 25 0 1 1 0 24 1 0 192 4 196 26 1 1 2976 4 6 0 1 5138 4 26 0 0 639 4 25 0 1 1 0 200 24 1 0 197 4 26 0 0 1591 4 PROCEDURE 682 202 26 1 1 2968 4 1 1 3 1 0 204 2 0 0 5014 4 24 0 2 1808 4 24 1 2 19 4 28 1 2 4 0 208 26 0 0 1591 4 24 0 2 1818 4 24 1 2 15 4 28 1 2 2 0 212 1 1 3 2 0 3 0 0 5014 4 26 0 0 1513 4 26 1 2 2970 4 216 24 1 0 218 4 PROCEDURE 683 217 26 0 0 1472 4 26 0 0 1608 4 6 1 0 4946 4 220 18 1 1 4126 0 5 1 0 1640 4 27 0 1 667 4 18 1 1 2 0 224 1 1 2 72 0 27 0 2 309 4 1 1 1 8 0 2 0 0 7341 4 228 6 1 0 4951 4 2 0 0 5021 4 6 1 0 4949 4 26 0 0 1621 4 232 3 0 0 5015 4 2 0 0 1706 4 0 0 3 3033 4 PROCEDURE 684 235 24 0 1 7340 4 236 26 0 1 236 4 0 0 0 275 3 0 0 0 239 3 6 1 0 4949 4 240 27 0 0 217 4 6 1 0 4951 4 26 0 0 1621 4 0 0 3 3033 4 244 2 0 0 5034 4 24 0 2 1822 4 0 1 0 2948 4 0 0 3 0 4 248 24 1 2 15 4 24 0 2 0 0 4 0 0 7354 4 2 0 0 2954 4 252 0 1 1 2948 4 24 0 3 2954 4 28 1 2 2 0 6 0 0 7341 4 256 1 1 2 6 0 27 0 1 268 4 6 1 0 2986 4 0 1 0 2948 4 260 0 0 3 0 4 24 1 2 15 4 24 0 2 0 0 4 0 0 7354 4 264 2 0 0 2954 4 0 1 1 2948 4 24 0 3 2954 4 2 1 0 2 0 268 23 0 0 4 0 0 0 0 7354 3 24 1 0 217 4 26 0 0 1513 4 272 6 1 0 2968 4 2 1 0 7354 4 24 1 0 217 4 6 1 0 7360 4 276 2 1 0 1670 4 6 0 0 4999 4 27 0 0 280 4 26 0 0 1204 4 280 6 1 0 1670 4 2 1 0 7360 4 2 0 0 5035 4 6 0 0 7341 4 284 1 1 2 1 0 27 0 1 289 4 6 1 0 1660 4 0 1 2 1662 4 288 24 1 0 303 4 PROCEDURE 685 289 1 1 2 5 0 27 0 1 295 4 6 1 0 2988 4 292 24 1 2 15 4 2 1 0 2 0 24 1 0 307 4 1 1 2 1 0 296 27 0 1 301 4 6 1 0 2982 4 2 1 0 7354 4 6 1 0 2990 4 300 24 1 0 292 4 6 1 0 1664 4 0 1 2 1666 4 0 1 0 5016 4 304 24 0 2 1848 4 24 1 2 15 4 28 1 2 2 0 26 0 0 1513 4 308 24 1 0 217 4 PROCEDURE 686 309 26 0 0 1472 4 26 0 0 1608 4 6 1 0 4946 4 312 5 1 0 1652 4 27 0 0 1475 4 6 1 0 4946 4 18 0 1 4126 0 316 5 1 0 1640 4 27 0 1 309 4 6 0 0 1756 4 24 1 2 19 4 320 2 1 1 5 0 24 1 2 19 4 2 1 1 6 0 26 0 0 1591 4 324 26 1 1 2968 4 6 0 0 4999 4 27 0 0 328 4 26 0 0 1204 4 PROCEDURE 687 328 1 1 3 0 0 2 0 0 5026 4 2 0 0 5035 4 24 0 2 1808 4 332 24 1 2 19 4 28 1 2 4 0 6 0 0 5014 4 26 0 0 1627 4 336 24 1 2 19 4 2 1 0 5 0 24 0 1 7340 4 26 0 1 339 4 340 0 0 0 345 3 0 0 0 342 3 26 0 0 1513 4 6 1 0 2968 4 344 2 1 0 7354 4 24 0 2 1818 4 24 1 2 15 4 28 1 2 2 0 348 6 1 0 2982 4 2 1 0 7360 4 0 0 3 3034 4 1 1 3 1 0 352 7 0 0 5014 4 0 0 3 3033 4 6 0 0 5014 4 1 1 2 1 0 356 5 0 0 5999 4 27 0 1 369 4 24 0 2 1678 4 18 1 1 4123 0 360 1 1 3 6 0 18 1 1 5 0 24 1 2 15 4 28 1 1 10 0 364 1 1 3 202 0 2 0 0 5026 4 26 0 0 1513 4 26 0 0 1591 4 368 24 1 0 421 4 6 1 0 4946 4 5 1 0 1636 4 26 1 1 2992 4 372 27 0 0 377 4 26 1 1 2968 4 26 0 0 1513 4 26 0 0 1591 4 376 24 1 0 219 4 6 0 0 6273 4 27 0 0 412 4 18 0 1 5 0 380 3 1 0 2948 4 26 1 3 2948 4 6 1 0 2994 4 24 1 2 15 4 384 28 1 1 2 0 26 0 0 1513 4 26 0 0 1513 4 26 0 0 1513 4 388 6 1 0 2996 4 24 1 2 15 4 2 1 0 4 0 6 1 0 2998 4 392 24 1 2 15 4 2 1 0 6 0 26 0 0 1513 4 24 0 3 1 4 396 6 0 3 77 0 26 0 0 1621 4 2 0 0 1621 4 24 0 3 1 4 400 6 0 3 76 0 2 0 0 1513 4 0 0 3 3033 4 24 0 2 1772 4 404 24 1 2 15 4 28 1 2 4 0 26 0 0 1513 4 25 0 3 2 0 408 24 1 0 395 4 26 0 0 1513 4 26 0 0 1513 4 26 0 0 1513 4 412 24 0 2 3040 4 18 1 1 4123 0 1 1 3 1000 0 18 1 1 5 0 416 24 0 3 1 4 28 1 1 1074 0 6 0 0 6278 4 27 0 0 33 4 420 24 1 0 1090 4 PROCEDURE 688 421 1 1 3 3840 0 2 1 0 4967 4 1 1 3 202 0 424 2 1 0 4969 4 26 0 0 1238 4 1 1 3 20 0 2 0 0 7360 4 428 1 1 3 0 0 2 1 0 4967 4 2 1 0 4969 4 26 0 0 1079 4 432 26 0 0 1079 4 PROCEDURE 689 433 6 0 0 5977 4 18 0 1 5 0 27 0 0 318 4 436 3 1 0 2948 4 26 1 3 2948 4 6 1 3 6106 4 2 1 0 5580 4 440 24 0 3 0 4 6 1 0 6 22 2 1 0 5556 4 1 1 3 1 0 444 2 1 0 5558 4 0 0 3 5580 4 1 1 2 1 0 18 1 1 4118 0 448 1 1 3 0 0 18 1 1 10 0 2 1 0 5550 4 0 0 3 5581 4 452 1 1 2 1 0 0 0 3 3033 4 2 1 0 5552 4 6 0 0 5581 4 456 2 0 0 5552 4 0 1 2 5552 4 6 1 0 3000 4 2 1 0 7356 4 460 15 0 0 1759 4 2 0 0 5554 4 5 0 0 5554 4 1 1 1 16 0 464 18 0 1 5 0 2 1 0 5552 4 26 1 3 5552 4 0 0 3 5580 4 468 5 1 0 5550 4 24 0 1 7356 4 4 1 0 5558 4 27 0 2 495 4 472 25 0 3 1 0 24 1 0 469 4 4 1 0 5550 4 24 0 1 7356 4 476 2 1 0 5560 4 0 0 3 3033 4 18 1 1 4127 0 23 0 0 2 0 480 0 0 0 7356 3 24 1 0 460 4 26 1 3 3002 4 6 0 3 5558 4 484 2 1 0 4969 4 26 0 0 1079 4 6 0 3 5559 4 2 1 0 4969 4 488 26 0 0 1079 4 25 0 3 2 0 24 1 0 483 4 26 1 3 5556 4 492 25 0 3 2 0 24 1 0 438 4 24 1 0 318 4 6 1 0 1746 4 496 24 1 0 475 4 PROCEDURE 690 497 6 0 0 5000 4 24 1 2 19 4 3 1 0 5 0 500 24 1 2 19 4 2 1 0 13 0 6 0 0 5001 4 24 1 2 19 4 504 3 1 0 7 0 24 1 2 19 4 2 1 0 15 0 1 1 3 2 0 508 24 1 2 19 4 2 1 0 11 0 1 1 3 3 0 24 1 2 19 4 512 2 1 0 19 0 1 1 3 4 0 24 1 2 19 4 2 1 0 17 0 516 6 0 0 1746 4 24 1 2 19 4 2 1 0 21 0 26 0 0 1591 4 520 26 0 0 656 4 24 1 2 17 4 6 1 0 5 0 5 0 0 1746 4 524 27 0 1 520 4 1 0 1 1 0 24 1 2 17 4 15 1 0 7 0 528 1 1 2 5 0 27 0 1 520 4 6 0 0 5001 4 24 1 2 17 4 532 2 1 0 11 0 26 0 0 876 4 26 0 0 656 4 24 1 2 17 4 536 6 1 0 42 0 5 1 0 3004 4 27 0 1 533 4 24 1 2 17 4 540 6 1 0 13 0 3 0 0 5979 4 2 0 0 5999 4 6 0 0 5001 4 544 24 1 2 17 4 2 1 0 41 0 26 0 0 876 4 26 0 0 656 4 548 24 1 2 17 4 6 1 0 4 0 5 1 0 1688 4 27 0 1 546 4 552 6 0 0 5001 4 24 1 2 17 4 2 1 0 9 0 26 0 0 876 4 PROCEDURE 691 556 26 1 2 3006 4 26 1 1 2978 4 26 0 0 647 4 2 0 1 3040 4 560 25 0 1 1 0 24 1 0 558 4 26 1 1 2980 4 26 0 0 647 4 564 2 0 1 5980 4 25 0 1 1 0 24 1 0 563 4 26 1 1 2982 4 568 26 0 0 647 4 2 0 1 6206 4 25 0 1 1 0 24 1 0 568 4 572 26 1 1 2984 4 26 0 0 647 4 2 0 1 5038 4 25 0 1 1 0 576 24 1 0 573 4 26 1 1 2976 4 26 0 0 647 4 2 0 1 5138 4 580 25 0 1 1 0 24 1 0 578 4 26 0 0 656 4 24 1 2 17 4 584 6 1 0 12 0 5 1 0 1634 4 27 0 0 622 4 24 1 2 17 4 588 6 1 0 4 0 5 1 0 1634 4 27 0 0 627 4 4 1 0 1634 4 592 5 1 0 1638 4 27 0 0 627 4 4 1 0 1638 4 1 1 2 85 0 596 27 0 0 612 4 24 1 2 17 4 6 1 0 12 0 5 1 0 3008 4 600 27 0 1 625 4 26 0 0 656 4 24 1 2 17 4 6 1 0 4 0 604 5 1 0 1634 4 27 0 0 627 4 4 1 0 1634 4 5 1 0 1638 4 608 27 0 0 627 4 4 1 0 1638 4 1 1 2 85 0 27 0 1 601 4 612 2 0 0 6269 4 0 1 0 2948 4 0 0 3 0 4 6 1 0 3010 4 616 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 620 0 1 1 2948 4 24 1 0 629 4 6 0 0 5001 4 24 1 2 17 4 624 2 1 0 11 0 26 0 0 876 4 24 1 0 582 4 1 1 3 1 0 628 2 0 0 6269 4 0 1 0 2948 4 0 0 3 0 4 0 1 2 3012 4 632 6 1 0 3014 4 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 636 23 0 2 0 256 0 0 3 2952 4 24 1 0 412 4 PROCEDURE 692 639 0 0 0 0 0 640 24 1 2 19 4 2 1 2 5 0 25 0 2 2 0 24 1 0 646 4 644 26 0 0 1591 4 26 1 2 2968 4 26 0 1 639 4 PROCEDURE 693 647 0 0 0 0 0 648 25 0 2 2 0 24 1 0 653 4 26 0 0 656 4 26 0 0 876 4 652 26 1 2 2968 4 24 1 2 17 4 6 1 2 5 0 26 0 1 647 4 PROCEDURE 694 656 0 0 0 0 0 0 1 0 2948 4 0 0 3 0 4 0 0 2 16 4 660 6 1 0 3016 4 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 664 23 0 2 0 256 0 1 1 2948 4 26 0 1 656 4 PROCEDURE 695 667 24 0 1 7341 4 668 26 0 1 668 4 0 0 0 676 3 0 0 0 815 3 0 0 0 935 3 672 0 0 0 935 3 0 0 0 987 3 0 0 0 676 3 0 0 0 1013 3 PROCEDURE 696 676 6 1 0 4951 4 18 1 1 4126 0 2 0 0 5016 4 18 1 3 1 0 680 2 0 0 5022 4 18 1 3 7 0 2 1 0 4967 4 0 1 2 4953 4 684 6 1 0 4949 4 27 0 0 703 4 1 1 2 1 0 27 0 0 734 4 688 1 1 2 1 0 27 0 1 701 4 15 0 0 1749 4 2 0 0 5017 4 692 0 0 2 5022 4 27 1 0 696 4 4 0 0 5017 4 24 1 0 697 4 696 5 0 0 5017 4 24 0 1 5016 4 5 0 0 3040 4 2 1 0 4969 4 700 24 1 0 729 4 6 1 0 4949 4 2 1 0 4967 4 PROCEDURE 697 703 15 0 0 1749 4 704 2 0 0 5017 4 6 1 0 4953 4 2 1 0 4969 4 0 0 2 5022 4 708 27 1 0 711 4 5 0 0 5017 4 2 0 0 5017 4 6 0 0 5017 4 712 24 0 1 5016 4 4 0 0 3040 4 27 0 3 718 4 0 0 2 1749 4 716 14 1 0 4969 4 24 1 0 729 4 PROCEDURE 698 718 6 0 0 3035 4 2 1 0 4969 4 720 2 1 0 4967 4 26 1 3 6273 4 6 0 0 5016 4 18 0 1 5 0 724 4 0 0 1706 4 24 0 3 1 4 2 1 3 76 0 1 1 3 2 0 728 7 0 0 6273 4 26 0 0 1238 4 24 0 1 7340 4 26 0 1 731 4 732 0 0 0 774 3 0 0 0 217 3 PROCEDURE 699 734 6 0 0 1761 4 27 0 0 747 4 736 0 1 0 2948 4 0 0 3 0 4 6 0 0 1 4 4 0 0 7366 4 740 2 0 0 2954 4 0 1 1 2948 4 24 0 3 2954 4 6 0 0 74 0 744 18 0 3 2 0 18 0 1 4125 0 24 1 0 756 4 0 0 2 1760 4 748 0 1 0 2948 4 0 0 3 0 4 6 0 0 1 4 4 0 0 7366 4 752 2 0 0 2954 4 0 1 1 2948 4 24 0 3 2954 4 15 0 0 74 0 756 24 0 1 5016 4 4 0 0 3040 4 2 0 0 5016 4 0 1 2 4953 4 760 15 0 0 1750 4 27 0 3 764 4 4 0 0 5016 4 24 1 0 765 4 764 5 0 0 5016 4 2 1 0 4969 4 1 1 3 1 0 5 0 0 1761 4 768 3 0 0 1761 4 27 0 1 729 4 23 0 0 4097 0 0 0 0 7366 3 772 24 1 0 773 4 24 1 0 729 4 PROCEDURE 700 774 0 1 2 4969 4 18 1 1 6 0 776 2 0 0 5019 4 18 1 3 1 0 2 0 0 5023 4 18 1 3 2 0 780 2 0 0 5024 4 18 1 3 13 0 2 0 0 5022 4 6 1 0 4969 4 784 27 0 2 787 4 1 1 3 16 0 7 0 0 5019 4 PROCEDURE 701 787 6 1 0 4967 4 788 26 0 0 1621 4 2 0 0 4970 4 6 0 0 5022 4 26 0 0 1621 4 792 2 1 0 4968 4 6 0 0 5019 4 26 0 0 1621 4 2 1 0 4966 4 796 0 0 3 3033 4 24 0 2 1860 4 0 1 0 2948 4 0 0 3 0 4 800 24 1 2 15 4 24 0 2 0 0 4 0 0 7360 4 2 0 0 2954 4 804 0 1 1 2948 4 24 0 3 2954 4 28 1 2 4 0 1 1 3 1 0 808 7 0 0 5035 4 2 0 0 4999 4 23 0 0 10 0 0 0 0 7360 3 812 24 1 0 217 4 26 0 0 1204 4 24 1 0 217 4 PROCEDURE 702 815 6 1 0 4947 4 816 18 1 1 4126 0 2 0 0 5016 4 18 1 3 1 0 2 0 0 5019 4 820 18 1 3 7 0 3 1 0 4967 4 2 1 0 4971 4 PROCEDURE 703 823 6 1 0 4952 4 824 2 1 0 4972 4 6 1 0 4951 4 27 0 0 847 4 24 0 1 5016 4 828 6 0 0 3040 4 1 0 1 15 0 15 1 0 4951 4 2 0 0 5020 4 832 6 1 0 4973 4 27 0 2 836 4 5 0 0 5020 4 24 1 0 837 4 836 4 0 0 5020 4 2 1 0 4973 4 0 0 2 5019 4 27 1 0 848 4 840 5 1 0 4973 4 27 0 0 845 4 2 1 0 4973 4 2 0 0 5019 4 844 24 1 0 848 4 2 0 0 5019 4 6 0 0 1754 4 2 1 0 4971 4 848 24 0 1 5016 4 6 0 0 3040 4 4 1 0 4949 4 2 1 0 4969 4 852 6 0 0 5019 4 27 0 0 856 4 6 0 0 1754 4 2 1 0 4971 4 856 26 0 0 1238 4 6 1 0 4967 4 26 0 0 1621 4 2 0 0 5020 4 860 0 1 2 4969 4 18 1 1 6 0 1 1 3 0 0 18 1 1 4 0 864 26 0 0 1621 4 2 0 0 5028 4 0 0 3 3033 4 1 0 1 16 0 868 15 1 0 4969 4 7 0 0 5020 4 6 1 0 4970 4 2 1 0 4966 4 872 6 1 0 4972 4 2 1 0 4968 4 26 0 0 1238 4 24 1 0 886 4 PROCEDURE 704 876 0 0 0 0 0 24 1 2 17 4 24 0 2 4 0 18 1 1 4123 0 880 1 1 3 50 0 18 1 1 5 0 24 1 2 19 4 28 1 1 4 0 884 26 0 0 1591 4 26 0 1 876 4 PROCEDURE 705 886 1 0 1 15 0 24 0 1 7340 4 888 26 0 1 888 4 0 0 0 891 3 0 0 0 217 3 15 1 0 4969 4 892 26 0 0 1621 4 0 0 3 3033 4 2 0 0 1670 4 2 0 0 4988 4 896 6 1 0 4969 4 27 0 3 901 4 6 1 0 4967 4 18 0 1 4125 0 900 27 0 0 903 4 1 1 3 1 0 2 0 0 4988 4 26 1 3 3018 4 904 0 1 2 4969 4 18 1 1 6 0 2 0 3 4966 4 18 1 1 1 0 908 25 0 3 1 0 24 1 0 906 4 26 1 3 3018 4 6 0 3 4966 4 912 26 0 0 1621 4 2 0 3 4966 4 25 0 3 1 0 24 1 0 911 4 916 0 0 3 3033 4 24 0 2 1828 4 0 1 0 2948 4 0 0 3 0 4 920 24 1 2 15 4 24 0 2 0 0 4 0 0 7360 4 2 0 0 2954 4 924 0 1 1 2948 4 24 0 3 2954 4 28 1 2 4 0 1 1 3 2 0 928 7 0 0 5035 4 2 0 0 4999 4 23 0 0 20 0 0 0 0 7360 3 932 24 1 0 217 4 26 0 0 1204 4 24 1 0 217 4 PROCEDURE 706 935 6 1 0 3020 4 936 2 1 0 7356 4 24 0 1 7356 4 6 1 0 4947 4 18 1 1 4126 0 940 2 0 0 5016 4 18 1 1 2 0 2 1 0 4967 4 0 0 2 1757 4 944 15 1 0 4967 4 27 0 0 948 4 6 0 0 1754 4 2 1 0 4967 4 948 6 0 0 7341 4 1 1 2 3 0 27 0 1 957 4 24 0 1 7356 4 952 6 1 0 4949 4 27 0 2 959 4 24 0 1 5016 4 5 0 0 3040 4 956 24 1 0 961 4 24 0 1 7356 4 6 1 0 4949 4 24 0 1 5016 4 960 4 0 0 3040 4 2 1 0 4969 4 26 0 0 1238 4 6 1 0 4969 4 964 24 0 1 7356 4 2 0 0 4970 4 6 1 0 4967 4 24 0 1 7356 4 968 2 0 0 4972 4 23 0 0 4 0 0 0 0 7356 3 24 1 0 937 4 972 24 0 1 7340 4 26 0 1 973 4 0 0 0 976 3 0 0 0 217 3 976 24 0 2 1792 4 0 1 0 2948 4 0 0 3 0 4 24 1 2 15 4 980 24 0 2 0 0 4 0 0 7360 4 2 0 0 2954 4 0 1 1 2948 4 984 24 0 3 2954 4 28 1 2 4 0 24 1 0 927 4 PROCEDURE 707 987 6 1 0 3020 4 988 2 1 0 7356 4 1 1 3 0 0 2 1 0 4967 4 24 0 1 7356 4 992 6 1 0 4946 4 2 1 0 4968 4 26 0 0 1238 4 23 0 0 2 0 996 0 0 0 7356 3 24 1 0 991 4 24 0 1 7340 4 26 0 1 999 4 1000 0 0 0 1002 3 0 0 0 217 3 6 1 0 3020 4 2 1 0 7356 4 1004 24 0 1 7356 4 6 1 0 4947 4 2 0 0 4970 4 2 0 0 4972 4 1008 26 0 0 1060 4 23 0 0 2 0 0 0 0 7356 3 24 1 0 1004 4 1012 24 1 0 217 4 PROCEDURE 708 1013 6 1 0 4946 4 5 1 0 1656 4 27 0 1 1054 4 1016 6 1 0 4951 4 2 0 0 5016 4 6 1 0 4953 4 24 0 0 5016 4 1020 4 0 0 3040 4 5 0 0 5021 4 3 1 0 4969 4 7 0 0 5021 4 1024 1 1 3 3840 0 2 1 0 4967 4 26 0 0 1238 4 24 0 1 7340 4 1028 26 0 1 1028 4 0 0 0 1031 3 0 0 0 217 3 6 1 0 4967 4 1032 2 0 0 4972 4 6 1 0 4969 4 2 0 0 4970 4 1 1 3 1 0 1036 2 0 0 4999 4 24 0 2 1788 4 0 1 0 2948 4 0 0 3 0 4 1040 24 1 2 15 4 24 0 2 0 0 4 0 0 7354 4 2 0 0 2954 4 1044 0 1 1 2948 4 24 0 3 2954 4 28 1 2 4 0 23 0 0 10 0 1048 0 0 0 7354 3 24 1 0 217 4 26 0 0 1513 4 6 1 0 2982 4 1052 2 1 0 7354 4 24 1 0 217 4 1 1 3 1 0 7 0 0 5021 4 1056 6 1 0 4953 4 2 1 0 4969 4 6 1 0 4951 4 24 1 0 1025 4 PROCEDURE 709 1060 0 0 0 0 0 1 1 3 1 0 7 0 0 5035 4 2 0 0 4999 4 1064 24 0 2 1788 4 0 1 0 2948 4 0 0 3 0 4 24 1 2 15 4 1068 24 0 2 0 0 4 0 0 7360 4 2 0 0 2954 4 0 1 1 2948 4 1072 24 0 3 2954 4 28 1 2 4 0 23 0 0 10 0 0 0 0 7360 3 1076 24 1 0 1078 4 26 0 0 1204 4 26 0 1 1060 4 PROCEDURE 710 1079 0 0 0 0 0 1080 26 0 0 1238 4 6 1 0 4969 4 2 0 0 4970 4 2 0 0 4972 4 1084 24 0 1 7340 4 26 0 1 1085 4 0 0 0 1088 3 0 0 0 1089 3 1088 26 0 0 1060 4 26 0 1 1079 4 PROCEDURE 711 1090 6 1 0 3008 4 24 1 2 19 4 1092 2 1 0 12 0 26 0 0 1591 4 24 0 2 1928 4 3 1 0 2948 4 1096 26 1 2 2948 4 24 0 2 1262 4 3 1 0 2948 4 26 1 3 2948 4 1100 24 0 2 1460 4 3 1 0 2948 4 26 1 1 2948 4 6 0 0 1262 4 1104 18 0 3 2 0 2 0 0 1229 4 6 0 0 1460 4 18 0 3 2 0 1108 2 0 0 1235 4 6 1 0 3022 4 2 1 0 7360 4 6 1 0 3024 4 1112 2 1 0 7354 4 24 0 3 0 4 6 0 0 4 22 2 0 0 1220 4 1116 24 0 1 1220 4 1 1 3 0 0 2 0 0 1224 4 24 1 2 19 4 1120 24 0 2 0 0 3 0 0 1204 4 1 1 1 48 0 18 0 1 5 0 1124 4 0 0 1204 4 2 1 0 7356 4 24 0 3 1222 4 6 0 2 0 0 1128 2 0 0 1225 4 0 1 2 1228 4 18 1 3 3 0 0 1 0 1226 4 1132 23 0 0 1 0 0 0 0 7360 3 24 1 0 1143 4 6 1 0 3022 4 1136 2 1 0 7360 4 24 0 3 1222 4 6 0 3 1 0 18 1 3 2 0 1140 2 0 0 1229 4 25 0 3 1 0 24 1 0 1143 4 6 0 0 1226 4 1144 1 1 2 6 0 27 0 0 1129 4 1 1 2 1 0 27 0 1 1176 4 1148 0 1 2 1234 4 18 1 3 6 0 0 1 0 1232 4 23 0 0 1 0 1152 0 0 0 7354 3 24 1 0 1162 4 6 1 0 3024 4 2 1 0 7354 4 1156 24 0 3 1222 4 6 0 1 1 0 18 1 3 2 0 2 0 0 1235 4 1160 25 0 1 1 0 24 1 0 1162 4 6 0 0 1232 4 1 1 2 63 0 1164 27 0 0 1148 4 1 1 1 1 0 27 0 1 1174 4 6 1 0 1222 4 1168 24 0 3 7356 4 2 1 0 4 0 24 0 3 7356 4 2 1 0 6 0 1172 26 0 0 1591 4 24 1 0 33 4 6 1 0 1232 4 2 1 0 1226 4 1176 6 0 0 1226 4 1 1 2 1 0 27 0 0 1181 4 1 1 2 1 0 1180 27 0 1 1191 4 1 1 3 8191 0 18 1 1 4118 0 15 0 0 1225 4 1184 5 0 0 1224 4 27 0 2 1190 4 1 0 1 31 0 1 1 3 0 0 1188 15 0 0 1225 4 1 1 2 2546 4 14 0 0 1225 4 6 0 0 1225 4 1192 24 0 3 7356 4 2 1 0 7 0 6 0 0 1226 4 24 0 3 7356 4 1196 2 1 0 5 0 25 0 2 1 0 24 1 0 1199 4 23 0 0 4 0 1200 0 0 0 7356 3 24 1 0 1126 4 26 0 0 1591 4 24 1 0 1119 4 PROCEDURE 712 1204 0 0 0 0 0 6 0 0 5026 4 26 0 0 1621 4 2 0 0 1672 4 1208 24 0 2 1858 4 24 1 2 15 4 28 1 2 2 0 26 0 0 1513 4 1212 0 0 3 3033 4 6 0 0 5035 4 7 0 0 5026 4 1 1 3 0 0 1216 2 0 0 5035 4 6 1 0 2982 4 2 1 0 7360 4 26 0 1 1204 4 SECTION 713 1220 0 0 0 0 0 0 4£000 0 1224 0 0 0 0 0 0 0 0 1228 0 0 0 0 0 0 0 0 1232 0 0 0 0 0 0 0 0 1236 0 0 0 0 PROCEDURE 714 1238 0 0 0 0 0 6 1 0 4966 4 1240 24 1 2 19 4 2 1 1 4 0 6 1 0 4968 4 24 1 2 19 4 1244 2 1 1 6 0 25 0 1 4 0 24 1 0 1249 4 26 0 0 1591 4 1248 26 1 1 2968 4 26 0 1 1238 4 PROCEDURE 715 1250 0 0 0 0 0 0 1 0 2948 4 1252 0 0 3 0 4 0 0 2 18 4 6 1 0 3016 4 4 0 0 10 4 1256 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 2948 4 1260 26 0 1 1250 4 0 0 0 0 0 SECTION 716 1262 9249 0 9240 0 1264 0 0 0 0 0 0 0 0 1268 0 0 0 0 0 0 0 0 1272 0 0 0 0 0 0 0 0 1276 0 0 0 0 0 0 0 0 1280 0 0 1 0 8076 0 38236 0 1284 1209 0 £20£ 0 £209 0 39079 0 1288 £249 0 36:e6 0 1925e 0 £248 0 1292 £:e6 0 1208 0 £041 0 9007 0 1296 36 0 e208 0 83e6 0 83+9 0 1300 38236 0 9.49 0 1041 0 1041 0 1304 9049 0 8201 0 £208 0 31641 0 1308 393+9 0 .+49 0 £241 0 49 0 1312 6078 0 825£ 0 8276 0 381e6 0 1316 £248 0 9009 0 2+0 0 8:e6 0 1320 48 0 120£ 0 36:8£ 0 93£9 0 1324 39041 0 104£ 0 £038 0 820£ 0 1328 93+9 0 800e 0 9609 0 £:80 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 SECTION 717 1350 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 SECTION 718 1362 0 0 0 0 1364 0 0 0 0 0 0 0 0 1368 0 0 0 0 0 0 36 0 1372 8209 0 19209 0 8209 0 8249 0 1376 1209 0 1201 0 9049 0 9:e6 0 1380 36:e6 0 1249 0 1209 0 1249 0 1384 8276 0 36241 0 8040 0 8008 0 1388 9200 0 8209 0 248 0 9209 0 1392 1 0 1201 0 8048 0 209 0 1396 1209 0 1249 0 240 0 1008 0 1400 8040 0 8201 0 9240 0 9241 0 1404 9008 0 8 0 8209 0 8040 0 1408 9049 0 9009 0 8248 0 9209 0 1412 1240 0 9:e6 0 31249 0 1201 0 1416 8241 0 .:e6 0 1040 0 9208 0 1420 9209 0 8049 0 40 0 8241 0 1424 9008 0 1209 0 1208 0 £209 0 1428 9609 0 1008 0 8236 0 9008 0 1432 1041 0 480 0 0 0 0 0 1436 0 0 0 0 0 0 0 0 1440 0 0 0 0 0 0 £e6 0 PROCEDURE 719 1444 0 0 0 0 0 26 0 0 1250 4 24 1 2 19 4 6 1 0 4 0 1448 5 1 0 3026 4 27 0 1 1445 4 0 1 0 2948 4 0 0 3 0 4 1452 6 1 0 3010 4 4 0 0 10 4 25 1 1 4096 0 24 0 3 0 4 1456 23 0 2 0 256 0 1 1 2948 4 26 0 1 1444 4 0 0 0 0 0 SECTION 720 1460 18+e3 0 18607 0 181e£ 0 33998 0 1464 36:4£ 0 3288£ 0 £918 0 25934 0 1468 279.7 0 129.9 0 18618 0 1843. 0 PROCEDURE 721 1472 0 0 0 0 0 25 0 2 8 0 24 1 0 1477 4 26 0 0 1478 4 1476 26 1 2 2970 4 26 0 1 1472 4 PROCEDURE 722 1478 0 0 0 0 0 0 1 0 2948 4 1480 0 0 3 0 4 0 0 2 20 4 6 1 0 3016 4 4 0 0 11 4 1484 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 2948 4 1488 26 0 1 1478 4 PROCEDURE 723 1489 0 0 0 0 0 24 1 2 19 4 24 0 2 4 0 1492 18 1 1 4123 0 1 1 3 50 0 18 1 1 5 0 24 1 2 21 4 1496 28 1 1 4 0 6 1 0 1652 4 24 1 2 21 4 2 1 0 52 0 1500 0 1 0 2948 4 0 0 3 0 4 0 0 2 20 4 6 1 0 3020 4 1504 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 1508 0 1 1 2948 4 6 1 0 3028 4 24 1 2 21 4 28 0 0 0 0 1512 26 0 1 1489 4 PROCEDURE 724 1513 0 0 0 0 0 0 0 3 3033 4 6 1 0 1652 4 1516 24 1 2 15 4 2 1 0 52 0 1 1 3 1 0 24 1 2 15 4 1520 2 1 0 0 0 6 0 0 6275 4 27 0 0 1539 4 24 1 2 15 4 1524 24 0 2 0 0 18 1 1 4123 0 1 1 3 50 0 18 1 1 5 0 1528 0 1 0 2948 4 0 0 3 0 4 24 1 2 13 4 24 0 2 0 0 1532 4 0 0 7358 4 2 0 0 2954 4 0 1 1 2948 4 24 0 3 2954 4 1536 28 1 1 4 0 26 0 0 1572 4 24 1 0 1567 4 6 0 0 6274 4 1540 1 1 2 9 0 27 0 0 1558 4 6 0 0 3036 4 24 1 2 15 4 1544 2 0 0 1 0 24 1 2 15 4 24 0 2 0 0 24 1 2 13 4 1548 29 0 1 0 0 1 1 3 4 0 18 0 1 5 0 4 0 0 7 4 1552 0 0 2 12 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 160 0 1556 0 0 3 3033 4 24 1 0 1567 4 24 1 2 15 4 24 0 2 0 0 1560 18 1 1 4123 0 1 1 3 54 0 18 1 1 5 0 24 1 2 13 4 1564 28 1 1 0 0 1 1 3 9 0 24 1 0 1550 4 6 1 0 2964 4 1568 24 1 2 15 4 28 0 0 0 0 2 0 0 4999 4 26 0 1 1513 4 PROCEDURE 725 1572 0 0 0 0 0 23 0 0 50 0 0 0 0 7358 3 24 1 0 1582 4 1576 6 1 0 1652 4 24 1 2 13 4 2 1 0 306 0 26 0 0 1583 4 1580 6 1 0 3030 4 2 1 0 7358 4 26 0 1 1572 4 PROCEDURE 726 1583 0 0 0 0 0 1584 6 1 0 3020 4 0 0 2 12 4 25 1 1 4096 0 4 0 0 7 4 1588 24 0 3 0 4 23 0 2 160 0 26 0 1 1583 4 PROCEDURE 727 1591 0 0 0 0 0 1592 6 1 0 1652 4 24 1 2 19 4 2 1 0 52 0 0 1 0 2948 4 1596 0 0 3 0 4 0 0 2 18 4 6 1 0 3020 4 4 0 0 10 4 1600 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 2948 4 1604 6 1 0 3028 4 24 1 2 19 4 28 0 0 0 0 26 0 1 1591 4 PROCEDURE 728 1608 0 0 0 0 0 24 0 2 1800 4 0 1 0 2948 4 0 0 3 0 4 1612 24 1 2 21 4 24 0 2 0 0 24 0 3 0 4 4 0 0 4 22 1616 2 0 0 2954 4 0 1 1 2948 4 24 0 3 2954 4 28 0 2 4 0 1620 26 0 1 1608 4 PROCEDURE 729 1621 0 0 0 0 0 2 1 0 1704 4 0 0 3 3034 4 1624 24 0 2 1728 4 12 1 0 1704 4 26 0 1 1621 4 PROCEDURE 730 1627 0 0 0 0 0 1628 2 1 0 1704 4 0 0 3 3033 4 24 0 2 1708 4 12 1 0 1704 4 1632 26 0 1 1627 4 0 0 0 0 0 SECTION 731 1634 16773 0 53585 0 1636 7554£ 0 73786 0 35572 0 56596 0 1640 86755 0 737 0 .6656 0 72734 0 1644 65362 0 52636 0 97955 0 725 0 1648 25973 0 7 0 56554 0 67695 0 1652 7. 0 7.000 0 16973 0 72735 0 1656 35572 0 65667 0 66663 0 72676 0 1660 96653 0 676 0 46955 0 55547 0 1664 25553 0 7 0 66500 0 73596 0 1668 £6£6£ 0 6£6£6 0 0 0 0 0 1672 0 0 0 0 0 0 0 0 1676 5715t 0 666 0 SECTION 732 1678 36951 0 55777 0 1680 85167 0 535 0 90000 0 73556 0 1684 3££ 0 7£££0 0 5.5. 0 0 0 1688 56554 0 56595 0 45577 0 59655 0 1692 15965 0 53585 0 3030 0 30483 0 1696 96657 0 676 0 67473 0 6 0 1700 5.5. 0 0 0 SECTION 733 1702 1 0 0 0 1704 0 0 0 0 0 0 0 0 SECTION 734 1708 1 0 0 0 t 0 0 0 1712 64 0 0 0 3.8 0 0 0 1716 2710 0 0 0 186t0 0 0 0 1720 £4240 0 0 0 89680 0 9 0 1724 5.100 0 5£ 0 t+t00 0 3e9 0 1728 1 0 0 0 16 0 0 0 1732 256 0 0 0 4096 0 0 0 1736 65536 0 0 0 48576 0 10 0 1740 77216 0 167 0 35456 0 2684 0 1744 67296 0 42949 0 £££££ 0 £££££ 0 SECTION 735 1748 7 0 1£££ 0 £.000- 0 7£ 0 1752 8000 0 6000 0 £000 0 80000 0 1756 £0000 0 80 0 £0000- 0 £ 0 1760 3££ 0 0 0 3£ 0 0 0 SECTION 736 1764 0 4970 3 5 0 0 0 0 5 0 0 4969 3 5 0 0 0 0 5 0 1768 0 4966 3 5 0 0 0 0 5 0 0 4968 3 5 0 0 0 0 5 1 1772 0 1621 3 8707 0 2 2 0 3 0 0 1513 3 16421 0 4 0 2 5 1 1776 0 1694 3 5 3 0 0 0 5 0 0 1696 3 276 3 0 1 1 4 0 1780 0 1698 3 531 3 0 2 1 3 0 0 5000 3 37 0 0 0 2 5 0 1784 0 5001 3 16421 0 4 0 2 5 0 0 1700 3 770 3 0 3 0 2 1 SECTION 737 1788 0 4970 3 16501 4 4 0 7 5 0 0 4972 3 16421 0 4 0 2 5 1 1792 0 4970 3 16501 4 4 0 7 5 0 0 4972 3 16421 0 4 0 2 5 0 1796 0 4974 3 16581 4 4 0 12 5 0 0 4976 3 16421 0 4 0 2 5 1 1800 0 4946 3 5 3 0 0 0 5 0 0 4948 3 5 3 0 0 0 5 0 1804 0 4950 3 5 3 0 0 0 5 0 0 4952 3 5 3 0 0 0 5 1 SECTION 738 1808 0 5014 3 5 0 0 0 0 5 0 0 1748 3 5 0 0 0 0 5 0 1812 0 5000 3 5 0 0 0 0 5 0 0 5001 3 5 0 0 0 0 5 0 1816 0 1634 3 5 3 0 0 0 5 1 0 1634 3 5 3 0 0 0 5 0 1820 0 5014 3 16437 0 4 0 3 5 1 0 5015 3 12564 0 3 1 1 4 0 1824 0 1676 3 1025 3 0 4 0 1 0 0 5034 3 12548 0 3 1 0 4 1 1828 0 5020 3 65 0 0 0 4 1 0 0 5028 3 12596 0 3 1 3 4 0 1832 0 5020 3 4898 0 1 3 2 2 0 0 1670 3 16453 0 4 0 4 5 0 1836 0 4966 3 4898 0 1 3 2 2 0 0 4967 3 4882 0 1 3 1 2 0 1840 0 4968 3 4882 0 1 3 1 2 0 0 4969 3 4882 0 1 3 1 2 0 1844 0 4970 3 4882 0 1 3 1 2 0 0 4988 3 1073 0 0 4 3 1 1 1848 0 5016 3 5 3 0 0 0 5 0 0 5018 3 5 3 0 0 0 5 0 1852 0 5015 3 12564 0 3 1 1 4 1 0 4966 3 5 3 0 0 0 5 0 1856 0 4968 3 5 3 0 0 0 5 1 0 1672 3 16389 0 4 0 0 5 1 SECTION 739 1860 0 4966 3 4962 0 1 3 6 2 0 0 5023 3 1057 0 0 4 2 1 0 1864 0 5024 3 1057 0 0 4 2 1 0 0 4968 3 12580 0 3 1 2 4 0 1868 0 4970 3 12564 0 3 1 1 4 1 SECTION 740 1870 1 0 0 0 1872 2 0 0 0 3 0 0 0 1876 4 0 0 0 5 0 0 0 1880 6 0 0 0 7 0 0 0 1884 8 0 0 0 9 0 0 0 1888 0 0 0 0 0 0 0 0 1892 0 0 0 0 0 0 0 0 1896 0 0 0 0 0 0 0 0 1900 0 0 0 0 0 0 0 0 1904 0 0 0 0 0 0 0 0 1908 0 0 0 0 0 0 0 0 1912 0 0 0 0 0 0 0 0 1916 0 0 0 0 0 0 0 0 1920 0 0 0 0 0 0 0 0 1924 0 0 0 0 0 0 0 0 PROCEDURE 741 1928 24 1 0 2551 4 24 1 0 2206 4 24 1 0 2220 4 24 1 0 2254 4 1932 24 1 0 2546 4 24 1 0 2547 4 24 1 0 2183 4 24 1 0 2549 4 1936 24 1 0 2550 4 24 1 0 2122 4 SECTION 742 1938 0 0 0 0 1940 0 0 0 0 0 0 0 0 1944 0 0 0 0 0 0 0 0 1948 0 0 0 0 0 0 0 0 1952 0 0 0 0 0 0 0 0 1956 0 0 0 0 0 0 0 0 1960 0 0 0 0 0 0 0 0 1964 0 0 0 0 0 0 0 0 1968 0 0 0 0 0 0 0 0 1972 0 0 0 0 0 0 0 0 1976 0 0 0 0 0 0 0 0 1980 0 0 0 0 0 0 0 0 1984 0 0 0 0 0 0 0 0 1988 0 0 0 0 0 0 0 0 SECTION 743 1992 0 0 0 0 0 0 0 0 1996 0 0 0 0 0 0 0 0 2000 0 0 0 0 0 0 0 0 2004 0 0 0 0 0 0 0 0 2008 0 0 0 0 0 0 0 0 2012 0 0 0 0 0 0 0 0 2016 0 0 0 0 0 0 0 0 2020 0 0 0 0 0 0 0 0 2024 0 0 0 0 0 0 0 0 2028 0 0 0 0 0 0 0 0 2032 0 0 0 0 0 0 0 0 2036 0 0 0 0 0 0 0 0 2040 0 0 0 0 0 0 0 0 2044 0 0 0 0 PROCEDURE 744 2046 25 1 1 4096 0 26 0 0 2295 4 2048 24 0 3 2116 4 24 0 3 3 0 6 1 0 198 0 24 0 3 2116 4 2052 3 0 0 64 0 18 0 1 4123 0 24 0 3 2116 4 3 0 0 124 0 2056 1 1 3 40 0 0 0 2 2114 4 26 0 0 2276 4 25 1 1 4096 0 2060 24 1 1 2116 4 26 1 1 2534 4 24 0 3 2116 4 26 0 0 0 0 2064 26 1 1 2314 4 1 1 3 7 0 24 0 3 2116 4 2 0 0 0 0 2068 24 0 3 2116 4 6 0 0 64 0 24 0 3 2116 4 5 0 0 124 0 2072 27 0 0 2082 4 24 0 3 2116 4 6 0 0 0 0 2 0 0 2120 4 2076 1 1 3 0 0 24 0 3 2116 4 26 0 0 0 0 6 0 0 2120 4 2080 24 0 3 2116 4 2 0 0 0 0 24 1 1 2116 4 24 0 2 2546 4 2084 3 1 0 2546 4 24 0 3 2116 4 2 0 0 2 0 26 1 2 2546 4 2088 1 1 3 2546 4 24 0 3 2116 4 2 0 0 1 0 1 1 3 0 0 2092 24 0 3 2116 4 23 0 2 0 0 24 0 2 2108 4 4 0 0 2115 4 2096 24 0 3 2534 4 2 0 0 44 0 24 0 3 2116 4 2 0 0 0 0 2100 1 1 3 1 0 7 0 0 2118 4 24 0 3 2534 4 6 0 0 35 0 2104 24 0 3 2534 4 2 0 0 7 0 24 0 3 2116 4 24 1 0 0 0 2108 25 1 1 4096 0 26 0 0 2295 4 1 1 3 40 0 0 0 2 2114 4 2112 26 0 0 2276 4 24 1 0 2546 4 0 0 0 1 0 14 0 0 0 0 2116 0 0 0 0 0 0 0 0 0 0 16 0 0 1 0 0 0 0 0 0 2120 0 0 0 0 0 0 0 0 0 0 PROCEDURE 745 2122 24 0 3 2116 4 26 1 3 53 0 2124 24 0 3 2116 4 6 0 0 2 0 24 0 3 2116 4 5 0 3 2 0 2128 27 0 0 2131 4 25 0 3 2 0 24 1 0 2124 4 24 0 3 2116 4 2132 6 0 3 1 0 27 0 0 2141 4 1 1 2 0 0 27 0 1 2138 4 2136 24 0 3 2116 4 2 0 0 0 0 1 1 3 0 0 24 0 3 2116 4 2140 2 0 3 1 0 6 0 0 2118 4 27 0 1 2173 4 1 1 3 0 0 2144 3 0 0 2118 4 3 0 0 2169 4 24 0 3 2116 4 2 0 1 42 0 2148 24 0 3 2116 4 2 0 1 45 0 24 0 3 2314 4 6 0 0 9 0 2152 24 0 3 2314 4 2 0 0 7 0 24 0 3 2314 4 6 0 0 57 0 2156 24 0 3 2314 4 2 0 0 6 0 6 0 0 2119 4 27 0 1 2199 4 2160 24 0 3 2116 4 6 0 1 44 0 2 0 0 2204 4 24 0 2 2199 4 2164 4 0 0 2115 4 24 0 3 2116 4 2 0 1 44 0 24 0 3 2534 4 2168 24 1 0 7 0 0 0 0 0 0 24 1 1 2116 4 24 0 3 2116 4 2172 26 0 0 0 0 24 0 3 2314 4 6 0 0 58 0 24 0 3 2314 4 2176 2 0 0 6 0 24 0 3 2116 4 2 0 0 44 0 24 1 1 2116 4 2180 1 1 3 0 0 24 0 3 2116 4 24 1 0 0 0 6 0 0 2169 4 2184 27 0 0 2189 4 1 1 3 1 0 5 0 0 2118 4 27 0 0 2170 4 2188 24 1 0 2173 4 6 0 0 2118 4 27 0 1 2170 4 6 0 0 2119 4 2192 27 0 0 2170 4 1 1 3 0 0 3 0 0 2118 4 24 0 3 2116 4 2196 2 0 1 42 0 24 0 3 2116 4 2 0 1 45 0 1 1 3 0 0 2200 1 0 1 4 0 14 0 0 2567 4 26 0 0 2554 4 26 0 1 2204 4 2204 0 0 0 0 0 1 1 3 2 0 PROCEDURE 746 2206 24 0 3 2117 4 6 0 0 0 0 2208 18 0 0 4124 0 27 0 0 2212 4 25 1 2 0 0 24 1 0 2215 4 2212 24 0 3 2116 4 24 0 3 35 0 6 0 0 0 0 2 0 0 2309 4 2216 1 1 3 27 0 26 0 0 2276 4 24 0 3 2116 4 24 1 0 0 0 PROCEDURE 747 2220 1 1 3 0 0 1 0 1 16 0 24 0 3 2117 4 14 0 0 0 0 2224 6 0 0 2309 4 27 0 0 2252 4 0 1 2 2310 4 1 1 3 17 0 2228 26 0 0 2276 4 0 0 3 2308 4 1 1 3 0 0 1 1 2 1 0 2232 7 0 0 2309 4 0 0 3 2116 4 1 1 3 10 0 18 0 1 5 0 2236 24 0 3 2116 4 4 0 0 55 0 18 1 1 4118 0 1 1 3 37 0 2240 26 0 0 2276 4 1 1 3 0 0 1 1 3 62 0 18 1 1 4118 0 2244 1 1 3 7 0 26 0 0 2276 4 24 0 3 2116 4 24 0 3 126 0 2248 6 1 0 1 0 5 0 0 2309 4 27 0 1 2242 4 25 1 1 4096 0 2252 24 0 3 2116 4 24 1 0 0 0 PROCEDURE 748 2254 24 0 3 2116 4 6 0 0 0 0 2256 2 0 0 2309 4 24 0 2 2312 4 24 0 3 2116 4 2 0 0 0 0 2260 1 1 3 0 0 24 0 3 2116 4 28 1 2 0 0 24 0 3 2116 4 2264 6 0 1 38 0 24 0 3 2116 4 2 0 1 44 0 24 0 3 2116 4 2268 6 0 1 35 0 24 0 3 2116 4 2 0 1 7 0 6 0 0 2309 4 2272 24 0 3 2116 4 2 0 0 0 0 24 0 3 2116 4 24 1 0 0 0 PROCEDURE 749 2276 0 0 0 0 0 18 0 0 5 0 1 1 1 0 0 25 1 1 4096 0 2280 24 0 3 2306 4 23 0 2 160 0 26 0 1 2276 4 0 0 0 0 0 2284 24 0 3 2116 4 6 0 0 64 0 2 0 0 2293 4 6 0 0 2294 4 2288 24 0 3 2116 4 2 0 0 64 0 6 0 0 2293 4 2 0 0 2294 4 2292 26 0 1 2283 4 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2296 24 0 3 2306 4 0 0 2 24 0 6 0 0 2305 4 24 0 3 2306 4 2300 2 0 0 24 0 18 1 1 10 0 2 0 0 2305 4 26 0 0 2283 4 2304 26 0 1 2295 4 0 0 0 0 0 SECTION 750 2306 0 0 2 0 2308 66666 0 0 0 SECTION 751 2310 8000 0 5148 0 2312 65663 0 73696 0 30 0 0 0 2316 30 0 0 0 30 0 0 0 2320 30 0 0 0 30 0 0 0 2324 30 0 0 0 30 0 0 0 2328 30 0 0 0 30 0 0 0 2332 30 0 0 0 30 0 0 0 2336 30 0 0 0 30 0 0 0 2340 30 0 0 0 30 0 0 0 2344 30 0 0 0 30 0 0 0 2348 30 0 0 0 30 0 0 0 2352 30 0 0 0 SECTION 752 2354 0 0 0 0 2356 0 0 0 0 0 0 0 0 2360 0 0 0 0 0 0 0 0 2364 0 0 0 0 0 0 0 0 2368 0 0 0 0 0 0 0 0 2372 0 0 0 0 0 0 0 0 2376 0 0 0 0 0 0 0 0 2380 0 0 0 0 0 0 0 0 2384 0 0 0 0 0 0 0 0 2388 0 0 0 0 0 0 0 0 2392 0 0 0 0 0 0 0 0 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 SECTION 753 2408 0 0 0 0 0 0 0 0 2412 0 0 0 0 0 0 0 0 2416 0 0 0 0 0 0 0 0 2420 0 0 0 0 0 0 0 0 2424 0 0 0 0 0 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 SECTION 754 2444 0 0 0 0 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 0 0 0 0 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 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 2524 0 0 0 0 0 0 0 0 2528 0 0 0 0 0 0 0 0 2532 0 0 0 0 SECTION 755 2534 0 0 0 0 2536 0 0 0 0 0 0 0 0 2540 0 0 0 0 0 0 0 0 2544 0 0 0 0 PROCEDURE 756 PROCEDURE 757 2546 2 1 0 2916 4 25 1 1 4096 0 2548 24 0 3 2896 4 6 1 0 2 0 2 1 0 2314 4 24 0 3 2896 4 2552 6 0 0 44 0 2 0 0 2534 4 24 0 3 2534 4 6 0 0 37 0 2556 2 0 0 2535 4 6 1 0 2534 4 24 0 3 2896 4 2 1 0 2 0 2560 24 0 3 2534 4 0 1 1 30 0 0 1 0 2540 4 0 0 3 2116 4 2564 24 0 3 2534 4 6 0 0 44 0 2 0 0 2539 4 6 1 0 2942 4 2568 28 0 0 2354 4 24 0 3 2534 4 24 1 1 29 0 26 1 2 2535 4 2572 24 0 3 2116 4 6 0 2 14 0 2 0 0 2536 4 24 0 3 2116 4 2576 6 0 2 4 0 2 0 0 2537 4 24 0 3 2116 4 6 0 2 1 0 2580 18 0 3 3 0 2 0 0 2538 4 24 0 2 2548 4 2 0 0 2204 4 2584 1 1 3 0 0 6 0 0 2888 4 2 0 0 2294 4 26 0 0 2283 4 2588 6 0 0 2889 4 24 0 3 2116 4 2 0 0 123 0 1 1 3 2354 4 2592 7 0 0 2905 4 2 0 0 2904 4 26 1 1 2904 4 0 0 2 2912 4 2596 1 1 3 40 0 26 0 0 2276 4 PROCEDURE 758 2598 0 0 2 2909 4 1 1 3 7 0 2600 26 0 0 2276 4 24 1 2 2908 4 6 1 0 4 0 5 1 0 2892 4 2604 27 0 0 2612 4 4 1 0 2892 4 5 1 0 2890 4 27 0 0 2763 4 2608 4 1 0 2890 4 1 1 2 85 0 27 0 1 2598 4 24 1 0 2046 4 PROCEDURE 759 2612 6 1 0 2944 4 24 0 3 2896 4 4 0 0 123 0 28 1 0 2920 4 2616 6 0 0 2920 4 2 0 1 1 0 1 0 1 24 0 15 0 0 2923 4 2620 18 1 0 4125 0 2 0 1 4 0 15 0 0 2923 4 18 0 0 3 0 2624 7 0 1 4 0 1 0 1 23 0 24 0 3 2538 4 6 0 0 2 0 2628 2 0 0 2918 4 26 1 3 2918 4 15 0 0 2922 4 3 0 1 5 0 2632 18 0 0 4124 0 1 1 2 5 0 27 0 0 2710 4 1 1 2 4 0 2636 27 0 0 2685 4 1 1 1 3 0 27 0 0 2685 4 27 0 2 2641 4 2640 1 1 1 5 0 1 1 1 1 0 2 0 0 2917 4 PROCEDURE 760 2643 26 1 2 2896 4 2644 6 0 0 2917 4 1 1 2 3 0 27 0 2 2661 4 6 0 2 2924 4 2648 27 0 0 2710 4 3 0 3 8 0 4 0 2 2924 4 26 0 0 2855 4 2652 3 0 3 6 0 18 0 0 4123 0 5 0 3 6 0 2 0 3 7 0 2656 25 0 3 3 0 24 1 0 2658 4 25 0 2 4 0 24 1 0 2644 4 2660 24 1 0 2710 4 PROCEDURE 761 2661 25 1 2 0 0 1 0 1 7 0 15 0 2 2924 4 2664 27 0 0 2710 4 2 0 3 8 0 1 0 1 16 0 15 0 2 2925 4 2668 27 0 0 2676 4 7 0 3 8 0 25 1 2 0 0 1 0 1 24 0 2672 15 0 2 2924 4 18 0 0 4125 0 26 0 0 2871 4 24 1 0 2682 4 2676 1 0 1 8 0 15 0 2 2924 4 15 0 2 2924 4 18 0 0 4125 0 2680 26 0 0 2855 4 4 0 2 2926 4 2 0 3 6 0 6 0 2 2927 4 2684 24 1 0 2655 4 PROCEDURE 762 2685 26 1 2 2898 4 6 0 2 2924 4 27 0 0 2710 4 2688 2 0 3 6 0 1 0 1 16 0 15 0 2 2925 4 27 0 0 2699 4 2692 18 0 3 3 0 2 0 3 7 0 1 0 1 15 0 15 0 2 2925 4 2696 18 0 0 3 0 18 0 3 1 0 24 1 0 2702 4 1 0 1 15 0 2700 15 0 2 2925 4 18 0 0 2 0 7 0 3 7 0 6 0 2 2926 4 2704 7 0 3 7 0 25 0 3 2 0 24 1 0 2707 4 25 0 2 3 0 2708 24 1 0 2686 4 25 1 2 0 0 PROCEDURE 763 2710 1 0 1 1 0 15 0 0 2922 4 2712 5 0 0 2537 4 27 0 2 2760 4 4 0 0 2537 4 3 0 0 2915 4 2716 18 0 0 2 0 7 0 1 4 0 6 0 0 2915 4 4 0 0 2915 4 2720 26 0 0 2855 4 4 0 0 2921 4 3 0 1 0 0 2 0 0 2918 4 2724 26 1 3 2918 4 24 0 3 2116 4 6 0 3 0 0 3 0 1 2 0 2728 27 0 2 2741 4 5 0 1 2 0 5 0 1 2 0 18 0 3 3 0 2732 18 0 1 4124 0 1 1 2 64 0 27 0 0 2743 4 1 1 2 1 0 2736 27 0 0 2743 4 1 1 2 2 0 27 0 0 2743 4 1 1 2 3 0 2740 27 0 0 2743 4 6 0 0 2886 4 24 1 0 2747 4 1 1 3 4096 0 2744 7 0 1 5 0 24 0 3 2116 4 6 0 3 1 0 2 0 1 3 0 2748 0 0 2 2910 4 24 0 3 2914 4 15 0 0 18 0 2 0 0 2914 4 2752 5 0 0 2914 4 5 0 0 2536 4 4 0 0 2887 4 24 0 3 2116 4 2756 2 0 3 0 0 25 0 1 18 0 24 1 0 2598 4 24 1 0 2598 4 2760 6 0 0 2921 4 2 0 1 0 0 24 1 0 2757 4 PROCEDURE 764 2763 6 1 0 2946 4 2764 24 0 3 2896 4 4 0 0 123 0 28 1 1 2920 4 6 1 0 2933 4 2768 27 0 0 2598 4 1 1 2 9 0 27 0 0 2780 4 0 0 2 2916 4 2772 1 1 3 0 0 15 0 0 2913 4 5 1 0 2933 4 27 0 0 2780 4 2776 1 1 3 0 0 18 1 1 4127 0 27 1 1 2773 4 24 1 0 2598 4 2780 6 1 0 2929 4 26 0 0 2871 4 2 0 0 2915 4 6 1 0 2923 4 2784 26 0 0 2871 4 1 1 1 64 0 2 0 0 2871 4 5 0 0 2871 4 2788 18 0 1 0 0 18 0 1 0 0 2 0 0 2914 4 24 0 3 2534 4 2792 6 0 0 40 0 2 0 0 2911 4 6 1 0 2927 4 18 0 1 1 0 2796 4 1 0 2933 4 24 0 3 2534 4 2 0 0 40 0 6 1 0 2921 4 2800 18 1 1 4123 0 4 1 0 2924 4 18 1 1 4123 0 1 1 1 18 0 2804 26 0 0 2879 4 6 0 0 2911 4 24 0 3 2534 4 2 0 0 40 0 PROCEDURE 765 2808 6 1 0 2931 4 18 0 0 5 0 2 1 0 2918 4 26 1 3 2918 4 2812 0 0 2 2909 4 1 1 3 7 0 26 0 0 2276 4 26 1 2 2900 4 2816 24 0 3 2896 4 24 0 3 123 0 6 1 2 4 0 5 1 0 2894 4 2820 27 0 0 2849 4 24 0 3 2896 4 24 0 3 123 0 6 1 2 5 0 2824 18 0 0 5 0 24 0 3 2896 4 24 0 3 123 0 4 1 2 7 0 2828 24 1 2 2915 4 3 1 3 4 0 5 1 0 2902 4 27 0 0 2837 4 2832 25 0 3 2 0 24 1 0 2846 4 6 1 0 2902 4 24 1 2 2915 4 2836 2 1 3 4 0 1 1 2 64 0 5 0 0 2915 4 18 1 0 4118 0 2840 1 1 1 8 0 26 0 0 2879 4 6 1 0 2931 4 18 0 0 5 0 2844 2 1 0 2918 4 26 1 3 2918 4 25 0 2 4 0 24 1 0 2816 4 2848 24 1 0 2812 4 1 1 3 33 0 26 0 0 2879 4 25 1 2 0 0 2852 24 0 3 2914 4 2 0 0 0 0 24 1 0 2598 4 PROCEDURE 766 2855 0 0 0 0 0 2856 3 0 0 2871 4 4 0 0 2535 4 2 0 0 2914 4 24 0 3 2896 4 2860 6 0 0 43 0 18 0 1 4124 0 5 0 0 2871 4 27 0 0 2866 4 2864 1 1 3 0 0 24 1 0 2868 4 1 1 2 1500 0 18 0 1 5 0 2868 24 0 3 2914 4 4 1 0 18 0 26 0 1 2855 4 PROCEDURE 767 2871 0 0 0 0 0 2872 24 0 3 2535 4 4 0 0 20 0 2 0 0 2914 4 24 0 3 2914 4 2876 5 0 0 0 0 1 1 2 64 0 26 0 1 2871 4 PROCEDURE 768 2879 0 0 0 0 0 2880 18 0 0 5 0 4 0 0 2914 4 25 1 1 4096 0 24 0 3 2896 4 2884 23 0 2 160 0 26 0 1 2879 4 PROCEDURE 769 2886 25 1 0 0 0 26 0 0 0 0 2888 14 0 0 1938 4 14 0 0 1992 4 SECTION 770 2890 16773 0 53585 0 2892 35572 0 56596 0 56554 0 56595 0 2896 0 0 10 0 0 0 12 0 2900 0 0 30 0 7. 0 7.000 0 2904 0 0 e4 0 0 0 5 0 SECTION 771 2908 7e- 0 3e 0 1£££ 0 0 0 2912 1 0 £ 0 SECTION 772 2914 0 0 0 0 2916 0 0 0 0 SECTION 773 2918 0 0 0 0 SECTION 774 2920 0 0 0 0 0 0 0 0 2924 0 0 0 0 0 0 0 0 2928 0 0 0 0 0 0 0 0 2932 0 0 0 0 0 0 0 0 2936 0 0 0 0 0 0 0 0 2940 0 0 0 0 SECTION 775 2942 0 0 200e4 0 2944 7 0 2+ 0 6 0 . 0 SECTION 1027 2948 0 0 0 0 0 0 0 0 2952 0 0 0 0 0 0 0 0 2956 0 0 0 0 0 0 0 0 2960 0 0 0 0 77372 0 4+6 0 2964 0 0 20032 0 0 0 20438 0 2968 0 0 30 0 0 0 90 0 2972 0 0 9 0 £££££ 0 4 0 2976 0 0 24 0 0 0 3.8 0 2980 0 0 . 0 0 0 28 0 2984 0 0 64 0 37354 0 5 0 2988 57354 0 53666 0 37455 0 75516 0 2992 0 0 0 0 0 0 2002. 0 2996 60000 0 69555 0 65369 0 67696 0 3000 0 0 12 0 0 0 14 0 3004 36653 0 51636 0 0 0 2 0 3008 1675+ 0 53585 0 0 0 1e 0 3012 8000 0 5146 0 0 0 11 0 3016 0 0 7 0 0 0 5 0 3020 0 0 8 0 0 0 6 0 3024 0 0 3 0 55972 0 56596 0 3028 0 0 20034 0 0 0 12+ 0 SECTION 1028 3032 2 0 0 0 66666 0 78000- 0 3036 80000 0 80000 0 66666 0 +4000- 0 SECTION 1029 PROCEDURE 1007 CHAPT 8 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 11 12 0 0 0 0 12 0 0 0 0 13 0 0 0 0 14 0 0 0 0 15 16 0 0 0 0 16 0 0 0 0 17 0 0 0 0 18 0 0 0 0 19 20 0 0 0 0 20 0 0 0 0 21 0 0 0 0 22 0 0 0 0 23 24 0 0 0 0 24 0 0 0 0 25 0 0 0 0 0 25 1 1 4096 0 28 24 0 3 0 4 23 0 2 0 1792 0 0 0 0 0 0 0 0 0 0 32 26 0 1 26 4 PROCEDURE 776 33 0 1 0 3458 4 0 0 3 0 4 1 1 3 8 0 36 0 0 2 3606 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 1024 40 0 1 1 3458 4 6 0 0 6279 4 27 0 1 89 4 24 1 0 70 4 44 0 1 0 3458 4 0 0 3 0 4 1 1 3 9 0 0 0 2 3606 4 48 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 1024 0 1 1 3458 4 52 24 0 1 7342 4 26 0 1 53 4 0 0 0 33 3 24 0 1 7343 4 56 26 0 1 56 4 0 0 0 33 3 24 0 1 7344 4 26 0 1 59 4 60 0 0 0 33 3 0 1 0 3458 4 0 0 3 0 4 0 0 2 14 4 64 6 1 0 3472 4 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 68 23 0 2 0 256 0 1 1 3458 4 PROCEDURE 777 70 26 0 0 120 4 24 1 2 21 4 72 6 1 0 4 0 5 1 0 4498 4 27 0 1 70 4 2 0 0 7336 4 76 26 1 1 3474 4 26 1 2 3476 4 26 0 0 120 4 24 1 2 21 4 80 6 1 2 5 0 24 0 3 1 4 2 0 1 64 0 25 0 1 1 0 84 24 1 0 86 4 24 1 0 89 4 25 0 2 2 0 24 1 0 79 4 88 24 1 0 77 4 6 1 0 3478 4 28 0 0 2567 4 6 0 0 6269 4 92 27 0 0 108 4 0 1 0 3458 4 0 0 3 0 4 0 0 2 3607 4 96 6 1 0 3480 4 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 100 23 0 2 0 256 0 1 1 3458 4 6 0 0 6277 4 27 0 1 110 4 104 6 1 0 3482 4 24 1 2 21 4 2 1 0 0 0 24 1 0 221 4 PROCEDURE 778 108 6 0 0 6277 4 27 0 0 3036 4 26 0 0 994 4 24 1 2 21 4 112 6 1 0 0 0 5 1 0 2578 4 27 0 1 110 4 0 0 3 3608 4 116 26 0 0 3717 4 26 0 0 3717 4 26 0 0 3717 4 24 1 0 221 4 PROCEDURE 779 120 0 0 0 0 0 0 1 0 3458 4 0 0 3 0 4 0 0 2 20 4 124 6 1 0 3484 4 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 128 23 0 2 0 256 0 1 1 3458 4 26 0 1 120 4 PROCEDURE 780 131 0 0 0 0 0 132 3 0 0 2766 4 5 0 0 3609 4 27 0 3 214 4 5 0 0 3610 4 136 27 0 2 214 4 6 0 0 6279 4 27 0 0 141 4 6 0 0 2766 4 140 26 0 1 131 4 6 0 0 2766 4 18 1 1 4126 0 2 0 0 2766 4 144 18 1 1 2 0 2 0 0 2767 4 6 0 0 2766 4 26 0 0 1159 4 148 18 1 3 3 0 18 1 1 4127 0 2 1 0 2764 4 26 1 3 2764 4 152 27 1 0 158 4 24 0 3 1 4 6 0 3 14 0 18 0 3 2 0 156 18 0 1 4125 0 24 1 0 161 4 0 0 2 2562 4 24 0 3 1 4 160 15 0 3 14 0 26 0 0 1165 4 0 0 3 3611 4 27 0 0 202 4 164 2 0 0 2766 4 2 0 0 2764 4 26 1 3 3486 4 24 0 3 1 4 168 6 0 3 514 0 18 1 1 4126 0 27 0 0 183 4 5 0 0 2766 4 172 27 0 3 181 4 27 0 1 183 4 18 1 1 2 0 5 0 0 2767 4 176 27 0 0 178 4 27 0 2 194 4 24 0 3 1 4 6 0 3 515 0 180 7 0 0 2764 4 25 0 3 2 0 24 1 0 167 4 6 0 0 2764 4 184 4 0 0 2767 4 3 0 0 2767 4 1 1 2 256 0 27 0 2 200 4 188 0 0 3 3608 4 6 0 0 2766 4 18 0 1 2 0 4 0 0 2767 4 192 26 0 1 131 4 24 1 0 219 4 24 0 3 1 4 4 0 3 515 0 196 27 0 0 198 4 27 0 2 183 4 6 1 0 3488 4 24 1 0 896 4 200 6 1 0 3490 4 24 1 0 896 4 6 0 0 2766 4 18 0 1 2 0 204 4 0 0 2767 4 2 0 0 2764 4 26 1 3 3492 4 24 0 3 1 4 208 6 0 3 974 0 27 0 0 214 4 5 0 0 2764 4 27 0 0 217 4 212 25 0 3 2 0 24 1 0 207 4 6 1 0 3494 4 0 0 3 3608 4 216 24 1 0 896 4 24 0 3 1 4 6 0 3 975 0 0 0 3 3608 4 220 26 0 1 131 4 PROCEDURE 781 221 6 0 0 5999 4 2 0 0 2565 4 24 0 2 2764 4 224 24 1 2 15 4 28 1 2 2 0 6 1 0 2646 4 26 0 0 1104 4 228 1 1 3 1 0 2 0 0 7352 4 1 1 3 2 0 2 0 0 7326 4 232 6 0 0 6269 4 27 0 1 238 4 6 1 0 2584 4 24 1 2 17 4 236 2 1 0 4 0 24 1 0 245 4 26 0 0 983 4 24 1 2 17 4 240 6 1 0 4 0 5 1 0 2582 4 27 0 0 268 4 26 0 0 1576 4 244 24 1 0 434 4 PROCEDURE 782 245 26 0 0 994 4 24 1 2 21 4 6 1 0 0 0 248 5 1 0 2588 4 27 0 0 279 4 4 1 0 2588 4 5 1 0 2586 4 252 27 0 0 259 4 4 1 0 2586 4 18 0 1 4124 0 5 1 0 3496 4 256 27 0 0 885 4 26 0 0 1128 4 24 1 0 245 4 26 0 0 1062 4 260 26 0 0 1855 4 26 0 0 1846 4 26 0 0 1538 4 6 0 0 3612 4 264 2 0 0 1460 4 26 0 0 285 4 27 0 1 262 4 24 1 0 879 4 PROCEDURE 783 268 6 0 0 6277 4 27 0 1 274 4 6 1 0 3482 4 24 1 2 21 4 272 2 1 0 0 0 24 1 0 879 4 26 0 0 994 4 24 1 2 21 4 276 6 1 0 0 0 5 1 0 2588 4 27 0 1 879 4 26 0 0 1576 4 280 26 0 0 1028 4 26 0 0 1593 4 26 0 0 994 4 26 0 0 1299 4 284 24 1 0 280 4 PROCEDURE 784 285 0 0 0 0 0 26 0 0 994 4 26 0 0 520 4 288 27 0 1 1172 4 6 0 0 1460 4 27 0 0 419 4 6 0 0 7347 4 292 1 1 2 2 0 27 0 1 417 4 1 1 3 1 0 2 0 0 7336 4 296 6 1 0 2644 4 24 1 0 349 4 24 0 1 7345 4 26 0 1 299 4 300 0 0 0 311 3 0 0 0 302 3 24 0 1 7346 4 26 0 1 303 4 304 0 0 0 311 3 0 0 0 306 3 1 1 3 6 0 3 0 0 5755 4 308 4 1 0 5687 4 26 0 0 1165 4 2 0 0 5756 4 PROCEDURE 785 311 1 0 1 3 0 312 1 1 3 0 0 15 1 0 5683 4 2 1 0 5683 4 6 0 0 5729 4 316 5 1 0 5683 4 27 0 2 330 4 26 0 0 1559 4 6 1 0 3484 4 320 2 1 0 7366 4 26 0 0 1982 4 23 0 0 1 0 0 0 0 7366 3 324 24 1 0 321 4 1 1 3 1 0 0 0 3 3611 4 7 0 0 5729 4 328 0 0 3 3608 4 24 1 0 315 4 PROCEDURE 786 330 0 0 3 3611 4 6 1 0 5683 4 332 1 1 1 1 0 2 0 0 5729 4 0 0 3 3608 4 24 0 1 7360 4 336 6 1 0 5684 4 27 0 2 349 4 24 0 1 7360 4 6 1 0 5685 4 340 26 0 0 1165 4 2 1 2 5613 4 6 1 0 3498 4 1 0 1 768 0 344 14 1 2 5612 4 1 1 3 2 0 2 0 0 7351 4 24 0 1 7360 4 348 5 1 0 5684 4 3 1 1 5626 4 3 1 2 5590 4 6 0 0 1460 4 352 27 0 1 369 4 6 1 2 5590 4 24 0 1 7346 4 26 0 1 355 4 356 0 0 0 377 3 0 0 0 358 3 2 1 2 5592 4 2 1 2 5590 4 360 1 1 3 6 0 3 0 0 5755 4 4 1 2 5593 4 26 0 0 1165 4 364 2 0 0 5756 4 1 1 3 1 0 2 0 0 7346 4 25 0 2 2 0 368 24 1 0 377 4 6 0 0 7350 4 1 1 2 2 0 27 0 1 375 4 372 6 0 0 3609 4 1 0 1 16 0 14 0 0 5604 4 26 0 0 2258 4 376 24 1 0 393 4 26 0 0 422 4 6 0 0 7348 4 1 1 2 2 0 380 27 0 1 389 4 24 0 1 7354 4 6 1 0 5730 4 2 1 0 2766 4 384 26 0 0 2417 4 26 0 0 1570 4 6 1 0 2766 4 5 1 0 2644 4 388 27 0 0 393 4 6 0 0 7347 4 1 1 2 1 0 27 0 0 398 4 392 26 0 0 2449 4 24 0 1 7347 4 26 0 1 394 4 0 0 0 398 3 396 0 0 0 414 3 0 0 0 415 3 PROCEDURE 787 398 23 0 0 2 0 0 0 0 7360 3 400 24 1 0 402 4 24 1 0 286 4 24 0 1 7360 4 6 1 0 5684 4 404 5 1 0 2648 4 27 0 1 335 4 6 0 0 1460 4 27 0 3 410 4 408 6 0 0 3612 4 26 0 1 285 4 1 1 3 0 0 24 0 1 7360 4 412 2 1 0 5684 4 24 1 0 335 4 26 0 0 2057 4 6 0 0 7336 4 416 27 0 0 420 4 1 1 3 0 0 2 0 0 7336 4 26 0 1 285 4 420 1 1 3 1 0 26 0 1 285 4 PROCEDURE 788 422 0 0 0 0 0 24 0 3 0 4 424 6 0 0 4 22 18 0 3 3 0 18 0 1 4127 0 2 0 0 2258 4 428 24 0 1 2258 4 5 0 0 5605 4 24 0 1 2258 4 2 0 0 5605 4 432 26 0 0 2258 4 26 0 1 422 4 PROCEDURE 789 434 26 0 0 520 4 27 0 0 457 4 436 24 1 2 21 4 6 1 0 0 0 18 1 1 4126 0 5 1 0 3500 4 440 27 0 0 444 4 26 0 0 1128 4 26 0 0 994 4 24 1 0 434 4 444 18 1 1 2 0 1 1 2 89 0 27 0 1 451 4 1 1 3 65 0 448 1 0 1 3 0 24 1 2 21 4 14 1 0 0 0 24 1 2 21 4 452 6 1 0 0 0 24 1 2 17 4 5 1 0 50 0 27 0 0 465 4 456 27 0 3 441 4 24 1 0 2098 4 26 0 0 2246 4 27 0 1 434 4 460 26 0 0 520 4 27 0 0 879 4 26 0 0 1128 4 26 0 0 994 4 464 24 1 0 460 4 PROCEDURE 790 465 24 1 2 21 4 6 1 0 2 0 18 0 1 4120 0 468 1 1 2 84 0 27 0 0 498 4 1 1 2 21 0 27 0 0 485 4 472 1 1 2 10 0 27 0 1 441 4 26 0 0 994 4 26 0 0 520 4 476 27 0 0 457 4 24 1 2 21 4 6 1 0 0 0 18 0 1 4126 0 480 5 1 0 3500 4 27 0 0 451 4 26 0 0 1028 4 26 0 0 1593 4 484 24 1 0 474 4 26 0 0 1028 4 26 0 0 1593 4 26 0 0 994 4 488 26 0 0 2246 4 27 0 0 460 4 26 0 0 520 4 27 0 0 457 4 492 24 1 2 21 4 6 1 0 0 0 18 0 1 4126 0 5 1 0 3500 4 496 27 0 0 451 4 24 1 0 485 4 26 0 0 994 4 26 0 0 520 4 500 27 0 0 458 4 24 1 2 21 4 6 1 0 0 0 18 0 1 4126 0 504 5 1 0 3500 4 27 0 1 458 4 24 1 2 21 4 6 0 0 3 0 508 27 0 0 511 4 5 0 0 2645 4 27 0 1 458 4 26 0 0 2246 4 512 27 0 0 462 4 24 1 2 17 4 6 1 0 50 0 24 1 2 21 4 516 5 1 0 0 0 27 0 1 511 4 26 0 0 994 4 24 1 0 458 4 PROCEDURE 791 520 0 0 0 0 0 24 1 2 21 4 6 1 0 0 0 18 0 1 4126 0 524 5 1 0 3502 4 27 0 0 530 4 24 1 2 21 4 6 1 0 0 0 528 18 0 1 4124 0 5 1 0 3496 4 26 0 1 520 4 PROCEDURE 792 531 24 1 2 17 4 532 6 1 0 4 0 5 1 0 2582 4 27 0 1 884 4 26 0 0 1062 4 536 6 1 0 5552 4 26 0 0 1019 4 24 1 2 17 4 5 1 0 26 0 540 27 0 0 547 4 24 1 2 17 4 6 1 0 26 0 18 0 1 6 0 544 2 1 0 5552 4 26 0 0 2164 4 24 1 0 531 4 24 1 2 17 4 548 6 1 0 19 0 18 0 1 7 0 18 0 1 4121 0 2 0 0 2570 4 552 6 1 0 5561 4 26 0 0 1019 4 5 0 0 2570 4 27 0 1 541 4 556 26 0 0 2246 4 27 0 1 556 4 24 1 0 697 4 PROCEDURE 793 559 26 0 0 1364 4 560 6 1 0 1450 4 5 1 0 5716 4 27 0 1 573 4 6 0 0 1452 4 564 5 0 0 5715 4 27 0 1 573 4 26 0 0 774 4 6 0 0 1460 4 568 27 0 1 653 4 6 0 0 1454 4 5 0 0 5728 4 27 0 1 653 4 572 24 1 0 723 4 26 0 0 2468 4 24 1 2 17 4 6 1 0 4 0 576 5 1 0 2582 4 27 0 1 884 4 6 1 0 1450 4 24 1 2 17 4 580 5 1 0 26 0 27 0 1 587 4 1 0 1 1 0 24 1 2 17 4 584 15 1 0 19 0 5 0 0 1452 4 27 0 0 616 4 24 1 2 17 4 588 6 1 0 26 0 18 0 1 6 0 2 1 0 5552 4 26 0 0 2164 4 592 24 1 0 574 4 PROCEDURE 794 593 0 0 0 0 0 24 1 2 17 4 6 1 0 13 0 596 2 0 0 5554 4 24 1 2 17 4 6 1 0 23 0 2 0 0 5555 4 600 24 1 2 17 4 6 1 0 21 0 2 0 0 5556 4 1 0 1 1 0 604 24 1 2 17 4 15 1 0 19 0 2 0 0 5557 4 24 1 2 17 4 608 6 1 0 25 0 2 0 0 5558 4 24 1 2 17 4 6 1 0 10 0 612 18 0 1 6 0 2 1 0 5560 4 26 0 0 1855 4 26 0 1 593 4 PROCEDURE 795 616 24 1 2 17 4 6 1 0 26 0 3 1 0 5716 4 18 0 1 6 0 620 2 1 0 5552 4 1 0 1 1 0 24 1 2 17 4 15 1 0 19 0 624 2 0 0 5715 4 6 0 0 1460 4 27 0 0 630 4 6 0 0 1454 4 628 1 1 2 7 0 27 0 0 680 4 26 0 0 593 4 26 0 0 1846 4 632 1 1 3 8 0 2 0 0 5728 4 6 1 0 3504 4 2 1 0 7354 4 636 26 0 0 2417 4 26 0 0 1538 4 6 0 0 1454 4 5 0 0 5728 4 640 27 0 3 678 4 27 0 0 723 4 24 0 1 7345 4 26 0 1 643 4 644 0 0 0 652 3 0 0 0 646 3 6 1 0 5731 4 1 1 1 6 0 648 26 0 0 1165 4 2 0 0 5756 4 1 1 3 6 0 2 0 0 5755 4 PROCEDURE 796 652 26 0 0 2389 4 24 0 1 7347 4 26 0 1 654 4 0 0 0 652 3 656 0 0 0 658 3 0 0 0 659 3 26 0 0 2057 4 6 0 0 7354 4 660 4 0 0 7354 4 24 0 3 0 4 2 0 0 6 22 24 1 2 17 4 664 6 1 3 4 0 5 1 0 2580 4 27 0 1 637 4 6 0 0 1454 4 668 5 0 0 5728 4 27 0 1 678 4 6 0 0 1460 4 27 0 0 678 4 672 6 0 0 7348 4 1 1 2 3 0 27 0 1 678 4 1 1 3 1 0 676 2 0 0 7326 4 24 1 0 723 4 26 0 0 1128 4 24 1 0 881 4 PROCEDURE 797 680 26 0 0 994 4 26 0 0 1062 4 26 0 0 1855 4 26 0 0 1846 4 684 24 1 2 17 4 6 1 0 26 0 2 1 0 5716 4 1 0 1 1 0 688 24 1 2 17 4 15 1 0 19 0 2 0 0 5715 4 1 1 3 8 0 692 2 0 0 5728 4 26 0 0 1538 4 6 1 0 3504 4 2 1 0 7354 4 696 26 0 0 2417 4 26 0 0 994 4 24 1 2 21 4 6 1 0 0 0 700 5 1 0 3506 4 27 0 1 879 4 26 0 0 1364 4 6 0 0 1454 4 704 5 0 0 5728 4 27 0 1 559 4 6 1 0 1450 4 5 1 0 5716 4 708 27 0 1 573 4 6 1 0 1452 4 5 0 0 5715 4 27 0 1 573 4 712 24 0 1 7326 4 26 0 1 713 4 0 0 0 716 3 0 0 0 719 3 716 1 1 3 2 0 2 0 0 7326 4 24 1 0 720 4 26 0 0 774 4 720 6 0 0 1460 4 27 0 0 569 4 24 1 0 638 4 PROCEDURE 798 723 6 0 0 1460 4 724 27 0 0 778 4 24 0 1 7348 4 26 0 1 726 4 0 0 0 730 3 728 0 0 0 744 3 0 0 0 746 3 6 0 0 1456 4 27 0 1 734 4 732 6 0 0 1454 4 2 0 0 1456 4 26 0 0 774 4 26 0 0 2449 4 736 6 0 0 1454 4 5 0 0 1456 4 27 0 0 697 4 0 0 3 3611 4 740 6 0 0 3612 4 7 0 0 1456 4 0 0 3 3608 4 24 1 0 734 4 744 26 0 0 774 4 26 0 0 2449 4 26 0 0 1538 4 26 0 0 285 4 748 27 0 3 747 4 27 0 0 760 4 26 0 0 994 4 26 0 0 520 4 752 27 0 0 760 4 6 0 0 7348 4 1 1 2 3 0 27 0 0 758 4 756 26 0 0 774 4 26 0 0 2449 4 26 0 0 1538 4 24 1 0 1172 4 760 24 0 1 7347 4 26 0 1 761 4 0 0 0 765 3 0 0 0 841 3 764 0 0 0 841 3 6 1 0 2644 4 3 1 1 5626 4 2 1 2 5590 4 768 26 0 0 422 4 25 0 2 0 0 24 1 0 772 4 24 1 0 841 4 772 26 0 0 2057 4 24 1 0 841 4 PROCEDURE 799 774 0 0 0 0 0 26 0 0 832 4 776 27 0 0 678 4 26 0 1 774 4 PROCEDURE 800 778 24 0 1 7346 4 26 0 1 779 4 780 0 0 0 784 3 0 0 0 782 3 1 1 3 4 0 2 0 0 5754 4 784 6 0 0 1456 4 5 0 0 5754 4 27 0 0 800 4 27 0 3 678 4 788 26 0 0 2389 4 24 0 1 7347 4 26 0 1 790 4 0 0 0 794 3 792 0 0 0 796 3 0 0 0 797 3 26 0 0 1570 4 24 1 0 784 4 796 26 0 0 2057 4 26 0 0 1128 4 26 0 0 1538 4 24 1 0 881 4 PROCEDURE 801 800 24 0 1 7348 4 26 0 1 801 4 0 0 0 805 3 0 0 0 828 3 804 0 0 0 828 3 6 0 0 1458 4 27 0 1 809 4 6 0 0 1456 4 808 2 0 0 1458 4 0 0 3 3611 4 6 0 0 1458 4 1 1 1 2 0 812 2 0 0 1458 4 0 0 3 3608 4 24 0 1 7354 4 6 1 0 5730 4 816 5 1 0 2644 4 27 0 0 678 4 26 0 0 2417 4 26 0 0 1570 4 820 6 0 0 5754 4 5 0 0 1458 4 27 0 1 814 4 26 0 0 994 4 824 26 0 0 520 4 27 0 0 849 4 26 0 0 1128 4 24 1 0 823 4 828 26 0 0 285 4 27 0 0 849 4 27 0 3 828 4 24 1 0 823 4 PROCEDURE 802 832 0 0 0 0 0 6 0 0 7354 4 4 0 0 7354 4 24 0 3 0 4 836 2 0 0 6 22 24 1 2 17 4 6 1 3 4 0 5 1 0 2580 4 840 26 0 1 832 4 PROCEDURE 803 841 24 0 1 7326 4 26 0 1 842 4 0 0 0 845 3 844 0 0 0 848 3 1 1 3 2 0 2 0 0 7326 4 24 1 0 879 4 848 26 0 0 1538 4 24 1 2 21 4 6 1 0 0 0 5 1 0 3506 4 852 27 0 0 857 4 26 0 0 832 4 27 0 1 878 4 26 0 0 2468 4 856 24 1 0 879 4 26 0 0 1364 4 6 1 0 1450 4 5 1 0 5716 4 860 27 0 0 864 4 26 0 0 832 4 27 0 0 879 4 24 1 0 878 4 864 6 0 0 1452 4 5 0 0 5715 4 27 0 1 861 4 6 0 0 1454 4 868 5 0 0 5728 4 27 0 1 874 4 6 0 0 1460 4 27 0 1 659 4 872 26 0 0 774 4 24 1 0 723 4 26 0 0 774 4 26 0 0 2458 4 876 26 0 0 1538 4 24 1 0 659 4 26 0 0 2458 4 26 0 0 1299 4 880 26 0 0 1128 4 26 0 0 994 4 26 0 0 1299 4 24 1 0 880 4 PROCEDURE 804 884 26 0 0 1128 4 24 1 2 17 4 6 1 0 4 0 5 1 0 2582 4 888 27 0 1 3036 4 24 1 2 17 4 6 1 0 26 0 18 0 1 6 0 892 2 1 0 5552 4 26 0 0 2164 4 24 1 0 885 4 PROCEDURE 805 895 6 1 0 2660 4 896 24 1 2 15 4 2 1 0 48 0 0 0 3 3608 4 24 0 2 2820 4 900 24 1 2 15 4 28 1 2 2 0 6 1 0 3508 4 24 1 2 15 4 904 28 1 1 12 0 6 1 0 2658 4 24 1 2 15 4 2 1 0 4 0 908 26 0 0 2546 4 23 0 0 4097 0 0 0 0 7356 3 24 1 0 912 4 912 26 0 0 1104 4 26 0 1 1593 4 24 0 2 2820 4 24 1 2 15 4 916 28 1 2 2 0 6 1 0 2660 4 24 1 2 15 4 2 1 0 48 0 920 6 1 0 3510 4 24 1 2 15 4 28 1 1 10 0 24 1 0 905 4 PROCEDURE 806 924 0 0 0 0 0 26 0 0 2552 4 6 1 0 3512 4 14 1 0 2634 4 928 1 1 3 0 0 1 0 1 960 0 15 1 0 2624 4 14 1 0 2634 4 932 1 1 3 255 0 26 0 1 924 4 1 0 1 48 0 26 0 0 924 4 936 24 1 0 1630 4 1 0 1 12 0 26 0 0 924 4 24 1 0 1637 4 940 1 0 1 3 0 26 0 0 924 4 24 1 0 1644 4 PROCEDURE 807 943 0 0 0 0 0 944 1 0 1 60 0 14 1 0 2636 4 26 0 0 2552 4 24 0 3 0 4 948 6 0 0 2 22 27 0 1 954 4 1 0 1 3 0 1 1 3 65 0 952 14 1 0 2636 4 1 1 3 0 0 26 0 1 943 4 PROCEDURE 808 955 0 0 0 0 0 956 1 0 1 768 0 1 1 2 1 0 27 0 0 969 4 1 1 2 1 0 960 27 0 0 968 4 1 1 2 1 0 27 0 0 967 4 1 1 2 1 0 964 27 0 0 966 4 18 1 1 4126 0 18 1 1 4126 0 18 1 1 4126 0 968 18 1 1 4126 0 6 1 0 3514 4 14 1 0 2638 4 26 0 1 955 4 PROCEDURE 809 972 0 0 0 0 0 6 1 0 2636 4 5 1 0 2660 4 27 0 0 982 4 976 6 1 0 2660 4 2 1 0 2636 4 6 0 0 2558 4 1 0 1 24 0 980 14 1 0 5581 4 26 0 0 2546 4 26 0 1 972 4 PROCEDURE 810 983 0 0 0 0 0 984 0 1 0 3458 4 0 0 3 0 4 0 0 2 16 4 6 1 0 3484 4 988 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 992 0 1 1 3458 4 26 0 1 983 4 PROCEDURE 811 994 0 0 0 0 0 26 0 0 120 4 996 24 1 2 21 4 0 1 2 49 0 1 1 3 0 0 18 1 1 7 0 1000 3 1 0 3458 4 26 1 3 3458 4 1 1 3 0 0 18 1 1 3 0 1004 2 0 0 2564 4 1 0 1 3 0 1 1 3 126 0 24 0 1 2564 4 1008 18 1 1 0 0 24 1 2 21 4 14 1 3 0 0 24 1 2 21 4 1012 24 0 2 4 0 18 1 1 4123 0 1 1 3 44 0 18 1 1 5 0 1016 24 1 2 21 4 28 1 1 0 0 26 0 1 994 4 PROCEDURE 812 1019 0 0 0 0 0 1020 18 1 1 4118 0 2 1 0 2576 4 6 1 0 2576 4 18 1 1 2 0 1024 2 1 0 2576 4 27 1 1 1022 4 6 1 0 2576 4 26 0 1 1019 4 PROCEDURE 813 1028 0 0 0 0 0 6 1 0 3516 4 28 0 0 5550 4 24 0 1 6276 4 1032 26 0 1 1032 4 0 0 0 1039 3 0 0 0 1035 3 24 0 2 2698 4 1036 24 1 2 21 4 28 0 2 0 0 24 1 0 1042 4 24 0 2 2674 4 1040 24 1 2 21 4 28 0 3 0 0 6 0 0 6000 4 27 0 0 1045 4 1044 26 0 1 1028 4 0 0 3 3611 4 1 1 3 2 0 7 0 0 5550 4 1048 6 0 0 5551 4 1 1 2 6 0 27 0 1 1060 4 26 1 3 3518 4 1052 6 0 3 5555 4 27 0 0 1060 4 1 1 2 256 0 27 0 3 1058 4 1056 1 1 3 2 0 7 0 3 5556 4 25 0 3 2 0 24 1 0 1052 4 1060 0 0 3 3608 4 26 0 1 1028 4 PROCEDURE 814 1062 0 0 0 0 0 6 1 0 3516 4 1064 28 0 0 5550 4 24 0 1 6276 4 26 0 1 1066 4 0 0 0 1079 3 1068 0 0 0 1069 3 24 0 2 2736 4 24 1 2 21 4 28 0 2 0 0 1072 6 1 0 5552 4 18 0 1 6 0 2 1 0 5552 4 6 1 0 5560 4 1076 18 0 1 6 0 2 1 0 5560 4 26 0 1 1062 4 24 0 2 2666 4 1080 24 1 2 21 4 28 0 3 0 0 26 0 1 1062 4 PROCEDURE 815 1083 0 0 0 0 0 1084 24 1 2 17 4 24 0 2 4 0 18 1 1 4123 0 1 1 3 50 0 1088 18 1 1 5 0 24 1 2 19 4 28 1 1 4 0 0 1 0 3458 4 1092 0 0 3 0 4 0 0 2 18 4 6 1 0 3472 4 4 0 0 10 4 1096 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 3458 4 1100 26 0 1 1083 4 PROCEDURE 816 1101 0 0 0 0 0 26 0 0 3681 4 26 0 1 1101 4 PROCEDURE 817 1104 0 0 0 0 0 24 1 2 15 4 2 1 0 0 0 26 0 0 3717 4 1108 26 0 1 1104 4 PROCEDURE 818 1109 0 0 0 0 0 6 0 0 6275 4 27 0 0 1116 4 1112 6 1 0 3520 4 24 1 2 15 4 28 1 1 0 0 24 1 0 1119 4 1116 6 1 0 2644 4 24 1 2 15 4 2 1 0 2 0 26 0 0 1104 4 1120 26 0 1 1109 4 PROCEDURE 819 1121 0 0 0 0 0 1 1 3 0 0 24 1 2 15 4 1124 2 1 0 2 0 24 1 2 15 4 2 1 0 4 0 26 0 1 1121 4 PROCEDURE 820 1128 0 0 0 0 0 26 0 0 1109 4 26 0 0 2540 4 6 1 0 2640 4 1132 24 1 2 15 4 2 1 0 2 0 24 1 2 21 4 6 1 0 49 0 1136 18 0 1 4125 0 1 1 2 4 0 3 1 0 3458 4 26 1 3 3458 4 1140 1 1 3 0 0 1 0 1 3 0 24 1 2 21 4 15 1 0 49 0 1144 2 0 0 1159 4 24 0 1 1159 4 18 1 1 0 0 24 1 2 21 4 1148 14 1 3 0 0 24 1 2 21 4 24 0 2 0 0 18 1 1 4123 0 1152 1 1 3 32 0 18 1 1 5 0 24 1 2 15 4 28 1 1 4 0 1156 26 0 0 1104 4 26 0 0 1109 4 26 0 1 1128 4 PROCEDURE 821 1159 0 0 0 0 0 1160 2 1 0 4540 4 0 0 3 3608 4 24 0 2 4590 4 12 1 0 4540 4 1164 26 0 1 1159 4 PROCEDURE 822 1165 0 0 0 0 0 2 1 0 4540 4 0 0 3 3611 4 1168 24 0 2 4610 4 12 1 0 4540 4 0 0 3 3608 4 26 0 1 1165 4 PROCEDURE 823 1172 26 1 3 2642 4 6 1 0 3522 4 2 1 0 7356 4 6 1 0 3524 4 1176 2 1 0 7360 4 6 1 0 3526 4 28 0 0 5650 4 24 1 2 21 4 1180 24 0 2 0 0 18 1 1 4123 0 1 1 3 32 0 18 1 1 5 0 1184 28 0 0 5650 4 24 0 1 6276 4 26 0 1 1186 4 0 0 0 1189 3 1188 0 0 0 1204 3 24 0 0 25 4 0 1 2 5650 4 18 1 1 2 0 1192 1 1 2 125 0 27 0 0 1213 4 1 1 2 1 0 27 0 0 1283 4 1196 1 1 1 126 0 2 0 0 5714 4 6 1 0 5682 4 18 0 1 2 0 1200 4 0 0 5714 4 2 1 0 5682 4 26 0 0 1322 4 24 1 0 1192 4 1204 6 1 0 5650 4 2 1 0 5682 4 2 0 0 5711 4 25 0 3 2 0 1208 24 1 0 1209 4 24 0 0 25 4 0 1 2 5650 4 18 1 1 2 0 1212 24 1 0 1214 4 PROCEDURE 824 1213 26 0 0 1322 4 1 1 2 125 0 27 0 0 1229 4 1216 1 1 2 1 0 27 0 0 1283 4 1 1 1 31 0 27 0 0 1295 4 1220 1 1 1 4 0 27 0 0 1238 4 1 1 1 91 0 2 0 0 5714 4 1224 6 1 0 5712 4 18 0 1 2 0 4 0 0 5714 4 2 1 0 5712 4 1228 24 1 0 1213 4 26 0 0 1351 4 24 0 1 7356 4 2 1 0 5684 4 1232 2 0 0 5710 4 2 1 0 5712 4 23 0 0 2 0 0 0 0 7356 3 1236 24 1 0 1213 4 24 1 0 1289 4 PROCEDURE 825 1238 26 0 0 1322 4 1 1 2 81 0 1240 27 0 0 1281 4 1 1 2 1 0 27 0 0 1279 4 1 1 2 1 0 1244 27 0 0 1292 4 1 1 2 1 0 27 0 0 1277 4 1 1 2 7 0 1248 27 0 0 1275 4 1 1 2 8 0 27 0 0 1273 4 1 1 2 2 0 1252 27 0 0 1271 4 1 1 2 13 0 27 0 0 1269 4 1 1 2 11 0 1256 27 0 1 1260 4 26 0 0 2552 4 6 1 0 2656 4 24 1 0 1230 4 1260 1 1 2 1 0 27 0 1 1265 4 26 0 0 2552 4 6 1 0 2656 4 1264 24 1 0 1284 4 1 1 3 0 0 26 0 0 1322 4 1 1 2 125 0 1268 24 1 0 1256 4 1 1 3 95 0 24 1 0 1223 4 1 1 3 125 0 1272 24 1 0 1223 4 1 1 3 94 0 24 1 0 1223 4 1 1 3 91 0 1276 24 1 0 1223 4 1 1 3 127 0 24 1 0 1223 4 1 1 3 126 0 1280 24 1 0 1223 4 1 1 3 111 0 24 1 0 1223 4 26 0 0 1351 4 1284 24 0 1 7356 4 2 1 0 5684 4 6 1 0 2648 4 24 0 1 7356 4 1288 2 1 0 5686 4 6 1 0 3522 4 2 1 0 7360 4 24 1 0 298 4 1292 1 1 3 1 0 2 0 0 5710 4 24 1 0 1213 4 6 1 0 2648 4 1296 24 0 1 7356 4 2 1 0 5684 4 24 1 0 1289 4 PROCEDURE 826 1299 0 0 0 0 0 1300 24 1 2 21 4 6 1 0 0 0 5 1 0 2586 4 27 0 0 1316 4 1304 1 1 1 30 0 27 0 0 1318 4 1 1 2 21 0 27 0 0 1318 4 1308 1 1 1 24 0 27 0 0 559 4 24 1 2 21 4 6 1 0 0 0 1312 18 0 1 4124 0 5 1 0 3496 4 27 0 0 1320 4 26 0 1 1299 4 1316 26 0 0 2468 4 24 1 0 259 4 26 0 0 2468 4 24 1 0 531 4 1320 26 0 0 2468 4 24 1 0 885 4 PROCEDURE 827 1322 0 0 0 0 0 23 0 0 1 0 1324 0 0 0 7360 3 24 1 0 1340 4 24 0 1 6276 4 26 0 1 1327 4 1328 0 0 0 1334 3 0 0 0 1330 3 6 0 0 5711 4 27 0 1 1342 4 1332 1 1 3 1 0 2 0 0 5711 4 6 1 0 3524 4 2 1 0 7360 4 1336 25 0 3 2 0 24 1 0 1338 4 24 0 0 25 4 0 1 2 5650 4 1340 18 1 1 2 0 26 0 1 1322 4 1 1 3 0 0 2 0 0 5711 4 1344 6 1 0 3528 4 2 1 0 7360 4 25 0 3 2 0 24 1 0 1348 4 1348 24 0 0 25 4 0 1 2 5650 4 24 1 0 1229 4 PROCEDURE 828 1351 0 0 0 0 0 1352 6 0 0 5710 4 27 0 0 1362 4 18 1 1 10 0 2 1 0 5718 4 1356 6 1 0 5713 4 26 0 0 1159 4 2 1 0 5713 4 0 1 2 5718 4 1360 5 1 0 5712 4 24 1 0 1363 4 6 1 0 5712 4 26 0 1 1351 4 PROCEDURE 829 1364 0 0 0 0 0 6 1 0 3530 4 28 1 1 1450 4 24 0 1 6276 4 1368 26 0 1 1368 4 0 0 0 1371 3 0 0 0 1445 3 24 0 2 2678 4 1372 24 1 2 21 4 28 0 3 0 0 6 1 0 1450 4 26 0 0 1019 4 1376 2 1 0 1450 4 6 1 0 1454 4 26 0 0 1019 4 18 1 1 4126 0 1380 2 1 0 2576 4 18 1 1 2 0 1 1 2 84 0 27 0 0 1427 4 1384 1 1 2 21 0 27 0 0 1426 4 1 1 2 10 0 27 0 0 1425 4 1388 6 1 0 1454 4 26 0 0 1019 4 6 1 0 2577 4 27 0 3 1423 4 1392 2 1 0 1454 4 6 1 0 1456 4 26 0 0 1019 4 3 1 0 2576 4 1396 18 1 1 4126 0 1 1 3 0 0 18 1 1 2 0 1 1 2 84 0 1400 27 0 0 1407 4 1 1 2 21 0 27 0 0 1406 4 1 1 2 10 0 1404 27 0 1 1423 4 PROCEDURE 830 1405 1 1 3 1 0 1 1 1 1 0 1 1 1 1 0 1408 2 0 0 7348 4 6 1 0 2576 4 18 0 1 4126 0 2 1 0 1456 4 1412 6 1 0 1457 4 27 0 3 1423 4 2 1 0 1456 4 6 1 0 1458 4 1416 27 0 0 1443 4 27 0 3 1423 4 6 0 0 1456 4 5 0 0 1458 4 1420 27 0 2 1423 4 1 1 3 0 0 24 1 0 1443 4 26 0 0 1128 4 1424 24 1 0 881 4 PROCEDURE 831 1425 1 1 3 1 0 1 1 1 1 0 1 1 1 1 0 1428 2 0 0 7348 4 6 1 0 2577 4 27 0 3 1423 4 2 1 0 1454 4 1432 6 1 0 1456 4 26 0 0 1019 4 2 1 0 2576 4 6 1 0 2577 4 1436 27 0 3 1423 4 3 1 0 1456 4 27 0 0 1442 4 6 0 0 1454 4 1440 5 0 0 1456 4 27 0 2 1423 4 1 1 3 1 0 2 0 0 1460 4 1444 26 0 1 1364 4 PROCEDURE 832 1445 24 0 2 2752 4 24 1 2 21 4 28 0 2 0 0 1448 24 1 0 1374 4 0 0 0 0 0 SECTION 833 1450 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 PROCEDURE 834 1462 0 0 0 0 0 2 0 0 2564 4 1464 1 0 1 28 0 15 0 0 2564 4 18 0 1 4126 0 26 0 0 1159 4 1468 2 0 0 7360 4 26 1 3 3480 4 6 0 3 6206 4 5 0 0 2564 4 1472 27 0 0 1494 4 25 0 3 2 0 24 1 0 1470 4 0 1 0 3458 4 1476 0 0 3 0 4 6 0 0 1 4 4 0 0 7360 4 2 0 0 3464 4 1480 0 1 1 3458 4 24 0 3 3464 4 6 0 0 1074 0 3 0 0 1165 4 1484 27 0 0 1495 4 1 1 3 0 0 1 0 1 3 0 15 0 0 2564 4 1488 26 0 0 1159 4 1 1 2 2 0 3 0 0 1159 4 27 0 1 1496 4 1492 6 0 0 1165 4 24 1 0 1495 4 6 0 3 6207 4 26 0 1 1462 4 1496 1 1 3 0 0 26 0 1 1462 4 PROCEDURE 835 1498 0 0 0 0 0 2 0 0 2564 4 1500 26 1 3 3532 4 1 0 1 28 0 1 1 3 0 0 15 0 3 5979 4 1504 18 0 1 4126 0 5 0 0 2564 4 27 0 2 1509 4 25 0 3 1 0 1508 24 1 0 1502 4 1 1 3 0 0 1 0 1 1 0 15 0 3 5979 4 1512 26 0 1 1498 4 PROCEDURE 836 1513 0 0 0 0 0 1 0 1 1 0 15 0 3 5038 4 1516 2 0 0 7360 4 1 1 3 0 0 24 0 1 7360 4 15 0 0 5979 4 1520 26 0 1 1513 4 PROCEDURE 837 1521 0 0 0 0 0 2 0 0 2564 4 26 1 3 5140 4 1524 25 0 3 0 0 24 1 0 1527 4 24 1 0 1534 4 1 0 1 1031 0 1528 15 0 3 5142 4 5 0 0 2564 4 27 0 0 1535 4 1 1 3 0 0 1532 25 0 3 2 0 24 1 0 1528 4 26 0 1 1521 4 1 0 1 24 0 1536 15 0 3 5142 4 26 0 1 1521 4 PROCEDURE 838 1538 0 0 0 0 0 0 0 3 3611 4 1540 26 1 3 3484 4 1 1 3 2 0 3 0 3 5605 4 1 1 1 2 0 1544 25 0 3 1 0 24 1 0 1542 4 0 0 3 3608 4 26 1 2 3522 4 1548 1 1 3 1 0 2 0 0 7351 4 1 1 3 1 0 2 0 0 7347 4 1552 1 1 3 2 0 2 0 0 7350 4 1 1 3 2 0 2 0 0 7346 4 1556 2 1 0 2636 4 26 0 0 1109 4 26 0 1 1538 4 PROCEDURE 839 1559 0 0 0 0 0 1560 0 0 3 3611 4 26 1 3 3484 4 1 0 1 15 0 1 1 3 20 0 1564 15 0 3 5605 4 2 0 3 5605 4 25 0 3 1 0 24 1 0 1563 4 1568 0 0 3 3608 4 26 0 1 1559 4 PROCEDURE 840 1570 0 0 0 0 0 1 1 3 2 0 1572 0 0 3 3611 4 7 0 0 5754 4 0 0 3 3608 4 26 0 1 1570 4 PROCEDURE 841 1576 0 0 0 0 0 26 0 0 1109 4 26 0 0 1109 4 6 1 0 3534 4 1580 2 1 0 7356 4 24 0 2 2790 4 24 1 2 15 4 28 1 2 2 0 1584 26 0 0 1104 4 24 1 2 21 4 6 1 0 0 0 18 0 1 4124 0 1588 5 1 0 3496 4 27 0 0 1591 4 26 0 0 994 4 26 0 0 1109 4 1592 26 0 1 1576 4 PROCEDURE 842 1593 0 0 0 0 0 23 0 0 1 0 0 0 0 7356 3 1596 24 1 0 1598 4 24 1 0 914 4 6 1 0 3536 4 28 1 1 5568 4 1600 2 1 0 2634 4 2 1 0 2636 4 2 1 0 2638 4 6 0 0 5550 4 1604 26 0 0 131 4 3 0 0 5550 4 3 0 0 5568 4 26 0 0 1462 4 1608 27 0 0 914 4 2 0 0 5569 4 6 0 0 7360 4 26 0 0 1498 4 1612 24 0 3 0 4 6 0 0 6 22 2 0 0 5570 4 PROCEDURE 843 1615 6 0 0 5551 4 1616 27 0 0 895 4 27 0 3 895 4 1 1 2 7 0 27 0 2 895 4 1620 1 1 1 7 0 18 0 1 4 0 7 0 0 5570 4 6 0 0 5551 4 1624 2 0 0 7349 4 6 0 0 5552 4 1 1 2 598 0 27 0 2 934 4 1628 1 1 1 598 0 26 0 0 1159 4 18 0 1 3 0 2 0 0 5571 4 1632 6 0 0 5553 4 1 1 2 598 0 27 0 2 937 4 1 1 1 598 0 1636 26 0 0 1159 4 7 0 0 5571 4 6 0 0 5554 4 27 0 0 940 4 1640 1 1 2 598 0 27 0 2 940 4 1 1 1 598 0 26 0 0 1159 4 1644 18 0 1 1 0 7 0 0 5570 4 26 1 2 2642 4 26 1 1 3538 4 PROCEDURE 844 1648 24 0 1 7349 4 26 0 1 1649 4 0 0 0 1656 3 0 0 0 1656 3 1652 0 0 0 1668 3 0 0 0 1668 3 0 0 0 1796 3 0 0 0 1734 3 1656 6 0 1 5555 4 27 0 0 1796 4 5 0 0 2565 4 27 0 0 1661 4 1660 27 0 2 1717 4 4 0 0 2565 4 2 0 2 5572 4 25 0 2 4 0 1664 24 1 0 1665 4 25 0 1 1 0 24 1 0 1656 4 24 1 0 1796 4 PROCEDURE 845 1668 6 0 1 5555 4 27 0 0 1796 4 27 0 3 1722 4 1 1 2 256 0 1672 27 0 2 1722 4 6 0 1 5555 4 26 0 0 1159 4 3 0 2 5572 4 1676 24 0 3 0 4 2 0 0 6 22 6 0 3 5038 4 27 0 0 1722 4 1680 6 0 0 6270 4 27 0 0 1691 4 24 0 3 0 4 6 1 0 4 22 1684 3 1 0 2764 4 24 0 3 24 4 7 0 0 0 0 24 1 2 17 4 1688 6 1 2 21 0 26 1 2 2764 4 24 1 0 1694 4 0 0 2 2559 4 1692 15 0 3 5038 4 18 0 1 4127 0 27 0 0 1722 4 2 0 2 5575 4 1696 0 0 2 2560 4 15 0 3 5038 4 27 0 1 1705 4 24 0 3 1 4 1700 6 0 3 1074 0 2 0 2 5574 4 26 0 0 1513 4 18 0 1 3 0 1704 24 1 0 1711 4 18 0 3 1 0 18 0 1 4127 0 2 0 2 5573 4 1708 6 0 2 5572 4 26 0 0 1521 4 27 0 0 1722 4 7 0 2 5572 4 1712 25 0 2 4 0 24 1 0 1714 4 25 0 1 1 0 24 1 0 1668 4 1716 24 1 0 1796 4 6 1 0 3540 4 26 0 0 943 4 27 0 0 1665 4 1720 26 0 0 955 4 24 1 0 1665 4 6 1 0 3542 4 26 0 0 943 4 1724 27 0 0 1714 4 26 0 0 955 4 24 1 0 1714 4 6 1 0 3544 4 1728 26 0 0 943 4 27 0 0 1794 4 18 0 3 3 0 18 0 1 4127 0 1732 26 0 0 955 4 24 1 0 1794 4 PROCEDURE 846 1734 26 1 1 3518 4 6 0 1 5556 4 1736 27 0 3 1727 4 26 0 0 1159 4 2 0 2 5574 4 6 0 1 5555 4 1740 27 0 0 1796 4 27 0 3 1727 4 1 1 2 2457 0 27 0 2 1727 4 1744 6 0 1 5555 4 18 1 1 4126 0 27 0 1 1762 4 18 1 1 2 0 1748 26 0 0 1159 4 3 0 2 5573 4 24 0 3 0 4 2 0 0 6 22 1752 24 0 3 1 4 6 0 3 1074 0 27 0 0 1727 4 4 0 2 5574 4 1756 2 0 2 5572 4 6 0 0 3609 4 7 0 2 5573 4 1 1 3 0 0 1760 26 0 0 1513 4 24 1 0 1790 4 18 1 1 2 0 26 0 0 1159 4 1764 2 0 2 5573 4 6 0 1 5556 4 1 1 2 2 0 27 0 3 1727 4 1768 1 1 2 152 0 27 0 2 1727 4 6 0 1 5555 4 18 0 1 2 0 1772 0 0 3 3611 4 4 0 1 5556 4 0 0 3 3608 4 26 0 0 131 4 1776 3 0 0 1462 4 18 1 1 4126 0 2 0 1 5555 4 18 1 1 2 0 1780 2 0 1 5556 4 6 0 0 1462 4 26 0 0 1462 4 27 0 1 1787 4 1784 6 0 0 1165 4 27 0 0 1727 4 4 0 0 1159 4 2 0 2 5572 4 1788 6 1 0 7360 4 26 0 0 1498 4 18 0 1 4 0 7 0 2 5572 4 1792 25 0 2 3 0 24 1 0 1794 4 25 0 1 2 0 24 1 0 1735 4 PROCEDURE 847 1796 6 0 0 7356 4 3 0 0 2566 4 1 1 1 64 0 4 1 0 2590 4 1800 24 1 2 19 4 2 1 0 50 0 6 1 0 2586 4 24 1 2 19 4 1804 2 1 0 4 0 24 0 2 5568 4 18 1 1 4123 0 1 1 3 22 0 1808 18 1 1 5 0 24 1 2 19 4 28 0 1 7 0 26 0 0 1101 4 1812 24 0 2 2820 4 24 1 2 15 4 28 1 2 2 0 6 0 0 5551 4 1816 1 1 2 6 0 27 0 0 1822 4 24 0 2 2834 4 24 1 2 15 4 1820 28 1 2 18 0 24 1 0 1844 4 24 0 2 2852 4 24 1 2 15 4 1824 28 1 2 18 0 26 1 3 3546 4 1 1 3 0 0 0 1 0 3458 4 1828 0 0 3 0 4 24 1 2 15 4 24 0 2 0 0 24 0 3 0 4 1832 4 0 0 6 22 2 0 0 3464 4 0 1 1 3458 4 24 0 3 3464 4 1836 0 1 2 22 0 18 1 1 2 0 27 0 0 1837 4 18 1 1 8 0 1840 24 1 2 15 4 2 1 3 22 0 25 0 3 4 0 24 1 0 1827 4 1844 26 0 0 1104 4 26 0 1 1593 4 PROCEDURE 848 1846 0 0 0 0 0 24 0 2 2896 4 1848 24 1 2 15 4 28 1 2 2 0 6 1 0 2646 4 26 0 0 1104 4 1852 1 1 3 2 0 2 0 0 7352 4 26 0 1 1846 4 PROCEDURE 849 1855 0 0 0 0 0 1856 6 0 0 5000 4 2 1 0 5569 4 2 1 0 2636 4 6 0 0 5554 4 1860 3 0 0 5757 4 2 1 0 5575 4 6 0 0 5557 4 27 0 1 1870 4 1864 26 0 0 2552 4 6 1 0 2606 4 18 0 1 4124 0 2 1 0 2636 4 1868 1 1 3 9 0 3 0 0 5557 4 3 1 0 5581 4 6 0 0 5555 4 1872 1 1 2 4097 0 27 0 3 1879 4 6 1 0 2626 4 2 1 0 2636 4 1876 26 0 0 2552 4 6 0 0 5555 4 1 1 2 4097 0 1 1 1 4097 0 1880 3 0 0 5758 4 3 1 0 5585 4 26 0 0 1159 4 18 0 3 1 0 1884 1 1 2 4 0 2 1 0 5579 4 6 0 0 5558 4 3 1 0 5587 4 1888 27 0 0 1894 4 1 1 3 1 0 3 0 0 5558 4 2 1 0 5587 4 1892 6 1 0 2632 4 24 1 0 1895 4 6 1 0 2630 4 2 1 0 2634 4 PROCEDURE 850 1896 6 0 0 5561 4 27 0 0 1907 4 18 1 1 4125 0 2 0 0 2564 4 1900 6 0 0 5553 4 18 1 1 4125 0 5 0 0 2564 4 27 0 0 1905 4 1904 26 0 0 972 4 6 1 0 5560 4 24 1 0 1909 4 6 1 0 5552 4 1908 3 1 0 5560 4 18 0 1 4122 0 2 1 0 5572 4 6 1 0 5552 4 1912 18 0 1 4122 0 2 1 0 5588 4 6 0 0 5139 4 27 0 0 1926 4 1916 26 1 1 5138 4 6 0 1 5143 4 18 0 3 2 0 18 0 1 4126 0 1920 4 0 0 3613 4 18 0 1 1 0 5 0 0 5553 4 27 0 0 1931 4 1924 25 0 1 2 0 24 1 0 1917 4 6 0 0 3614 4 3 1 0 5588 4 1928 18 0 1 6 0 2 1 0 5552 4 26 0 0 972 4 1 1 3 63 0 1932 18 1 1 4118 0 15 0 1 5143 4 1 1 2 7 0 27 0 0 1941 4 1936 1 1 2 1 0 27 0 0 1941 4 1 1 2 3 0 27 0 0 1941 4 1940 26 0 0 972 4 24 0 3 0 4 6 1 0 2 22 18 0 3 3 0 1944 18 0 1 4127 0 1 1 1 1 0 4 0 0 2565 4 4 0 0 2565 4 1948 2 1 0 5571 4 6 0 0 5556 4 3 0 0 5759 4 3 1 0 5583 4 1952 26 0 0 1159 4 26 0 0 1521 4 27 0 1 1956 4 26 0 0 972 4 1956 18 0 1 4125 0 2 1 0 5577 4 26 0 0 1109 4 26 0 0 1109 4 1960 6 1 0 3548 4 24 1 2 19 4 28 0 0 0 0 6 1 0 2582 4 1964 24 1 2 19 4 2 1 0 4 0 24 0 2 5568 4 18 1 1 4123 0 1968 1 1 3 22 0 18 1 1 5 0 24 1 2 19 4 28 1 1 6 0 1972 26 0 0 1101 4 6 1 0 3550 4 28 0 0 5590 4 1 1 3 8 0 1976 2 0 0 5604 4 26 1 1 3546 4 6 0 0 5558 4 1 1 1 1 0 1980 2 0 0 7345 4 26 0 1 1855 4 PROCEDURE 851 1982 0 0 0 0 0 24 0 1 7346 4 1984 26 0 1 1984 4 0 0 0 1990 3 0 0 0 1987 3 1 1 3 1 0 1988 2 0 0 7346 4 24 1 0 2008 4 25 0 1 2 0 24 1 0 2008 4 1992 26 1 3 3546 4 26 1 1 3476 4 6 0 3 5627 4 24 1 2 19 4 1996 2 1 1 5 0 6 0 3 5626 4 24 1 2 19 4 2 1 1 7 0 2000 25 0 1 4 0 24 1 0 2002 4 25 0 3 2 0 24 1 0 1994 4 2004 26 0 0 1101 4 26 1 1 3546 4 6 1 0 3552 4 28 0 0 5626 4 2008 26 0 1 1982 4 PROCEDURE 852 2009 0 0 0 0 0 24 0 1 7350 4 26 0 1 2011 4 2012 0 0 0 2032 3 0 0 0 2014 3 24 0 2 2936 4 24 1 2 15 4 2016 28 1 2 2 0 0 0 3 3611 4 1 1 3 1 0 7 0 0 5604 4 2020 0 0 3 3608 4 1 1 3 1 0 2 0 0 7350 4 6 0 0 5604 4 2024 18 1 1 4124 0 27 0 0 2031 4 6 0 0 3615 4 24 1 2 15 4 2028 2 0 0 3 0 18 1 1 4 0 2 0 0 5604 4 24 1 0 2033 4 2032 26 0 0 1121 4 24 0 2 2942 4 24 1 2 15 4 28 1 2 6 0 2036 24 0 3 0 4 6 1 0 2 22 2 1 0 2576 4 24 0 3 0 4 2040 6 1 0 4 22 2 1 0 4540 4 26 1 1 3484 4 26 1 2 3554 4 2044 6 0 1 5605 4 27 0 2 2050 4 1 0 1 6 0 1 1 3 672 0 2048 24 1 2 15 4 14 0 2 7 0 25 0 1 1 0 24 1 0 2052 4 2052 25 0 2 6 0 24 1 0 2044 4 26 1 1 2576 4 26 1 2 4540 4 2056 26 0 1 2009 4 PROCEDURE 853 2057 0 0 0 0 0 26 0 0 2009 4 1 1 3 42 0 2060 18 0 1 5 0 24 0 3 0 4 4 0 0 4 22 24 0 3 0 4 2064 4 0 0 4 22 24 0 3 0 4 4 0 0 4 22 3 1 0 3458 4 2068 26 1 3 3458 4 6 1 0 3556 4 0 1 0 3458 4 0 0 3 0 4 2072 24 1 2 15 4 24 0 2 0 0 24 0 3 0 4 4 0 0 6 22 2076 2 0 0 3464 4 0 1 1 3458 4 24 0 3 3464 4 28 0 0 6 0 2080 25 0 3 6 0 24 1 0 2069 4 2 0 0 5729 4 26 0 0 1104 4 2084 24 0 1 7351 4 26 0 1 2085 4 0 0 0 2095 3 0 0 0 2088 3 2088 24 0 2 3002 4 24 1 2 15 4 28 1 2 6 0 26 0 0 1121 4 2092 26 0 0 1104 4 6 1 0 3558 4 28 0 0 5612 4 1 1 3 3 0 2096 2 0 0 7347 4 26 0 1 2057 4 PROCEDURE 854 2098 24 1 2 17 4 6 1 0 7 0 2100 2 0 0 5550 4 1 0 1 16 0 24 1 2 17 4 15 1 0 11 0 2104 18 0 1 4124 0 2 0 0 5551 4 1 0 1 24 0 24 1 2 17 4 2108 15 1 0 13 0 18 0 1 4125 0 26 0 0 1165 4 2 0 0 5552 4 2112 1 0 1 3 0 24 1 2 17 4 15 1 0 13 0 26 0 0 1165 4 2116 2 0 0 5553 4 1 0 1 6 0 24 1 2 17 4 15 1 0 11 0 2120 18 0 1 4127 0 26 0 0 1165 4 2 0 0 5554 4 PROCEDURE 855 2123 6 0 0 5551 4 2124 1 1 2 6 0 27 0 1 2143 4 26 1 1 3518 4 26 1 2 2642 4 2128 1 1 3 0 0 1 0 1 15 0 24 1 2 17 4 15 1 2 17 0 2132 26 0 0 1165 4 2 0 1 5555 4 24 1 2 17 4 6 1 2 19 0 2136 26 0 0 1165 4 2 0 1 5556 4 25 0 2 6 0 24 1 0 2140 4 2140 25 0 1 2 0 24 1 0 2128 4 24 1 0 2162 4 6 0 0 5551 4 2144 1 1 2 5 0 27 0 1 2150 4 2 0 0 5555 4 2 1 0 5556 4 2148 2 1 0 5558 4 24 1 0 2162 4 26 1 1 3538 4 26 1 2 2642 4 2152 1 1 3 0 0 1 0 1 7 0 24 1 2 17 4 15 1 2 15 0 2156 26 0 0 1165 4 2 0 1 5555 4 25 0 2 8 0 24 1 0 2160 4 2160 25 0 1 1 0 24 1 0 2152 4 26 0 0 1593 4 24 1 0 458 4 PROCEDURE 856 2164 0 0 0 0 0 6 0 0 6266 4 18 0 1 4124 0 1 1 2 7 0 2168 27 0 2 2227 4 24 1 2 17 4 6 1 0 10 0 2 1 0 5560 4 2172 24 1 2 17 4 6 1 0 13 0 2 0 0 5554 4 2 0 0 5557 4 2176 2 0 0 5558 4 24 1 2 17 4 6 1 0 17 0 18 0 3 3 0 2180 18 0 1 4127 0 26 0 0 1165 4 2 0 0 5555 4 0 0 3 3608 4 2184 24 1 2 17 4 6 1 0 15 0 18 0 1 3 0 2 0 0 2564 4 2188 26 1 3 5140 4 25 0 3 0 0 24 1 0 2192 4 24 1 0 2199 4 2192 1 0 1 24 0 15 0 3 5142 4 5 0 0 2564 4 27 0 0 2200 4 2196 1 1 3 0 0 25 0 3 2 0 24 1 0 2192 4 26 0 0 972 4 2200 1 0 1 7 0 15 0 3 5142 4 26 0 0 1159 4 2 0 0 5556 4 2204 24 1 2 17 4 6 1 0 9 0 5 0 0 2565 4 5 0 0 2565 4 2208 1 1 2 1 0 18 0 3 1 0 3 1 0 3458 4 26 1 3 3458 4 2212 6 0 3 5143 4 18 0 3 2 0 18 0 1 4126 0 4 0 0 3613 4 2216 18 0 1 6 0 2 1 0 5552 4 26 0 0 1855 4 26 0 0 1846 4 2220 1 1 3 8 0 2 0 0 5728 4 6 1 0 3504 4 2 1 0 7354 4 2224 26 0 0 2417 4 26 0 0 2468 4 26 0 1 2164 4 26 0 0 593 4 2228 6 0 0 6202 4 27 0 1 2219 4 6 1 0 2636 4 27 0 1 2219 4 2232 24 1 2 17 4 6 1 0 26 0 2 0 0 2638 4 24 0 2 3018 4 2236 24 1 2 15 4 28 1 2 2 0 26 0 0 1104 4 26 0 0 2246 4 2240 27 0 0 2243 4 26 0 0 1083 4 24 1 0 2239 4 1 1 3 1 0 2244 2 0 0 7352 4 26 0 1 2164 4 PROCEDURE 857 2246 0 0 0 0 0 26 0 0 983 4 2248 24 1 2 17 4 6 1 0 4 0 5 1 0 2584 4 27 0 0 2257 4 2252 4 1 0 2584 4 5 1 0 2582 4 27 0 0 2257 4 4 1 0 2582 4 2256 1 1 2 85 0 26 0 1 2246 4 PROCEDURE 858 2258 0 0 0 0 0 6 1 2 5590 4 2260 5 1 0 2656 4 27 0 1 2267 4 6 1 0 2656 4 2 1 2 5612 4 2264 1 1 3 2 0 2 0 0 7351 4 24 1 0 2335 4 1 1 3 63 0 2268 18 1 1 4118 0 15 1 2 5590 4 2 1 0 5712 4 15 1 0 2648 4 2272 5 1 0 5712 4 27 0 0 2324 4 1 1 3 0 0 15 1 0 2650 4 2276 5 1 0 5712 4 27 0 0 2333 4 18 1 1 2 0 1 1 3 0 0 2280 27 1 1 2269 4 24 0 1 7347 4 26 0 1 2282 4 0 0 0 2335 3 2284 0 0 0 2286 3 0 0 0 880 3 6 1 0 2644 4 2 1 1 5626 4 2288 6 1 2 5590 4 5 1 0 3560 4 27 0 0 2295 4 1 0 1 48 0 2292 6 1 0 3562 4 14 1 0 2636 4 26 0 0 2552 4 24 0 1 7345 4 2296 26 0 1 2296 4 0 0 0 2354 3 0 0 0 2299 3 24 0 3 0 4 2300 6 0 0 4 22 18 0 3 3 0 18 0 1 4127 0 24 0 3 0 4 2304 2 0 0 6 22 1 1 3 0 0 1 0 1 15 0 15 0 3 5605 4 2308 5 0 0 5756 4 27 0 0 2314 4 1 0 1 3 0 6 1 0 3562 4 2312 14 1 0 2636 4 26 0 0 2552 4 1 1 3 0 0 1 0 1 15 0 2316 15 0 3 5605 4 5 0 0 5755 4 27 0 0 2339 4 1 0 1 12 0 2320 6 1 0 3562 4 14 1 0 2636 4 26 0 0 2552 4 24 1 0 2339 4 2324 1 1 3 2 0 2 0 0 7347 4 6 1 0 2652 4 14 1 2 5590 4 2328 6 1 0 2656 4 14 1 2 5612 4 1 1 3 2 0 2 0 0 7351 4 2332 24 1 0 2278 4 6 1 0 2654 4 24 1 0 2327 4 24 0 1 7345 4 2336 26 0 1 2336 4 0 0 0 2354 3 0 0 0 2339 3 24 0 3 0 4 2340 6 0 0 4 22 18 0 3 3 0 18 0 1 4127 0 2 0 0 1559 4 2344 1 0 1 15 0 24 0 1 1559 4 15 0 0 5605 4 5 0 0 5755 4 2348 27 0 1 2354 4 6 1 1 5627 4 26 0 0 1165 4 0 0 3 3611 4 2352 7 0 0 5755 4 0 0 3 3608 4 26 0 0 1982 4 25 0 2 2 0 2356 24 1 0 2388 4 26 1 3 3522 4 6 1 3 5590 4 27 0 1 2363 4 2360 25 0 3 2 0 24 1 0 2358 4 24 1 0 2381 4 PROCEDURE 859 2363 26 0 0 2009 4 2364 26 0 0 1104 4 24 0 1 7351 4 26 0 1 2366 4 0 0 0 2381 3 2368 0 0 0 2369 3 26 0 0 1121 4 24 0 2 3002 4 24 1 2 15 4 2372 28 1 2 6 0 26 0 0 1104 4 6 1 0 3558 4 28 1 1 5612 4 2376 24 0 1 7347 4 26 0 1 2377 4 0 0 0 2381 3 0 0 0 2386 3 2380 0 0 0 880 3 26 1 2 3522 4 26 0 0 1559 4 1 1 3 1 0 2384 2 0 0 7351 4 26 0 1 2258 4 1 1 3 3 0 2 0 0 7347 4 2388 26 0 1 2258 4 PROCEDURE 860 2389 0 0 0 0 0 24 0 1 7354 4 6 1 0 5730 4 2392 3 1 1 5626 4 2 1 2 5590 4 24 0 1 7346 4 26 0 1 2395 4 2396 0 0 0 2414 3 0 0 0 2398 3 24 0 1 7345 4 26 0 1 2399 4 2400 0 0 0 2407 3 0 0 0 2402 3 1 1 3 6 0 3 0 0 5755 4 2404 4 1 2 5591 4 26 0 0 1165 4 2 0 0 5756 4 1 1 3 1 0 2408 2 0 0 7346 4 6 1 2 5590 4 2 1 2 5592 4 2 1 2 5590 4 2412 25 0 2 2 0 24 1 0 2414 4 26 0 0 2258 4 26 0 0 2417 4 2416 26 0 1 2389 4 PROCEDURE 861 2417 0 0 0 0 0 24 0 1 7354 4 6 1 0 5730 4 2420 5 1 0 2644 4 27 0 1 2426 4 0 0 3 3611 4 1 1 3 1 0 2424 7 0 0 5728 4 0 0 3 3608 4 23 0 0 2 0 0 0 0 7354 3 2428 24 1 0 2448 4 26 0 0 983 4 24 0 3 0 4 6 1 0 2 22 2432 2 1 0 2764 4 26 1 1 3476 4 26 1 3 3546 4 24 1 2 17 4 2436 6 1 1 5 0 18 0 1 5 0 24 1 2 17 4 4 1 1 7 0 2440 2 1 3 5730 4 25 0 1 4 0 24 1 0 2443 4 25 0 3 2 0 2444 24 1 0 2435 4 26 1 1 2764 4 6 1 0 3546 4 2 1 0 7354 4 2448 26 0 1 2417 4 PROCEDURE 862 2449 0 0 0 0 0 24 0 1 7354 4 6 1 0 5730 4 2452 5 1 0 2644 4 27 0 0 2456 4 26 0 0 2417 4 24 1 0 2450 4 2456 26 0 0 2417 4 26 0 1 2449 4 PROCEDURE 863 2458 0 0 0 0 0 24 0 1 7347 4 2460 26 0 1 2460 4 0 0 0 2464 3 0 0 0 2466 3 0 0 0 2467 3 2464 26 0 0 2389 4 24 1 0 2459 4 26 0 0 2057 4 26 0 1 2458 4 PROCEDURE 864 2468 0 0 0 0 0 24 1 2 17 4 6 1 0 4 0 5 1 0 2584 4 2472 27 0 0 2491 4 4 1 0 2584 4 1 1 2 85 0 27 0 0 2491 4 2476 1 1 1 85 0 5 1 0 2582 4 27 0 0 2491 4 6 0 0 7354 4 2480 4 0 0 7354 4 24 0 3 0 4 2 0 0 4 22 24 1 2 17 4 2484 6 1 2 4 0 5 1 0 2580 4 27 0 0 2490 4 26 0 0 1538 4 2488 26 0 0 2458 4 24 1 0 2479 4 26 0 0 983 4 24 0 1 7352 4 2492 26 0 1 2492 4 0 0 0 2539 3 0 0 0 2495 3 6 1 0 3546 4 2496 2 1 0 7366 4 26 1 3 3476 4 24 0 1 7366 4 6 0 0 5627 4 2500 24 1 2 19 4 2 1 3 5 0 24 0 1 7366 4 6 0 0 5626 4 2504 24 1 2 19 4 2 1 3 7 0 25 0 3 4 0 24 1 0 2508 4 2508 23 0 0 2 0 0 0 0 7366 3 24 1 0 2498 4 24 0 3 0 4 2512 6 0 0 2 22 24 0 3 0 4 4 0 0 2 22 24 0 3 0 4 2516 2 0 0 2 22 6 1 0 2580 4 24 1 2 19 4 2 1 1 4 0 2520 26 0 0 1101 4 24 0 2 2936 4 24 1 2 15 4 28 1 2 2 0 2524 6 1 0 3564 4 24 1 2 15 4 2 1 0 8 0 6 0 0 6275 4 2528 27 0 0 2533 4 6 1 0 3566 4 24 1 2 15 4 28 0 0 10 0 2532 24 1 0 2536 4 6 1 0 2644 4 24 1 2 15 4 2 1 0 10 0 2536 26 0 0 1104 4 1 1 3 1 0 2 0 0 7352 4 26 0 1 2468 4 PROCEDURE 865 2540 0 0 0 0 0 1 1 3 1 0 0 0 3 3611 4 7 0 0 2567 4 2544 0 0 3 3608 4 26 0 1 2540 4 PROCEDURE 866 2546 0 0 0 0 0 1 1 3 1 0 2548 0 0 3 3611 4 7 0 0 2568 4 0 0 3 3608 4 26 0 1 2546 4 PROCEDURE 867 2552 0 0 0 0 0 1 1 3 1 0 0 0 3 3611 4 7 0 0 2569 4 2556 0 0 3 3608 4 26 0 1 2552 4 SECTION 868 2558 £££££ 0 3£££0 0 2560 80000 0 123.: 0 3££ 0 0 0 SECTION 869 2564 0 0 0 0 0 0 0 0 2568 0 0 0 0 0 0 0 0 2572 0 0 0 0 0 0 0 0 2576 0 0 0 0 SECTION 870 2578 16454 0 73695 0 2580 56554 0 56595 0 16773 0 53585 0 2584 56554 0 67695 0 35572 0 56596 0 2588 46772 0 54746 0 46700 0 54746 0 2592 65700 0 67696 0 40000 0 59655 0 SECTION 871 2596 95163 0 55695 0 86755 0 737 0 2600 16772 0 53585 0 36572 0 72555 0 2604 96573 0 67665 0 36669 0 72557 0 2608 65362 0 52636 0 77358 0 635 0 2612 57t7e 0 69746 0 16373 0 74655 0 2616 55400 0 55695 0 46455 0 69516 0 2620 95163 0 73695 0 35100 0 54517 0 2624 16554 0 5e655 0 45272 0 6 0 2628 45569 0 66695 0 65977 0 5t005 0 2632 55169 0 5t007 0 0 0 0 0 2636 0 0 0 0 0 0 0 0 2640 17300 0 5:677 0 SECTION 872 2642 0 0 0 0 2644 7. 0 7.000 0 800 0 0 0 2648 .7.7. 0 7.7.7 0 .5.5. 0 5.5.5 0 2652 25252 0 52525 0 36363 0 63636 0 2656 e5e5e 0 5e5e5 0 £5£5£ 0 5£5£5 0 2660 :5:5: 0 5:5:5 0 SECTION 873 2662 0 5550 3 5550 3 1 5 10 14 0 2664 0 5552 3 5552 8 1 5 11 0 1 0 5550 3 5550 3 1 5 10 14 0 2668 0 5552 3 5552 3 1 5 11 0 0 0 5560 3 5560 3 1 5 11 8 0 2672 0 5554 3 5554 8 1 5 11 2 1 0 2564 3 2564 0 0 10 0 4 0 2676 0 5550 3 5550 8 1 5 10 14 1 0 1450 3 1450 3 0 5 10 10 0 2680 0 1450 3 1450 3 0 5 10 10 0 0 1452 3 1452 2 0 5 10 12 0 2684 0 1454 3 1454 3 0 5 10 14 0 0 1456 3 1456 3 0 5 11 0 0 2688 0 1458 3 1458 2 0 5 11 2 1 SECTION 874 2690 0 5550 3 5 3 0 0 0 5 0 2692 0 5552 3 3 0 0 0 0 3 0 0 5553 3 2 0 0 0 0 2 0 2696 0 5554 3 5 0 0 0 0 5 1 0 5550 3 6 0 0 0 0 6 0 2700 0 5550 3 5 0 0 0 0 5 0 0 5551 3 1 0 0 0 0 1 0 2704 0 5552 3 3 0 0 0 0 3 0 0 5553 3 3 0 0 0 0 3 0 2708 0 5554 3 3 0 0 0 0 3 0 0 5555 3 4 0 0 0 0 4 0 2712 0 5556 3 4 0 0 0 0 4 0 0 5557 3 4 0 0 0 0 4 0 2716 0 5558 3 4 0 0 0 0 4 0 0 5559 3 4 0 0 0 0 4 0 2720 0 5560 3 4 0 0 0 0 4 0 0 5561 3 4 0 0 0 0 4 0 2724 0 5562 3 4 0 0 0 0 4 0 0 5563 3 4 0 0 0 0 4 0 2728 0 5564 3 4 0 0 0 0 4 0 0 5565 3 4 0 0 0 0 4 0 2732 0 5566 3 4 0 0 0 0 4 0 0 5567 3 4 0 0 0 0 4 1 2736 0 5550 3 5 3 0 0 0 5 0 0 5552 3 2 3 0 0 0 2 0 2740 0 5560 3 2 3 0 0 0 2 0 0 5554 3 4 0 0 0 0 4 0 2744 0 5555 3 4 0 0 0 0 4 0 0 5556 3 2 0 0 0 0 2 0 2748 0 5557 3 1 0 0 0 0 1 0 0 5558 3 1 0 0 0 0 1 1 2752 0 1450 3 5 3 0 0 0 5 0 0 1450 3 2 3 0 0 0 2 0 2756 0 1452 3 1 2 0 0 0 1 0 0 1454 3 5 3 0 0 0 5 0 2760 0 1456 3 5 3 0 0 0 5 0 0 1458 3 5 2 0 0 0 5 1 SECTION 875 2764 0 2592 3 84 3 0 0 5 4 0 0 2618 3 5 3 0 0 0 5 0 2768 0 5000 3 21 0 0 0 1 5 0 0 2586 3 1057 3 0 4 2 1 0 2772 0 2596 3 5 3 0 0 0 5 0 0 5001 3 16405 0 4 0 1 5 0 2776 0 2620 3 37 3 0 0 2 5 0 0 2622 3 20 3 0 0 1 4 0 2780 0 2624 3 531 3 0 2 1 3 0 0 2588 3 21 3 0 0 1 5 0 2784 0 2604 3 21 3 0 0 1 5 0 0 2586 3 1025 3 0 4 0 1 0 2788 0 2644 3 273 3 0 1 1 1 1 SECTION 876 2790 0 2602 3 209 3 0 0 13 1 0 2792 0 2596 3 5 3 0 0 0 5 0 0 2598 3 292 3 0 1 2 4 0 2796 0 2602 3 801 3 0 3 2 1 0 0 2561 3 1 0 0 0 0 1 0 2800 0 2602 3 817 3 0 3 3 1 0 0 2561 3 257 0 0 1 0 1 0 2804 0 2602 3 817 3 0 3 3 1 0 0 2561 3 513 0 0 2 0 1 0 2808 0 2600 3 85 3 0 0 5 5 0 0 2602 3 21 3 0 0 1 5 0 2812 0 2606 3 786 3 0 3 1 2 0 0 2604 3 21 3 0 0 1 5 0 2816 0 2602 3 1 3 0 0 0 1 0 0 2644 3 321 3 0 1 4 1 1 SECTION 877 2820 0 2588 3 84 3 0 0 5 4 0 0 2566 3 1025 0 0 4 0 1 0 2824 0 5550 3 53 0 0 0 3 5 0 0 5551 3 4930 4 1 3 4 2 0 2828 0 5552 3 8723 4 2 2 1 3 0 0 5553 3 8723 4 2 2 1 3 0 2832 0 5554 3 8723 4 2 2 1 3 1 0 5555 3 12899 4 3 2 6 3 0 2836 0 5556 3 12899 4 3 2 6 3 0 0 5557 3 12899 4 3 2 6 3 0 2840 0 5558 3 12899 4 3 2 6 3 0 0 2642 3 40970 2 10 0 0 10 0 2844 0 2634 3 245 3 0 0 15 5 0 0 2636 3 5 3 0 0 0 5 0 2848 0 2638 3 5 3 0 0 0 5 0 0 2644 3 5 3 0 0 0 5 1 2852 0 5555 3 8803 0 2 2 6 3 0 0 2561 3 1025 0 0 4 0 1 0 2856 0 5556 3 12548 4 3 1 0 4 0 0 5557 3 8723 0 2 2 1 3 0 2860 0 2561 3 1025 0 0 4 0 1 0 0 5558 3 12548 4 3 1 0 4 0 2864 0 5559 3 8723 0 2 2 1 3 0 0 2561 3 1025 0 0 4 0 1 0 2868 0 5560 3 12548 4 3 1 0 4 0 0 5561 3 8723 0 2 2 1 3 0 2872 0 2561 3 1025 0 0 4 0 1 0 0 5562 3 12548 4 3 1 0 4 0 2876 0 5563 3 8723 0 2 2 1 3 0 0 2561 3 1025 0 0 4 0 1 0 2880 0 5564 3 12548 4 3 1 0 4 0 0 5565 3 8723 0 2 2 1 3 0 2884 0 2561 3 1025 0 0 4 0 1 0 0 5566 3 12548 4 3 1 0 4 0 2888 0 2634 3 5 3 0 0 0 5 0 0 2636 3 5 3 0 0 0 5 0 2892 0 2638 3 5 3 0 0 0 5 0 0 2644 3 5 3 0 0 0 5 1 SECTION 878 2896 0 2586 3 84 3 0 0 5 4 0 0 5552 3 18 3 0 0 1 2 0 2900 0 2612 3 785 3 0 3 1 1 0 0 5560 3 2 3 0 0 0 2 0 2904 0 2612 3 1025 3 0 4 0 1 0 0 2612 3 35 3 0 0 2 3 0 2908 0 5757 3 12564 0 3 1 1 4 0 0 2608 3 37 3 0 0 2 5 0 2912 0 2610 3 276 3 0 1 1 4 0 0 5758 3 12564 0 3 1 1 4 0 2916 0 2602 3 36 3 0 0 2 4 0 0 5759 3 4882 0 1 3 1 2 0 2920 0 2606 3 35 3 0 0 2 3 0 0 5557 3 4882 0 1 3 1 2 0 2924 0 2594 3 35 3 0 0 2 3 0 0 5558 3 1041 0 0 4 1 1 0 2928 0 2634 3 21 3 0 0 1 5 0 0 2642 3 41210 2 10 0 15 10 0 2932 0 2636 3 165 3 0 0 10 5 0 0 2644 3 257 3 0 1 0 1 1 SECTION 879 2936 0 2561 3 817 0 0 3 3 1 0 0 5604 3 12564 0 3 1 1 4 0 2940 0 2561 3 769 0 0 3 0 1 1 0 5605 3 12580 0 3 1 2 4 0 2944 0 2561 3 801 0 0 3 2 1 0 0 5590 3 5 3 0 0 0 5 0 2948 0 2561 3 769 0 0 3 0 1 0 0 5606 3 12580 0 3 1 2 4 0 2952 0 2561 3 801 0 0 3 2 1 0 0 5592 3 5 3 0 0 0 5 0 2956 0 2561 3 769 0 0 3 0 1 0 0 5607 3 12580 0 3 1 2 4 0 2960 0 2561 3 801 0 0 3 2 1 0 0 5594 3 5 3 0 0 0 5 0 2964 0 2561 3 769 0 0 3 0 1 0 0 5608 3 12580 0 3 1 2 4 0 2968 0 2561 3 801 0 0 3 2 1 0 0 5596 3 5 3 0 0 0 5 0 2972 0 2561 3 769 0 0 3 0 1 0 0 5609 3 12580 0 3 1 2 4 0 2976 0 2561 3 801 0 0 3 2 1 0 0 5598 3 5 3 0 0 0 5 0 2980 0 2561 3 769 0 0 3 0 1 0 0 5610 3 12580 0 3 1 2 4 0 2984 0 2561 3 801 0 0 3 2 1 0 0 5600 3 5 3 0 0 0 5 0 2988 0 2561 3 769 0 0 3 0 1 0 0 5611 3 12580 0 3 1 2 4 0 2992 0 2561 3 801 0 0 3 2 1 0 0 5602 3 5 3 0 0 0 5 0 2996 0 2561 3 769 0 0 3 0 1 0 0 2636 3 547 3 0 2 2 3 0 3000 0 2644 3 5 3 0 0 0 5 1 SECTION 880 3002 0 5612 3 149 3 0 0 9 5 0 3004 0 5614 3 165 3 0 0 10 5 0 0 5616 3 165 3 0 0 10 5 0 3008 0 5618 3 165 3 0 0 10 5 0 0 5620 3 165 3 0 0 10 5 0 3012 0 5622 3 165 3 0 0 10 5 0 0 5624 3 165 3 0 0 10 5 0 3016 0 2644 3 257 3 0 1 0 1 1 SECTION 881 3018 0 2586 3 244 3 0 0 15 4 0 3020 0 2638 3 802 3 0 3 2 2 0 0 2606 3 561 3 0 2 3 1 0 3024 0 2578 3 1041 3 0 4 1 1 0 0 2606 3 19 3 0 0 1 3 0 3028 0 5557 3 4882 0 1 3 1 2 0 0 2614 3 53 3 0 0 3 5 0 3032 0 2616 3 4 3 0 0 0 4 0 0 2644 3 273 3 0 1 1 1 1 PROCEDURE 882 3036 6 0 0 6269 4 27 0 0 3057 4 6 0 0 6270 4 27 0 0 3049 4 3040 0 1 0 3458 4 0 0 3 0 4 6 1 0 3568 4 4 0 0 9 4 3044 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 3458 4 3048 24 1 0 3057 4 0 1 0 3458 4 0 0 3 0 4 6 1 0 3570 4 3052 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 3056 0 1 1 3458 4 6 1 0 3572 4 24 1 2 19 4 28 1 1 4 0 3060 1 1 3 85 0 24 1 2 19 4 2 1 0 4 0 26 0 0 3681 4 3064 6 0 0 6278 4 27 0 1 33 4 6 1 0 4488 4 24 1 2 19 4 3068 2 1 0 4 0 6 0 0 5000 4 24 1 2 19 4 2 1 0 7 0 3072 26 0 0 3681 4 6 1 0 4498 4 24 1 2 19 4 2 1 0 6 0 3076 6 1 0 4513 4 24 1 2 19 4 2 1 0 9 0 1 1 3 4 0 3080 24 1 2 19 4 2 1 0 10 0 6 1 0 4512 4 24 1 2 19 4 3084 2 1 0 4 0 26 0 0 3681 4 6 0 0 5000 4 24 1 2 19 4 3088 3 1 0 5 0 24 1 2 19 4 2 1 0 13 0 6 0 0 5001 4 3092 24 1 2 19 4 3 1 0 7 0 24 1 2 19 4 2 1 0 15 0 3096 1 1 3 2 0 24 1 2 19 4 2 1 0 11 0 1 1 3 3 0 3100 24 1 2 19 4 3 1 0 19 0 1 1 3 2 0 4 0 0 6278 4 3104 24 1 2 19 4 2 1 0 17 0 6 1 0 4513 4 24 1 2 19 4 3108 2 1 0 21 0 26 0 0 3681 4 0 1 0 3458 4 0 0 3 0 4 3112 6 1 0 3568 4 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 3116 23 0 2 0 256 0 1 1 3458 4 6 1 0 3572 4 24 1 2 15 4 3120 28 1 1 0 0 26 1 1 3524 4 26 0 0 3717 4 25 0 1 1 0 3124 24 1 0 3122 4 24 0 2 4564 4 18 1 1 4123 0 1 1 3 26 0 3128 18 1 1 5 0 24 1 2 15 4 28 1 1 10 0 26 0 0 3657 4 3132 26 0 0 3717 4 PROCEDURE 883 3133 26 1 1 3574 4 6 0 0 6272 4 27 0 0 3138 4 3136 6 1 0 4560 4 24 1 0 3139 4 6 1 0 4562 4 24 1 2 15 4 3140 2 1 0 12 0 6 0 0 2567 4 27 0 0 3145 4 6 1 0 4560 4 3144 24 1 0 3146 4 6 1 0 4562 4 24 1 2 15 4 2 1 0 18 0 3148 26 0 0 4801 4 25 0 1 4 0 24 1 0 3151 4 6 0 0 2568 4 3152 2 0 0 4542 4 6 0 0 7342 4 26 0 0 4776 4 26 0 0 4811 4 3156 26 0 0 4801 4 25 0 1 4 0 24 1 0 3159 4 6 0 0 2569 4 3160 2 0 0 4542 4 6 0 0 7343 4 26 0 0 4776 4 26 0 0 4811 4 3164 26 0 0 4801 4 6 1 0 3576 4 28 0 0 6246 4 0 0 3 3608 4 3168 26 0 0 3717 4 25 0 1 1 0 24 1 0 3168 4 6 1 0 3578 4 3172 2 1 0 4526 4 24 0 2 4514 4 18 1 1 4123 0 1 1 3 14 0 3176 18 1 1 5 0 24 1 2 15 4 28 1 1 6 0 25 1 1 4096 0 3180 23 0 2 3182 4 24 1 0 3188 4 0 0 0 0 0 24 0 3 0 4 3184 0 0 2 156 0 24 0 3 0 4 6 1 0 138 0 26 0 3 3182 4 3188 2 1 0 4526 4 6 0 0 7344 4 2 0 0 4508 4 24 0 2 4704 4 3192 24 1 2 15 4 28 1 2 20 0 26 0 0 3717 4 6 0 0 6275 4 3196 27 0 1 3204 4 6 0 0 6274 4 1 1 1 20 0 18 0 1 5 0 3200 4 0 0 7 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 160 0 3204 0 0 3 3608 4 0 1 0 3458 4 0 0 3 0 4 0 1 2 3580 4 3208 6 1 0 3582 4 4 0 0 10 4 25 1 1 4096 0 24 0 3 0 4 3212 23 0 2 0 256 0 1 1 3458 4 1 1 3 1 0 2 0 0 4546 4 3216 6 0 0 5000 4 5 0 0 3616 4 27 0 0 3230 4 6 0 0 5000 4 3220 5 0 0 3617 4 27 0 0 3230 4 6 0 0 5000 4 5 0 0 3618 4 3224 27 0 0 3835 4 1 1 2 1 0 27 0 0 3833 4 1 1 2 5 0 3228 27 0 0 3832 4 24 1 0 3328 4 1 1 3 0 0 2 0 0 4546 4 3232 6 0 0 6270 4 27 0 0 3239 4 0 0 2 9 4 6 0 0 11 4 3236 2 0 0 9 4 18 1 1 10 0 2 0 0 11 4 0 1 0 3458 4 3240 0 0 3 0 4 0 1 2 3584 4 6 1 0 3586 4 4 0 0 11 4 3244 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 0 3 3462 4 3248 0 1 0 4540 4 24 0 2 4720 4 24 1 2 21 4 28 1 2 4 0 3252 0 1 0 3458 4 0 0 3 0 4 24 1 2 21 4 24 0 2 4 0 3256 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 1280 0 1 1 3458 4 3260 26 0 0 3777 4 26 0 0 3777 4 26 0 0 3801 4 1 1 3 2 0 3264 24 1 2 19 4 2 1 0 11 0 6 1 0 4490 4 24 1 2 19 4 3268 2 1 0 12 0 26 0 0 3777 4 26 0 0 3801 4 PROCEDURE 884 3271 6 0 0 6270 4 3272 27 0 0 3275 4 1 1 3 2 0 24 1 0 3277 4 1 1 3 2 0 3276 4 0 0 6278 4 24 1 2 19 4 2 1 0 9 0 6 0 0 3619 4 3280 24 1 2 19 4 2 1 0 13 0 26 0 0 3777 4 26 0 0 3801 4 3284 24 1 2 19 4 6 1 0 6 0 5 1 0 4498 4 27 0 0 3290 4 3288 26 0 0 3777 4 24 1 0 3283 4 26 0 0 3777 4 26 0 0 3801 4 3292 6 0 0 6270 4 27 0 0 3296 4 1 1 3 2 0 24 1 0 3298 4 3296 1 1 3 2 0 4 0 0 6278 4 24 1 2 19 4 2 1 0 9 0 3300 6 0 0 3619 4 24 1 2 19 4 2 1 0 13 0 26 0 0 3777 4 3304 0 1 0 3458 4 0 0 3 0 4 6 1 0 3588 4 4 0 0 11 4 3308 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 3458 4 3312 6 0 0 6270 4 27 0 0 3319 4 0 0 2 9 4 6 0 0 11 4 3316 2 0 0 9 4 18 1 1 10 0 2 0 0 11 4 0 1 0 3458 4 3320 0 0 3 0 4 0 1 2 3580 4 6 1 0 3590 4 4 0 0 10 4 3324 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 3458 4 3328 26 1 1 3592 4 1 1 3 6 0 2 0 0 4508 4 6 0 0 6275 4 3332 27 0 0 3339 4 6 0 0 7342 4 4 0 0 2568 4 27 0 1 3343 4 3336 6 0 0 6272 4 4 0 0 2567 4 27 0 1 3343 4 6 0 0 6273 4 3340 27 0 1 3343 4 6 0 0 6271 4 27 0 0 3345 4 1 1 3 7 0 3344 2 0 0 4508 4 6 0 0 6275 4 27 0 0 3382 4 1 1 3 300 0 3348 5 0 0 7358 4 2 0 0 3681 4 0 1 0 3458 4 0 0 3 0 4 3352 6 0 0 3620 4 4 0 0 3681 4 0 0 3 3462 4 18 0 1 5 0 3356 0 1 0 3458 4 0 0 3 0 4 24 1 2 13 4 24 0 2 0 0 3360 4 0 0 7358 4 2 0 0 3464 4 0 1 1 3458 4 24 0 3 3464 4 3364 28 0 0 4 0 6 1 0 4510 4 24 1 2 13 4 2 1 0 306 0 3368 26 0 0 4793 4 6 1 0 3594 4 24 1 2 13 4 28 1 1 0 0 3372 6 1 0 4510 4 24 1 2 13 4 2 1 0 306 0 26 0 0 4793 4 3376 0 0 2 4590 4 6 1 0 3596 4 4 0 0 7 4 25 1 1 4096 0 3380 24 0 3 0 4 23 0 2 160 0 6 0 0 4508 4 0 0 2 3621 4 3384 25 1 1 4096 0 24 0 3 0 4 26 0 2 0 512 0 0 0 3393 3 3388 0 0 0 3424 3 0 0 0 3230 3 0 0 0 3447 3 0 0 0 3629 3 3392 0 0 0 3451 3 26 0 0 4762 4 26 0 0 3670 4 6 0 0 4546 4 3396 27 0 1 3401 4 6 0 0 6270 4 27 0 0 3421 4 26 0 0 3698 4 3400 24 1 0 3421 4 6 0 0 6270 4 27 0 0 3420 4 0 1 0 3458 4 3404 0 0 3 0 4 0 1 2 3598 4 6 1 0 3600 4 4 0 0 9 4 3408 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 0 3 3462 4 3412 0 1 0 3458 4 0 0 3 0 4 6 1 0 3570 4 4 0 0 9 4 3416 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 3458 4 3420 26 0 0 3698 4 25 1 1 4096 0 24 0 3 0 4 26 0 2 0 768 3424 26 0 0 4762 4 PROCEDURE 885 3425 26 1 3 3602 4 26 0 0 3670 4 6 0 0 6275 4 3428 27 0 0 3430 4 26 1 3 3538 4 6 0 0 6270 4 27 0 1 3435 4 3432 6 0 0 3777 4 24 0 3 1 4 24 1 0 33 0 26 0 0 3698 4 3436 25 1 1 4096 0 23 0 2 3812 4 24 0 2 4590 4 18 1 1 4123 0 3440 1 1 3 80 0 18 1 1 5 0 24 0 3 5 4 28 1 1 204 0 3444 6 0 0 3777 4 24 0 3 1 4 24 1 0 33 0 26 0 0 3636 4 3448 27 0 0 3455 4 1 1 3 0 0 24 1 0 3644 4 26 0 0 3636 4 3452 27 0 0 3455 4 1 1 3 88 0 24 1 0 3644 4 26 0 0 4762 4 3456 26 1 3 3604 4 24 1 0 3622 4 SECTION 1030 3458 0 0 0 0 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 8 0 0 0 3£2 0 3476 0 0 30 0 0 0 20003 0 3480 0 0 28 0 40000 0 55655 0 3484 0 0 7 0 0 0 1++ 0 3488 :5:7£ 0 5:5:5 0 :5:59 0 5:5:5 0 3492 0 0 64 0 :5:69 0 5:5:5 0 3496 56554 0 5 0 0 0 53000 0 3500 46467 0 547 0 96355 0 565 0 3504 16 0 18 0 35551 0 56596 0 3508 0 0 20024 0 0 0 20026 0 3512 14243 0 4 0 44546 0 42434 0 3516 0 0 20012 0 0 0 + 0 3520 0 0 20032 0 0 0 . 0 3524 0 0 5 0 0 0 20040 0 3528 ££££ 0 10005 0 0 0 2000t 0 3532 1 0 £ 0 0 0 e 0 3536 0 0 20016 0 0 0 4 0 3540 e5300 0 5 0 e7200 0 5 0 3544 e6700 0 5 0 0 0 18 0 3548 0 0 20036 0 0 0 2003+ 0 3552 0 0 20018 0 0 0 2t 0 3556 0 0 20006 0 0 0 2000. 0 3560 52 0 52000 0 25963 0 5 0 3564 55972 0 56596 0 0 0 20028 0 3568 0 0 22 0 0 0 1e 0 3572 0 0 20030 0 0 0 : 0 3576 0 0 20014 0 83041 0 4 0 3580 3 0 t 0 0 0 23 0 3584 8000 0 5146 0 0 0 12 0 3588 0 0 1+ 0 0 0 24 0 3592 0 0 0 0 0 0 20132 0 3596 0 0 27 0 8000 0 5141 0 3600 0 0 11 0 0 0 2 0 3604 1 0 2 0 SECTION 1031 3606 2 0 1 0 3608 0 0 10000 0 89899 0 66666 0 3612 1- 0 4000 0 7777 0 2+2+0 0 3616 8000 0 9001 0 8060 0 £££££ 0 3620 20000 0 6 0 SECTION 1032 CONTD 3622 6 0 0 6275 4 27 0 0 3430 4 3624 6 0 0 0 4 2 0 0 7351 4 26 0 0 3670 4 26 1 3 4882 4 3628 24 1 0 3430 4 6 0 0 6275 4 27 0 0 3447 4 1 1 3 1 0 3632 2 0 0 7351 4 26 0 0 4762 4 26 1 3 4884 4 24 1 0 3430 4 PROCEDURE 886 3636 0 0 0 0 0 23 0 2 3639 4 26 0 1 3636 4 0 0 0 0 0 3640 24 0 3 5 4 24 0 3 32 0 6 0 0 21 0 26 0 3 3639 4 PROCEDURE 887 3644 2 0 0 3777 4 23 0 2 3647 4 24 1 0 3455 4 0 0 0 0 0 3648 24 0 3 5 4 24 0 3 32 0 6 0 0 22 0 4 0 0 7 4 3652 2 0 0 3698 4 6 0 0 3777 4 24 0 3 3698 4 2 0 0 0 0 3656 26 0 3 3647 4 PROCEDURE 888 3657 0 0 0 0 0 0 0 2 6279 4 27 1 0 3669 4 3660 24 1 2 15 4 2 1 0 10 0 24 1 2 15 4 2 1 0 12 0 3664 24 1 2 15 4 2 1 0 14 0 6 1 0 4886 4 24 1 2 15 4 3668 28 1 1 22 0 26 0 1 3657 4 PROCEDURE 889 3670 0 0 0 0 0 6 0 0 6275 4 3672 27 0 0 3680 4 6 0 0 0 4 2 0 0 7351 4 6 1 0 4888 4 3676 4 0 0 7 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 160 0 3680 26 0 1 3670 4 PROCEDURE 890 3681 0 0 0 0 0 6 1 0 4510 4 24 1 2 19 4 3684 2 1 0 52 0 0 1 0 3458 4 0 0 3 0 4 0 0 2 18 4 3688 6 1 0 4890 4 4 0 0 10 4 25 1 1 4096 0 24 0 3 0 4 3692 23 0 2 0 256 0 1 1 3458 4 6 1 0 4892 4 24 1 2 19 4 3696 28 1 1 0 0 26 0 1 3681 4 PROCEDURE 891 3698 0 0 0 0 0 0 1 0 3458 4 3700 0 0 3 0 4 0 1 2 4894 4 6 1 0 4896 4 4 0 0 11 4 3704 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 0 3 3462 4 3708 0 1 0 3458 4 0 0 3 0 4 6 1 0 4898 4 4 0 0 11 4 3712 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 3458 4 3716 26 0 1 3698 4 PROCEDURE 892 3717 0 0 0 0 0 0 0 3 4934 4 6 1 0 4510 4 3720 24 1 2 15 4 2 1 0 52 0 6 0 0 4546 4 24 1 2 15 4 3724 2 1 0 1 0 1 1 3 1 0 2 0 0 4546 4 6 0 0 6275 4 3728 27 0 0 3745 4 24 1 2 15 4 24 0 2 0 0 18 1 1 4123 0 3732 1 1 3 50 0 18 1 1 5 0 0 1 0 3458 4 0 0 3 0 4 3736 24 1 2 13 4 24 0 2 0 0 4 0 0 7358 4 2 0 0 3464 4 3740 0 1 1 3458 4 24 0 3 3464 4 28 1 1 4 0 26 0 0 4782 4 3744 24 1 0 3773 4 6 0 0 6274 4 1 1 2 9 0 27 0 0 3764 4 3748 6 0 0 4935 4 24 1 2 15 4 2 0 0 1 0 24 1 2 15 4 3752 24 0 2 0 0 24 1 2 13 4 29 0 1 0 0 1 1 3 4 0 3756 18 0 1 5 0 4 0 0 7 4 0 0 2 12 4 25 1 1 4096 0 3760 24 0 3 0 4 23 0 2 160 0 0 0 3 4934 4 24 1 0 3773 4 3764 24 1 2 15 4 24 0 2 0 0 18 1 1 4123 0 1 1 3 54 0 3768 18 1 1 5 0 24 1 2 13 4 28 1 1 0 0 1 1 3 9 0 3772 24 1 0 3756 4 6 1 0 4900 4 24 1 2 15 4 28 1 1 0 0 3776 26 0 1 3717 4 PROCEDURE 893 3777 0 0 0 0 0 24 1 2 19 4 24 0 2 4 0 3780 18 1 1 4123 0 1 1 3 50 0 18 1 1 5 0 24 1 2 21 4 3784 28 1 1 4 0 6 1 0 4510 4 24 1 2 21 4 2 1 0 52 0 3788 0 1 0 3458 4 0 0 3 0 4 0 0 2 20 4 6 1 0 4890 4 3792 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 3796 0 1 1 3458 4 6 1 0 4892 4 24 1 2 21 4 28 1 1 0 0 3800 26 0 1 3777 4 PROCEDURE 894 3801 0 0 0 0 0 0 1 0 3458 4 0 0 3 0 4 3804 0 0 2 18 4 6 1 0 4902 4 4 0 0 10 4 25 1 1 4096 0 3808 24 0 3 0 4 23 0 2 0 256 0 1 1 3458 4 26 0 1 3801 4 PROCEDURE 895 3812 0 0 0 0 0 24 0 3 5 4 26 1 2 20 0 26 0 0 3825 4 3816 24 0 3 5 4 26 1 2 22 0 26 0 0 3825 4 24 0 3 5 4 3820 26 1 2 24 0 25 0 2 204 0 26 0 0 3825 4 26 1 1 4904 4 3824 26 0 3 3812 4 PROCEDURE 896 3825 0 0 0 0 0 23 0 3 4590 4 24 0 3 0 4 3828 23 1 2 0 0 25 0 2 2 0 24 1 0 3827 4 26 0 1 3825 4 PROCEDURE 897 3832 1 1 3 5 0 1 1 1 17 0 7 0 0 4500 4 1 1 3 5 0 3836 0 0 2 4936 4 25 1 1 4096 0 24 0 3 0 4 26 0 2 0 512 3840 0 0 0 3843 3 0 0 0 3230 3 0 0 0 4016 3 6 0 0 5000 4 3844 5 0 0 4937 4 27 0 1 3867 4 1 1 3 9 0 2 0 0 4686 4 3848 26 0 0 4172 4 26 1 1 4906 4 6 0 1 2580 4 26 0 0 4129 4 3852 25 0 1 2 0 24 1 0 3850 4 24 0 2 4688 4 28 1 2 2586 4 3856 0 1 0 3458 4 0 0 3 0 4 24 0 2 2586 4 25 1 1 4096 0 3860 24 0 3 0 4 23 0 2 0 1280 0 1 1 3458 4 6 0 0 4938 4 3864 2 0 0 4500 4 26 1 1 5008 4 24 1 0 3993 4 0 1 0 3458 4 3868 0 0 3 0 4 0 1 2 4908 4 6 1 0 4896 4 4 0 0 9 4 3872 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 0 3 3462 4 3876 26 0 0 4393 4 24 1 2 17 4 6 1 0 4 0 5 1 0 4492 4 3880 27 0 1 3890 4 0 1 0 3458 4 0 0 3 0 4 6 1 0 4898 4 3884 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 3888 0 1 1 3458 4 24 1 0 3835 4 24 1 2 17 4 6 1 0 5 0 3892 5 0 0 4939 4 27 0 1 3876 4 1 0 1 1 0 24 1 2 17 4 3896 15 1 0 7 0 1 1 2 5 0 27 0 1 3876 4 24 1 2 17 4 3900 6 1 0 9 0 5 0 0 4940 4 27 0 1 3876 4 26 0 0 4393 4 3904 24 1 2 17 4 6 1 0 42 0 5 1 0 4496 4 27 0 1 3903 4 3908 0 1 0 3458 4 0 0 3 0 4 0 1 2 4894 4 6 1 0 4910 4 3912 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 3916 0 0 3 3462 4 18 1 1 10 0 2 0 0 2576 4 26 0 0 4404 4 3920 26 0 0 4404 4 26 0 0 3801 4 1 1 3 2 0 24 1 2 19 4 3924 2 1 0 11 0 6 1 0 4490 4 24 1 2 19 4 2 1 0 12 0 3928 26 0 0 4404 4 26 0 0 3801 4 1 1 3 2 0 24 1 2 19 4 3932 2 1 0 9 0 6 0 0 4939 4 24 1 2 19 4 2 1 0 13 0 3936 26 0 0 4404 4 26 0 0 3801 4 24 1 2 19 4 6 1 0 42 0 3940 5 1 0 4496 4 27 0 0 3944 4 26 0 0 4404 4 24 1 0 3937 4 3944 26 1 1 4906 4 24 1 2 17 4 6 1 1 25 0 24 1 2 19 4 3948 5 1 1 25 0 27 0 3 3952 4 24 1 2 19 4 7 1 1 25 0 3952 24 1 2 19 4 6 1 1 25 0 26 0 0 4129 4 25 0 1 2 0 3956 24 1 0 3945 4 24 0 2 4688 4 28 1 2 2586 4 0 1 0 3458 4 3960 0 0 3 0 4 24 0 2 2586 4 25 1 1 4096 0 24 0 3 0 4 3964 23 0 2 0 1280 0 1 1 3458 4 6 0 0 4938 4 2 0 0 4500 4 3968 24 1 2 19 4 6 1 0 11 0 2 1 0 5008 4 26 1 1 5008 4 3972 1 1 3 4 0 24 1 2 19 4 7 1 0 11 0 26 0 0 4404 4 PROCEDURE 898 3976 26 0 0 3801 4 24 1 2 19 4 6 1 0 4 0 5 1 0 4488 4 3980 27 0 1 3990 4 0 1 0 3458 4 0 0 3 0 4 6 1 0 4898 4 3984 4 0 0 10 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 3988 0 1 1 3458 4 24 1 0 3992 4 26 0 0 4404 4 24 1 0 3976 4 3992 26 0 0 4428 4 26 0 0 4457 4 27 0 1 3992 4 24 1 0 3999 4 3996 26 0 0 4428 4 26 0 0 4457 4 27 0 1 4010 4 26 0 0 4428 4 4000 26 0 0 4404 4 26 0 0 4428 4 26 0 0 4404 4 26 0 0 4428 4 4004 6 0 0 5008 4 4 0 0 4941 4 24 1 2 19 4 2 1 0 51 0 4008 1 1 3 1 0 7 0 0 5008 4 24 1 2 19 4 6 1 0 4 0 4012 5 1 0 4488 4 27 0 0 4137 4 26 0 0 4404 4 24 1 0 3996 4 4016 26 0 0 4172 4 0 1 0 3458 4 0 0 3 0 4 6 1 0 4898 4 4020 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 4024 0 1 1 3458 4 0 1 0 3458 4 0 0 3 0 4 0 1 2 4908 4 4028 6 1 0 4896 4 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 4032 23 0 2 0 256 0 0 3 3462 4 26 0 0 4393 4 26 0 0 4439 4 4036 24 1 0 4038 4 0 0 0 4671 3 24 1 2 17 4 6 1 0 6 0 4040 5 1 0 4498 4 27 0 1 4034 4 26 0 0 4393 4 24 1 2 17 4 4044 6 1 0 5 0 5 0 0 4940 4 27 0 1 4034 4 24 1 2 17 4 4048 6 1 0 7 0 18 0 1 4126 0 1 1 2 2201 0 27 0 1 4034 4 4052 26 0 0 4393 4 26 0 0 4439 4 24 1 0 4056 4 0 0 0 4671 3 4056 24 1 2 17 4 6 1 0 42 0 5 1 0 4496 4 27 0 1 4052 4 4060 26 1 1 4906 4 6 0 1 2580 4 24 1 2 17 4 5 1 1 25 0 4064 27 0 3 4068 4 25 0 1 2 0 24 1 0 4061 4 24 1 0 3849 4 4068 0 1 0 3458 4 0 0 3 0 4 0 1 2 4912 4 6 1 0 4914 4 4072 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 4076 0 1 1 3458 4 0 1 0 3458 4 0 0 3 0 4 0 0 2 18 4 4080 6 1 0 4902 4 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 4084 23 0 2 0 256 0 1 1 3458 4 24 1 2 19 4 6 1 0 42 0 4088 5 1 0 4496 4 27 0 1 4077 4 26 1 1 4906 4 24 1 2 17 4 4092 6 1 1 25 0 5 0 1 2580 4 27 0 3 4098 4 24 1 2 19 4 4096 7 1 1 25 0 7 0 1 2580 4 25 0 1 2 0 24 1 0 4091 4 4100 0 1 0 3458 4 0 0 3 0 4 0 0 2 4942 4 6 1 0 4916 4 4104 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 4108 0 1 1 3458 4 26 0 0 4404 4 0 1 0 3458 4 0 0 3 0 4 4112 0 1 2 4918 4 6 1 0 4920 4 4 0 0 11 4 25 1 1 4096 0 4116 24 0 3 0 4 23 0 2 0 256 0 1 1 3458 4 0 1 0 3458 4 4120 0 0 3 0 4 0 0 2 4942 4 6 1 0 4922 4 4 0 0 11 4 4124 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 3458 4 4128 24 1 0 3849 4 PROCEDURE 899 4129 0 0 0 0 0 2 0 0 2578 4 0 0 3 4943 4 4132 24 0 2 4610 4 12 0 0 2578 4 2 0 1 2580 4 0 0 3 4934 4 4136 26 0 1 4129 4 26 0 0 4404 4 6 1 0 4512 4 24 1 2 19 4 4140 2 1 0 4 0 6 1 0 4498 4 24 1 2 19 4 2 1 0 6 0 4144 6 0 0 4939 4 24 1 2 19 4 2 1 0 9 0 1 1 3 3 0 4148 24 1 2 19 4 2 1 0 10 0 26 0 0 4404 4 26 0 0 4376 4 4152 0 1 0 3458 4 0 0 3 0 4 6 1 0 4898 4 4 0 0 9 4 4156 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 3458 4 4160 0 1 0 3458 4 0 0 3 0 4 6 1 0 4888 4 4 0 0 11 4 4164 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 3458 4 4168 25 1 2 0 0 2 0 0 4546 4 2 0 0 4686 4 24 1 0 3328 4 PROCEDURE 900 4172 0 0 0 0 0 0 1 0 3458 4 0 0 3 0 4 0 1 2 4894 4 4176 6 1 0 4910 4 4 0 0 11 4 25 1 1 4096 0 24 0 3 0 4 4180 23 0 2 0 256 0 0 3 3462 4 18 1 1 10 0 2 0 0 2576 4 4184 26 0 0 4404 4 26 0 0 4404 4 6 1 0 4512 4 24 1 2 19 4 4188 2 1 0 4 0 6 1 0 4498 4 24 1 2 19 4 2 1 0 6 0 4192 6 0 0 4939 4 24 1 2 19 4 2 1 0 9 0 1 1 3 2 0 4196 24 1 2 19 4 2 1 0 11 0 26 0 0 4404 4 26 0 0 4376 4 4200 0 1 0 3458 4 0 0 3 0 4 0 1 2 4912 4 6 1 0 4920 4 4204 4 0 0 10 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 4208 0 1 1 3458 4 26 0 0 3801 4 26 0 0 4439 4 24 1 0 4213 4 4212 0 0 0 4670 3 24 1 2 19 4 6 1 0 12 0 5 1 0 4924 4 4216 27 0 1 4209 4 26 0 0 4404 4 26 0 0 3801 4 26 0 0 4439 4 4220 24 1 0 4222 4 0 0 0 4670 3 24 1 2 19 4 6 1 0 42 0 4224 5 1 0 4496 4 27 0 1 4217 4 24 1 2 19 4 6 1 0 11 0 4228 2 1 0 5008 4 26 1 1 4906 4 24 1 2 19 4 6 1 1 25 0 4232 2 0 1 2580 4 25 0 1 2 0 24 1 0 4230 4 26 0 0 4404 4 4236 26 0 0 3801 4 26 0 0 4439 4 24 1 0 4240 4 0 0 0 4670 3 4240 24 1 2 19 4 6 1 0 12 0 5 1 0 4494 4 27 0 1 4235 4 PROCEDURE 901 4244 0 1 0 3458 4 0 0 3 0 4 0 1 2 4908 4 6 1 0 4896 4 4248 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 4252 0 0 3 3462 4 26 0 0 4428 4 26 0 0 4439 4 24 1 0 4257 4 4256 0 0 0 4671 3 24 1 2 19 4 6 1 0 6 0 5 1 0 4498 4 4260 27 0 1 4253 4 26 0 0 4428 4 24 1 2 19 4 6 1 0 5 0 4264 5 0 0 4944 4 27 0 1 3835 4 26 0 0 4428 4 26 0 0 4439 4 4268 24 1 0 4270 4 0 0 0 4671 3 24 1 2 19 4 6 1 0 42 0 4272 5 1 0 4496 4 27 0 1 4266 4 26 1 1 4906 4 24 1 2 19 4 4276 6 1 1 25 0 5 0 1 2580 4 27 0 3 4280 4 7 0 1 2580 4 4280 25 0 1 2 0 24 1 0 4275 4 26 0 0 4428 4 26 0 0 4439 4 4284 24 1 0 4286 4 0 0 0 4671 3 24 1 2 19 4 6 1 0 12 0 4288 5 1 0 4494 4 27 0 1 4282 4 26 1 1 4926 4 6 0 0 5000 4 4292 24 1 2 19 4 2 1 0 9 0 6 0 0 5001 4 24 1 2 19 4 4296 2 1 0 11 0 26 0 0 4404 4 26 0 0 4428 4 26 0 0 4439 4 4300 24 1 0 4302 4 0 0 0 4671 3 24 1 2 19 4 6 1 0 12 0 4304 5 1 0 4494 4 27 0 1 4297 4 25 0 1 1 0 24 1 0 4291 4 4308 26 0 0 3801 4 26 0 0 4439 4 24 1 0 4312 4 0 0 0 4670 3 4312 24 1 2 19 4 6 1 0 12 0 5 1 0 4494 4 27 0 1 4308 4 4316 24 1 2 19 4 6 1 0 5 0 1 1 2 5 0 27 0 1 4308 4 4320 26 1 1 4928 4 26 0 0 4404 4 26 0 0 3801 4 26 0 0 4439 4 4324 24 1 0 4326 4 0 0 0 4670 3 24 1 2 19 4 6 1 0 12 0 4328 5 1 0 4494 4 27 0 1 4321 4 25 0 1 1 0 24 1 0 4321 4 4332 26 0 0 4428 4 26 0 0 4439 4 24 1 0 4336 4 0 0 0 4671 3 4336 24 1 2 19 4 6 1 0 12 0 5 1 0 4494 4 27 0 1 4332 4 4340 24 1 2 19 4 6 1 0 5 0 1 1 2 10 0 27 0 1 4332 4 4344 6 0 0 5000 4 24 1 2 19 4 2 1 0 9 0 6 0 0 5001 4 4348 24 1 2 19 4 2 1 0 11 0 26 0 0 4404 4 26 0 0 4428 4 4352 26 0 0 4439 4 24 1 0 4355 4 0 0 0 4671 3 24 1 2 19 4 4356 6 1 0 4 0 5 1 0 4488 4 27 0 0 4367 4 24 1 2 19 4 4360 6 1 0 12 0 5 1 0 4494 4 27 0 1 4350 4 24 1 2 19 4 4364 6 1 0 5 0 1 1 2 13 0 27 0 1 4344 4 0 1 0 3458 4 4368 0 0 3 0 4 6 1 0 4898 4 4 0 0 10 4 25 1 1 4096 0 4372 24 0 3 0 4 23 0 2 0 256 0 1 1 3458 4 26 0 1 4172 4 PROCEDURE 902 4376 0 0 0 0 0 6 0 0 5000 4 24 1 2 19 4 2 1 0 5 0 4380 6 0 0 5001 4 24 1 2 19 4 2 1 0 7 0 1 1 3 2 0 4384 24 1 2 19 4 3 1 0 9 0 24 1 2 19 4 2 1 0 11 0 4388 6 0 0 4939 4 24 1 2 19 4 2 1 0 13 0 26 0 0 4404 4 4392 26 0 1 4376 4 PROCEDURE 903 4393 0 0 0 0 0 0 1 0 3458 4 0 0 3 0 4 4396 0 0 2 16 4 6 1 0 4902 4 4 0 0 9 4 25 1 1 4096 0 4400 24 0 3 0 4 23 0 2 0 256 0 1 1 3458 4 26 0 1 4393 4 PROCEDURE 904 4404 0 0 0 0 0 24 1 2 19 4 24 0 2 4 0 18 1 1 4123 0 4408 1 1 3 50 0 18 1 1 5 0 24 1 2 21 4 28 1 1 4 0 4412 6 1 0 4510 4 24 1 2 21 4 2 1 0 52 0 6 1 0 4900 4 4416 24 1 2 19 4 28 1 1 4 0 0 1 0 3458 4 0 0 3 0 4 4420 0 0 2 20 4 6 1 0 4890 4 4 0 0 11 4 25 1 1 4096 0 4424 24 0 3 0 4 23 0 2 0 256 0 1 1 3458 4 26 0 1 4404 4 PROCEDURE 905 4428 0 0 0 0 0 0 1 0 3458 4 0 0 3 0 4 0 0 2 18 4 4432 6 1 0 4902 4 4 0 0 9 4 25 1 1 4096 0 24 0 3 0 4 4436 23 0 2 0 256 0 1 1 3458 4 26 0 1 4428 4 PROCEDURE 906 4439 0 0 0 0 0 4440 24 1 2 19 4 6 1 0 4 0 5 1 0 4492 4 27 0 1 4456 4 4444 24 0 3 4439 4 24 1 2 1 0 6 0 0 0 0 2 0 0 4682 4 4448 0 1 0 3458 4 0 0 3 0 4 24 0 2 4672 4 25 1 1 4096 0 4452 24 0 3 0 4 23 0 2 0 1280 0 1 1 3458 4 24 1 0 3328 4 4456 26 0 1 4439 4 PROCEDURE 907 4457 0 0 0 0 0 24 1 2 19 4 6 1 0 12 0 4460 5 1 0 4494 4 27 0 1 4486 4 24 1 2 19 4 6 1 0 5 0 4464 1 1 2 4 0 5 0 0 4686 4 27 0 3 4468 4 24 1 0 4474 4 4468 26 0 0 4428 4 24 1 2 19 4 6 1 0 12 0 5 1 0 4494 4 4472 27 0 1 4468 4 24 1 0 4462 4 25 0 1 1 0 24 0 3 0 4 4476 6 0 0 2 22 24 1 2 19 4 2 1 0 5 0 6 0 0 5000 4 4480 24 1 2 19 4 2 1 0 9 0 6 0 0 5001 4 24 1 2 19 4 4484 2 1 0 11 0 26 0 0 4404 4 26 0 1 4457 4 0 0 0 0 0 SECTION 908 4488 56554 0 67695 0 15965 0 53585 0 4492 55972 0 56596 0 16773 0 53585 0 4496 36653 0 51636 0 45577 0 59655 0 4500 4630 0 30483 0 16772 0 53585 0 4504 6665 0 0 0 5.5. 0 0 0 4508 30 0 0 0 7. 0 7.000 0 4512 £6£6£ 0 6£6£6 0 45500 0 64515 0 4516 3048 0 52780 0 59 0 30303 0 4520 45500 0 72727 0 7255 0 48000 0 4524 16300 0 69595 0 3030 0 47303 0 4528 71 0 0 0 66663 0 72676 0 4532 3030 0 30483 0 25572 0 64516 0 4536 77800 0 53666 0 27243 0 67517 0 4540 30 0 0 0 30 0 0 0 4544 30 0 0 0 30 0 0 0 4548 6664 0 67730 0 35554 0 59737 0 4552 25172 0 54597 0 67472 0 73696 0 4556 85569 0 66735 0 0 0 72000 0 4560 85572 0 7 0 6566 0 0 0 4564 5965 0 0 0 95366 0 73556 0 4568 0 0 54550 0 36959 0 7 0 4572 5451 0 51630 0 0 0 73510 0 4576 95951 0 72556 0 57464 0 63006 0 4580 97200 0 52556 0 5965 0 66560 0 4584 95366 0 73556 0 6955 0 54550 0 4588 97372 0 67666 0 SECTION 909 4590 1 0 0 0 4592 t 0 0 0 64 0 0 0 4596 3.8 0 0 0 2710 0 0 0 4600 186t0 0 0 0 £4240 0 0 0 4604 89680 0 9 0 5.100 0 5£ 0 4608 t+t00 0 3e9 0 1 0 0 0 4612 16 0 0 0 256 0 0 0 4616 4096 0 0 0 65536 0 0 0 4620 48576 0 10 0 77216 0 167 0 4624 35456 0 2684 0 67296 0 42949 0 4628 £££££ 0 £££££ 0 1 0 0 0 4632 + 0 0 0 78 0 0 0 4636 £0 0 0 0 960 0 0 0 4640 5:+0 0 0 0 3t980 0 0 0 4644 49£00 0 2 0 .3600 0 16 0 4648 .1+00 0 .4 0 1 0 0 0 4652 14 0 0 0 1014 0 0 0 4656 17014 0 0 0 73014 0 2 0 4660 69014 0 43 0 5014 0 699 0 4664 81014 0 11184 0 £££££ 0 £££££ 0 4668 £££££ 0 £££££ 0 20000 0 10000 0 4672 3030 0 30483 0 55577 0 746 0 4676 37355 0 67555 0 65965 0 54005 0 4680 6665 0 59720 0 0 0 510 0 4684 5.5. 0 0 0 0 0 0 0 SECTION 910 4688 0 4500 3 5 3 0 0 0 5 0 0 4502 3 21 3 0 0 1 5 0 4692 0 2580 3 16405 0 4 0 1 5 0 0 2582 3 16405 0 4 0 1 5 0 4696 0 2584 3 16389 0 4 0 0 5 0 0 4504 3 802 3 0 3 2 2 0 4700 0 2576 3 21 0 0 0 1 5 0 0 4506 3 770 3 0 3 0 2 1 4704 0 4504 3 786 3 0 3 1 2 0 0 4526 3 9234 2 2 4 1 2 0 4708 0 4528 3 1025 3 0 4 0 1 0 0 4526 3 8450 0 2 1 0 2 0 4712 0 4528 3 1025 3 0 4 0 1 0 0 4526 3 8962 0 2 3 0 2 0 4716 0 4530 3 37 3 0 0 2 5 0 0 4508 3 20501 0 5 0 1 5 1 4720 0 4532 3 37 3 0 0 2 5 0 0 4534 3 21 3 0 0 1 5 0 4724 0 4538 3 21 3 0 0 1 5 0 0 4536 3 21 3 0 0 1 5 0 4728 0 4504 3 770 3 0 3 0 2 0 0 4542 3 20501 0 5 0 1 5 0 4732 0 4506 3 770 3 0 3 0 2 1 0 4428 3 8707 0 2 2 0 3 0 4736 0 4404 3 16421 0 4 0 2 5 1 0 4540 3 12564 0 3 1 1 4 0 4740 0 4542 3 16549 0 4 0 10 5 0 0 6246 3 20581 0 5 0 6 5 0 4744 0 6247 3 20501 0 5 0 1 5 0 0 6248 3 20501 0 5 0 1 5 0 4748 0 6249 3 20501 0 5 0 1 5 0 0 6250 3 20501 0 5 0 1 5 0 4752 0 6251 3 20501 0 5 0 1 5 0 0 6252 3 20501 0 5 0 1 5 0 4756 0 6253 3 20501 0 5 0 1 5 0 0 6254 3 20501 0 5 0 1 5 0 4760 0 6255 3 20501 0 5 0 1 5 1 PROCEDURE 911 4762 0 0 0 0 0 6 1 0 4492 4 4764 24 0 3 10 4 24 1 2 64 0 2 1 0 4 0 0 1 0 3458 4 4768 0 0 3 0 4 6 1 0 4898 4 4 0 0 10 4 25 1 1 4096 0 4772 24 0 3 0 4 23 0 2 0 256 0 1 1 3458 4 26 0 1 4762 4 PROCEDURE 912 4776 0 0 0 0 0 2 0 0 4762 4 0 0 3 4943 4 24 0 2 4610 4 4780 12 0 0 4762 4 26 0 1 4776 4 PROCEDURE 913 4782 0 0 0 0 0 23 0 0 50 0 4784 0 0 0 7358 3 24 1 0 4792 4 6 1 0 4510 4 24 1 2 13 4 4788 2 1 0 306 0 26 0 0 4793 4 6 1 0 4930 4 2 1 0 7358 4 4792 26 0 1 4782 4 PROCEDURE 914 4793 0 0 0 0 0 6 1 0 4890 4 0 0 2 12 4 4796 25 1 1 4096 0 4 0 0 7 4 24 0 3 0 4 23 0 2 160 0 4800 26 0 1 4793 4 PROCEDURE 915 4801 0 0 0 0 0 6 1 1 4548 4 24 1 2 15 4 4804 2 1 0 6 0 6 1 1 4550 4 24 1 2 15 4 2 1 0 8 0 4808 26 0 0 3657 4 26 0 0 3717 4 26 0 1 4801 4 PROCEDURE 916 4811 0 0 0 0 0 4812 2 0 0 4540 4 24 0 2 4738 4 24 1 2 15 4 28 1 2 12 0 4816 24 0 2 6256 4 18 1 1 4123 0 1 1 3 10 0 18 1 1 5 0 4820 28 0 0 6246 4 26 0 1 4811 4 SECTION 917 4822 0 0 0 0 4824 0 0 0 0 0 0 0 0 4828 0 0 0 0 0 0 0 0 4832 0 0 0 0 0 0 0 0 4836 0 0 0 0 0 0 0 0 4840 0 0 0 0 0 0 0 0 4844 0 0 0 0 0 0 0 0 4848 0 0 0 0 0 0 0 0 4852 0 0 0 0 0 0 0 0 4856 0 0 0 0 0 0 0 0 4860 0 0 0 0 0 0 0 0 4864 0 0 0 0 0 0 0 0 4868 0 0 0 0 0 0 0 0 4872 0 0 0 0 0 0 0 0 4876 0 0 0 0 0 0 0 0 4880 0 0 0 0 SECTION 1033 4882 1 0 4 0 4884 1 0 3 0 0 0 2000. 0 4888 0 0 1+ 0 0 0 8 0 4892 0 0 20034 0 8000 0 5146 0 4896 0 0 11 0 0 0 1e 0 4900 0 0 20032 0 0 0 7 0 4904 0 0 0 0 0 0 6 0 4908 8000 0 5141 0 0 0 12 0 4912 2 0 t 0 0 0 23 0 4916 0 0 2+ 0 £££££ 0 2 0 4920 0 0 25 0 0 0 27 0 4924 27243 0 67517 0 1 0 5 0 4928 5 0 t 0 0 0 12+ 0 4932 0 0 0 0 SECTION 1034 4934 0 0 80000 0 4936 3 0 8066 0 4630 0 £££££ 0 4940 8000 0 1.001 0 1 0 66666 0 4944 8061 0 0 0 SECTION 1035 PROCEDURE 1008 CHAPT 9 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 11 12 0 0 0 0 12 0 0 0 0 13 0 0 0 0 14 0 0 0 0 15 16 0 0 0 0 16 0 0 0 0 17 0 0 0 0 18 0 0 0 0 19 20 0 0 0 0 20 0 0 0 0 21 0 0 0 0 22 0 0 0 0 23 24 0 0 0 0 24 0 0 0 0 25 0 0 0 0 0 25 1 1 4096 0 28 24 0 3 0 4 23 0 2 0 1792 0 0 0 0 0 0 0 0 0 0 32 26 0 1 26 4 PROCEDURE 918 33 0 1 0 2138 4 0 0 3 0 4 1 1 3 10 0 36 0 0 2 2166 4 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 1024 40 0 1 1 2138 4 24 0 2 2106 4 3 1 0 2138 4 26 1 1 2138 4 44 24 0 2 198 4 3 1 0 2138 4 26 1 2 2138 4 24 0 2 1816 4 48 3 1 0 2138 4 26 1 3 2138 4 6 0 0 1816 4 18 0 3 2 0 52 2 0 0 189 4 6 0 0 2106 4 18 0 3 2 0 2 0 0 195 4 56 6 1 0 2152 4 2 1 0 7360 4 6 1 0 2154 4 2 1 0 7354 4 60 26 0 0 84 4 6 1 0 2156 4 24 1 2 19 4 2 1 0 12 0 64 26 0 0 67 4 26 0 0 84 4 24 1 0 3066 4 PROCEDURE 919 67 0 0 0 0 0 68 6 1 0 2158 4 24 1 2 19 4 2 1 0 52 0 0 1 0 2138 4 72 0 0 3 0 4 0 0 2 18 4 6 1 0 2160 4 4 0 0 10 4 76 25 1 1 4096 0 24 0 3 0 4 23 0 2 0 256 0 1 1 2138 4 80 6 1 0 2162 4 24 1 2 19 4 28 1 1 4 0 26 0 1 67 4 PROCEDURE 920 84 0 0 0 0 0 24 0 3 0 4 6 0 0 4 22 2 0 0 180 4 88 24 0 1 180 4 1 1 3 0 0 2 0 0 184 4 24 1 2 19 4 92 24 0 2 0 0 3 0 0 67 4 1 1 1 48 0 18 0 1 5 0 96 4 0 0 67 4 2 1 0 7356 4 24 0 3 182 4 6 0 2 0 0 100 2 0 0 185 4 0 1 2 188 4 18 1 3 3 0 0 1 0 186 4 104 23 0 0 1 0 0 0 0 7360 3 24 1 0 115 4 6 1 0 2152 4 108 2 1 0 7360 4 24 0 3 182 4 6 0 3 1 0 18 1 3 2 0 112 2 0 0 189 4 25 0 3 1 0 24 1 0 115 4 6 0 0 186 4 116 1 1 2 6 0 27 0 0 101 4 1 1 2 1 0 27 0 1 148 4 120 0 1 2 194 4 18 1 3 6 0 0 1 0 192 4 23 0 0 1 0 124 0 0 0 7354 3 24 1 0 134 4 6 1 0 2154 4 2 1 0 7354 4 128 24 0 3 182 4 6 0 1 1 0 18 1 3 2 0 2 0 0 195 4 132 25 0 1 1 0 24 1 0 134 4 6 0 0 192 4 1 1 2 63 0 136 27 0 0 120 4 1 1 1 1 0 27 0 1 146 4 6 1 0 182 4 140 24 0 3 7356 4 2 1 0 4 0 24 0 3 7356 4 2 1 0 6 0 144 26 0 0 67 4 26 0 1 84 4 6 1 0 192 4 2 1 0 186 4 148 6 0 0 186 4 1 1 2 1 0 27 0 0 153 4 1 1 2 1 0 152 27 0 1 163 4 1 1 3 8191 0 18 1 1 4118 0 15 0 0 185 4 156 1 1 2 1816 4 27 0 3 176 4 1 0 1 31 0 1 1 3 0 0 160 15 0 0 185 4 1 1 2 2546 4 14 0 0 185 4 6 0 0 185 4 164 24 0 3 7356 4 2 1 0 7 0 6 0 0 186 4 24 0 3 7356 4 168 2 1 0 5 0 25 0 2 1 0 24 1 0 171 4 23 0 0 4 0 172 0 0 0 7356 3 24 1 0 98 4 26 0 0 67 4 24 1 0 91 4 176 1 1 1 1816 4 5 0 0 184 4 24 1 0 162 4 0 0 0 0 0 SECTION 921 180 0 0 0 0 0 0 4£000 0 184 0 0 0 0 0 0 0 0 188 0 0 0 0 0 0 0 0 192 0 0 0 0 0 0 0 0 196 0 0 0 0 PROCEDURE 922 198 24 1 0 228 4 24 1 0 262 4 200 24 1 0 626 4 24 1 0 676 4 24 1 0 762 4 1 1 3 2 0 204 2 0 0 1928 4 24 1 0 478 4 0 0 0 0 0 24 0 3 2534 4 208 6 0 0 39 0 2 0 0 502 4 24 0 2 218 4 28 1 2 2342 4 212 24 0 2 2342 4 25 1 1 4096 0 24 0 3 880 4 23 0 2 168 0 216 0 0 3 880 4 26 0 1 206 4 0 0 0 926 4 1 0 0 515 0 220 0 0 0 920 4 1 0 0 21 0 0 0 0 922 4 1 0 0 3 0 224 0 0 0 502 4 0 0 0 21 0 0 0 0 922 4 17 0 0 770 0 228 0 0 2 866 4 1 1 3 7 0 26 0 0 2276 4 24 1 2 868 4 232 6 1 0 4 0 5 1 0 924 4 27 0 0 239 4 24 1 2 868 4 236 6 1 0 12 0 5 1 0 876 4 27 0 1 228 4 0 0 2 928 4 240 1 1 3 44 0 26 0 0 2276 4 24 0 2 914 4 2 0 0 461 4 244 24 0 2 916 4 2 0 0 550 4 6 0 0 2534 4 1 1 1 39 0 248 2 0 0 912 4 24 0 2 902 4 24 1 2 868 4 28 1 2 4 0 252 26 0 0 776 4 25 1 1 4096 0 6 1 0 942 4 24 0 3 2538 4 256 28 0 0 2 0 1 1 3 15 0 3 0 0 2119 4 2 0 0 861 4 260 0 1 1 2540 4 26 0 3 2539 4 PROCEDURE 923 262 0 1 0 902 4 24 0 3 2534 4 264 0 1 0 30 0 0 0 3 880 4 6 1 0 938 4 4 0 0 2538 4 268 28 0 0 908 4 2 0 0 2119 4 1 0 1 15 0 24 0 3 880 4 272 15 0 0 172 0 1 1 2 4 0 2 0 0 907 4 24 0 3 907 4 276 6 0 0 0 0 1 1 2 1 0 2 0 0 856 4 26 0 0 818 4 280 6 0 2 0 0 5 0 0 856 4 27 0 1 318 4 6 1 2 6 0 284 27 0 0 295 4 1 1 3 0 0 1 0 1 3 0 15 0 2 4 0 288 27 0 1 292 4 1 0 1 6 0 15 0 2 5 0 27 0 1 322 4 PROCEDURE 924 292 6 0 2 4 0 1 1 2 1 0 2 0 2 4 0 1 0 1 8 0 296 15 0 2 5 0 18 0 0 4125 0 24 0 3 907 4 7 0 0 0 0 300 6 0 2 2 0 24 0 3 907 4 2 0 0 4 0 6 0 2 3 0 304 24 0 3 907 4 2 0 0 5 0 2 1 0 852 4 2 0 0 854 4 308 6 1 0 944 4 24 0 3 2538 4 28 0 0 2 0 25 1 1 4096 0 312 1 1 3 1 0 2 0 0 2119 4 24 1 0 315 4 0 1 1 902 4 316 24 0 3 880 4 26 0 3 172 0 25 0 2 18 0 24 1 0 280 4 320 26 0 0 206 4 24 1 0 634 4 PROCEDURE 925 PROCEDURE 926 322 1 1 2 16 0 14 0 2 5 0 324 6 0 0 861 4 27 0 1 327 4 26 0 0 838 4 1 1 3 15 0 328 2 0 0 861 4 1 0 1 24 0 15 0 2 4 0 18 0 0 4125 0 332 7 0 2 4 0 25 1 2 0 0 1 0 1 16 0 15 0 2 5 0 336 3 0 0 854 4 5 0 0 862 4 27 0 1 341 4 6 0 0 862 4 340 24 1 0 640 4 26 0 0 826 4 6 0 2 1 0 24 1 2 868 4 344 2 1 0 9 0 26 1 1 880 4 26 1 3 882 4 6 0 3 902 4 348 24 1 2 868 4 2 1 1 11 0 25 0 1 2 0 24 1 0 352 4 352 25 0 3 1 0 24 1 0 347 4 PROCEDURE 927 354 1 1 3 1 0 2 0 0 857 4 356 6 1 0 884 4 2 1 0 914 4 6 0 0 854 4 24 1 2 868 4 360 3 1 0 7 0 5 0 0 869 4 27 0 0 542 4 27 0 2 372 4 364 18 0 1 4124 0 1 1 1 2 0 27 0 0 369 4 1 1 1 2 0 368 27 0 1 375 4 1 1 3 1 0 2 0 0 859 4 24 1 0 375 4 372 3 0 0 860 4 5 0 0 863 4 27 0 0 542 4 24 0 1 914 4 376 6 0 2 6 0 27 0 0 463 4 27 0 2 386 4 6 0 0 914 4 380 24 0 3 2538 4 4 0 0 4 0 2 0 0 855 4 24 0 1 855 4 384 24 0 3 6 0 6 0 0 0 0 18 0 0 6 0 18 0 0 4122 0 388 3 0 0 918 4 24 1 2 868 4 3 1 0 33 0 24 0 1 914 4 392 4 0 2 7 0 18 0 0 6 0 18 0 0 4122 0 3 0 0 919 4 396 24 1 2 868 4 2 1 0 35 0 1 0 1 3 0 24 0 1 914 4 400 15 0 2 8 0 26 0 0 768 4 24 1 2 868 4 7 1 0 7 0 PROCEDURE 928 404 6 0 0 857 4 27 0 0 411 4 25 1 2 0 0 2 0 0 857 4 408 1 1 3 4096 0 24 1 2 868 4 7 1 0 7 0 6 1 0 874 4 412 24 1 2 868 4 2 1 0 4 0 6 1 0 890 4 24 1 2 868 4 416 2 1 0 36 0 26 0 0 776 4 PROCEDURE 929 418 26 0 0 788 4 6 0 0 853 4 420 27 0 1 561 4 1 1 3 20 0 2 0 0 894 4 24 0 3 918 4 424 23 0 3 0 0 5 0 0 894 4 27 0 0 434 4 7 0 0 894 4 428 6 1 0 894 4 2 1 3 4 0 2 1 3 6 0 25 0 3 4 0 432 24 1 0 434 4 26 0 0 796 4 6 1 0 886 4 4 0 0 918 4 436 24 0 3 2538 4 24 0 1 6 0 28 0 1 5 0 26 1 1 918 4 440 25 0 1 2 0 24 1 0 443 4 24 1 0 452 4 1 1 3 2 0 444 7 0 0 918 4 6 0 0 918 4 18 0 0 4124 0 27 0 1 452 4 448 25 0 3 4 0 24 1 0 423 4 26 0 0 796 4 24 1 0 423 4 PROCEDURE 930 452 25 0 3 4 0 24 1 0 454 4 26 0 0 796 4 6 0 0 919 4 456 5 0 0 775 4 27 0 0 650 4 6 0 0 852 4 27 0 1 466 4 460 23 0 0 3 0 0 0 0 914 3 24 1 0 358 4 6 0 0 2169 4 464 27 0 0 295 4 24 1 0 634 4 26 1 1 914 4 25 0 1 1 0 468 24 1 0 473 4 6 0 0 854 4 27 0 0 476 4 25 1 2 0 0 472 24 1 0 463 4 1 1 3 1 0 7 0 0 914 4 24 1 0 650 4 PROCEDURE 931 476 2 0 0 1928 4 25 1 1 4096 0 2 0 0 2119 4 6 0 0 860 4 480 27 0 1 488 4 24 0 3 880 4 6 0 0 26 0 27 0 0 488 4 484 1 1 2 1 0 27 0 1 517 4 6 0 0 859 4 27 0 1 517 4 488 6 0 0 861 4 27 0 1 491 4 26 0 0 838 4 1 1 3 28 0 492 26 0 0 2276 4 25 1 1 4096 0 6 0 0 2169 4 27 0 1 2173 4 496 6 0 0 1928 4 27 0 0 2170 4 6 0 0 2205 4 2 0 0 2180 4 500 24 1 0 2170 4 1 1 3 0 0 PROCEDURE 932 502 0 0 0 0 0 6 0 0 861 4 504 27 0 0 516 4 0 1 2 900 4 1 1 3 35 0 26 0 0 2276 4 508 1 1 3 10 0 18 0 1 5 0 24 0 3 2116 4 4 0 0 55 0 512 18 1 1 4118 0 1 1 3 36 0 26 0 0 2276 4 1 1 3 1 0 516 26 0 1 502 4 1 1 3 40 0 0 0 2 2114 4 6 0 0 2276 4 520 26 0 0 502 4 0 0 2 866 4 1 1 3 7 0 26 0 0 2276 4 524 24 1 2 868 4 6 1 0 12 0 5 1 0 898 4 27 0 1 521 4 528 6 0 0 2169 4 27 0 0 2046 4 25 1 1 4096 0 26 0 0 2283 4 532 1 1 3 40 0 0 0 2 2114 4 26 0 0 2276 4 25 1 1 4096 0 536 24 0 3 2534 4 6 0 0 9 0 24 0 3 2534 4 2 0 0 7 0 540 24 1 1 2116 4 24 1 0 2064 4 PROCEDURE 933 542 1 1 3 1 0 2 0 0 853 4 544 6 1 0 884 4 2 1 0 916 4 24 0 1 916 4 6 0 2 7 0 548 27 0 0 552 4 23 0 0 2 0 0 0 0 916 3 24 1 0 546 4 552 6 0 0 916 4 24 1 2 868 4 2 1 0 35 0 24 1 2 868 4 556 2 1 0 33 0 6 0 0 916 4 18 0 0 5 0 2 1 0 914 4 560 24 1 0 404 4 PROCEDURE 934 561 25 1 2 0 0 0 0 2 872 4 24 0 1 914 4 564 15 0 2 7 0 27 0 0 575 4 25 1 2 0 0 0 0 2 873 4 568 24 0 1 914 4 15 0 2 7 0 18 0 3 3 0 18 0 0 4124 0 572 2 1 3 7 0 0 0 2 871 4 24 1 0 581 4 1 0 1 28 0 576 24 0 1 914 4 15 0 2 7 0 18 0 0 4126 0 2 1 3 7 0 580 1 0 1 3 0 24 0 1 914 4 15 0 2 7 0 2 1 3 5 0 584 1 0 1 15 0 24 0 1 914 4 15 0 2 6 0 2 1 3 9 0 588 1 0 1 16 0 24 0 1 914 4 15 0 2 6 0 18 0 0 4124 0 592 18 0 3 1 0 26 0 0 802 4 2 1 0 916 4 6 0 0 916 4 596 4 1 3 9 0 3 1 3 11 0 3 0 0 855 4 18 0 3 3 0 600 18 0 0 4127 0 18 0 3 1 0 4 1 0 886 4 4 1 0 886 4 604 24 0 3 2538 4 24 0 1 6 0 28 0 1 13 0 24 0 3 855 4 608 23 0 3 0 0 1 1 1 64 0 18 0 0 8 0 4 1 3 6 0 612 2 1 3 6 0 26 1 1 914 4 25 0 1 2 0 24 1 0 620 4 616 6 1 0 890 4 2 1 3 20 0 26 0 0 776 4 24 1 0 295 4 620 1 1 3 2 0 7 0 0 914 4 25 0 3 16 0 24 1 0 561 4 624 26 0 0 796 4 24 1 0 561 4 PROCEDURE 935 626 1 1 3 0 0 2 0 0 2119 4 628 6 1 0 938 4 4 0 0 2538 4 28 0 0 908 4 24 0 3 880 4 632 24 0 3 2 0 24 1 1 29 0 26 0 0 826 4 25 1 2 0 0 636 2 0 0 854 4 6 0 0 864 4 3 0 0 857 4 3 0 0 858 4 640 2 0 0 852 4 6 0 0 861 4 27 0 1 646 4 26 0 0 838 4 644 1 1 3 15 0 2 0 0 861 4 PROCEDURE 936 646 1 1 3 1 0 3 0 0 914 4 648 4 0 0 2537 4 2 0 0 915 4 6 0 0 852 4 24 1 2 868 4 652 2 1 0 7 0 6 0 0 858 4 27 0 0 664 4 6 0 0 775 4 656 3 0 0 919 4 24 1 2 868 4 2 1 0 35 0 2 0 0 918 4 660 24 1 2 868 4 2 1 0 32 0 2 0 0 858 4 24 1 0 404 4 664 6 0 0 914 4 24 1 2 868 4 7 1 0 7 0 4 0 0 914 4 668 26 0 0 802 4 3 1 0 918 4 24 1 2 868 4 2 1 0 33 0 672 6 0 0 919 4 24 1 2 868 4 2 1 0 35 0 24 1 0 404 4 PROCEDURE 937 676 26 0 0 818 4 24 0 3 2534 4 6 0 0 32 0 3 0 0 852 4 680 4 0 0 852 4 4 0 0 2535 4 2 0 0 916 4 26 1 1 916 4 684 24 0 3 2534 4 6 0 0 30 0 5 0 0 2537 4 27 0 3 689 4 688 1 1 2 1 0 4 0 0 2537 4 2 0 0 853 4 1 0 1 1 0 692 15 0 2 5 0 27 0 0 703 4 5 0 0 853 4 27 0 0 710 4 696 4 0 0 853 4 5 0 0 852 4 27 0 1 701 4 5 0 2 0 0 700 2 0 2 0 0 25 0 2 18 0 24 1 0 677 4 2 1 0 852 4 704 2 0 0 854 4 2 0 0 861 4 1 1 3 0 0 26 0 0 2283 4 708 24 0 3 880 4 24 1 0 0 0 PROCEDURE 938 710 1 0 1 4 0 15 0 2 4 0 712 27 0 0 717 4 25 1 2 0 0 5 0 2 0 0 2 0 2 0 0 716 24 1 0 749 4 6 0 0 852 4 18 0 0 2 0 14 0 2 4 0 720 24 0 3 880 4 6 0 1 18 0 4 0 2 0 0 3 0 2 0 0 724 2 0 0 916 4 26 1 3 916 4 24 0 3 880 4 6 0 3 0 0 728 3 0 2 2 0 27 0 2 742 4 5 0 2 2 0 5 0 2 2 0 732 18 0 3 3 0 18 0 1 4124 0 1 1 2 64 0 27 0 0 744 4 736 1 1 2 1 0 27 0 0 744 4 1 1 2 2 0 27 0 0 744 4 740 1 1 2 3 0 27 0 0 744 4 6 0 0 867 4 24 1 0 748 4 744 1 1 3 4096 0 7 0 2 5 0 24 0 3 880 4 6 0 3 1 0 748 2 0 2 3 0 6 0 2 0 0 2 0 0 916 4 26 1 3 916 4 752 0 0 2 871 4 24 0 3 880 4 15 0 1 18 0 2 0 0 854 4 756 5 0 0 854 4 5 0 0 2536 4 4 0 0 870 4 24 0 3 880 4 760 2 0 3 0 0 24 1 0 701 4 PROCEDURE 939 762 26 0 0 502 4 26 0 0 2283 4 764 1 1 3 0 0 6 0 0 861 4 24 0 3 880 4 24 1 0 0 0 PROCEDURE 940 PROCEDURE 941 768 0 0 0 0 0 2 0 0 855 4 0 0 3 865 4 24 0 2 928 4 772 12 0 0 855 4 0 0 3 880 4 26 0 1 768 4 0 0 0 0 0 PROCEDURE 942 776 0 0 0 0 0 0 0 2 866 4 1 1 3 8 0 26 0 0 2276 4 780 6 1 0 940 4 24 1 2 868 4 28 1 1 0 0 25 1 1 4096 0 784 1 1 3 0 0 24 0 3 880 4 26 0 0 0 0 26 0 1 776 4 PROCEDURE 943 788 0 0 0 0 0 24 1 2 868 4 1 1 3 0 0 3 0 0 916 4 792 1 1 1 48 0 2 0 0 917 4 26 1 3 916 4 26 0 1 788 4 PROCEDURE 944 796 0 0 0 0 0 6 1 0 890 4 2 1 3 4 0 26 0 0 776 4 800 26 0 0 788 4 26 0 1 796 4 PROCEDURE 945 802 0 0 0 0 0 3 0 0 855 4 804 4 0 0 2535 4 2 0 0 818 4 24 0 3 880 4 6 0 0 43 0 808 18 0 1 4124 0 5 0 0 855 4 27 0 0 813 4 1 1 3 0 0 812 24 1 0 815 4 1 1 2 1500 0 18 0 1 5 0 24 0 3 818 4 816 4 1 0 18 0 26 0 1 802 4 PROCEDURE 946 818 0 0 0 0 0 1 1 3 2354 4 820 3 0 0 916 4 1 1 1 180 0 2 0 0 917 4 26 1 2 916 4 824 26 0 1 818 4 0 1 0 4097 0 PROCEDURE 947 826 0 0 0 0 0 26 1 1 884 4 828 26 1 3 892 4 6 0 3 908 4 26 0 0 768 4 24 1 2 868 4 832 2 1 1 21 0 25 0 1 2 0 24 1 0 835 4 25 0 3 1 0 836 24 1 0 829 4 26 0 1 826 4 PROCEDURE 948 838 0 0 0 0 0 0 1 2 888 4 840 1 1 3 38 0 26 0 0 2276 4 24 0 3 880 4 24 0 3 64 0 844 6 1 0 4 0 1 1 1 0 0 5 1 0 924 4 27 0 1 839 4 848 0 0 2 929 4 1 1 3 44 0 26 0 0 2276 4 26 0 1 838 4 SECTION 949 852 0 0 0 0 0 0 0 0 856 0 0 0 0 0 0 0 0 860 0 0 0 0 SECTION 950 862 50000 0 30000 0 864 t0000 0 66666 0 3e 0 98000- 0 868 7e- 0 60000 0 t0000- 0 1£££ 0 872 80000 0 7.000 0 SECTION 951 874 46772 0 54746 0 876 16973 0 72735 0 £6£6£ 0 6£6£6 0 880 0 0 t 0 0 0 5 0 884 0 0 + 0 0 0 2 0 888 £££££ 0 2 0 7. 0 7.000 0 892 0 0 6 0 0 0 77770 0 896 £££££ 0 4 0 96773 0 53585 0 900 £££££ 0 t 0 PROCEDURE 952 902 0 0 0 825 4 0 0 0 5 0 904 0 0 0 175 0 0 0 0 5 0 0 0 0 156 0 0 0 0 5 0 908 0 0 0 878 4 1 0 0 5 0 0 0 0 918 4 1 0 0 5 0 912 0 0 0 0 0 0 0 0 5 0 0 0 0 49 0 0 0 0 5 0 916 0 0 0 890 4 17 0 0 5 0 1 0 3 2419 0 7 0 1 1845 0 SECTION 953 920 16554 0 51525 0 25.5. 0 66657 0 924 55972 0 56596 0 77372 0 666 0 SECTION 954 928 1 0 0 0 16 0 0 0 932 256 0 0 0 4096 0 0 0 936 65536 0 0 0 SECTION 955 938 2 0 6 0 940 0 0 20036 0 0 0 20006 0 PROCEDURE 956 944 0 0 0 908 4 0 0 0 6 0 PROCEDURE 957 946 1 0 1 3 0 1 1 3 2 0 948 7 0 0 951 4 24 0 3 1672 4 24 0 3 3 0 6 0 0 30 0 952 14 0 0 1576 4 18 1 0 4124 0 1 1 2 4 0 27 0 0 958 4 956 1 1 2 5 0 27 0 1 946 4 24 0 2 2342 4 4 0 0 975 4 960 24 0 3 1576 4 2 0 0 64 0 1 1 2 64 0 5 0 0 1576 4 964 2 0 0 1577 4 24 0 2 1178 4 2 0 0 1297 4 24 0 2 1588 4 968 2 0 0 1367 4 24 0 2 1590 4 2 0 0 1371 4 6 0 0 1576 4 972 24 0 3 1672 4 2 0 0 26 0 24 1 0 1164 4 14 0 0 0 0 SECTION 958 976 0 0 0 0 0 0 0 0 980 0 0 0 0 0 0 0 0 984 0 0 0 0 0 0 0 0 988 0 0 0 0 0 0 0 0 992 0 0 0 0 0 0 0 0 996 0 0 0 0 0 0 0 0 1000 0 0 0 0 0 0 0 0 1004 0 0 0 0 0 0 0 0 1008 0 0 0 0 0 0 0 0 1012 0 0 0 0 0 0 0 0 1016 0 0 0 0 0 0 0 0 1020 0 0 0 0 0 0 0 0 1024 0 0 0 0 0 0 0 0 1028 0 0 0 0 0 0 0 0 1032 0 0 0 0 0 0 0 0 1036 0 0 0 0 0 0 0 0 1040 0 0 0 0 SECTION 959 1042 0 0 0 0 1044 0 0 0 0 0 0 0 0 1048 0 0 0 0 0 0 0 0 1052 0 0 0 0 0 0 0 0 1056 0 0 0 0 0 0 0 0 1060 0 0 0 0 0 0 0 0 1064 0 0 0 0 0 0 0 0 1068 0 0 0 0 0 0 0 0 1072 0 0 0 0 0 0 0 0 1076 0 0 0 0 0 0 0 0 1080 0 0 0 0 0 0 0 0 1084 0 0 0 0 0 0 0 0 1088 0 0 0 0 0 0 0 0 1092 0 0 0 0 0 0 0 0 1096 0 0 0 0 0 0 0 0 1100 0 0 0 0 0 0 0 0 1104 0 0 0 0 0 0 0 0 1108 0 0 0 0 0 0 0 0 1112 0 0 0 0 0 0 0 0 1116 0 0 0 0 0 0 0 0 1120 0 0 0 0 0 0 0 0 1124 0 0 0 0 0 0 0 0 1128 0 0 0 0 0 0 0 0 PROCEDURE 960 1132 0 0 0 1632 4 1 0 0 229 0 0 0 0 1634 4 1 0 0 19 0 1136 0 0 0 1634 4 1 0 0 786 0 0 0 0 1640 4 1 0 0 21 0 1140 0 0 0 1634 4 1 0 0 786 0 0 0 0 1592 4 0 0 0 21 0 1144 0 0 0 1642 4 1 0 0 21 0 0 0 0 1644 4 1 0 0 18 0 1148 0 0 0 1590 4 2 0 0 5154 0 0 0 0 1590 4 2 0 0 5650 0 1152 0 0 0 1590 4 2 0 0 2066 0 0 0 0 1644 4 1 0 0 786 0 1156 0 0 0 1589 4 0 0 0 4130 0 0 0 0 1589 4 0 0 0 4626 0 1160 0 0 0 1650 4 17 0 0 1089 0 0 0 0 0 0 2 0 0 36 0 PROCEDURE 961 PROCEDURE 962 1164 0 1 2 1588 4 1 1 3 38 0 26 0 0 2276 4 0 0 2 1678 4 1168 1 1 3 7 0 26 0 0 2276 4 24 1 2 1675 4 6 1 0 12 0 1172 5 1 0 1590 4 27 0 1 1164 4 1 1 2 20 0 26 0 0 1510 4 1176 28 1 0 1587 4 24 0 3 1672 4 6 1 0 138 0 2 1 0 1590 4 1180 24 0 3 1672 4 6 0 0 25 0 27 0 1 1185 4 2 0 0 1589 4 1184 2 0 0 1644 4 24 1 0 1188 4 24 1 2 1577 4 28 1 1 0 0 1188 1 1 3 10 0 26 0 0 1548 4 6 1 0 1162 4 28 1 1 2046 4 1192 24 0 2 1132 4 26 0 0 1518 4 PROCEDURE 963 1194 0 0 2 1678 4 1 1 3 7 0 1196 26 0 0 2276 4 24 1 2 1675 4 6 1 0 4 0 5 1 0 1640 4 1200 27 0 0 1216 4 4 1 0 1640 4 5 1 0 1648 4 27 0 1 1276 4 1204 24 0 2 1680 4 26 0 0 1518 4 1 1 3 20 0 26 0 0 1548 4 1208 1 1 3 27 0 26 0 0 2276 4 25 1 1 4096 0 6 0 0 1928 4 1212 27 0 0 2170 4 6 0 0 2205 4 2 0 0 2180 4 24 1 0 2170 4 PROCEDURE 964 1216 6 0 0 1497 4 2 0 0 1276 4 26 0 0 1510 4 28 1 0 2317 4 1220 6 0 0 2318 4 18 1 0 4124 0 2 0 0 1674 4 18 1 0 1 0 1224 27 0 0 1238 4 6 0 0 1674 4 1 1 2 6 0 27 0 0 1230 4 1228 6 0 0 2331 4 27 0 0 1268 4 24 0 2 1682 4 26 0 0 1518 4 1232 24 0 2 1684 4 26 0 0 1518 4 24 0 2 1700 4 26 0 0 1518 4 1236 24 0 2 1718 4 26 0 0 1518 4 6 0 0 1674 4 1 1 2 3 0 1240 27 0 3 1250 4 1 1 2 2 0 27 0 3 1254 4 1 1 2 2 0 1244 27 0 3 1261 4 1 1 2 3 0 27 0 0 1250 4 6 0 0 1249 4 1248 2 0 0 1276 4 24 1 0 1194 4 6 1 0 1624 4 2 1 0 1632 4 1252 6 1 0 1626 4 24 1 0 1258 4 6 1 0 1628 4 2 1 0 1632 4 1256 2 0 0 1180 4 6 1 0 1630 4 2 1 0 1634 4 24 0 2 1738 4 1260 26 0 0 1518 4 6 0 0 2332 4 18 0 0 5 0 4 0 0 2331 4 1264 3 1 0 1178 4 2 1 0 1588 4 2 0 0 1587 4 24 1 0 1194 4 1268 2 0 0 1642 4 24 0 2 1748 4 26 0 0 1518 4 24 0 2 1718 4 1272 26 0 0 1518 4 24 0 2 1758 4 26 0 0 1518 4 24 1 0 1261 4 PROCEDURE 965 1276 1 1 3 16 0 26 0 0 1510 4 28 1 0 2317 4 6 1 0 1672 4 1280 2 1 0 1590 4 6 0 0 1674 4 1 1 2 6 0 27 0 1 1300 4 1284 2 0 0 1584 4 24 0 1 1590 4 24 0 2 2321 4 26 0 0 1484 4 1288 24 0 1 1590 4 24 0 2 2317 4 4 1 0 1578 4 28 0 0 1585 4 1292 2 1 0 1604 4 26 0 0 1404 4 1 1 3 6 0 7 0 0 1590 4 1296 23 0 0 2 0 0 0 0 1178 3 24 1 0 1370 4 24 1 0 1194 4 PROCEDURE 966 1300 6 0 0 1198 4 4 0 0 1590 4 4 0 0 1590 4 2 0 0 1305 4 1304 24 1 2 1675 4 6 1 0 0 0 5 1 0 1666 4 27 0 3 1312 4 1308 18 0 0 4 0 3 0 0 1586 4 2 0 0 1645 4 24 1 0 1370 4 1312 1 1 3 0 0 2 0 0 1584 4 24 0 1 1590 4 24 0 2 2317 4 1316 26 0 0 1484 4 1 1 3 0 0 24 0 3 1672 4 26 0 0 0 0 1320 1 1 3 2 0 2 0 0 1584 4 6 0 0 1588 4 26 0 0 1484 4 1324 6 1 0 1598 4 5 1 0 1600 4 27 0 1 1330 4 6 1 0 1596 4 1328 5 1 0 1594 4 27 0 0 1343 4 6 0 0 1642 4 27 0 0 1342 4 1332 6 0 0 1588 4 24 0 3 1672 4 5 0 0 3 0 27 0 3 1338 4 1336 1 1 2 204 0 27 0 3 1342 4 24 0 2 1594 4 4 1 0 1602 4 1340 24 0 3 1588 4 28 0 0 0 0 1 1 3 1 0 2 0 0 1593 4 1344 23 0 2 1345 4 0 0 0 0 0 PROCEDURE 967 1346 6 0 0 1674 4 1 1 2 5 0 1348 27 0 0 1364 4 1 1 1 1 0 27 0 0 1374 4 1 1 1 2 0 1352 27 0 0 1374 4 6 0 0 1645 4 27 0 1 1359 4 6 1 0 1594 4 1356 27 0 1 1359 4 6 1 0 1598 4 27 0 0 1362 4 1 1 3 0 0 1360 2 1 0 1604 4 26 0 0 1392 4 1 1 3 0 0 2 0 0 1645 4 1364 1 1 3 2 0 7 0 0 1587 4 23 0 0 2 0 0 0 0 1588 3 1368 24 1 0 1370 4 24 1 0 1194 4 23 0 0 2 0 0 0 0 1590 3 1372 24 1 0 1281 4 24 1 0 1194 4 PROCEDURE 968 1374 6 0 0 1593 4 27 0 0 1364 4 1376 6 1 0 1596 4 27 0 1 1380 4 6 1 0 1600 4 27 0 0 1355 4 1380 6 1 0 1606 4 2 1 0 1604 4 26 0 0 1392 4 24 1 0 1355 4 PROCEDURE 969 1384 0 0 0 0 0 0 1 0 1182 4 0 0 3 1677 4 24 0 2 1608 4 1388 12 0 0 1182 4 2 1 0 1182 4 0 1 1 1182 4 26 0 1 1384 4 PROCEDURE 970 1392 0 0 0 0 0 1 0 1 31 0 6 0 0 1588 4 18 1 3 3 0 1396 18 1 0 4124 0 14 0 0 1586 4 1 1 3 0 0 18 1 3 13 0 1400 2 0 0 1585 4 26 0 0 1404 4 26 0 1 1392 4 2 0 0 1164 4 PROCEDURE 971 1404 0 0 0 0 0 24 0 1 1605 4 24 0 2 1594 4 4 1 0 1602 4 1408 28 0 0 1596 4 24 0 1 1605 4 6 1 0 1598 4 2 1 0 1600 4 1412 1 0 1 15 0 15 0 0 1586 4 26 0 0 1466 4 6 0 0 1585 4 1416 26 0 0 1384 4 2 0 0 1585 4 0 1 2 1596 4 26 0 0 1470 4 1420 6 0 0 1600 4 2 0 0 1601 4 26 0 0 1470 4 6 1 0 1596 4 1424 2 1 0 1634 4 2 1 0 1600 4 0 0 2 1483 4 15 1 0 1634 4 1428 2 1 0 1632 4 15 1 0 1668 4 5 1 0 1632 4 27 0 0 1434 4 1432 1 1 3 0 0 24 1 0 1436 4 6 1 0 1622 4 24 1 0 1440 4 1436 15 1 0 1670 4 5 1 0 1632 4 27 0 1 1443 4 6 1 0 1620 4 1440 14 1 0 1634 4 6 1 0 1618 4 14 1 0 1600 4 18 1 0 2 0 1444 1 1 3 0 0 27 1 1 1427 4 6 0 0 1586 4 18 0 0 4124 0 1448 26 0 0 1466 4 6 0 0 1587 4 26 0 0 1466 4 24 0 2 1766 4 1452 26 0 0 1518 4 6 1 0 1600 4 27 0 0 1457 4 24 0 2 1802 4 1456 26 0 0 1518 4 6 0 0 1403 4 2 0 0 1461 4 26 0 1 1404 4 PROCEDURE 972 1460 0 0 0 0 0 2 0 0 1164 4 1 1 3 1 0 7 0 0 1461 4 1464 1 1 3 0 0 26 0 1 1460 4 PROCEDURE 973 1466 0 0 0 0 0 26 0 0 1384 4 1468 26 0 0 1460 4 26 0 1 1466 4 PROCEDURE 974 1470 0 0 0 0 0 1 1 3 0 0 1472 18 1 0 1 0 4 0 0 1601 4 26 0 0 1466 4 18 1 3 1 0 1476 26 0 0 1460 4 18 1 3 2 0 26 0 0 1460 4 18 1 3 1 0 1480 18 1 0 3 0 26 0 0 1466 4 26 0 1 1470 4 0 0 0 63 0 PROCEDURE 975 1484 0 0 0 0 0 4 1 0 1602 4 24 0 0 1584 4 28 0 0 1594 4 1488 24 0 1 1584 4 24 0 2 1594 4 4 1 0 1580 4 18 0 0 0 0 1492 28 0 0 1643 4 0 1 1 1642 4 27 0 3 1497 4 1 1 3 0 0 1496 24 1 0 1498 4 1 1 3 16 0 24 0 1 1584 4 2 0 0 1598 4 1500 24 0 1 1584 4 0 1 1 1594 4 27 0 3 1505 4 1 1 3 0 0 1504 24 1 0 1506 4 1 1 3 16 0 24 0 0 1584 4 2 0 0 1599 4 1508 0 0 3 1672 4 26 0 1 1484 4 PROCEDURE 976 1510 0 0 0 0 0 1 1 1 32 0 1512 18 0 0 5 0 1 1 1 5 0 24 0 3 1672 4 4 0 0 123 0 1516 26 0 1 1510 4 1 1 3 0 0 PROCEDURE 977 1518 0 0 0 0 0 28 1 2 2056 4 1520 24 0 2 1814 4 28 1 2 2048 4 2 1 0 2046 4 1 0 1 1 0 1524 24 0 3 1672 4 15 0 0 27 0 1 1 2 4 0 27 0 0 1540 4 1528 24 0 2 2046 4 4 1 0 1582 4 24 1 2 1577 4 28 1 1 0 0 1532 6 0 0 1576 4 18 1 1 4123 0 6 0 0 1576 4 18 1 1 4123 0 1536 26 0 0 1548 4 23 0 2 1556 4 1 1 3 0 0 26 0 1 1518 4 1540 1 1 3 8 0 18 0 1 4 0 2 0 0 2047 4 24 0 2 2046 4 1544 24 1 2 1577 4 29 0 1 0 0 1 1 3 0 0 24 1 0 1532 4 PROCEDURE 978 1548 0 0 0 0 0 18 0 0 5 0 24 0 3 1672 4 4 1 0 26 0 1552 25 1 1 4096 0 24 0 3 1672 4 23 0 2 160 0 26 0 1 1548 4 PROCEDURE 979 1556 0 0 0 0 0 25 1 1 4096 0 24 1 1 1672 4 6 0 0 1576 4 1560 24 0 3 1672 4 2 0 1 30 0 6 0 0 1575 4 5 0 0 1576 4 1564 24 0 3 1672 4 2 0 1 7 0 24 0 3 1672 4 2 0 1 45 0 1568 24 0 2 1571 4 24 0 3 1672 4 24 1 0 174 0 24 0 3 1672 4 1572 24 0 3 2 0 24 1 1 29 0 26 0 3 1556 4 26 1 0 0 0 1576 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 4 0 1580 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 48 0 SECTION 980 1584 0 0 0 0 0 0 0 0 1588 £££££ 0 t 0 16973 0 72735 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 2 0 1604 0 0 0 0 5e 0 2 0 1608 1 0 0 0 16 0 0 0 1612 256 0 0 0 4096 0 0 0 1616 65536 0 0 0 SECTION 981 1618 e5e5e 0 5e5e5 0 1620 36363 0 63636 0 25252 0 52525 0 1624 16773 0 53585 0 0 0 55690 0 1628 37359 0 72555 0 0 0 66650 0 1632 96573 0 67695 0 36656 0 66747 0 1636 96573 0 67665 0 40052 0 67006 0 1640 46772 0 54746 0 25565 0 73516 0 1644 5173 0 66650 0 65764 0 67696 0 1648 55972 0 56596 0 7557. 0 73786 0 1652 55163 0 56596 0 27355 0 64517 0 1656 96674 0 69006 0 10000 0 64694 0 1660 20000 0 64694 0 30000 0 64694 0 1664 55500 0 73596 0 0 0 77770 0 1668 .7.7. 0 7.7.7 0 .5.5. 0 5.5.5 0 SECTION 982 1672 0 0 18 0 0 0 7e- 0 1676 3: 0 66666 0 3e 0 0 0 PROCEDURE 983 1680 0 0 0 1648 4 1 0 0 5 0 0 0 0 1650 4 17 0 0 1029 0 PROCEDURE 984 1684 0 0 0 1646 4 1 0 0 245 0 0 0 0 1592 4 0 0 0 21 0 1688 0 0 0 1638 4 1 0 0 68 0 0 0 0 1636 4 1 0 0 5 0 1692 8 0 0 2319 4 0 0 0 53 0 0 0 0 1650 4 1 0 0 68 0 1696 0 0 0 1674 4 0 0 0 1041 0 0 0 0 1650 4 17 0 0 1057 0 1700 0 0 0 1624 4 1 0 0 753 0 8 0 0 2321 4 0 0 0 53 0 1704 8 0 0 2320 4 6 0 0 1285 0 0 0 0 1638 4 1 0 0 1089 0 1708 8 0 0 2323 4 0 0 0 53 0 8 0 0 2322 4 6 0 0 1285 0 1712 0 0 0 1624 4 1 0 0 65 0 8 0 0 2324 4 4 0 0 53 0 1716 0 0 0 1650 4 17 0 0 1089 0 0 0 0 1658 4 1 0 0 243 0 1720 8 0 0 2326 4 4 0 0 21 0 8 0 0 2325 4 4 0 0 5 0 1724 0 0 0 1660 4 1 0 0 67 0 8 0 0 2328 4 4 0 0 21 0 1728 8 0 0 2327 4 4 0 0 5 0 0 0 0 1662 4 1 0 0 67 0 1732 8 0 0 2330 4 4 0 0 21 0 8 0 0 2329 4 4 0 0 5 0 1736 0 0 0 1650 4 17 0 0 1073 0 PROCEDURE 985 1738 0 0 0 1592 4 0 0 0 245 0 1740 0 0 0 1632 4 1 0 0 37 0 0 0 0 1634 4 1 0 0 5 0 1744 8 0 0 2318 4 0 0 0 4866 0 0 0 0 1650 4 17 0 0 1025 0 1748 0 0 0 1646 4 1 0 0 245 0 0 0 0 1592 4 0 0 0 21 0 1752 0 0 0 1652 4 1 0 0 37 0 0 0 0 1640 4 1 0 0 20 0 1756 0 0 0 1650 4 17 0 0 1041 0 0 0 0 1654 4 1 0 0 245 0 1760 0 0 0 1656 4 1 0 0 5 0 0 0 0 1664 4 1 0 0 5 0 1764 0 0 0 1650 4 17 0 0 1089 0 PROCEDURE 986 1766 0 0 0 1604 4 1 0 0 1025 0 1768 0 0 0 1164 4 0 0 1 515 0 0 0 0 1585 4 0 0 2 5 0 1772 0 0 0 1174 4 0 0 2 21 0 0 0 0 1588 4 0 0 0 4117 0 1776 0 0 0 1169 4 0 0 1 531 0 0 0 0 1170 4 0 0 0 1041 0 1780 0 0 0 1171 4 0 0 0 1041 0 0 0 0 1172 4 0 0 2 21 0 1784 0 0 0 1165 4 0 0 1 531 0 0 0 0 1166 4 0 0 0 1041 0 1788 0 0 0 1167 4 0 0 0 1041 0 0 0 0 1168 4 0 0 2 21 0 1792 0 0 0 1596 4 4 0 2 69 0 0 0 0 1597 4 4 0 2 37 0 1796 0 0 0 1634 4 1 0 0 37 0 0 0 0 1173 4 0 0 0 4882 0 1800 0 0 0 1668 4 17 0 0 5 0 0 0 0 1672 4 0 0 2 4341 0 1804 0 0 0 1672 4 0 0 2 4341 0 0 0 0 1672 4 0 0 2 4341 0 1808 0 0 0 1672 4 0 0 2 4117 0 0 0 0 1600 4 1 0 0 53 0 1812 0 0 0 1668 4 17 0 0 5 0 0 0 0 1672 4 16 0 2 4341 0 SECTION 987 1816 9248 0 9041 0 9208 0 9410 0 1820 10410 0 8241 0 9049 0 1:e6 0 1824 31249 0 1246 0 8240 0 9249 0 1828 1249 0 1036 0 9009 0 1208 0 1832 3e6 0 36:e6 0 200 0 40 0 1836 8041 0 9206 0 1248 0 1246 0 1840 1241 0 0 0 1249 0 8209 0 1844 9008 0 8249 0 8248 0 1041 0 1848 9248 0 9241 0 8001 0 8200 0 1852 9008 0 9048 0 8209 0 1209 0 1856 9048 0 9240 0 1249 0 209 0 1860 1208 0 93e6 0 1249 0 9049 0 1864 93e6 0 30248 0 8248 0 938e 0 1868 8249 0 9041 0 9249 0 6+09 0 1872 8201 0 18076 0 1049 0 83e6 0 1876 8249 0 1048 0 8209 0 6:e6 0 1880 9241 0 1248 0 8209 0 1208 0 1884 9000 0 9040 0 200 0 8008 0 1888 248 0 1001 0 9008 0 8 0 1892 9048 0 8248 0 9248 0 1049 0 1896 .:e6 0 9241 0 1249 0 1249 0 1900 1209 0 9049 0 8241 0 9049 0 1904 9209 0 1380 0 9249 0 71 0 SECTION 988 1908 904£ 0 200 0 9008 0 248 0 1912 1000 0 1041 0 1240 0 8009 0 1916 9049 0 9049 0 13+1 0 924£ 0 1920 1049 0 79 0 11e6 0 8248 0 1924 8248 0 9258 0 9040 0 8236 0 1928 9049 0 6:e6 0 1249 0 209 0 1932 104£ 0 248 0 9000 0 0 0 1936 0 0 0 0 0 0 0 0 1940 0 0 0 0 10 0 10 0 1944 10018 0 10000 0 0 0 0 0 1948 0 0 10 0 3.:e6 0 36:e6 0 SECTION 989 1952 240 0 8041 0 9206 0 9249 0 1956 9259 0 6:e6 0 0 0 0 0 1960 0 0 0 0 0 0 0 0 1964 0 0 0 0 0 0 0 0 1968 0 0 0 0 0 0 0 0 1972 0 0 0 0 0 0 0 0 1976 0 0 0 0 0 0 0 0 1980 0 0 0 0 0 0 0 0 1984 10410 0 10410 0 10410 0 10410 0 1988 10410 0 209 0 1209 0 1241 0 1992 e249 0 8049 0 9:e6 0 8241 0 1996 9249 0 1041 0 9271 0 36:e6 0 2000 9276 0 1048 0 9249 0 9249 0 2004 1041 0 1249 0 9249 0 9248 0 2008 9:e6 0 9249 0 9248 0 9248 0 2012 9249 0 9+49 0 1049 0 9248 0 2016 9049 0 1248 0 £049 0 9249 0 2020 9241 0 1248 0 1208 0 8209 0 2024 9248 0 9041 0 1241 0 9249 0 2028 9249 0 1249 0 9008 0 1009 0 2032 9:e6 0 30:89 0 9248 0 9249 0 2036 9249 0 9249 0 83e1 0 9249 0 2040 9009 0 1249 0 9249 0 8208 0 2044 8248 0 241 0 1009 0 6:e6 0 2048 1249 0 8248 0 SECTION 990 2050 8249 0 8209 0 2052 9000 0 8201 0 920e 0 13e6 0 2056 9041 0 1208 0 1240 0 8076 0 2060 18208 0 1241 0 9041 0 8201 0 2064 0 0 1e6 0 0 0 0 0 2068 0 0 0 0 0 0 0 0 2072 0 0 0 0 0 0 0 0 2076 0 0 0 0 SECTION 991 2078 0 0 0 0 2080 0 0 0 0 10410 0 10410 0 2084 10410 0 10410 0 10410 0 10410 0 2088 10410 0 10410 0 10410 0 10410 0 2092 10410 0 10410 0 10410 0 10410 0 2096 10410 0 10410 0 10410 0 10410 0 2100 10410 0 10410 0 10410 0 10410 0 2104 1043. 0 0 0 SECTION 992 2106 28e71 0 2t63. 0 2108 2t£e£ 0 0 0 SECTION 993 2110 0 0 0 0 2112 0 0 0 0 0 0 0 0 2116 0 0 0 0 0 0 0 0 2120 0 0 0 0 0 0 0 0 2124 0 0 0 0 0 0 0 0 2128 0 0 0 0 0 0 0 0 2132 0 0 0 0 0 0 0 0 2136 0 0 0 0 SECTION 1036 2138 1 0 4 0 2140 1 0 3 0 0 0 2000. 0 2144 0 0 1+ 0 0 0 8 0 2148 0 0 20034 0 8000 0 5146 0 2152 0 0 6 0 0 0 3 0 2156 96773 0 53585 0 7. 0 7.000 0 2160 0 0 8 0 0 0 20032 0 2164 8000 0 5141 0 SECTION 1037 2166 2 0 80000 0 2168 3 0 8066 0 SECTION 1038 PROCEDURE 1009 CHAPT 10 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 11 12 0 0 0 0 12 0 0 0 0 13 0 0 0 0 14 0 0 0 0 15 16 0 0 0 0 16 0 0 0 0 17 0 0 0 0 18 0 0 0 0 19 20 0 0 0 0 20 0 0 0 0 21 0 0 0 0 22 0 0 0 0 23 24 0 0 0 0 24 0 0 0 0 25 0 0 0 0 0 25 1 1 4096 0 28 24 0 3 0 4 23 0 2 0 1792 0 0 0 0 0 0 0 0 0 0 32 26 0 1 26 4 PROCEDURE 994 33 0 0 0 0 0 SECTION 1039 34 1 0 4 0 36 1 0 3 0 0 0 2000. 0 40 0 0 1+ 0 0 0 8 0 44 0 0 20034 0 8000 0 5146 0 48 0 0 6 0 SECTION 1040 SECTION 1041 PROCEDURE 1010 CHAPT 11 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 11 12 0 0 0 0 12 0 0 0 0 13 0 0 0 0 14 0 0 0 0 15 16 0 0 0 0 16 0 0 0 0 17 0 0 0 0 18 0 0 0 0 19 20 0 0 0 0 20 0 0 0 0 21 0 0 0 0 22 0 0 0 0 23 24 0 0 0 0 24 0 0 0 0 25 0 0 0 0 0 25 1 1 4096 0 28 24 0 3 0 4 23 0 2 0 1792 0 0 0 0 0 0 0 0 0 0 32 26 0 1 26 4 PROCEDURE 995 33 0 0 0 0 0 SECTION 1042 34 1 0 4 0 36 1 0 3 0 0 0 2000. 0 40 0 0 1+ 0 0 0 8 0 44 0 0 20034 0 8000 0 5146 0 48 0 0 6 0 SECTION 1043 SECTION 1044 PROCEDURE 1011 INTERCODE TRIAL DATA SERIAL NUMBERS OF INTERCODE REPORTS PT OMITTED NO NO DISASTROUS 0 0 OTHERS 0 0 MADE BY 08000 ISSUE 8 SERIAL 801 ON 15/ 4/ 1 SPOOL 80002