From 02e7483ee7ecad132c483597ff5caca31d6cb905 Mon Sep 17 00:00:00 2001 From: Roberto Sancho Villa <32797258+rsanchovilla@users.noreply.github.com> Date: Fri, 20 Apr 2018 15:55:26 +0200 Subject: [PATCH] I650: Release 2 Hardware support: - Half cycle simulation - Halt CPU simulation (^E on SimH console) New Software included: Carnegie Internal Translator (IT) New features - Support for displaying SOAP symbolic instructions in debug information - CardDeck internal command to split/join/print decks of cards Bugs corrected: - Fixed card format handling. Release 1 can only read TEXT format - Removed superfluous line ends from debug strings. - Better minus zero support - Fixed unneeded prompt Really truncate memory [N] when setting memory size --- I650/650_test.ini | 23 +- I650/i650_cdp.c | 222 ++- I650/i650_cdr.c | 381 +++-- I650/i650_cpu.c | 1189 +++++++------ I650/i650_defs.h | 25 +- I650/i650_sys.c | 407 ++++- I650/sw/Build_is_from_decks.ini | 33 +- I650/sw/Build_soap_from_source.ini | 4 +- I650/sw/is.dck | 2200 ++++++++++++------------- I650/sw/is_example_1_src.txt | 14 +- I650/sw/is_run.ini | 16 +- I650/sw/it_compiler.dck | 1738 +++++++++++++++++++ I650/sw/it_compiler_listing.txt | 1789 ++++++++++++++++++++ I650/sw/it_example_1_data.txt | 12 + I650/sw/it_example_1_out.txt | 1 + I650/sw/it_example_1_src.txt | 8 + I650/sw/it_example_2_src.txt | 62 + I650/sw/it_package_p1.dck | 254 +++ I650/sw/it_package_p1_listing.txt | 267 +++ I650/sw/it_package_p2.dck | 370 +++++ I650/sw/it_package_p2_listing.txt | 379 +++++ I650/sw/it_package_p3.dck | 377 +++++ I650/sw/it_package_p3_listing.txt | 386 +++++ I650/sw/it_package_p4.dck | 494 ++++++ I650/sw/it_package_p4_listing.txt | 500 ++++++ I650/sw/it_reservation_p1.dck | 23 + I650/sw/it_reservation_p1_listing.txt | 23 + I650/sw/it_reservation_p2.dck | 27 + I650/sw/it_reservation_p2_listing.txt | 27 + I650/sw/it_reservation_p3.dck | 25 + I650/sw/it_reservation_p3_listing.txt | 25 + I650/sw/it_reservation_p4.dck | 29 + I650/sw/it_reservation_p4_listing.txt | 29 + I650/sw/it_run.ini | 175 ++ I650/sw/it_soapIIA_patch_listing.txt | 164 ++ I650/sw/it_soapII_patch.dck | 16 + I650/sw/it_soapII_patch.txt | 44 + I650/sw/it_subr_cos_listing.txt | 80 + I650/sw/it_subr_sin_listing.txt | 87 + I650/sw/it_subr_sqrt_listing.txt | 62 + I650/sw/soap_and_run.ini | 22 +- doc/i650_doc.doc | Bin 215552 -> 372736 bytes 42 files changed, 10154 insertions(+), 1855 deletions(-) create mode 100644 I650/sw/it_compiler.dck create mode 100644 I650/sw/it_compiler_listing.txt create mode 100644 I650/sw/it_example_1_data.txt create mode 100644 I650/sw/it_example_1_out.txt create mode 100644 I650/sw/it_example_1_src.txt create mode 100644 I650/sw/it_example_2_src.txt create mode 100644 I650/sw/it_package_p1.dck create mode 100644 I650/sw/it_package_p1_listing.txt create mode 100644 I650/sw/it_package_p2.dck create mode 100644 I650/sw/it_package_p2_listing.txt create mode 100644 I650/sw/it_package_p3.dck create mode 100644 I650/sw/it_package_p3_listing.txt create mode 100644 I650/sw/it_package_p4.dck create mode 100644 I650/sw/it_package_p4_listing.txt create mode 100644 I650/sw/it_reservation_p1.dck create mode 100644 I650/sw/it_reservation_p1_listing.txt create mode 100644 I650/sw/it_reservation_p2.dck create mode 100644 I650/sw/it_reservation_p2_listing.txt create mode 100644 I650/sw/it_reservation_p3.dck create mode 100644 I650/sw/it_reservation_p3_listing.txt create mode 100644 I650/sw/it_reservation_p4.dck create mode 100644 I650/sw/it_reservation_p4_listing.txt create mode 100644 I650/sw/it_run.ini create mode 100644 I650/sw/it_soapIIA_patch_listing.txt create mode 100644 I650/sw/it_soapII_patch.dck create mode 100644 I650/sw/it_soapII_patch.txt create mode 100644 I650/sw/it_subr_cos_listing.txt create mode 100644 I650/sw/it_subr_sin_listing.txt create mode 100644 I650/sw/it_subr_sqrt_listing.txt diff --git a/I650/650_test.ini b/I650/650_test.ini index 53acb3a0..ce1a0c85 100644 --- a/I650/650_test.ini +++ b/I650/650_test.ini @@ -1,14 +1,29 @@ cd sw -; set debug -n debug.txt +; set console -n log=console.txt ; set debug stdout +; set debug -n debug.txt ; set cpu debug=cmd;data;detail +; uncomment any of them to simulate ibm 650 real speed ; set throttle 11k +; set throttle 55/5 + do Build_soap_from_source.ini -do soap_and_run.ini soap_example_1_src.txt 1000 -do Build_is_from_decks.ini ntr lbox -do is_run.ini is_example_1_src.txt +set env -P "Press enter to continue . . . " +do soap_and_run.ini soap_example_1_src.txt 1000 +set env -P "Press enter to continue . . . " + +do Build_is_from_decks.ini ntr lbox +set env -P "Press enter to continue . . . " + +do is_run.ini is_example_1_src.txt +set env -P "Press enter to continue . . . " + +do it_run.ini it_example_1_src.txt it_example_1_data.txt deck_out.dck +set env -P "Press enter to continue . . . " + +do it_run.ini it_example_2_src.txt nul deck_out.dck diff --git a/I650/i650_cdp.c b/I650/i650_cdp.c index 5b10c3fa..cf36f54d 100644 --- a/I650/i650_cdp.c +++ b/I650/i650_cdp.c @@ -32,7 +32,7 @@ #include "i650_defs.h" #include "sim_card.h" -#define UNIT_CDP UNIT_ATTABLE | MODE_026 +#define UNIT_CDP UNIT_ATTABLE | MODE_026 | MODE_LOWER /* std devices. data structures @@ -77,13 +77,6 @@ DEVICE cdp_dev = { NULL, NULL, &cdp_help, NULL, NULL, &cdp_description }; -static struct card_wirings wirings[] = { - {WIRING_8WORD, "8WORD"}, - {WIRING_SOAP, "SOAP"}, - {WIRING_IS, "IS"}, - {0, 0}, -}; - // vars where card is encoded for punching char card_buf[120]; int card_nbuf; @@ -116,13 +109,23 @@ void encode_lpt_num(t_int64 d, int l) { char s[20]; int i,n; + char pad; + if (l < 0) { + l=-l; pad = ' '; // if l < 0 pad with space + } else { + pad = '0'; // if l > 0 pag with zero + } d=AbsWord(d); for (i=9;i>=0;i--) { n = (int) (d % 10); d = d / 10; s[i] = '0' + n; } + if (pad == ' ') for(i=0;i<9;i++) { + if (s[i] != '0') break; + s[i] = ' '; + } s[10] = 0; encode_lpt_str(&s[10-l]); } @@ -131,6 +134,7 @@ void encode_lpt_num(t_int64 d, int l) #define wf_NN_NNNN_NNNNs 1 #define wf_sN_NNNNNNN_NN 3 #define wf_sN_NNN_NNN_NNN 4 +#define wf_nnnnnnnnnNs 5 void encode_lpt_word(t_int64 d, int NegZero, int wFormat) { @@ -154,6 +158,9 @@ void encode_lpt_word(t_int64 d, int NegZero, int wFormat) n = Shift_Digits(&d, 3); encode_lpt_num(n, 3); encode_lpt_spc(1); n = Shift_Digits(&d, 3); encode_lpt_num(n, 3); encode_lpt_spc(1); n = Shift_Digits(&d, 3); encode_lpt_num(n, 3); + } else if (wFormat == wf_nnnnnnnnnNs) { + encode_lpt_num(d,-10); // replace leading zeroes by spaces + encode_char(0, neg ? '-':' '); } else { // default: wFormat == wf_NNNNNNNNNNs encode_lpt_num(d,10); encode_char(0, neg ? '-':' '); @@ -164,6 +171,8 @@ void encode_lpt_word(t_int64 d, int NegZero, int wFormat) // if d negative, sign on last digit (units digit) // if bSetHiPuch=1, set HiPunch on last digit. // if bSetHiPuch=2, set HiPunch on last digit and on second digit. +// if bSetHiPuch=3, set HiPunch on third digit +// if last digit is negative, never set HiPunch even if asked for (a card column cannot have both X(11) and Y(12) punched) void sprintf_word(char * pch_word, t_int64 d, int NegZero, int bSetHiPuch) { int i,n,neg, hi; @@ -178,8 +187,9 @@ void sprintf_word(char * pch_word, t_int64 d, int NegZero, int bSetHiPuch) } for (i=9;i>=0;i--) { hi = 0; - if ((i==1) && (bSetHiPuch == 2)) hi = 1; // Set Hi Punch on second digit - if ((i==9) && (bSetHiPuch > 0)) hi = 1; // Set Hi Punch on last digit (units digit) + if ((i==1) && (bSetHiPuch == 2)) hi = 1; // Set Hi Punch on second digit + if ((i==2) && (bSetHiPuch == 3)) hi = 1; // Set Hi Punch on third digit + if ((i==9) && ( (bSetHiPuch == 1) || (bSetHiPuch == 2) ) && (neg == 0)) hi = 1; // Set Hi Punch on last digit (units digit) n = (int) (d % 10); d = d / 10; n = n + hi * 10; @@ -226,6 +236,7 @@ void encode_soap_wiring(int addr) // encode soap card simulating soap control panel wiring for 533 // from SOAP II manual at http://www.bitsavers.org/pdf/ibm/650/24-4000-0_SOAPII.pdf // storage in output block + // +-------------------+ // Word 1977: | <- Location -> | Alphabetic // 1978: | <- Data Addr -> | Alphabetic // 1979: | <- Inst Addr -> | Alphabetic @@ -351,16 +362,20 @@ void encode_soap_wiring(int addr) encode_lpt_num(pat2, 4); encode_lpt_spc(5); } - } else if (ty == 1) { - // print coment line - encode_lpt_str("1"); + } else if ((ty == 1) || (ty == 5)) { + // print coment for card type 1 (SOAP II) or type 5 (SOAP modified for IT) + encode_char(0, '0' + ty); encode_lpt_spc(14); encode_lpt_str(loc); encode_lpt_str(OpCode); encode_lpt_str(data_addr); encode_lpt_str(Data_Tag); encode_lpt_str(inst_addr); encode_lpt_str(Instr_Tag); encode_lpt_str(rem1); encode_lpt_str(rem2); } else { - encode_lpt_spc(1); + if (ty == 0) { + encode_lpt_spc(1); + } else { + encode_char(0, '0' + ty); + } encode_lpt_str(loc); encode_lpt_spc(2); encode_char(0, neg ? '-':' '); encode_lpt_spc(1); encode_lpt_str(OpCode); encode_lpt_spc(3); @@ -512,6 +527,162 @@ void encode_is_wiring(int addr) } } +void encode_it_wiring(int addr) +{ + // encode card for IT compiler modified soap + // from IT manual at http://www.bitsavers.org/pdf/ibm/650/CarnegieInternalTranslator.pdf + // storage in output block + // +-------------------+ + // Word 1977: | <- Loc. Label -> | Alphabetic + // 1978: | <- Op Code -> | Alphabetic + // 1979: | <- Data Addr -> | Alphabetic + // 1980: | <- Inst Addr -> | Alphabetic + // 1981: | <- Remarks -> | Alphabetic + // 1982: | <- Remarks -> | Alphabetic + // +-------------------+ + // 1983: | | Not Used + // 1984: | | Not Used + // +-------------------+ + // 1985: | |N N N N| | N N N N=Card Number + // 1986: |a|b|c|d|e|f|g|h|i|j| a = 0/8 =8 -> reservation card + // b = 0/8 (regional setting) =0 -> card type 3, =8 -> card type 4 + // c = 0/8 + // d = 0/8 =8 -> negative value + // e = 0/8 + // f = 0/8 + // g = 0/8 =8 -> punching a PIT card + // h = 0/8 =8 -> type 1 data out format + // i = 0/8 + // j = 0/8 + // + // SIT printout format + // | Card Num | Ty | Location | Sg | OpCode | Data Addr | Instr Addr | Remarks + // SIT punch format is SOAP source card format + // Column: 41 | 42 | 43 44 45 46 47 | 48 49 50 | 51 52 53 54 55 | 56 | 57 58 59 60 61 | 62 | 63 64 65 66 67 68 69 70 71 72 + // Ty | Sg | Location | OpCode | Data Addr | | Instr Addr | | Remarks + // + // Ty = Type = blank, 3 or 4 (regional setting) + // Sg = sign = blank or - + // + // If word 1986 contains 8 in digit h, it is a type 1 data out card format + // +----+------+-------+ + // Word 1977: | VV | +NNN | SSSS | IT variable 1 + // 1978: | Word | + // +-------------------+ + // 1979: | | IT variable 2 (zero if none) + // 1980: | | + // +-------------------+ + // 1981: | | IT variable 3 + // 1982: | | + // +-------------------+ + // 1983: | | IT variable 4 + // 1984: | | + // +-------------------+ + // 1985: | | Not used + // 1986: |8|0|0|0|0|0|8|8|0|0| control word for type 1 data out card + // + // VV = IT variable being punched: 01 -> I type, 02 -> Y type, 03 -> C type + // + N N N = variable number (I5 -> 01 0005). + means zoro with Y(12) overpunch + // S S S S = statement number of IT source program where TYPE command that generates the card is + // Word = value from IT variable. If type I, is an integer. If type C or Y + // type is word is float (M MMMMMMM EE -> M=mantisa, EE=exponent) + // can be is negative (X(11) overpunch in last digit) + // up to 4 pairs var-word per card + // leading zeroes of each word are replaced by spaces + + char pch_word[20]; + char loc[6], data_addr[6], inst_addr[6], OpCode[6], rem1[6], rem2[6]; + t_int64 d; + int CardNum, ty; + int b, neg, b_pit, b_reg, b_resv, b_data; // punch control flags + int i; + + word_to_ascii(loc, 1, 5, DRUM[addr + 0]); + word_to_ascii(OpCode, 1, 3, DRUM[addr + 1]); + word_to_ascii(data_addr, 1, 5, DRUM[addr + 2]); + word_to_ascii(inst_addr, 1, 5, DRUM[addr + 3]); + word_to_ascii(rem1, 1, 5, DRUM[addr + 4]); + word_to_ascii(rem2, 1, 5, DRUM[addr + 5]); + CardNum = (int) ((DRUM[addr + 8] / D4) % D4); + d = DRUM[addr + 9]; + b = ((int) (d % 10) == 8) ? 1:0; d = d / 10; + b = ((int) (d % 10) == 8) ? 1:0; d = d / 10; + b_data = ((int) (d % 10) == 8) ? 1:0; d = d / 10; + b_pit = ((int) (d % 10) == 8) ? 1:0; d = d / 10; + b = ((int) (d % 10) == 8) ? 1:0; d = d / 10; + b = ((int) (d % 10) == 8) ? 1:0; d = d / 10; + neg = ((int) (d % 10) == 8) ? 1:0; d = d / 10; + b = ((int) (d % 10) == 8) ? 1:0; d = d / 10; + b_reg = ((int) (d % 10) == 8) ? 1:0; d = d / 10; + b_resv = ((int) (d % 10) == 8) ? 1:0; d = d / 10; + + // printf("bits %06d%04d%c ", printfw(DRUM[addr + 9])); // to echo the status digits of punched card + + // generate card + if (b_data) { + // punch type 1 data out card + for (i=0;i<4;i++) { + sprintf_word(pch_word, DRUM[addr + i*2+0], 0, (i==0) ? 3:0); // punch variable name + encode_pch_str(pch_word); + sprintf_word(pch_word, DRUM[addr + i*2+1], 0, (i==0) ? 3:0); // punch variable value + encode_pch_str(pch_word); + if (DRUM[addr + i*2+2] == 0) break; // if next word is zero, no more variables to punch + } + } else { + // punch SOAP source instruction + for(i=0;i<40;i++) encode_pch_str(" "); // leave 40 first columns blank + if (b_resv) { + if (b_reg) { + ty = 4; + } else { + ty = 3; + } + } else { + ty = 0; + } + encode_char(ty == 0 ? ' ' : '0'+ty, 0); + encode_char(neg == 0 ? ' ' : '-', 0); + encode_pch_str(loc); + encode_pch_str(OpCode); + encode_pch_str(data_addr); + encode_pch_str(" "); + encode_pch_str(inst_addr); + encode_pch_str(" "); + encode_pch_str(rem1); + encode_pch_str(rem2); + // convert to lowercase for punching + for (i=40;i= 'A') && (card_buf[i] <= 'Z')) + card_buf[i] = card_buf[i] - 'A' + 'a'; + card_buf[card_nbuf] = 0; + } + + // generate printout + if (b_data) { + // print type 1 data out card. replace leading zeroes by spaces on each word + for (i=0;i<4;i++) { + encode_lpt_word(DRUM[addr + i*2+0], 0, wf_nnnnnnnnnNs); // print variable name + encode_lpt_spc(1); + encode_lpt_word(DRUM[addr + i*2+1], 0, wf_nnnnnnnnnNs); // print variable value + encode_lpt_spc(1); + if (DRUM[addr + i*2+2] == 0) break; // if next word is zero, no more variables to punch + } + } else { + // print generated soap source listing + encode_lpt_spc(2); + encode_lpt_num(CardNum, -4); + encode_lpt_spc(2); + encode_char(0, ty == 0 ? ' ' : '0'+ty); + encode_lpt_spc(2); + encode_lpt_str(loc); + encode_lpt_spc(2); encode_char(0, neg ? '-':' '); encode_lpt_spc(1); + encode_lpt_str(OpCode); encode_lpt_spc(3); + encode_lpt_str(data_addr); encode_lpt_spc(1); encode_lpt_spc(2); + encode_lpt_str(inst_addr); encode_lpt_spc(6); + encode_lpt_str(rem1); encode_lpt_str(rem2); + } +} + /* Card punch routine */ uint32 cdp_cmd(UNIT * uptr, uint16 cmd, uint16 addr) { @@ -525,7 +696,7 @@ uint32 cdp_cmd(UNIT * uptr, uint16 cmd, uint16 addr) /* Test ready */ if ((uptr->flags & UNIT_ATT) == 0) { - sim_debug(DEBUG_CMD, &cdp_dev, "No cards (no file attached)\r\n"); + sim_debug(DEBUG_CMD, &cdp_dev, "No cards (no file attached)\n"); return SCPE_NOCARDS; } @@ -539,8 +710,11 @@ uint32 cdp_cmd(UNIT * uptr, uint16 cmd, uint16 addr) // encode soap card simulating soap control panel wiring for 533 (gasp!) encode_soap_wiring(addr); } else if (wiring == WIRING_IS) { - // encode it card + // encode floating point interpretive system (bell interpreter) card encode_is_wiring(addr); + } else if (wiring == WIRING_IT) { + // encode Carnegie Internal Translator compiler card + encode_it_wiring(addr); } else if (wiring == WIRING_8WORD) { // encode 8 words per card encode_8word_wiring(addr); @@ -561,14 +735,14 @@ uint32 cdp_cmd(UNIT * uptr, uint16 cmd, uint16 addr) if (uptr->flags & UNIT_CARD_PRINT) { // printout will be directed to file attached to CDP0 unit, if any if (cdp_unit[0].flags & UNIT_ATT) { - sim_fwrite(&card_lpt, 1, card_nlpt, cdp_unit[0].fileref); + sim_fwrite(card_lpt, 1, card_nlpt, cdp_unit[0].fileref); } } } // trim right spaces for printing punch card card_buf[card_nbuf] = 0; - sim_debug(DEBUG_DETAIL, &cpu_dev, "Punch Card: %s\r\n", card_buf); + sim_debug(DEBUG_DETAIL, &cpu_dev, "Punch Card: %s\n", card_buf); /* punch the cards */ data = (struct _card_data *)uptr->up7; @@ -588,10 +762,10 @@ uint32 cdp_cmd(UNIT * uptr, uint16 cmd, uint16 addr) } } sim_punch_card(uptr, NULL); - sim_debug(DEBUG_CMD, &cdp_dev, "PUNCH\r\n"); + sim_debug(DEBUG_CMD, &cdp_dev, "PUNCH\n"); uptr->u5 |= URCSTA_BUSY; - uptr->u4 = 0; - + uptr->u6++; // incr number of punched cards + uptr->u5 &= ~URCSTA_BUSY; return SCPE_OK; @@ -694,9 +868,11 @@ cdp_attach(UNIT * uptr, CONST char *file) { t_stat r; - if ((r = sim_card_attach(uptr, file)) != SCPE_OK) - return r; + r = sim_card_attach(uptr, file); + if (SCPE_BARE_STATUS(r) != SCPE_OK) + return r; uptr->u5 = 0; + uptr->u6 = 0; // u6 = number of cards punched return SCPE_OK; } diff --git a/I650/i650_cdr.c b/I650/i650_cdr.c index 3295a0b2..c0aa8de3 100644 --- a/I650/i650_cdr.c +++ b/I650/i650_cdr.c @@ -32,7 +32,7 @@ #include "i650_defs.h" #include "sim_card.h" -#define UNIT_CDR UNIT_ATTABLE | UNIT_RO | MODE_026 +#define UNIT_CDR UNIT_ATTABLE | UNIT_RO | MODE_026 | MODE_LOWER /* std devices. data structures @@ -54,9 +54,9 @@ t_stat cdr_set_wiring (UNIT *uptr, int32 val, CONST char *cptr, voi t_stat cdr_show_wiring (FILE *st, UNIT *uptr, int32 val, CONST void *desc); UNIT cdr_unit[] = { - {UDATA(cdr_srv, UNIT_CDR, 0), 300}, // 4 readers. Unit 0 not used - {UDATA(cdr_srv, UNIT_CDR, 0), 300}, - {UDATA(cdr_srv, UNIT_CDR, 0), 300}, + {UDATA(cdr_srv, UNIT_CDR, 0), 300}, // Unit 0 used internally for carddeck operations simulator specific command + {UDATA(cdr_srv, UNIT_CDR, 0), 300}, // unit 1 is default for initial model (1954) + {UDATA(cdr_srv, UNIT_CDR, 0), 300}, // storage unit (1955) allows two extra card/readers for a total of 3 {UDATA(cdr_srv, UNIT_CDR, 0), 300}, }; @@ -74,89 +74,106 @@ DEVICE cdr_dev = { NULL, NULL, &cdr_help, NULL, NULL, &cdr_description }; -static struct card_wirings wirings[] = { - {WIRING_8WORD, "8WORD"}, - {WIRING_SOAP, "SOAP"}, - {WIRING_IS, "IS"}, - {0, 0}, -}; - -// decode digit 0-9 read from card to get value and X(11) and Y(12) punch state (minus/HiPunch) -// return -1 if not a digit number -int decode_digit(char c1, int * HiPunch, int * NegPunch) -{ - int i,n; - - *HiPunch = *NegPunch = 0; - // N is 0..9 or ?A..I (0..9 with Y(12) High Punch set) - // or !J..R (0..9 with X(11) Minus Punch set). - // or &S..Z# (0..9 with both X(11) and Y(12) Punch set). - - if (c1 == 32) return 0; // space read as zero - for (i=0; i<40; i++) { - if (c1 == digits_ascii[i]) { - n = i % 10; - i = i / 10; - *HiPunch = (i & 1); - *NegPunch = (i >> 1); - return n; - } - } - return -1; // not a valid digit -} - -// get 10 digits word from buf, with sign. return 1 if HiPunch set on any digit -int decode_8word_wiring(char * buf, int addr) +// get 10 digits word with sign from card buf (the data struct). return 1 if HiPunch set on any digit +int decode_8word_wiring(struct _card_data * data, int addr) { // decode up to 8 numerical words per card // input card // NNNNNNNNNN ... 8 times - // N is 0..9 or ?A..I (0..9 with Y(12) High Punch set) - // or !J..R (0..9 with X(11) Minus Punch set). - // or &S..Z# (0..9 with both X(11) and Y(12) Punch set). // If last digit of word has X(11) punch whole word is set as negative value - // If N is a space, a 0 is assumed + // If N is non numeric, a 0 is assumed // put the decoded data in drum at addr (if addr < 0 -> do not store in drum) // return 1 if any colum has Y(12) hi-punch set - int c1,c2,wn,eor,iCol; - int HiPunch, hip; - int NegPunch, NegZero; - int nDigits; + uint16 c1,c2; + int wn,iCol,iDigit; + int HiPunch, NegPunch, NegZero; t_int64 d; - NegZero = 0; // flag set if negative zero is read - HiPunch = 0; // set to 1 if Y(12) high punch found - eor = 0; // signals end of card record - iCol = 0; // current read colum in card - for (wn=0;wn<8;wn++) { // one card generates 8 words in drum mem - d = 0; - nDigits=0; // number of digits - while (1) { - c1 = buf[iCol++]; - if (c1 < ' ') {eor = 1; break;} // end of card - c2 = decode_digit(c1, &hip, &NegPunch); - if (hip) HiPunch = 1; // if any column has Hi Punch Y(12) set, signal it - if (c2 < 0) c2 = 0; // nondigits chars interpreted as zero - d = d * 10 + c2; - nDigits++; - if (nDigits == 10) { - // end of word - if (NegPunch) { // has last digit a minus X(11) punch set? - d = -d; // yes, change sign of word read - if (d == 0) NegZero=1; // word read is minus zero - } - break; + NegZero = 0; // flag set if negative zero is read + HiPunch = 0; // set to 1 if Y(12) high punch found + iCol = 0; // current read colum in card + for (wn=0;wn<8;wn++) { // one card generates 8 words in drum mem + d = NegPunch = 0; + // read word digits + for (iDigit=0;iDigit<10;iDigit++) { + c1 = data->image[iCol++]; + c2 = data->hol_to_ascii[c1]; // convert to ascii + if ((c1 == 0xA00) || (c2 == '?')) { + c1 = 0xA00; c2 = '?'; // the punched value +0 should be represented by ascii ? } + if ((c2 == '+') && (iCol == 1)) { // on IT control card, first char is a Y(12) punch to make control card a load card. + c1 = 0xA00; c2 = '?'; // Digit interpreted as +0 + } + if (strchr(digits_ascii, c2) == NULL) { // scan digits ascii to check if this is a valid numeric digit with Y or X punch + c1 = 0; // nondigits chars interpreted as blank + } + if (c1 & 0x800) HiPunch = 1; // if column has Hi Punch Y(12) set, signal it + NegPunch = (c1 & 0x400) ? 1:0; // if column has minus X(11) set, signal it + c1 = c1 & 0x3FF; // remove X and Y punches + c2 = data->hol_to_ascii[c1]; // convert to ascii again + c2 = c2 - '0'; // convert ascii to binary digit + if ((c2 < 0) || (c2 > 9)) c2 = 0; // nondigits chars interpreted as zero + d = d * 10 + c2; + } + // end of word. set sign + if (NegPunch) { // has last digit a minus X(11) punch set? + d = -d; // yes, change sign of word read + if (d == 0) NegZero=1; // word read is minus zero } - if (nDigits == 0) break; // no well-formed word read -> terminate card processing if (addr >= 0) WriteDrum(addr++, d, NegZero); // store word read from card into drum - if (eor) break; // end of card sensed -> terminate card processing } return HiPunch; } +// load soap symbolic info, This is a facility to help debugging of soap programs into SimH +// does not exist in real hw +void decode_soap_symb_info(struct _card_data * data, int addr) +{ + t_int64 d; + int op,da,ia,i,i2,p; + char buf[81]; + uint16 c1,c2; + + // check soap 1-word load card initial word + d = DRUM[addr + 0]; + if (d != 6919541953LL) return; // not a 1-word load card + + // get the address where the 1-word card will be loaded (into da) + d = DRUM[addr+2]; + op = Shift_Digits(&d, 2); // current inst opcode + da = Shift_Digits(&d, 4); // addr of data + ia = Shift_Digits(&d, 4); // addr of next instr + if ((op != 24) && (ia != 8000)) return; // not a 1-word load card + if (da >= (int)MEMSIZE) return; // destination address out of range + + // convert card image punches to ascii buf for processing, starting at col 40 + // keep 026 fortran charset + for (i=40;i<80;i++) { + c1 = data->image[i]; + c2 = data->hol_to_ascii[c1]; + c2 = (strchr(mem_to_ascii, toupper(c2))) ? c2:' '; + if (c2 == '~') c2 = ' '; + buf[i] = (char) c2; + } + buf[80] = 0; // terminate string + + // copy soap symbolic info + i2 = 80; + while (1) { // calc i2 = last non space char to copy + if (--i2 < 41) return; // noting to copy + if (buf[i2] > 32) break; + } + p = da * 80; + for (i=0;i<80;i++) + DRUM_Symbolic_Buffer[p+i] = 0; // clear drum[da] symbolic info + if (i2-41 >= 80) i2 = 80-1 + 41; // only copy max 79 chars + for (i=41;i<=i2;i++) { + if ((i==47) || (i==50) || (i==55)) DRUM_Symbolic_Buffer[p++] = 32; // add space separation between op, da, ia fields + DRUM_Symbolic_Buffer[p++] = buf[i]; + } +} t_int64 decode_num_word(char * buf, int nDigits, int bSpaceIsZero) { @@ -193,7 +210,8 @@ t_int64 decode_alpha_word(char * buf, int n) return d; } -void decode_soap_wiring(char * buf, int addr) + +void decode_soap_wiring(struct _card_data * data, int addr) { // decode soap card simulating soap control panel wiring for 533 // from SOAP II manual at http://www.bitsavers.org/pdf/ibm/650/24-4000-0_SOAPII.pdf @@ -205,6 +223,7 @@ void decode_soap_wiring(char * buf, int addr) // Sg = sign = blank or - // Tg = Tag = // storage in input block + // +-------------------+ // Word 1951: | <- Location -> | Alphabetic // 1952: | <- Data Addr -> | Alphabetic // 1953: | <- Inst Addr -> | Alphabetic @@ -218,8 +237,23 @@ void decode_soap_wiring(char * buf, int addr) // 1958: | |N N N N| D Absolute Part // 1959: | |N N N N| I Absolute Part // 1960: | |T b n| T=Type (0 if Blank), b=0/8 (for non blank type), n=0/8 (for negative) + // +-------------------+ // int ty,neg; + char buf[81]; + int i; + uint16 c1,c2; + + // convert card image punches to ascii buf for processing + // keep 026 fortran charset + for (i=0;i<80;i++) { + c1 = data->image[i]; + c2 = data->hol_to_ascii[c1]; + c2 = (strchr(mem_to_ascii, toupper(c2))) ? c2:' '; + if (c2 == '~') c2 = ' '; + buf[i] = (char) c2; + } + buf[80] = 0; // terminate string DRUM[addr + 0] = decode_alpha_word(&buf[42], 5); // Location (5 chars) DRUM[addr + 1] = decode_alpha_word(&buf[50], 5); // Data Addr (5 chars) @@ -234,11 +268,13 @@ void decode_soap_wiring(char * buf, int addr) DRUM[addr + 7] = decode_num_word(&buf[51], 4, 0); // Absolute Part of Data Addr DRUM[addr + 8] = decode_num_word(&buf[57], 4, 0); // Absolute Part of Instr Addr - if (buf[40] == '1') {ty = 18; } else - if (buf[40] == '2') {ty = 28; } else {ty = 0; } + ty = buf[40] - '0'; + if ((ty < 0) || (ty > 9)) ty = 0; neg = (buf[41] == '-') ? 8:0; - DRUM[addr + 9] = ty * 10 + neg; // |T b n| T=Type (0 if Blank), b=0/8 (for non blank type), n=0/8 (for negative) + DRUM[addr + 9] = ty * 100 + + (ty ? 80:0) + + neg; // |T b n| T=Type (0 if Blank), b=0/8 (for non blank type), n=0/8 (for negative) } int sformat(char * buf, const char * match) @@ -258,18 +294,20 @@ int sformat(char * buf, const char * match) return 1; // end of match string -> return 1 -> buf matches } -void decode_is_wiring(char * buf, int addr) +void decode_is_wiring(struct _card_data * data, int addr) { // decode Floationg Decimal Interpretive System (IS) card simulating control panel wiring for 533 as described - // in manual at http://www.bitsavers.org/pdf/ibm/650/28-4024_FltDecIntrpSys + // in manual at http://www.bitsavers.org/pdf/ibm/650/28-4024_FltDecIntrpSys.pdf // input card // Column: 1 2 3 4 | 5 6 | 7 8 9 | 10 | 11 | 12 - 21 | 22 | 23 - 32 | 33 | 34 - 43 | 44 | 45 - 54 | 55 | 56 - 65 | 66 | 67 - 76 | 77 78 79 | 80 // Card | | Location | wc | s1 | Word1 | s2 | Word2 | s3 | Word3 | s4 | Word4 | s5 | Word5 | s6 | Word6 | Problem | // Num | Num // - // wc = Word Count (space for 1) - // s1 = sign of word 1 (space for +) - // Tr = Tracing identification + // wc = Word Count (range 0 to 6, space for 1) + // s1 = sign of word 1 (-, + or (same as +)) + // Tr = Tracing identification + // Word = word in format NNNNNNNNNN + // N is 0..9, (same as 0) // // Alternate input format to allow system deck loading // Column: 1 2 | 3 | 4 5 6 | 7 | 8 9 10 11 | 12 | 13 - 24 @@ -278,13 +316,13 @@ void decode_is_wiring(char * buf, int addr) // // Alternate input format to allow IT source program loading // Column: 1 2 3 4 | 5 6 | 7 8 9 | 10 | 11 | 12 - 24 - // Card | Blank | Location | | sg | N NNN NNN NNN <- This is an IT instruction (format O1 A B C) + // Card | Blank | Location | | sg | N NNN NNN NNN <- This is an IS instruction (format O1 A B C) // Num | // Column: 1 2 3 4 | 5 6 | 7 8 9 | 10 | 11 | 12 - 23 - // Card | Blank | Location | | sg | N NNNNNNN NN <- This is an IT float numeric constant (mantissa and exponent) + // Card | Blank | Location | | sg | N NNNNNNN NN <- This is an IS float numeric constant (mantissa and exponent) // Num | // Column: 1 2 3 4 | 5 6 | 7 8 9 | 10 - 23 - // Card | Blank | Location | blanks <- This is an IT transfer card (location is start of IT program) + // Card | Blank | Location | blanks <- This is an IS transfer card (location is start of IT program) // Num | // // storage in input block @@ -301,18 +339,27 @@ void decode_is_wiring(char * buf, int addr) // +-------------------+ // 1959: | Problem Number | // +-------------------+ - // input card - // WordN is 0..9, - // sign is -,+, + // // put the decoded data in drum at addr (if addr < 0 -> do not store in drum) // card number is ignored on reading int wc,neg,i; int NegZero; t_int64 d; + char buf[81]; + uint16 c1,c2; + + // convert card image punches to ascii buf for processing + // keep 0..9,+,-,, replace anything else by + for (i=0;i<80;i++) { + c1 = data->image[i]; + c2 = data->hol_to_ascii[c1]; + buf[i] = (strchr("+-0123456789", c2)) ? ((char) (c2)):' '; + } + buf[80] = 0; // terminate string if ( sformat(&buf[6], " ")) { - // blank card: read as all zero, one word count + // card with firsts 26 cols blank = blank card: read as all zero, one word count // this allows to have blank cards/comments card as long as the comment starts on column 27 of more DRUM[addr + 1] = 1 * D4; // word count } else if ( sformat(&buf[5], " NNN ")) { @@ -379,6 +426,80 @@ void decode_is_wiring(char * buf, int addr) } } +void decode_it_wiring(struct _card_data * data, int addr) +{ + // decode IT compiler card simulating control panel wiring for 533 + // from IT manual at http://www.bitsavers.org/pdf/ibm/650/CarnegieInternalTranslator.pdf + // source program input card + // Column: 1 2 3 4 | 5 | 6 - 42 | 43 - 70 | 71 72 | 73 - 80 | + // N N N N | + | | Statement | | Comments | + // Statement | Y(12) | | max 28 | | max 8 | + // Number | Punch | | chars | | chars | + // + // storage in input block + // +-------------------+ + // Word 0051: | <- Statement -> | Alphabetic + // 0052: | <- Statement -> | Alphabetic + // 0053: | <- Statement -> | Alphabetic + // 0054: | <- Statement -> | Alphabetic + // 0055: | <- Statement -> | Alphabetic + // 0056: | <- Statement -> | Alphabetic + // +-+-+-+-+-+-|-+-+-+-| + // 0057: | |N N N N| Statement Number + // +-+-+-+-+-+-|-+-+-+-| + // 0058: | | Not used + // 0059: | | Not used + // 0060: | | Not used + // +-------------------+ + // + // type 1 data input card + // Column: 1 2 | 3 | 4 5 6 | 7 8 9 10 | 11 - 20 | + // VV | + | N N N | D D D D | Word + // | Y(12) | + // | Punch | + // VV = IT variable being loaded: 01 -> I type, 02 -> Y type, 03 -> C type + // N N N = variable number (I5 -> 01 + 005) + // D D D D = variable arbitrary non-zero identification number + // Word = word to be loaded into IT variable. If type I, is an integer. If type C or Y + // type is word is float (M MMMMMMM EE -> M=mantisa, EE=exponent) + // if word is negative, last digit get X(11) overpunch + // up to 4 pairs var-word per card + // last card signaed with a X(11) overpunch in col 10 + // space is considered as zero + // type 2 data input card is a load card. No spaces are allowed + + char buf[81]; + int i; + uint16 c1,c2; + + // convert card image punches to ascii buf for processing + // keep 026 fortran charset + for (i=0;i<80;i++) { + c1 = data->image[i]; + c2 = data->hol_to_ascii[c1]; + c2 = (strchr(mem_to_ascii, toupper(c2))) ? c2:' '; + if (c2 == '~') c2 = ' '; + buf[i] = (char) c2; + } + buf[80] = 0; // terminate string + + if (buf[2] == '+') { + // type 1 data card + // re-read as 8 word per card + decode_8word_wiring(data, addr); + return; + } + DRUM[addr + 0] = decode_alpha_word(&buf[42], 5); // Statement (5 chars) + DRUM[addr + 1] = decode_alpha_word(&buf[47], 5); // Statement (5 chars) + DRUM[addr + 2] = decode_alpha_word(&buf[52], 5); // Statement (5 chars) + DRUM[addr + 3] = decode_alpha_word(&buf[57], 5); // Statement (5 chars) + DRUM[addr + 4] = decode_alpha_word(&buf[62], 5); // Statement (5 chars) + DRUM[addr + 5] = decode_alpha_word(&buf[67], 3); // Statement (3 chars) + + DRUM[addr + 6] = decode_num_word(&buf[0], 4, 1); // Statement Number (space is read as digit zero) + +} + /* @@ -386,11 +507,10 @@ void decode_is_wiring(char * buf, int addr) */ uint32 cdr_cmd(UNIT * uptr, uint16 cmd, uint16 addr) { - int i,c; struct _card_data *data; - char buf[81]; - int buf_len; uint32 wiring; + int i; + char cbuf[81]; /* Are we currently tranfering? */ if (uptr->u5 & URCSTA_BUSY) @@ -401,25 +521,25 @@ uint32 cdr_cmd(UNIT * uptr, uint16 cmd, uint16 addr) /* Test ready */ if ((uptr->flags & UNIT_ATT) == 0) { - sim_debug(DEBUG_CMD, &cdr_dev, "No cards (no file attached)\r\n"); + sim_debug(DEBUG_CMD, &cdr_dev, "No cards (no file attached)\n"); return SCPE_NOCARDS; } /* read the cards */ - sim_debug(DEBUG_CMD, &cdr_dev, "READ\r\n"); + sim_debug(DEBUG_CMD, &cdr_dev, "READ\n"); uptr->u5 |= URCSTA_BUSY; switch(sim_read_card(uptr)) { case SCPE_EOF: - sim_debug(DEBUG_DETAIL, &cdr_dev, "EOF\r\n"); + sim_debug(DEBUG_DETAIL, &cdr_dev, "EOF\n"); uptr->u5 = 0; return SCPE_NOCARDS; case SCPE_UNATT: - sim_debug(DEBUG_DETAIL, &cdr_dev, "Not Attached\r\n"); + sim_debug(DEBUG_DETAIL, &cdr_dev, "Not Attached\n"); uptr->u5 = 0; return SCPE_NOCARDS; case SCPE_IOERR: - sim_debug(DEBUG_DETAIL, &cdr_dev, "ERR\r\n"); + sim_debug(DEBUG_DETAIL, &cdr_dev, "ERR\n"); uptr->u5 = 0; return SCPE_NOCARDS; case SCPE_OK: @@ -428,30 +548,35 @@ uint32 cdr_cmd(UNIT * uptr, uint16 cmd, uint16 addr) data = (struct _card_data *)uptr->up7; - // make local copy of card - buf_len = data->ptr; - if (buf_len == 0) { - buf_len = data->len; - } - for (i=0;i<80;i++) { - if (i < buf_len) { - c = data->cbuff[i]; - if (c < ' ') c = ' '; - buf[i] = c; - } else { - buf[i] = ' '; - } - } - buf[80] = 0; // terminate string + // make local copy of card for debug output + for (i=0; i<80; i++) + cbuf[i] = data->hol_to_ascii[data->image[i]]; + cbuf[80] = 0; // terminate string + sim_debug(DEBUG_DETAIL, &cpu_dev, "Read Card: %s\n", sim_trim_endspc(cbuf)); - // trim right spaces for printing read card - for (i=80;i>=0;i--) if (buf[i] > 32) break; - c = buf[i+1]; buf[i+1]=0; - sim_debug(DEBUG_DETAIL, &cpu_dev, "Read Card: %s\r\n", buf); - buf[i+1]=c; + // uint16 data->image[] array that holds the actual punched rows on card + // using this codification: + // + // Row Name value in image[] comments + // + // Y 0x800 Hi Punch Y(12) + // X 0x400 Minus Punch X(11) + // 0 0x200 also called T (Ten, 10) + // 1 0x100 + // 2 0x080 + // 3 0x040 + // 4 0x020 + // 5 0x010 + // 6 0x008 + // 7 0x004 + // 8 0x002 + // 9 0x001 + // + // If several columns are punched, the values are ORed: eg char A is represented as a punch + // on row Y and row 1, so it value in image array will be 0x800 | 0x100 -> 0x900 // check if it is a load card (Y(12) = HiPunch set on any column of card) signales it - if (decode_8word_wiring(buf, -1)) { + if (decode_8word_wiring(data, -1)) { uptr->u5 |= URCSTA_LOAD; } else { uptr->u5 &= ~URCSTA_LOAD; @@ -463,16 +588,23 @@ uint32 cdr_cmd(UNIT * uptr, uint16 cmd, uint16 addr) // using the control panel wiring. if (uptr->u5 & URCSTA_LOAD) { // load card -> use 8 words per card encoding - decode_8word_wiring(buf, addr); + decode_8word_wiring(data, addr); + if (uptr->u5 & URCSTA_SOAPSYMB) { + // requested to load soap symb info + decode_soap_symb_info(data, addr); + } } else if (wiring == WIRING_SOAP) { // decode soap card simulating soap control panel wiring for 533 (gasp!) - decode_soap_wiring(buf, addr); + decode_soap_wiring(data, addr); } else if (wiring == WIRING_IS) { - // decode it card - decode_is_wiring(buf, addr); + // decode floating point interpretive system (bell interpreter) card + decode_is_wiring(data, addr); + } else if (wiring == WIRING_IT) { + // decode Carnegie Internal Translator compiler card + decode_it_wiring(data, addr); } else { // default wiring: decode up to 8 numerical words per card. Can be a load card - decode_8word_wiring(buf, addr); + decode_8word_wiring(data, addr); } uptr->u5 &= ~URCSTA_BUSY; @@ -526,11 +658,18 @@ cdr_attach(UNIT * uptr, CONST char *file) { t_stat r; - if ((r = sim_card_attach(uptr, file)) != SCPE_OK) - return r; + if (uptr->flags & UNIT_ATT) // remove current deck in read hopper before attaching + sim_card_detach(uptr); // the new one + + r = sim_card_attach(uptr, file); + if (SCPE_BARE_STATUS(r) != SCPE_OK) + return r; uptr->u5 = 0; uptr->u4 = 0; uptr->u6 = 0; + if (sim_switches & SWMASK ('L')) { /* Load Symbolic SOAP info? */ + uptr->u5 |= URCSTA_SOAPSYMB; + } return SCPE_OK; } diff --git a/I650/i650_cpu.c b/I650/i650_cpu.c index 952e323f..d1c0da9a 100644 --- a/I650/i650_cpu.c +++ b/I650/i650_cpu.c @@ -95,28 +95,28 @@ t_stat cpu_dep(t_value val, t_addr addr, UNIT * uptr, int32 sw); t_stat cpu_reset(DEVICE * dptr); t_stat cpu_set_size(UNIT * uptr, int32 val, CONST char *cptr, void *desc); t_stat cpu_help (FILE *st, DEVICE *dptr, UNIT *uptr, int32 flag, const char *cptr); +t_stat cpu_svc (UNIT *uptr); const char *cpu_description (DEVICE *dptr); -void mem_init(void); -t_int64 DRUM[MAXMEMSIZE] = {0}; -int DRUM_NegativeZeroFlag[MAXMEMSIZE] = {0}; +t_int64 DRUM[MAXMEMSIZE] = {0}; +int DRUM_NegativeZeroFlag[MAXMEMSIZE] = {0}; +char DRUM_Symbolic_Buffer[MAXMEMSIZE * 80] = {0}; // does not exists on real hw. Used to keep symbolic info // cpu registers +uint16 IC; // Added register not part of cpu. Has addr of current intr in execution, just for displaying purposes. IBM 650 has no program counter t_int64 ACC[2]; /* lower, upper accumulator. 10 digits (=one word) each*/ t_int64 DIST; /* ditributor. 10 digits */ -int OV; /* Overflow flag */ t_int64 CSW = 0; /* Console Switches, 10 digits */ -int CSWProgStop = 1; /* Console programmed stop switch */ -int CSWOverflowStop = 0; /* Console stop on overflow switch */ t_int64 PR; /* Program Register: hold current instr in execution, 10 digits*/ -int AR; /* Address Register: address references to drum */ -int AccNegativeZeroFlag = 0; // set to 1 if acc has a negative zero -int DistNegativeZeroFlag = 0; // set to 1 if distributor has a negative zero -int IC; // addr of current intr in execution, just for debugginf purposes. IBM 650 has no program counter +uint16 AR; /* Address Register: address references to drum */ +uint8 OV; /* Overflow flag */ +uint8 CSWProgStop = 1; /* Console programmed stop switch */ +uint8 CSWOverflowStop = 0; /* Console stop on overflow switch */ +uint8 HalfCycle = 0; // set to 0 for normal run, =1 to execute I-Half-cycle, =2 to execute D-half-cycle +int AccNegativeZeroFlag = 0; // set to 1 if acc has a negative zero +int DistNegativeZeroFlag = 0; // set to 1 if distributor has a negative zero -void (*sim_vm_init) (void) = &mem_init; - /* CPU data structures cpu_dev CPU device descriptor @@ -126,7 +126,7 @@ void (*sim_vm_init) (void) = &mem_init; */ UNIT cpu_unit = - { UDATA(NULL, MEMAMOUNT(0)|MODEL(0x0), 1000), 10 }; + { UDATA(&cpu_svc, MEMAMOUNT(0)|MODEL(0x0), 1000), 10 }; REG cpu_reg[] = { @@ -140,6 +140,7 @@ REG cpu_reg[] = { {HRDATAD(CSW, CSW, 64, "Console Switches"), REG_VMIO|REG_FIT}, {ORDATAD(CSWPS, CSWProgStop, 1, "Console Switch Program Stop"), REG_FIT}, {ORDATAD(CSWOS, CSWOverflowStop, 1, "Console Switch Overflow Stop"), REG_FIT}, + {ORDATAD(HALF, HalfCycle, 2, "Half Cycle"), REG_FIT}, {NULL} }; @@ -158,6 +159,15 @@ DEVICE cpu_dev = { NULL, NULL, &cpu_help, NULL, NULL, &cpu_description }; +t_stat cpu_svc (UNIT *uptr) +{ + // poll kbd to sense ^E to halt cpu execution. + sim_activate_after (uptr, 300*1000); // poll each 300 msec + sim_poll_kbd(); + return SCPE_OK; +} + + // return 0 if drum addr invalid int IsDrumAddrOk(int AR) { @@ -179,7 +189,7 @@ int WriteDrum(int AR, t_int64 d, int NegZero) int ReadDrum(int AR, t_int64 * d, int * NegZero) { if (IsDrumAddrOk(AR) == 0) return 0; - *d = DRUM[AR]; + *d = DRUM[AR]; *NegZero = DRUM_NegativeZeroFlag[AR]; if (*d) { *NegZero = 0; // sanity check on Minus Zero @@ -192,13 +202,15 @@ int ReadDrum(int AR, t_int64 * d, int * NegZero) int ReadAddr(int AR, t_int64 * d, int * NegZero) { int r; + int neg; - if (AR == 8000) {*d = CSW; *NegZero=0; r=1; } else - if (AR == 8001) {*d = DIST; *NegZero=DistNegativeZeroFlag; r=1; } else - if (AR == 8002) {*d = ACC[0]; *NegZero=AccNegativeZeroFlag; r=1; } else - if (AR == 8003) {*d = ACC[1]; *NegZero=AccNegativeZeroFlag; r=1; } else - { r=ReadDrum(AR, d, NegZero); } - if (*d) *NegZero = 0; // sanity check on Minus Zero + if (AR == 8000) {*d = CSW; neg=0; r=1; } else + if (AR == 8001) {*d = DIST; neg=DistNegativeZeroFlag; r=1; } else + if (AR == 8002) {*d = ACC[0]; neg=AccNegativeZeroFlag; r=1; } else + if (AR == 8003) {*d = ACC[1]; neg=AccNegativeZeroFlag; r=1; } else + { r=ReadDrum(AR, d, &neg); } + if (*d) neg = 0; // sanity check on Minus Zero + if (NegZero != NULL) *NegZero = neg; return r; } @@ -243,6 +255,7 @@ int ShiftAcc(int direction) int neg = 0; int n, m; + n = 0; a1 = ACC[1]; if (a1 < 0) {a1 = -a1; neg = 1;} a0 = ACC[0]; if (a0 < 0) {a0 = -a0; neg = 1;} @@ -311,45 +324,567 @@ t_int64 SetIA2(t_int64 d, int n) return d; } +// opcode decode +// input: prior to call DecodeOpcode PR cpu register must be loaded with the word to decode +// output: decoded instruction as opcode, DA, IA parts +// bReadDrum: =1 if instruction needes to read data from drum before execution +// returns opname: points to opcode name or NULL if undef opcode +CONST char * DecodeOpcode(int * opcode, int * DA, int * IA, int * bReadData) +{ + t_int64 d; + CONST char * opname; + + d = PR; + *opcode = Shift_Digits(&d, 2); // current inste opcode + *DA = Shift_Digits(&d, 4); // addr of data used by current instr + *IA = Shift_Digits(&d, 4); // addr of next instr + opname = get_opcode_data(*opcode, bReadData); + return opname; +} + +// opcode execution +// input: opcode, DA (data address), DrumAddr (current word under the r/w heads. Needed to calculate time used on instr execution) +// prior to call ExecOpcode DIST cpu register must be loaded with the needed data for inst execution +// output: bWriteDrum: =1 if DIST must be written back to drum +// bBranchToDA: =1 if next inst must be taken from DA register instead of DA +// CpuStepsUsed: number of steps (=word time) used on program execution +t_stat ExecOpcode(int opcode, int DA, + int * bWriteDrum, int * bBranchToDA, + int DrumAddr, + int * CpuStepsUsed) +{ + t_stat reason = 0; + t_int64 d; + int i, n, neg; + + *bBranchToDA = 0; + *bWriteDrum = 0; + *CpuStepsUsed = 0; + + switch(opcode) { + case OP_NOOP : // No operation + if ((IC == 0) && ((PR % D4) == 0)) reason = STOP_HALT; // if loop on NOOP on addr zero -> machine idle -> stop cpu + break; + case OP_STOP : // Stop if console switch is set to stop, otherwise continue as a NO-OP + if (CSWProgStop) { + reason = STOP_PROG; + // normal stops has the consequence to prevent AR to be set with IA contents (to point to next instruction). + // but STOP allows the user to resume execution with program start key on console (= scp go command) + // so to allow this here we must explicitelly update AR + AR = (PR % D4); + } + break; + // arithmetic + case OP_RAL: // Reset and Add into Lower + case OP_RSL: // Reset and Subtract into Lower + case OP_RAABL: // Reset and Add Absolute into Lower + case OP_RSABL: // Reset and Subtract Absolute into Lower + d = DIST; + if ((opcode == OP_RAABL) || (opcode == OP_RSABL)) d = AbsWord(d); + if ((opcode == OP_RSL) || (opcode == OP_RSABL)) d = -d; + OV = 0; AccNegativeZeroFlag = 0; + ACC[1] = 0; + ACC[0] = d; + sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\n", + printfa, + OV); + // sequence chart for Add/Substract + // (1) (0..49) (1) (0/1) (2) (0/2) (1) + // Enable Search Data to Wait Dist to Complement Remove A + // Dist Data dist for even Acc Neg Sum interlock + // (1) (1) (1) (0..49) + // Restart IA to AR Enable PR Search next + // Signal Inst + *CpuStepsUsed = 1+1+2+1 + +(DrumAddr % 2); // using lower acc -> wait for even + // no need to complement neg sum + break; + case OP_AL: // Add to Lower + case OP_SL: // Subtract from Lower + case OP_AABL: // Add Absolute to lower + case OP_SABL: // Subtract Absolute from lower + if ((opcode == OP_AL) && (ACC[1] == 0) && (ACC[0] == 0) && (AccNegativeZeroFlag) && + (DIST == 0) && (DistNegativeZeroFlag)) { + // special case as stated in Operation manual 22(22-6060-2_650_OperMan.pdf), page 95 + // Acc result on minus zero if acc contains minus zero and AU or AL with a drum + // location that contains minus zero + OV=0; + sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: 0000000000 0000000000- (Minus Zero), OV: 0\n"); + // acc keeps the minus zero it already has + break; + } + d = DIST; + if ((opcode == OP_AABL) || (opcode == OP_SABL)) d = AbsWord(d); + if ((opcode == OP_SL) || (opcode == OP_SABL)) d = -d; + AddToAcc(0,d); + sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\n", + printfa, + OV); + *CpuStepsUsed = 1+1+2+1 + +(DrumAddr % 2) // using lower acc -> wait for even + +(bAccNegComplement ? 2:0); // acc sign change -> need to complement neg sum (two steps) + break; + case OP_RAU: // Reset and Add into Upper + case OP_RSU: // Reset and Subtract into Upper + case OP_AU: // Add to Upper + case OP_SU: // Substract from Upper + if ((opcode == OP_AU) && (ACC[1] == 0) && (ACC[0] == 0) && (AccNegativeZeroFlag) && + (DIST == 0) && (DistNegativeZeroFlag)) { + // special case as stated in Operation manual 22(22-6060-2_650_OperMan.pdf), page 95 + // Acc result on minus zero if acc contains minus zero and AU or AL with a drum + // location that contains minus zero + OV=0; + sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: 0000000000 0000000000- (Minus Zero), OV: 0\n"); + // acc keeps the minus zero it already has + break; + } + d = DIST; + if ((opcode == OP_RAU) || (opcode == OP_RSU)) ACC[1] = ACC[0] = 0; + if ((opcode == OP_SU) || (opcode == OP_RSU)) d = -d; + AddToAcc(d,0); + sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\n", + printfa, + OV); + *CpuStepsUsed = 1+1+2+1 + +((DrumAddr+1) % 2) // using upper acc -> wait for odd + +(bAccNegComplement ? 2:0); // acc sign change -> need to complement neg sum (two steps) + break; + // Multiply/divide + case OP_MULT: // Multiply + sim_debug(DEBUG_DETAIL, &cpu_dev, "... Mult ACC: %06d%04d %06d%04d%c, OV: %d\n", + printfa, + OV); + sim_debug(DEBUG_DETAIL, &cpu_dev, "... by DIST: %06d%04d%c\n", + printfd); + if ((ACC[1] == 0) && (ACC[0] == 1) && (DIST == 0) && (DistNegativeZeroFlag)) { + // special case as stated in Operation manual 22(22-6060-2_650_OperMan.pdf), page 95 + // Acc result on minus zero if a drum location that contains minus zero + // is multiplied by +1 + OV = 0; + sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: 0000000000 0000000000- (Minus Zero), OV: 0\n"); + // acc set to minus zero + ACC[1] = ACC[0] = 0; + AccNegativeZeroFlag = 1; + break; + } + OV = 0; + neg = (DIST < 0) ? 1:0; if (AccNegative) neg = 1-neg; + d = AbsWord(DIST); + ACC[0] = AbsWord(ACC[0]); + ACC[1] = AbsWord(ACC[1]); + for(i=0;i<10;i++) { + n = ShiftAcc(1); + while (n-- > 0) { + AddToAcc(0, d); + if (OV) break; + } + if (OV) break; + } + if (neg) { + ACC[0] = -ACC[0]; + ACC[1] = -ACC[1]; + } + sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\n", + printfa, + OV); + // sequence chart for Multiply/Divide + // (1) (0..49) (1) (0/1) (20..200) (1) + // Enable Search Data to Wait Mult/Div Remove A + // Dist Data dist for even loop interlock + // (1) (1) (1) (0..49) + // Restart IA to AR Enable PR Search next + // Signal Inst + *CpuStepsUsed = 1+1+1+1 + +(DrumAddr % 2) // wait for even + +20*(i+1); // i holds the number of loops done + break; + case OP_DIV: // Divide + case OP_DIVRU: // Divide and reset upper accumulator + sim_debug(DEBUG_DETAIL, &cpu_dev, "... Div ACC: %06d%04d %06d%04d%c, OV: %d\n", + printfa, + OV); + sim_debug(DEBUG_DETAIL, &cpu_dev, "... by DIST: %06d%04d%c\n", + printfd); + if (DIST == 0) { + OV = 1; + sim_debug(DEBUG_DETAIL, &cpu_dev, "Divide By Zero -> OV set\n"); + } else if (AbsWord(DIST) <= AbsWord(ACC[1])) { + OV = 1; + sim_debug(DEBUG_DETAIL, &cpu_dev, "Quotient Overflow -> OV set and ERROR\n"); + reason = STOP_OV; // quotient overfow allways stops the machine + } else { + OV = 0; + neg = (DIST < 0) ? 1:0; if (AccNegative) neg = 1-neg; + d = AbsWord(DIST); + ACC[0] = AbsWord(ACC[0]); + ACC[1] = AbsWord(ACC[1]); + for(i=0;i<10;i++) { + ShiftAcc(1); + while (d <= ACC[1]) { + AddToAcc(-d, 0); + ACC[0]++; + } + } + if (neg) { + ACC[0] = -ACC[0]; + ACC[1] = -ACC[1]; + } + if (opcode == OP_DIVRU) { + ACC[1] = 0; + } + *CpuStepsUsed = 1+1+1+1 + +(DrumAddr % 2) // wait for even + +20*(i+1) + 40; // i holds the number of loops done + } + sim_debug(DEBUG_DETAIL, &cpu_dev, "... Div result ACC: %06d%04d %06d%04d%c, OV: %d\n", + printfa, + OV); + break; + // shift + case OP_SLT: // Shift Left + case OP_SRT: // Shift Right + case OP_SRD: // Shift Right and Round + n = DA % 10; // number of digits to shift + d = 0; + while (n-- > 0) { + d = ShiftAcc((opcode == OP_SLT) ? 1:-1); + } + if (opcode == OP_SRD) { + if (d <= - 5) AddToAcc(0,-1); + if (d >= 5) AddToAcc(0,+1); + OV = 0; + } + sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\n", + printfa, + OV); + // sequence chart for shift + // (1) (0/1) (2) (1) + // Enable Wait Per Remove A + // Sh count for even shift interlock + // (0/1) (1) (1) (0..49) + // Restart IA to AR Enable PR Search next + // Signal Inst + *CpuStepsUsed = 1+1+1 + +(DrumAddr % 2) // wait for even + + 2*(DA % 10) // number of shifts done + + ((opcode == OP_SRD) ? 1:0); + break; + case OP_SCT : // Shift accumulator left and count + n = 10 - DA % 10; // shift count (nine's complement of unit digit of DA) + if (n==10) n=0; + if (ACC[1] == 0) { + // upper acc is zero -> will have 10 or more shifts + ACC[1] = ACC[0]; + ACC[0] = 10; + if (n) { + OV = 1; // overflow because n <> 0 + } else { + if (Get_HiDigit(ACC[1]) == 0) OV = 1; // overflow because not just 10 shifts + } + } else if (Get_HiDigit(ACC[1]) != 0) { + // no shift will be done + ACC[0] = SetIA2(ACC[0], 0); // replace last two digits by 00 + } else { + while (Get_HiDigit(ACC[1]) == 0) { + ShiftAcc(1); // shift left + if (n==10) { + OV = 1; + break; + } + n++; + } + ACC[0] = SetIA2(ACC[0], n); // replace last two digits by 00 + } + AccNegativeZeroFlag = 0; + sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\n", + printfa, + OV); + *CpuStepsUsed = 1+1+1 + +(DrumAddr % 2) // wait for even + + 2*(DA % 10); // number of shifts done + break; + // load and store + case OP_STL: // Store Lower in Mem + case OP_STU: // Store Upper in Mem + if ((ACC[0] == 0) && (ACC[1] == 0) && (AccNegativeZeroFlag)) { + DistNegativeZeroFlag = 1; + } else { + DistNegativeZeroFlag = 0; + } + DIST = (opcode == OP_STU) ? ACC[1] : ACC[0]; + *bWriteDrum = 1; // to write DIST in drum at AR + // sequence chart for store + // (1) (0/1) (1) (0..49) (1) (1) (1) + // Enable Wait L/U acc Search Store IA to AR Enable PR + // Dist for even to dist data data + // or odd + *CpuStepsUsed = 1+1+1+1+1+ + + (((opcode == OP_STU) ? DrumAddr:DrumAddr+1) % 2); // wait for odd/even depending on STU/STL opcode + break; + case OP_STD: // store distributor + *bWriteDrum = 1; // to write DIST in drum at AR + *CpuStepsUsed = 1+1+1+1; + break; + case OP_STDA: // Store Lower Data Address + n = ((ACC[0] / D4) % D4); // get data addr xxDDDDxxxx from lower Acc + d = SetDA(DIST, n); // replace it in distributor + if ((d == 0) && ((DIST < 0) || ( (DIST == 0) && (DistNegativeZeroFlag) ))) { + // if dist results in zero but was negative or negative zero before replacing digits + // then it is set to minus zero + DistNegativeZeroFlag = 1; + } else { + DistNegativeZeroFlag = 0; + } + DIST = d; + *bWriteDrum = 1; // to write DIST in drum at AR + *CpuStepsUsed = 1+1+1+1 + +(DrumAddr % 2); // wait for even + break; + case OP_STIA: // Store Lower Instruction Address + n = (ACC[0] % D4); // get inst addr xxyyyyAAAA + d = SetIA(DIST, n); // replace it in distributor + if ((d == 0) && ((DIST < 0) || ( (DIST == 0) && (DistNegativeZeroFlag) ))) { + // if dist results in zero but was negative or negative zero before replacing digits + // then it is set to minus zero + DistNegativeZeroFlag = 1; + } else { + DistNegativeZeroFlag = 0; + } + DIST = d; + *bWriteDrum = 1; // to write DIST in drum at AR + *CpuStepsUsed = 1+1+1+1 + +(DrumAddr % 2); // wait for even + break; + case OP_LD: // Load Distributor + *CpuStepsUsed = 1+1+1+1; + break; + case OP_TLU : // Table lookup + sim_debug(DEBUG_DETAIL, &cpu_dev, "... Search DIST: %06d%04d%c\n", + printfd); + + AR = (DA / 50) * 50; // set AR to start of band based on DA + AR--; n=-1; + while (1) { + AR++; n++; + if (0==IsDrumAddrOk(AR)) { + sim_debug(DEBUG_DETAIL, &cpu_dev, "Invalid AR addr %d ERROR\n", AR); + reason = STOP_ADDR; + break; + } + if ((AR % 50) > 47) continue; // skip addr 48 & 49 of band that cannot be used for tables + if (0==ReadAddr(AR, &d, NULL)) { // read table argument + reason = STOP_ADDR; + break; + } + if (AbsWord(d) >= AbsWord(DIST)) break; // found + } + // set the result as xxNNNNxxxx in lower acc + ACC[0] = SetDA(ACC[0], DA+n); + sim_debug(DEBUG_DETAIL, &cpu_dev, "... Result ACC: %06d%04d %06d%04d%c, OV: %d\n", + printfa, + OV); + *CpuStepsUsed = 1+1+1+1+1+1 + +(DrumAddr % 2) // wait for even + + n; // number of reads to find the argument searched for + break; + // branch + case OP_BRD1: case OP_BRD2: case OP_BRD3: case OP_BRD4: case OP_BRD5: // Branch on 8 in distributor positions 1-10 + case OP_BRD6: case OP_BRD7: case OP_BRD8: case OP_BRD9: case OP_BRD10: + sim_debug(DEBUG_DETAIL, &cpu_dev, "... Check DIST: %06d%04d%c\n", + printfd); + d = DIST; + n = opcode - OP_BRD10; if (n == 0) n = 10; + while (--n > 0) d = d / 10; + d = d % 10; + if (d == 8) { + sim_debug(DEBUG_DETAIL, &cpu_dev, "Digit is %d -> Branch Taken\n", (int32) d); + *bBranchToDA = 1; // IA (next instr addr) will be taken from DA. Branch taken + } else if (d == 9) { + // IA kept as already set. Branch not taken + sim_debug(DEBUG_DETAIL, &cpu_dev, "Digit is %d -> Branch Not Taken\n", (int32) d); + } else { + // any other value for tested digit -> stop + sim_debug(DEBUG_DETAIL, &cpu_dev, "Digit is %d -> Branch ERROR\n", (int32) d); + reason = STOP_ERRO; + break; + } + *CpuStepsUsed = 1+1 + + ((*bBranchToDA) ? 1:0); // one extra step needed if branch taken + break; + case OP_BRNZU: // Branch on Non-Zero in Upper + sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\n", + printfa, + OV); + if (ACC[1] != 0) { + sim_debug(DEBUG_DETAIL, &cpu_dev, "Upper ACC not Zero -> Branch Taken\n"); + *bBranchToDA = 1; + } + *CpuStepsUsed = 1+1 + +(DrumAddr % 2) // wait for even + + ((*bBranchToDA) ? 1:0); // one extra step needed if branch taken + break; + case OP_BRNZ: // Branch on Non-Zero + sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\n", + printfa, + OV); + if ((ACC[1] != 0) || (ACC[0] != 0)) { + sim_debug(DEBUG_DETAIL, &cpu_dev, "ACC not Zero -> Branch Taken\n"); + *bBranchToDA = 1; + } + *CpuStepsUsed = 1 + +((DrumAddr+1) % 2) // wait for odd + + ((*bBranchToDA) ? 1:0); // one extra step needed if branch taken + break; + case OP_BRMIN: // Branch on Minus + sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\n", + printfa, + OV); + if (AccNegative) { + sim_debug(DEBUG_DETAIL, &cpu_dev, "ACC is Negative -> Branch Taken\n"); + *bBranchToDA = 1; + } + *CpuStepsUsed = 1+1 + + ((*bBranchToDA) ? 1:0); // one extra step needed if branch taken + break; + case OP_BROV: // Branch on Overflow + sim_debug(DEBUG_DETAIL, &cpu_dev, "... Check OV: %d\n", OV); + if (OV) { + sim_debug(DEBUG_DETAIL, &cpu_dev, "OV Set -> Branch Taken\n"); + *bBranchToDA = 1; + } + *CpuStepsUsed = 1+1 + + ((*bBranchToDA) ? 1:0); // one extra step needed if branch taken + break; + // Card I/O + case OP_RD : // Read a card + AR = (DA / 50) * 50 + 1; // Read Band is XX01 to XX10 or XX51 to XX60 + { + uint32 r; + int i; + char s[6]; + + r = cdr_cmd(&cdr_unit[1], IO_RDS,AR); + if (r == SCPE_NOCARDS) { + reason = STOP_CARD; + break; + } + for (i=0;i<10;i++) { + sim_debug(DEBUG_DETAIL, &cpu_dev, "... Read Card %04d: %06d%04d%c '%s'\n", + AR+i, printfw(DRUM[AR+i],DRUM_NegativeZeroFlag[AR+i]), + word_to_ascii(s, 1, 5, DRUM[AR+i])); + } + if (cdr_unit[1].u5 & URCSTA_LOAD) { + sim_debug(DEBUG_DETAIL, &cpu_dev, "... Is a LOAD Card\n"); + *bBranchToDA = 1; // load card -> next inste is taken from DA + } + } + // 300 msec read cycle, 270 available for computing + *CpuStepsUsed = 312; // 30 msec / 0.096 msec word time; + break; + case OP_PCH : // Punch a card + AR = (DA / 50) * 50 + 27; // Read Band is XX27 to XX36 or XX77 to XX86 + { + uint32 r; + int i; + char s[6]; + + for (i=0;i<10;i++) { + sim_debug(DEBUG_DETAIL, &cpu_dev, "... Punch Card %04d: %06d%04d%c '%s'\n", + AR+i, printfw(DRUM[AR+i],DRUM_NegativeZeroFlag[AR+i]), + word_to_ascii(s, 1, 5, DRUM[AR+i])); + } + r = cdp_cmd(&cdp_unit[1], IO_WRS,AR); + if (r == SCPE_NOCARDS) { + reason = STOP_CARD; + break; + } + } + // 600 msec punch cycle, 565 available for computing + *CpuStepsUsed = 365; // 35 msec / 0.096 msec word time; + break; + default: + reason = STOP_UUO; + break; + } + if ((reason == 0) && (OV) && (CSWOverflowStop)) reason = STOP_OV; + + return reason; +} + t_stat sim_instr(void) { t_stat reason; - t_int64 d; - int n, i, sgn, r; - int opcode = 0; - int bReadData, bWriteDrum; + int opcode, halt_cpu; + int bReadData, bWriteDrum, bBranchToDA; int instr_count = 0; /* Number of instructions to execute */ const char * opname; /* points to opcode name */ - int PRNegZero; - int IA; // Instr Address: addr of next inst - int DA; // Data Address; addr of data to be used by current inst + int IA = 0; // Instr Address: addr of next inst + int DA = 0; // Data Address; addr of data to be used by current inst int DrumAddr; // address where drum is currently positioned (0-49) - int MachineCycle, bBranchTaken, CpuStepsRemaining, WaitForInterlock; + int MachineCycle, CpuStepsUsed, WaitForInterlock; + + #define IL_RD1 1 // interlock on drum area 01-10/51-60 used in reading with RD1 + #define IL_WR1 2 // interlock on drum area 27-36/77-86 used in writing for WR1 int InterLockCount[3]; // interlock counters - #define IL_RD1 1 // interlock on drum area 01-10/51-60 used in reading for cdr1 - #define IL_WR1 2 // interlock on drum area 27-36/77-86 used in writing for cdp1 + + /* How CPU execution is simulated + + A cpu instruction is executed in real hw in several steps. Some os these steps involves waiting for rotating + drum to be positioned on requested addres (register AR). Other steps can involve waiting a Interlock to be released. + The execution of a complete instruction is called a machine cycle + + User can select in real hw control panel to execute the instructions one by one. The execution is not done + on full instruction (a full cycle), but rather in instruction half-cycles: I-Cycle and D-Cycle. + During I-Cycle, the instruction is fetched from drum and decoded. During D-Cycle instruction is performed. + + The simulator models this using the concept of MachineCycles, that groups several steps on opcode execution + + SimH Real hw equivalent + machine cycle half cycle + 0 I-Cycle wait for drum to be positioned at address given by AR cpu register + 1 I-Cycle read the drum to PR register, + decode as opcode, DA, IA, + check if must wait for interlock + if decoded opcode reads data from drum set AR=DA + 2 D-Cycle wait for interlock if needed + wait for drum to be positioned at AR address if decoded opcode reads data from drum + 3 D-Cycle if decoded opcode reads data from drum, read the data in DIST + set interlock if needed + perform opcode operation + 4 D-Cycle wait opcode excution time + wait for drum to be positioned at AR addressif executed opcode writes data to drum + 5 D-Cycle if executed opcode writes data to drum, write DIST to drum + set AR=IA to read next instruction + + */ if (sim_step != 0) { instr_count = sim_step; sim_cancel_step(); } - reason = 0; + reason = halt_cpu = 0; - MachineCycle = CpuStepsRemaining = 0; - bReadData = bWriteDrum = 0; + MachineCycle = CpuStepsUsed = 0; DrumAddr = 0; WaitForInterlock = 0; InterLockCount[IL_RD1] = InterLockCount[IL_WR1] = 0; + sim_cancel (&cpu_unit); + sim_activate (&cpu_unit, 1); + while (reason == 0) { /* loop until halted */ if (sim_interval <= 0) { /* event queue? */ reason = sim_process_event(); + if (reason == SCPE_STOP) { + reason = 0; // if stop cpu requested, does not do it inmediatelly + halt_cpu = 1; // signal it so cpu is halted on end of current intr + } if (reason != SCPE_OK) { break; /* process */ } @@ -359,28 +894,44 @@ sim_instr(void) sim_interval -= 1; /* count down */ // simulate the rotating drum: incr current drum position - DrumAddr = ++DrumAddr % 50; - // if any interlock set, make it expire + DrumAddr = (DrumAddr+1) % 50; + // if any interlock set, decrease it if (InterLockCount[IL_RD1]) InterLockCount[IL_RD1]--; if (InterLockCount[IL_WR1]) InterLockCount[IL_WR1]--; + + // simulates the machine working on half cycles + if ((HalfCycle == 1) && (MachineCycle == 2)) { // if I-Half finished, about to exec D-Half + HalfCycle = 2; // bump half cycle to exec D-Half on next scp step + reason = SCPE_STEP; // then break beacuse I-Half finished + break; + } + if ((HalfCycle == 2) && (MachineCycle == 0)) { // if D-Half should start + HalfCycle = 1; // bump half cycle to exec I-Half on next scp step + instr_count = 1; // break at the end of D-half execution + MachineCycle = 3; + } + if (MachineCycle == 0) { /* Only check for break points during actual fetch */ if (sim_brk_summ && sim_brk_test(IC, SWMASK('E'))) { reason = STOP_IBKPT; break; } + // only check for ^E on fetch + if (halt_cpu) { + reason = SCPE_STOP; + break; + } // should wait for drum to fetch inst? if ((AR >= 0) && (AR < (int)MEMSIZE)) { if ((AR % 50) != DrumAddr) continue; // yes } - CpuStepsRemaining = 0; // init inst execution - bReadData = bWriteDrum = 0; + CpuStepsUsed = 0; // init inst execution MachineCycle = 1; // decode instr } if (MachineCycle == 2) { // should wait for cpu to exec the inst? - if (--CpuStepsRemaining > 0) continue; // yes - CpuStepsRemaining = 0; + if (CpuStepsUsed > 0) {CpuStepsUsed--; continue;} // yes // should wait for interlock release? if (WaitForInterlock) { if (InterLockCount[WaitForInterlock]) continue; // yes @@ -393,40 +944,36 @@ sim_instr(void) MachineCycle = 3; // exec instr } if (MachineCycle == 4) { // should wait for cpu to exec the inst? - if (--CpuStepsRemaining > 0) continue; // yes - CpuStepsRemaining = 0; + if (CpuStepsUsed > 0) {CpuStepsUsed--; continue;} // yes // should wait for drum to store data? if ((bWriteDrum) && (AR >= 0) && (AR < (int)MEMSIZE)) { if ((AR % 50) != DrumAddr) continue; // yes } MachineCycle = 5; // terminate the instr execution } - // here, MachineCicly is either 1 (decode), 3 (exec), 5 (exec2) + // here, MachineCycle is either 1 (decode), 3 (exec-read), 5 (exec-write) if (MachineCycle == 1) { // fetch current intruction from mem, save current instr addr in IC IC = AR; - if (0==ReadAddr(AR, &PR, &PRNegZero)) { + if (0==ReadAddr(AR, &PR, NULL)) { reason = STOP_ADDR; - goto end_of_while; + goto end_of_cycle; } // decode inst - d = PR; - opcode = Shift_Digits(&d, 2); // current inste opcode - DA = Shift_Digits(&d, 4); // addr of data used by current instr - IA = Shift_Digits(&d, 4); // addr of next instr - opname = get_opcode_data(opcode, &bReadData); + opname = DecodeOpcode(&opcode, &DA, &IA, &bReadData); + sim_debug(DEBUG_CMD, &cpu_dev, "Exec %04d: %02d %-6s %04d %04d %s%s\n", + IC, opcode, (opname == NULL) ? "???":opname, DA, IA, + (DRUM_Symbolic_Buffer[AR * 80] == 0) ? "" : " symb: ", + &DRUM_Symbolic_Buffer[AR * 80]); if (opname == NULL) { - reason = STOP_UUO; // unknown opcode - goto end_of_while; + reason = STOP_UUO; + goto end_of_cycle; } - sim_debug(DEBUG_CMD, &cpu_dev, "Exec %04d: %02d %-6s %04d %04d\r\n", IC, opcode, opname, DA, IA); - if ((opcode == OP_NOOP) && (IC == 0) && (IA == 0)) { - // if loop on NOOP on addr zero -> machine idle -> stop cpu - reason = STOP_HALT; - goto end_of_while; - } + AR = DA; // allways trasnfer DA to AR even if drum will be not read. This is why + // all opcodes must have a valid DA address even if not used to read drum (eg SRT 0003 to shift) + // check if opcode should wait for and already set interlock if ((opcode == OP_RD) && (InterLockCount[IL_RD1])) { WaitForInterlock = IL_RD1; @@ -436,504 +983,71 @@ sim_instr(void) WaitForInterlock = 0; } - AR = DA; - CpuStepsRemaining = 1; MachineCycle = 2; continue; } if (MachineCycle == 3) { + // decode again PR register to reload internal register DA, IA, AR again. Needed if we are executing half cycles + opname = DecodeOpcode(&opcode, &DA, &IA, &bReadData); + AR = DA; + if (opname == NULL) { + reason = STOP_UUO; + goto end_of_cycle; + } // fetch data from drum if needed if (bReadData) { - r = ReadAddr(AR, &DIST, &DistNegativeZeroFlag); - sim_debug(DEBUG_DATA, &cpu_dev, "... Read %04d: %06d%04d%c\r\n", - AR, printfd); - if (r==0) { + if (0==ReadAddr(AR, &DIST, &DistNegativeZeroFlag)) { + sim_debug(DEBUG_DATA, &cpu_dev, "... Read %04d: ???\n", + AR); reason = STOP_ADDR; - goto end_of_while; + goto end_of_cycle; + } else { + sim_debug(DEBUG_DATA, &cpu_dev, "... Read %04d: %06d%04d%c\n", + AR, printfd); } } else { if (0==IsDrumAddrOk(AR)) { // even if no data is fetched from drum, DA addr must be a valid one - sim_debug(DEBUG_DETAIL, &cpu_dev, "Invalid AR addr %d ERROR\r\n", AR); + sim_debug(DEBUG_DETAIL, &cpu_dev, "Invalid AR addr %d ERROR\n", AR); reason = STOP_ADDR; - goto end_of_while; + goto end_of_cycle; } } - bWriteDrum = 0; // set to 1 by opcode if it is necessary to write dist back to drum - bBranchTaken = 0; // flag if branch is taken - switch(opcode) { - case OP_NOOP : // No operation - break; - case OP_STOP : // Stop if console switch is set to stop, otherwise continue as a NO-OP - if (CSWProgStop) { - reason = STOP_PROG; - goto end_of_while; - } - break; - // arithmetic - case OP_RAL: // Reset and Add into Lower - case OP_RSL: // Reset and Subtract into Lower - case OP_RAABL: // Reset and Add Absolute into Lower - case OP_RSABL: // Reset and Subtract Absolute into Lower - d = DIST; - if ((opcode == OP_RAABL) || (opcode == OP_RSABL)) d = AbsWord(d); - if ((opcode == OP_RSL) || (opcode == OP_RSABL)) d = -d; - OV = 0; AccNegativeZeroFlag = 0; - ACC[1] = 0; - ACC[0] = d; - sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\r\n", - printfa, - OV); - // sequence chart for Add/Substract - // (1) (0..49) (1) (0/1) (2) (0/2) (1) - // Enable Search Data to Wait Dist to Complement Remove A - // Dist Data dist for even Acc Neg Sum interlock - // (1) (1) (1) (0..49) - // Restart IA to AR Enable PR Search next - // Signal Inst - CpuStepsRemaining = 1+1+2+1; - if ((DrumAddr % 2) != 0) CpuStepsRemaining++; // using lower acc -> wait for even - // no need to complement neg sum - break; - case OP_AL: // Add to Lower - case OP_SL: // Subtract from Lower - case OP_AABL: // Add Absolute to lower - case OP_SABL: // Subtract Absolute from lower - if ((opcode == OP_AL) && (ACC[1] == 0) && (ACC[0] == 0) && (AccNegativeZeroFlag) && - (DIST == 0) && (DistNegativeZeroFlag)) { - // special case as stated in Operation manual 22(22-6060-2_650_OperMan.pdf), page 95 - // Acc result on minus zero if acc contains minus zero and AU or AL with a drum - // location that contains minus zero - OV=0; - sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: 0000000000 0000000000- (Minus Zero), OV: 0\r\n"); - // acc keeps the minus zero it already has - break; - } - d = DIST; - if ((opcode == OP_AABL) || (opcode == OP_SABL)) d = AbsWord(d); - if ((opcode == OP_SL) || (opcode == OP_SABL)) d = -d; - AddToAcc(0,d); - sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\r\n", - printfa, - OV); - CpuStepsRemaining = 1+1+2+1; - if ((DrumAddr % 2) != 0) CpuStepsRemaining++; // using lower acc -> wait for even - if (bAccNegComplement) CpuStepsRemaining += 2; // acc sign change -> need to complement neg sum - break; - case OP_RAU: // Reset and Add into Upper - case OP_RSU: // Reset and Subtract into Upper - case OP_AU: // Add to Upper - case OP_SU: // Substract from Upper - if ((opcode == OP_AU) && (ACC[1] == 0) && (ACC[0] == 0) && (AccNegativeZeroFlag) && - (DIST == 0) && (DistNegativeZeroFlag)) { - // special case as stated in Operation manual 22(22-6060-2_650_OperMan.pdf), page 95 - // Acc result on minus zero if acc contains minus zero and AU or AL with a drum - // location that contains minus zero - OV=0; - sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: 0000000000 0000000000- (Minus Zero), OV: 0\r\n"); - // acc keeps the minus zero it already has - break; - } - d = DIST; - if ((opcode == OP_RAU) || (opcode == OP_RSU)) ACC[1] = ACC[0] = 0; - if ((opcode == OP_SU) || (opcode == OP_RSU)) d = -d; - AddToAcc(d,0); - sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\r\n", - printfa, - OV); - CpuStepsRemaining = 1+1+2+1; - if ((DrumAddr % 2) == 0) CpuStepsRemaining++; // using upper acc -> wait for odd - if (bAccNegComplement) CpuStepsRemaining += 2; // acc sign change -> need to complement neg sum - break; - // Multiply/divide - case OP_MULT: // Multiply - if ((ACC[1] == 0) && (ACC[0] == 1) && (DIST == 0) && (DistNegativeZeroFlag)) { - // special case as stated in Operation manual 22(22-6060-2_650_OperMan.pdf), page 95 - // Acc result on minus zero if a drum location that contains minus zero - // is multiplied by +1 - OV = 0; - sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: 0000000000 0000000000- (Minus Zero), OV: 0\r\n"); - // acc set to minus zero - ACC[1] = ACC[0] = 0; - AccNegativeZeroFlag = 1; - break; - } - OV = 0; - sgn = (DIST < 0) ? -1:1; if (ACC[0] < 0) sgn = -sgn; - d = AbsWord(DIST); - ACC[0] = AbsWord(ACC[0]); - ACC[1] = AbsWord(ACC[1]); - for(i=0;i<10;i++) { - n = ShiftAcc(1); - while (n-- > 0) { - AddToAcc(0, d); - if (OV) {i=10; break;} - } - } - if (sgn < 0) { - ACC[0] = -ACC[0]; - ACC[1] = -ACC[1]; - } - sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\r\n", - printfa, - OV); - // sequence chart for Multiply/Divide - // (1) (0..49) (1) (0/1) (20..200) (1) - // Enable Search Data to Wait Mult/Div Remove A - // Dist Data dist for even loop interlock - // (1) (1) (1) (0..49) - // Restart IA to AR Enable PR Search next - // Signal Inst - CpuStepsRemaining = 1+1+1+1; - if ((DrumAddr % 2) != 0) CpuStepsRemaining++; // wait for even - if (i < 0) i=0; if (i>9) i=9; // i holds the number of loops done - CpuStepsRemaining += 20*(i+1); - break; - case OP_DIV: // Divide - case OP_DIVRU: // Divide and reset upper accumulator - if (DIST == 0) { - OV = 1; - sim_debug(DEBUG_DETAIL, &cpu_dev, "Divide By Zero -> OV set \r\n"); - } else if (AbsWord(DIST) <= AbsWord(ACC[1])) { - OV = 1; - sim_debug(DEBUG_DETAIL, &cpu_dev, "Quotient Overflow -> OV set and ERROR\r\n"); - reason = STOP_OV; // quotient overfow allways stops the machine - } else { - OV = 0; - sgn = (DIST < 0) ? -1:1; if (ACC[0] < 0) sgn = -sgn; - d = AbsWord(DIST); - ACC[0] = AbsWord(ACC[0]); - ACC[1] = AbsWord(ACC[1]); - for(i=0;i<10;i++) { - ShiftAcc(1); - while (d <= ACC[1]) { - AddToAcc(-d, 0); - ACC[0]++; - } - } - if (sgn < 0) { - ACC[0] = -ACC[0]; - ACC[1] = -ACC[1]; - } - if (opcode == OP_DIVRU) { - ACC[1] = 0; - } - CpuStepsRemaining = 1+1+1+1; - if ((DrumAddr % 2) != 0) CpuStepsRemaining++; // wait for even - // i holds the number of loops done - if (i < 0) i=0; if (i>9) i=9; - CpuStepsRemaining += 20*(i+1) + 40; - } - sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\r\n", - printfa, - OV); - break; - // shift - case OP_SLT: // Shift Left - case OP_SRT: // Shift Right - case OP_SRD: // Shift Right and Round - n = AR % 10; // number of digits to shift - d = 0; - while (n-- > 0) { - d = ShiftAcc((opcode == OP_SLT) ? 1:-1); - } - if (opcode == OP_SRD) { - if (d <= - 5) AddToAcc(0,-1); - if (d >= 5) AddToAcc(0,+1); - OV = 0; - } - sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\r\n", - printfa, - OV); - // sequence chart for shift - // (1) (0/1) (2) (1) - // Enable Wait Per Remove A - // Sh count for even shift interlock - // (0/1) (1) (1) (0..49) - // Restart IA to AR Enable PR Search next - // Signal Inst - CpuStepsRemaining = 1+1+1; - if ((DrumAddr % 2) != 0) CpuStepsRemaining++; // wait for even - n = AR % 10; // number of shifts done - if (n > 0) CpuStepsRemaining += 2*n; - if (opcode == OP_SRD) CpuStepsRemaining++; - break; - case OP_SCT : // Shift accumulator left and count - n = 10 - AR % 10; // shift count (nine's complement of unit digit of DA) - if (n==10) n=0; - if (ACC[1] == 0) { - // upper acc is zero -> will have 10 or more shifts - ACC[1] = ACC[0]; - ACC[0] = 10; - if (n) { - OV = 1; // overflow because n <> 0 - } else { - if (Get_HiDigit(ACC[1]) == 0) OV = 1; // overflow because not just 10 shifts - } - } else if (Get_HiDigit(ACC[1]) != 0) { - // no shift will be done - ACC[0] = SetIA2(ACC[0], 0); // replace last two digits by 00 - } else { - while (Get_HiDigit(ACC[1]) == 0) { - ShiftAcc(1); // shift left - if (n==10) { - OV = 1; - break; - } - n++; - } - ACC[0] = SetIA2(ACC[0], n); // replace last two digits by 00 - } - AccNegativeZeroFlag = 0; - sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\r\n", - printfa, - OV); - CpuStepsRemaining = 1+1+1; - if ((DrumAddr % 2) != 0) CpuStepsRemaining++; // wait for even - n = AR % 10; // number of shifts done - if (n > 0) CpuStepsRemaining += 2*n; - if (opcode == OP_SRD) CpuStepsRemaining++; - break; - // load and store - case OP_STL: // Store Lower in Mem - case OP_STU: // Store Upper in Mem - if ((ACC[0] == 0) && (ACC[0] == 0) && (AccNegativeZeroFlag)) { - DistNegativeZeroFlag = 1; - } else { - DistNegativeZeroFlag = 0; - } - DIST = (opcode == OP_STU) ? ACC[1] : ACC[0]; - // sequence chart for store - // (1) (0/1) (1) (0..49) (1) (1) (1) - // Enable Wait L/U acc Search Store IA to AR Enable PR - // Dist for even to dist data data - // or odd - CpuStepsRemaining = 1+1+1+1+1; - if ((DrumAddr % 2) == ( (opcode == OP_STU) ? 0:1)) CpuStepsRemaining++; // wait for odd/even - bWriteDrum = 1; // to write DIST in drum at AR - break; - case OP_STD: // store distributor - CpuStepsRemaining = 1+1+1+1; - bWriteDrum = 1; // to write DIST in drum at AR - break; - case OP_STDA: // Store Lower Data Address - n = ((ACC[0] / D4) % D4); // get data addr xxDDDDxxxx from lower Acc - d = SetDA(DIST, n); // replace it in distributor - if ((d == 0) && ((DIST < 0) || ( (DIST == 0) && (DistNegativeZeroFlag) ))) { - // if dist results in zero but was negative or negative zero before replacing digits - // then it is set to minus zero - DistNegativeZeroFlag = 1; - } else { - DistNegativeZeroFlag = 0; - } - DIST = d; - CpuStepsRemaining = 1+1+1+1; - if ((DrumAddr % 2) == 0) CpuStepsRemaining++; // wait for even - bWriteDrum = 1; // to write DIST in drum at AR - break; - case OP_STIA: // Store Lower Instruction Address - n = (ACC[0] % D4); // get inst addr xxyyyyAAAA - d = SetIA(DIST, n); // replace it in distributor - if ((d == 0) && ((DIST < 0) || ( (DIST == 0) && (DistNegativeZeroFlag) ))) { - // if dist results in zero but was negative or negative zero before replacing digits - // then it is set to minus zero - DistNegativeZeroFlag = 1; - } else { - DistNegativeZeroFlag = 0; - } - DIST = d; - CpuStepsRemaining = 1+1+1+1; - if ((DrumAddr % 2) == 0) CpuStepsRemaining++; // wait for even - bWriteDrum = 1; // to write DIST in drum at AR - break; - case OP_LD: // Load Distributor - CpuStepsRemaining = 1+1+1+1; - break; - case OP_TLU : // Table lookup - sim_debug(DEBUG_DATA, &cpu_dev, "... Search DIST: %06d%04d%c\r\n", - printfd); - AR = (DA / 50) * 50; // set AR to start of band based on DA - AR--; n=-1; - while (1) { - int dNegZero; - AR++; n++; - if (0==IsDrumAddrOk(AR)) { - sim_debug(DEBUG_DETAIL, &cpu_dev, "Invalid AR addr %d ERROR\r\n", AR); - reason = STOP_ADDR; - goto end_of_while; - } - if ((AR % 50) > 47) continue; // skip addr 48 & 49 of band that cannot be used for tables - if (0==ReadAddr(AR, &d, &dNegZero)) { // read table argument - reason = STOP_ADDR; - goto end_of_while; - } - if (AbsWord(d) >= AbsWord(DIST)) break; // found - } - // set the result as xxNNNNxxxx in lower acc - ACC[0] = SetDA(ACC[0], DA+n); - sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\r\n", - printfa, - OV); - CpuStepsRemaining = 1+1+1+1+1+1; - if ((DrumAddr % 2) == 0) CpuStepsRemaining++; // wait for even - CpuStepsRemaining += n; // number of reads to find the argument searched for - break; - // branch - case OP_BRD1: case OP_BRD2: case OP_BRD3: case OP_BRD4: case OP_BRD5: // Branch on 8 in distributor positions 1-10 - case OP_BRD6: case OP_BRD7: case OP_BRD8: case OP_BRD9: case OP_BRD10: - sim_debug(DEBUG_DATA, &cpu_dev, "... Check DIST: %06d%04d%c\r\n", - printfd); - d = DIST; - n = opcode - OP_BRD10; if (n == 0) n = 10; - while (--n > 0) d = d / 10; - d = d % 10; - if (d == 8) { - IA = AR; // IA (next instr addr) will be taken from AR. Branch taken - sim_debug(DEBUG_DETAIL, &cpu_dev, "Digit is %d -> Branch Taken\r\n", (int32) d); - bBranchTaken = 1; - } else if (d == 9) { - // IA kept as already set. Branch not taken - sim_debug(DEBUG_DETAIL, &cpu_dev, "Digit is %d -> Branch Not Taken\r\n", (int32) d); - } else { - // any other value for tested digit -> stop - sim_debug(DEBUG_DETAIL, &cpu_dev, "Digit is %d -> Branch ERROR\r\n", (int32) d); - reason = STOP_ERRO; - } - CpuStepsRemaining = 1+1; - if (bBranchTaken) CpuStepsRemaining++; - break; - case OP_BRNZU: // Branch on Non-Zero in Upper - sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\r\n", - printfa, - OV); - if (ACC[1] != 0) { - sim_debug(DEBUG_DETAIL, &cpu_dev, "Upper ACC not Zero -> Branch Taken\r\n"); - IA = AR; - bBranchTaken = 1; - } - CpuStepsRemaining = 1; - if (bBranchTaken) CpuStepsRemaining++; - if ((DrumAddr % 2) == 0) CpuStepsRemaining++; // wait for even - break; - case OP_BRNZ: // Branch on Non-Zero - sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\r\n", - printfa, - OV); - if ((ACC[1] != 0) || (ACC[0] != 0)) { - sim_debug(DEBUG_DETAIL, &cpu_dev, "ACC not Zero -> Branch Taken\r\n"); - IA = AR; - bBranchTaken = 1; - } - CpuStepsRemaining = 1; - if (bBranchTaken) CpuStepsRemaining++; - if ((DrumAddr % 2) != 0) CpuStepsRemaining++; // wait for odd - break; - case OP_BRMIN: // Branch on Minus - sim_debug(DEBUG_DETAIL, &cpu_dev, "... ACC: %06d%04d %06d%04d%c, OV: %d\r\n", - printfa, - OV); - if (AccNegative) { - sim_debug(DEBUG_DETAIL, &cpu_dev, "ACC is Negative -> Branch Taken\r\n"); - IA = AR; - bBranchTaken = 1; - } - CpuStepsRemaining = 1; - if (bBranchTaken) CpuStepsRemaining++; - break; - case OP_BROV: // Branch on Overflow - sim_debug(DEBUG_DETAIL, &cpu_dev, "... Check OV: %d\r\n", OV); - if (OV) { - sim_debug(DEBUG_DETAIL, &cpu_dev, "OV Set -> Branch Taken\r\n"); - IA = AR; - bBranchTaken = 1; - } - CpuStepsRemaining = 1; - if (bBranchTaken) CpuStepsRemaining++; - break; - // Card I/O - case OP_RD : // Read a card - AR = (DA / 50) * 50 + 1; // Read Band is XX01 to XX10 or XX51 to XX60 - { - uint32 r; - int i; - char s[6]; - - r = cdr_cmd(&cdr_unit[1], IO_RDS,AR); - if (r == SCPE_NOCARDS) { - //XXX SCPE_BUSY - reason = STOP_CARD; - goto end_of_while; - } - for (i=0;i<10;i++) { - sim_debug(DEBUG_DETAIL, &cpu_dev, "... Read Card %04d: %06d%04d%c '%s'\r\n", - AR+i, printfw(DRUM[AR+i],DRUM_NegativeZeroFlag[AR+i]), - word_to_ascii(s, 1, 5, DRUM[AR+i])); - } - if (cdr_unit[1].u5 & URCSTA_LOAD) { - sim_debug(DEBUG_DETAIL, &cpu_dev, "... Is a LOAD Card\r\n"); - IA = DA; // load card -> next inste is taken from DA - } - } - // 300 msec read cycle, 270 available for computing - CpuStepsRemaining = 312; // 30 msec / 0.096 msec word time; - // set interlock - InterLockCount[IL_RD1] = 3120; // 300 msec for read card processing - break; - case OP_PCH : // Punch a card - AR = (DA / 50) * 50 + 27; // Read Band is XX27 to XX36 or XX77 to XX86 - { - uint32 r; - int i; - char s[6]; - - for (i=0;i<10;i++) { - sim_debug(DEBUG_DETAIL, &cpu_dev, "... Punch Card %04d: %06d%04d%c '%s'\r\n", - AR+i, printfw(DRUM[AR+i],DRUM_NegativeZeroFlag[AR+i]), - word_to_ascii(s, 1, 5, DRUM[AR+i])); - } - r = cdp_cmd(&cdp_unit[1], IO_WRS,AR); - if (r == SCPE_NOCARDS) { - //XXX SCPE_BUSY - reason = STOP_CARD; - goto end_of_while; - } - } - // 600 msec punch cycle, 565 available for computing - CpuStepsRemaining = 365; // 35 msec / 0.096 msec word time; - // set interlock - InterLockCount[IL_WR1] = 6250; // 600 msec for punch card processing - break; - default: - reason = STOP_UUO; - break; - } - if (reason) goto end_of_while; - if ((OV) && (CSWOverflowStop)) { - reason = STOP_OV; - goto end_of_while; + // check if opcode should set interlock + if (opcode == OP_RD) { + InterLockCount[IL_RD1] = 3120; // 300 msec for read card processing + } else if ((opcode == OP_PCH) && (InterLockCount[IL_WR1])) { + InterLockCount[IL_WR1] = 6250; // 600 msec for punch card processing } + + reason = ExecOpcode(opcode, DA, + &bWriteDrum, &bBranchToDA, + DrumAddr, &CpuStepsUsed); + if (reason != 0) goto end_of_cycle; + + if (bBranchToDA) IA = DA; + MachineCycle = 4; - if (CpuStepsRemaining > 2) CpuStepsRemaining -= 2; // decrease by 2 as each inst passes at minimum two times by DrumAddr++ + if (CpuStepsUsed > 2) CpuStepsUsed -= 2; // decrease by 2 as each inst passes at minimum two times by DrumAddr incr continue; - } /* end of opcode switch */ + } if (MachineCycle == 5) { if (bWriteDrum) { - sim_debug(DEBUG_DATA, &cpu_dev, "... Write %04d: %06d%04d%c\r\n", + sim_debug(DEBUG_DATA, &cpu_dev, "... Write %04d: %06d%04d%c\n", AR, printfd); if (0==WriteDrum(AR, DIST, DistNegativeZeroFlag)) { reason = STOP_ADDR; - goto end_of_while; + goto end_of_cycle; } } - MachineCycle = 6; - continue; + // set AR to point to next instr + AR = IA; + // do not continue, just go on end_of_cycle } -end_of_while: - // set AR to point to next instr - AR = IA; +end_of_cycle: if (instr_count != 0 && --instr_count == 0) { if (reason == 0) { @@ -941,12 +1055,12 @@ end_of_while: // if cpu not stoped (just stepped) set IC so next inst to be executed is shown. // if cpu stopped because some error (reason != 0), does not advance IC so instr shown is offending one reason = SCPE_STEP; + break; } - return reason; } MachineCycle = 0; // ready to process to next instr - } /* end while */ + } /* end while */ // flush 407 printout if ((cdp_unit[0].flags & UNIT_ATT) && (cdp_unit[0].fileref)) { @@ -959,15 +1073,6 @@ end_of_while: } -/* Initialize memory to all plus zero */ -void -mem_init() { - int i; - for(i = 0; i < MAXMEMSIZE; i++) - DRUM[i] = DRUM_NegativeZeroFlag[i] = 0; -} - - /* Reset routine */ t_stat cpu_reset(DEVICE * dptr) @@ -1039,13 +1144,15 @@ cpu_set_size(UNIT * uptr, int32 val, CONST char *cptr, void *desc) if (v == 2) {v = 4000;} else v = 0; if ((v <= 0) || (v > MAXMEMSIZE)) return SCPE_ARG; - for (i = v-1; i < MEMSIZE; i++) { - if (DRUM[i] != 0) { + for (i = v; i < MEMSIZE; i++) { + if ((DRUM[i] != 0) || (DRUM_NegativeZeroFlag[i] != 0)) { mc = 1; break; } } - if ((mc != 0) && (!get_yn("Really truncate memory [N]?", FALSE))) + for (i=0;i + + allowed operations are split, join, print + + default format for card files is AUTO, this allow to intermix source decks + with different formats. To set the format for carddeck operations use + + set cpr0 -format xxxx + + this will apply to all operations, both on reading and writing deck files + + carddeck split split the deck being punched in IBM 533 device in two separate destination decks + + carddeck split + + should be cdp1 to cdp3. File must be attached. The cards punched on + this file are the ones on source deck to split. + + if instead of cdp1, cdp2 or cdp3, a file can be specified containing + the source deck to be splitted + + number of cards in each splitted deck. + If count >= 0, indicates the cards on first destination deck file + remaining cards go to the second destination deck + If count < 0, indicates the cards on second destination deck file + (so deck 2 contains lasts count cards from source) + + first destination deck file + second destination deck file + + when using as source both or can have same name as the currently + attached file to cdp device. On command execution, cdp gest its file detached. + file1 and file are created (overwritten if already exists). + + when using as source both or can have same name as . + is completly read by SimH in its internal buffer (room for 10K cards) + and then splitted to and . + + carddeck join join several deck files into a new one + + carddeck join ... as + + first source deck file + second source deck file + ... + destination deck file + + any source file , , etc can have same name as destination file . + Each source file is completly read in turn by SimH in its internal buffer (room for 10K cards) + and then written on destination file. This allos to append une deck on the top/end of + another one. + + carddeck print print deck on console, and on simulated IBM 407 is any file is attached to cpd0 + + carddeck print + + switches: if present mut be just after carddeck and before deck operation + -Q quiet return status. + +*/ + +// max number of cards in deck for cadrdeck internal command +#define MAX_CARDS_IN_DECK 10000 + +// load card file fn and add its cards to +// DeckImage array, up to a max of nMaxCards +// increment nCards with the number of added cards +// uses cdr0 device/unit +t_stat deck_load(CONST char *fn, uint16 * DeckImage, int * nCards) +{ + UNIT * uptr = &cdr_unit[0]; + struct _card_data *data; + t_stat r; + int i, convert_to_ascii; + uint16 c; + + if (*nCards < 0) { + *nCards = 0; + convert_to_ascii = 1; + } else { + convert_to_ascii = 0; + } + + // set flags for read only + uptr->flags |= UNIT_RO; + + // attach file to cdr unit 0 + r = (cdr_dev.attach)(uptr, fn); + if (r != SCPE_OK) return r; + + // read all cards from file + while (1) { + if (*nCards >= MAX_CARDS_IN_DECK) { + r = sim_messagef (SCPE_IERR, "Too many cards\n"); + break; + } + r = sim_read_card(uptr); + if (r == SCPE_EOF) { + r = SCPE_OK; break; // normal termination on card file read finished + } else if (r != SCPE_OK) break; // abnormal termination on error + data = (struct _card_data *)uptr->up7; + // add card read to deck + for (i=0; i<80; i++) { + c = data->image[i]; + if (convert_to_ascii) c = data->hol_to_ascii[c]; + DeckImage[*nCards * 80 + i] = c; + } + *nCards = *nCards + 1; + } + + // deattach file from cdr unit 0 + r = (cdr_dev.detach)(uptr); + if (r != SCPE_OK) return r; + + return SCPE_OK; +} + +// write nCards starting at card from DeckImage array to file fn +// uses cdr0 device/unit +t_stat deck_save(CONST char *fn, uint16 * DeckImage, int card, int nCards) +{ + UNIT * uptr = &cdr_unit[0]; + struct _card_data *data; + t_stat r; + int i,nc; + + // set flags for create new file + uptr->flags &= ~UNIT_RO; + sim_switches |= SWMASK ('N'); + + // attach file to cdr unit 0 + r = (cdr_dev.attach)(uptr, fn); + if (r != SCPE_OK) return r; + + // write cards to file + for (nc=0;nc= MAX_CARDS_IN_DECK) { + r = sim_messagef (SCPE_IERR, "Reading outside of Deck\n"); + break; + } + + data = (struct _card_data *)uptr->up7; + // read card from deck + for (i=0; i<80; i++) data->image[i] = DeckImage[(nc + card) * 80 + i]; + + r = sim_punch_card(uptr, NULL); + if (r != SCPE_OK) break; // abnormal termination on error + } + + // deattach file from cdr unit 0 + (cdr_dev.detach)(uptr); + + return r; +} + +// carddeck split +static t_stat deck_split_cmd(CONST char *cptr) +{ + char fn0[4*CBUFSIZE]; + char fn1[4*CBUFSIZE]; + char fn2[4*CBUFSIZE]; + + char gbuf[4*CBUFSIZE]; + DEVICE *dptr; + UNIT *uptr; + t_stat r; + + uint16 DeckImage[80 * MAX_CARDS_IN_DECK]; + int nCards, nCards1, tail; + + while (sim_isspace (*cptr)) cptr++; // trim leading spc + if (*cptr == '-') { + tail = 1; + cptr++; + } else { + tail = 0; + } + cptr = get_glyph (cptr, gbuf, 0); // get cards count param + nCards1 = (int32) get_uint (gbuf, 10, 10000, &r); + if (r != SCPE_OK) return sim_messagef (SCPE_ARG, "Invalid count value\n"); + + cptr = get_glyph (cptr, gbuf, 0); // get dev|file0 param + if ((strlen(gbuf) != 4) || (strncmp(gbuf, "CDP", 3)) || + (gbuf[3] < '1') || (gbuf[3] > '3') ) { + // is a file + strcpy(fn0, gbuf); + } else { + // is cpd1 cpd2 or cpd3 device + dptr = find_unit (gbuf, &uptr); /* locate unit */ + if (dptr == NULL) /* found dev? */ + return SCPE_NXDEV; + if (uptr == NULL) /* valid unit? */ + return SCPE_NXUN; + if ((uptr->flags & UNIT_ATT) == 0) /* attached? */ + return SCPE_NOTATT; + strcpy(fn0, uptr->filename); + sim_card_detach(uptr); // detach file from cdp device to be splitted + } + + // read source deck + nCards = 0; + r = deck_load(fn0, DeckImage, &nCards); + if (r != SCPE_OK) return sim_messagef (r, "Cannot read source deck (%s)\n", fn0); + + // calc nCards1 = cards in first deck + if (tail) { + // calc cards remaining when last nCardCount are removed from source deck + nCards1 = nCards - nCards1; + if (nCards1 < 0) nCards1 = 0; + } + if (nCards1 > nCards) nCards1 = nCards; + + while (sim_isspace (*cptr)) cptr++; // trim leading spc + cptr = get_glyph_quoted (cptr, fn1, 0); // get next param: filename 1 + if (fn1[0] == 0) return sim_messagef (SCPE_ARG, "Missing first filename\n"); + while (sim_isspace (*cptr)) cptr++; // trim leading spc + cptr = get_glyph_quoted (cptr, fn2, 0); // get next param: filename 2 + if (fn2[0] == 0) return sim_messagef (SCPE_ARG, "Missing second filename\n"); + + r = deck_save(fn1, DeckImage, 0, nCards1); + if (r != SCPE_OK) return sim_messagef (r, "Cannot write destination deck1 (%s)\n", fn0); + + r = deck_save(fn2, DeckImage, nCards1, nCards-nCards1); + if (r != SCPE_OK) return sim_messagef (r, "Cannot write destination deck2 (%s)\n", fn0); + + if ((sim_switches & SWMASK ('Q')) == 0) { + sim_messagef (SCPE_OK, "Deck splitted to %d/%d cards\n", nCards1, nCards-nCards1); + } + return SCPE_OK; + +} + +// carddeck join ... as +static t_stat deck_join_cmd(CONST char *cptr) +{ + char fnSrc[4*CBUFSIZE]; + char fnDest[4*CBUFSIZE]; + CONST char *cptr0; + CONST char *cptrAS; + char gbuf[4*CBUFSIZE]; + t_stat r; + + uint16 DeckImage[80 * MAX_CARDS_IN_DECK]; + int i,nDeck, nCards, nCards1; + + cptr0 = cptr; + // look for "as" + while (*cptr) { + while (sim_isspace (*cptr)) cptr++; // trim leading spc + cptrAS = cptr; // mark position of AS + cptr = get_glyph_quoted (cptr, gbuf, 0); // get next param + if (gbuf[0] == 0) return sim_messagef (SCPE_ARG, "AS not found\n"); + for (i=0;i<2;i++) gbuf[i] = sim_toupper(gbuf[i]); + if (strcmp(gbuf, "AS") == 0) break; + } + + while (sim_isspace (*cptr)) cptr++; // trim leading spc + cptr = get_glyph_quoted (cptr, fnDest, 0); // get next param: destination filename + if (fnDest[0] == 0) return sim_messagef (SCPE_ARG, "Missing destination filename\n"); + if (*cptr) return sim_messagef (SCPE_ARG, "Extra unknown parameters after destination filename\n"); + + cptr = cptr0; // restore cptr to scan source filenames + nDeck = nCards = 0; + while (1) { + + while (sim_isspace (*cptr)) cptr++; // trim leading spc + if (cptrAS == cptr) break; // break if reach "AS" + cptr = get_glyph_quoted (cptr, fnSrc, 0); // get next param: source filename + if (fnSrc[0] == 0) return sim_messagef (SCPE_ARG, "Missing source filename\n"); + + // read source deck + nCards1 = nCards; + r = deck_load(fnSrc, DeckImage, &nCards); + if (r != SCPE_OK) return sim_messagef (r, "Cannot read source deck (%s)\n", fnSrc); + nDeck++; + + if ((sim_switches & SWMASK ('Q')) == 0) { + sim_messagef (SCPE_OK, "Source Deck %d has %d cards (%s)\n", nDeck, nCards - nCards1, fnSrc); + } + } + r = deck_save(fnDest, DeckImage, 0, nCards); + if (r != SCPE_OK) return sim_messagef (r, "Cannot write destination deck (%s)\n", fnDest); + + if ((sim_switches & SWMASK ('Q')) == 0) { + sim_messagef (SCPE_OK, "Destination Deck has %d cards (%s)\n", nCards, fnDest); + } + + return SCPE_OK; +} + +// carddeck print +static t_stat deck_print_cmd(CONST char *cptr) +{ + char fn[4*CBUFSIZE]; + char line[81]; + t_stat r; + + uint16 DeckImage[80 * MAX_CARDS_IN_DECK]; + int i,c,nc,nCards; + + while (sim_isspace (*cptr)) cptr++; // trim leading spc + cptr = get_glyph_quoted (cptr, fn, 0); // get next param: source filename + if (fn[0] == 0) return sim_messagef (SCPE_ARG, "Missing filename\n"); + if (*cptr) return sim_messagef (SCPE_ARG, "Extra unknown parameters after filename\n"); + + // read deck to be printed (-1 to convert to ascii value, not hol) + nCards = -1; + r = deck_load(fn, DeckImage, &nCards); + if (r != SCPE_OK) return sim_messagef (r, "Cannot read deck to print (%s)\n", fn); + + for (nc=0; nc nul +carddeck -q join is_main_src.txt as deck_in.dck :add_extra_decks if "%1" == "" goto run -set env deck="void" -if -i "%1" == "TR" set env deck="is_trace_src.txt" -if -i "%1" == "LBOX" set env deck="is_set_loopbox.txt" -if %deck == "void" goto next_extra +if -i "%1" == "TR" carddeck -q join deck_in.dck is_main_src.txt as deck_in.dck +if -i "%1" == "LBOX" carddeck -q join deck_in.dck is_set_loopbox.txt as deck_in.dck -! copy deck_in.dck a.dck > nul -! copy a.dck + %deck deck_in.dck > nul -! del a.dck > nul - -:next_extra shift goto add_extra_decks :run @@ -75,20 +68,20 @@ goto add_extra_decks att cdr1 deck_in.dck set cdr1 wiring=is -; execute the loader to create Interpretive system deck +; Execute the loader to read prepared is source deck echo *** -echo *** run system loader +echo *** Run system loader to read prepared is source deck echo *** d ar 0880 go -; generate a 1-word load card deck with whole interpretive system, ready to run +; Generate a 1-word load card deck with interpretive system, ready to run echo *** -echo *** run is system generation to create -echo interpretive system (is) 1-word per card load deck +echo *** Run system generation to punch +echo *** interpretive system main deck (1-word per card) echo *** att cdp1 -n -q is.dck diff --git a/I650/sw/Build_soap_from_source.ini b/I650/sw/Build_soap_from_source.ini index 24d409c9..b331b25d 100644 --- a/I650/sw/Build_soap_from_source.ini +++ b/I650/sw/Build_soap_from_source.ini @@ -9,9 +9,9 @@ set cpu 2k set cdr1 wiring=soap -; prepare deck: SOAP (condensed deck as 7 word per card format) then SOAP source code to assemblre +; prepare deck: SOAP (condensed deck as 7 word per card format) then SOAP source code to assemble -! copy soapII_condensed_card.dck + soap_src.txt deck_in.dck > nul +carddeck -q join soapII_condensed_card.dck soap_src.txt as deck_in.dck att cdr1 deck_in.dck att cdp1 -n -q deck_out.dck diff --git a/I650/sw/is.dck b/I650/sw/is.dck index 9b4d3472..cefa50d5 100644 --- a/I650/sw/is.dck +++ b/I650/sw/is.dck @@ -1,1100 +1,1100 @@ -6I1954195C000000000A240900800?651653130H000000000?000000000?000000000?000000000? -6I1954195C000000000B240901800?010000090A000000000?000000000?000000000?000000000? -6I1954195C000000000C240902800?651958126C000000000?000000000?000000000?000000000? -6I1954195C000000000D240903800?300008122A000000000?000000000?000000000?000000000? -6I1954195C000000000E240904800?000000094C000000000?000000000?000000000?000000000? -6I1954195C000000000F240905800?651959131C000000000?000000000?000000000?000000000? -6I1954195C000000000G240906800?300008117E000000000?000000000?000000000?000000000? -6I1954195C000000000H240907800?000000095G000000000?000000000?000000000?000000000? -6I1954195C000000000I240908800?651951145E000000000?000000000?000000000?000000000? -6I1954195C000000001?240909800?000000101C000000000?000000000?000000000?000000000? -6I1954195C000000001A240910800?151519127C000000000?000000000?000000000?000000000? -6I1954195C000000001B240911800?151519127C000000000?000000000?000000000?000000000? -6I1954195C000000001C240912800?651986119A000000000?000000000?000000000?000000000? -6I1954195C000000001D240913800?691016096I000000000?000000000?000000000?000000000? -6I1954195C000000001E240914800?000000800C000000000?000000000?000000000?000000000? -6I1954195C000000001F240915800?201519132B000000000?000000000?000000000?000000000? -6I1954195C000000001G240916800?651986119A000000000?000000000?000000000?000000000? -6I1954195C000000001H240917800?651959091E000000000?000000000?000000000?000000000? -6I1954195C000000001I240918800?691371117D000000000?000000000?000000000?000000000? -6I1954195C000000002?240919800?691372127E000000000?000000000?000000000?000000000? -6I1954195C000000002A240920800?651223091E000000000?000000000?000000000?000000000? -6I1954195C000000002B240921800?651986119A000000000?000000000?000000000?000000000? -6I1954195C000000002C240922800?651986119A000000000?000000000?000000000?000000000? -6I1954195C000000002D240923800?201872162H000000000?000000000?000000000?000000000? -6I1954195C000000002E240924800?601585183I000000000?000000000?000000000?000000000? -6I1954195C000000002F240925800?651957093A000000000?000000000?000000000?000000000? -6I1954195C000000002G240926800?691780117D000000000?000000000?000000000?000000000? -6I1954195C000000002H240927800?691830127E000000000?000000000?000000000?000000000? -6I1954195C000000002I240928800?651223093A000000000?000000000?000000000?000000000? -6I1954195C000000003?240929800?651682180A000000000?000000000?000000000?000000000? -6I1954195C000000003A240930800?601585183I000000000?000000000?000000000?000000000? -6I1954195C000000003B240931800?691784175?000000000?000000000?000000000?000000000? -6I1954195C000000003C240932800?601585183I000000000?000000000?000000000?000000000? -6I1954195C000000003D240933800?201872192G000000000?000000000?000000000?000000000? -6I1954195C000000003E240934800?101688174C000000000?000000000?000000000?000000000? -6I1954195C000000003F240935800?691738144B000000000?000000000?000000000?000000000? -6I1954195C000000003G240936800?601585183I000000000?000000000?000000000?000000000? -6I1954195C000000003H240937800?201492095B000000000?000000000?000000000?000000000? -6I1954195C000000003I240938800?601542139H000000000?000000000?000000000?000000000? -6I1954195C000000004?240939800?201793169F000000000?000000000?000000000?000000000? -6I1954195C000000004A240940800?601542139H000000000?000000000?000000000?000000000? -6I1954195C000000004B240941800?651958094D000000000?000000000?000000000?000000000? -6I1954195C000000004C240942800?691645117D000000000?000000000?000000000?000000000? -6I1954195C000000004D240943800?691646127E000000000?000000000?000000000?000000000? -6I1954195C000000004E240944800?691448175?000000000?000000000?000000000?000000000? -6I1954195C000000004F240945800?601542139H000000000?000000000?000000000?000000000? -6I1954195C000000004G240946800?651223094D000000000?000000000?000000000?000000000? -6I1954195C000000004H240947800?651882180A000000000?000000000?000000000?000000000? -6I1954195C000000004I240948800?601542139H000000000?000000000?000000000?000000000? -6I1954195C000000005?240949800?691828182F000000000?000000000?000000000?000000000? -6I1954195C000000005A240950800?210992095A000000000?000000000?000000000?000000000? -6I1954195C000000005B240951800?440952098G000000000?000000000?000000000?000000000? -6I1954195C000000005C240952800?461315095C000000000?000000000?000000000?000000000? -6I1954195C000000005D240953800?350008095D000000000?000000000?000000000?000000000? -6I1954195C000000005E240954800?110990095E000000000?000000000?000000000?000000000? -6I1954195C000000005F240955800?440956096B000000000?000000000?000000000?000000000? -6I1954195C000000005G240956800?110991095G000000000?000000000?000000000?000000000? -6I1954195C000000005H240957800?440958096A000000000?000000000?000000000?000000000? -6I1954195C000000005I240958800?110991095I000000000?000000000?000000000?000000000? -6I1954195C000000006?240959800?441315096?000000000?000000000?000000000?000000000? -6I1954195C000000006A240960800?690969096C000000000?000000000?000000000?000000000? -6I1954195C000000006B240961800?690968096C000000000?000000000?000000000?000000000? -6I1954195C000000006C240962800?690967096C000000000?000000000?000000000?000000000? -6I1954195C000000006D240963800?240984096D000000000?000000000?000000000?000000000? -6I1954195C000000006E240964800?650992098D000000000?000000000?000000000?000000000? -6I1954195C000000006F240965800?300002096F000000000?000000000?000000000?000000000? -6I1954195C000000006G240966800?441120097D000000000?000000000?000000000?000000000? -6I1954195C000000006H240967800?350001098E000000000?000000000?000000000?000000000? -6I1954195C000000006I240968800?350002098E000000000?000000000?000000000?000000000? -6I1954195C000000007?240969800?350003098E000000000?000000000?000000000?000000000? -6I1954195C000000007A240970800?651045097A000000000?000000000?000000000?000000000? -6I1954195C000000007B240971800?450972098G000000000?000000000?000000000?000000000? -6I1954195C000000007C240972800?160998097C000000000?000000000?000000000?000000000? -6I1954195C000000007D240973800?450975097G000000000?000000000?000000000?000000000? -6I1954195C000000007E240974800?601045102G000000000?000000000?000000000?000000000? -6I1954195C000000007F240975800?160998097F000000000?000000000?000000000?000000000? -6I1954195C000000007G240976800?450979097H000000000?000000000?000000000?000000000? -6I1954195C000000007H240977800?690997098?000000000?000000000?000000000?000000000? -6I1954195C000000007I240978800?690996098?000000000?000000000?000000000?000000000? -6I1954195C000000008?240979800?690995098?000000000?000000000?000000000?000000000? -6I1954195C000000008A240980800?240993098A000000000?000000000?000000000?000000000? -6I1954195C000000008B240981800?651023098B000000000?000000000?000000000?000000000? -6I1954195C000000008C240982800?300003098C000000000?000000000?000000000?000000000? -6I1954195C000000008D240983800?150994800B000000000?000000000?000000000?000000000? -6I1954195C000000008E240984800?350003098E000000000?000000000?000000000?000000000? -6I1954195C000000008F240985800?168002098F000000000?000000000?000000000?000000000? -6I1954195C000000008G240986800?690993800A000000000?000000000?000000000?000000000? -6I1954195C000000008H240987800?211017109E000000000?000000000?000000000?000000000? -6I1954195C000000008I240988800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000009?240989800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000009A240990800?500000000?000000000?000000000?000000000?000000000? -6I1954195C000000009B240991800?010000000?000000000?000000000?000000000?000000000? -6I1954195C000000009C240992800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000009D240993800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000009E240994800?600000095?000000000?000000000?000000000?000000000? -6I1954195C000000009F240995800?000000098G000000000?000000000?000000000?000000000? -6I1954195C000000009G240996800?350003098G000000000?000000000?000000000?000000000? -6I1954195C000000009H240997800?350006098G000000000?000000000?000000000?000000000? -6I1954195C000000009I240998800?001000000?000000000?000000000?000000000?000000000? -6I1954195C000000010?240999800?601952140G000000000?000000000?000000000?000000000? -6I1954195C000000010A241000800?300003111I000000000?000000000?000000000?000000000? -6I1954195C000000010B241001800?300005106D000000000?000000000?000000000?000000000? -6I1954195C000000010C241002800?451109118F000000000?000000000?000000000?000000000? -6I1954195C000000010D241003800?101017109C000000000?000000000?000000000?000000000? -6I1954195C000000010E241004800?201260106H000000000?000000000?000000000?000000000? -6I1954195C000000010F241005800?658003116C000000000?000000000?000000000?000000000? -6I1954195C000000010G241006800?651023107I000000000?000000000?000000000?000000000? -6I1954195C000000010H241007800?661023107I000000000?000000000?000000000?000000000? -6I1954195C000000010I241008800?101017107D000000000?000000000?000000000?000000000? -6I1954195C000000011?241009800?555555555E000000000?000000000?000000000?000000000? -6I1954195C000000011A241010800?300004134C000000000?000000000?000000000?000000000? -6I1954195C000000011B241011800?300004118?000000000?000000000?000000000?000000000? -6I1954195C000000011C241012800?461095112?000000000?000000000?000000000?000000000? -6I1954195C000000011D241013800?300002102A000000000?000000000?000000000?000000000? -6I1954195C000000011E241014800?101024172I000000000?000000000?000000000?000000000? -6I1954195C000000011F241015800?461120106I000000000?000000000?000000000?000000000? -6I1954195C000000011G241016800?010000112?000000000?000000000?000000000?000000000? -6I1954195C000000011H241017800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000011I241018800?601951112F000000000?000000000?000000000?000000000? -6I1954195C000000012?241019800?201023102F000000000?000000000?000000000?000000000? -6I1954195C000000012A241020800?698002108A000000000?000000000?000000000?000000000? -6I1954195C000000012B241021800?678002102I000000000?000000000?000000000?000000000? -6I1954195C000000012C241022800?670000113G000000000?000000000?000000000?000000000? -6I1954195C000000012D241023800?555555555E000000000?000000000?000000000?000000000? -6I1954195C000000012E241024800?000001000?000000000?000000000?000000000?000000000? -6I1954195C000000012F241025800?101031109C000000000?000000000?000000000?000000000? -6I1954195C000000012G241026800?608003103C000000000?000000000?000000000?000000000? -6I1954195C000000012H241027800?300003103E000000000?000000000?000000000?000000000? -6I1954195C000000012I241028800?108001113F000000000?000000000?000000000?000000000? -6I1954195C000000013?241029800?300001103F000000000?000000000?000000000?000000000? -6I1954195C000000013A241030800?600000109F000000000?000000000?000000000?000000000? -6I1954195C000000013B241031800?000100000?000000000?000000000?000000000?000000000? -6I1954195C000000013C241032800?300003114D000000000?000000000?000000000?000000000? -6I1954195C000000013D241033800?300003104A000000000?000000000?000000000?000000000? -6I1954195C000000013E241034800?101037800C000000000?000000000?000000000?000000000? -6I1954195C000000013F241035800?101038104C000000000?000000000?000000000?000000000? -6I1954195C000000013G241036800?161045101B000000000?000000000?000000000?000000000? -6I1954195C000000013H241037800?651045100?000000000?000000000?000000000?000000000? -6I1954195C000000013I241038800?600000110G000000000?000000000?000000000?000000000? -6I1954195C000000014?241039800?000100100?000000000?000000000?000000000?000000000? -6I1954195C000000014A241040800?691145115A000000000?000000000?000000000?000000000? -6I1954195C000000014B241041800?201045104H000000000?000000000?000000000?000000000? -6I1954195C000000014C241042800?451364137G000000000?000000000?000000000?000000000? -6I1954195C000000014D241043800?211098800A000000000?000000000?000000000?000000000? -6I1954195C000000014E241044800?777777777G000000000?000000000?000000000?000000000? -6I1954195C000000014F241045800?555555555E000000000?000000000?000000000?000000000? -6I1954195C000000014G241046800?618003106A000000000?000000000?000000000?000000000? -6I1954195C000000014H241047800?000000100?000000000?000000000?000000000?000000000? -6I1954195C000000014I241048800?608003110E000000000?000000000?000000000?000000000? -6I1954195C000000015?241049800?350003105H000000000?000000000?000000000?000000000? -6I1954195C000000015A241050800?651103116C000000000?000000000?000000000?000000000? -6I1954195C000000015B241051800?461054115E000000000?000000000?000000000?000000000? -6I1954195C000000015C241052800?300003136B000000000?000000000?000000000?000000000? -6I1954195C000000015D241053800?658002131A000000000?000000000?000000000?000000000? -6I1954195C000000015E241054800?108001106B000000000?000000000?000000000?000000000? -6I1954195C000000015F241055800?000000000E000000000?000000000?000000000?000000000? -6I1954195C000000015G241056800?211268123A000000000?000000000?000000000?000000000? -6I1954195C000000015H241057800?101017102E000000000?000000000?000000000?000000000? -6I1954195C000000015I241058800?210000120C000000000?000000000?000000000?000000000? -6I1954195C000000016?241059800?151162800B000000000?000000000?000000000?000000000? -6I1954195C000000016A241060800?651023112I000000000?000000000?000000000?000000000? -6I1954195C000000016B241061800?300003101I000000000?000000000?000000000?000000000? -6I1954195C000000016C241062800?211017112?000000000?000000000?000000000?000000000? -6I1954195C000000016D241063800?441067107F000000000?000000000?000000000?000000000? -6I1954195C000000016E241064800?691017107A000000000?000000000?000000000?000000000? -6I1954195C000000016F241065800?600000144E000000000?000000000?000000000?000000000? -6I1954195C000000016G241066800?777777777G000000000?000000000?000000000?000000000? -6I1954195C000000016H241067800?101020800C000000000?000000000?000000000?000000000? -6I1954195C000000016I241068800?651045139I000000000?000000000?000000000?000000000? -6I1954195C000000017?241069800?608002102G000000000?000000000?000000000?000000000? -6I1954195C000000017A241070800?661023112I000000000?000000000?000000000?000000000? -6I1954195C000000017B241071800?300002107G000000000?000000000?000000000?000000000? -6I1954195C000000017C241072800?670000119H000000000?000000000?000000000?000000000? -6I1954195C000000017D241073800?600000128I000000000?000000000?000000000?000000000? -6I1954195C000000017E241074800?101031113E000000000?000000000?000000000?000000000? -6I1954195C000000017F241075800?300003113C000000000?000000000?000000000?000000000? -6I1954195C000000017G241076800?608001103D000000000?000000000?000000000?000000000? -6I1954195C000000017H241077800?108001113E000000000?000000000?000000000?000000000? -6I1954195C000000017I241078800?108001118E000000000?000000000?000000000?000000000? -6I1954195C000000018?241079800?300007100D000000000?000000000?000000000?000000000? -6I1954195C000000018A241080800?300000110H000000000?000000000?000000000?000000000? -6I1954195C000000018B241081800?651023123B000000000?000000000?000000000?000000000? -6I1954195C000000018C241082800?241289149B000000000?000000000?000000000?000000000? -6I1954195C000000018D241083800?241289154B000000000?000000000?000000000?000000000? -6I1954195C000000018E241084800?241289159B000000000?000000000?000000000?000000000? -6I1954195C000000018F241085800?241289164B000000000?000000000?000000000?000000000? -6I1954195C000000018G241086800?241289169B000000000?000000000?000000000?000000000? -6I1954195C000000018H241087800?691140119E000000000?000000000?000000000?000000000? -6I1954195C000000018I241088800?691341119E000000000?000000000?000000000?000000000? -6I1954195C000000019?241089800?691342119E000000000?000000000?000000000?000000000? -6I1954195C000000019A241090800?658002100B000000000?000000000?000000000?000000000? -6I1954195C000000019B241091800?747788001I000000000?000000000?000000000?000000000? -6I1954195C000000019C241092800?151045104I000000000?000000000?000000000?000000000? -6I1954195C000000019D241093800?118002105A000000000?000000000?000000000?000000000? -6I1954195C000000019E241094800?111952800B000000000?000000000?000000000?000000000? -6I1954195C000000019F241095800?601098101D000000000?000000000?000000000?000000000? -6I1954195C000000019G241096800?699999112?000000000?000000000?000000000?000000000? -6I1954195C000000019H241097800?151023132G000000000?000000000?000000000?000000000? -6I1954195C000000019I241098800?600000110G000000000?000000000?000000000?000000000? -6I1954195C000000020?241099800?461367115C000000000?000000000?000000000?000000000? -6I1954195C000000020A241100800?300001105G000000000?000000000?000000000?000000000? -6I1954195C000000020B241101800?300001100H000000000?000000000?000000000?000000000? -6I1954195C000000020C241102800?111255115I000000000?000000000?000000000?000000000? -6I1954195C000000020D241103800?000003000?000000000?000000000?000000000?000000000? -6I1954195C000000020E241104800?000006000?000000000?000000000?000000000?000000000? -6I1954195C000000020F241105800?300003106C000000000?000000000?000000000?000000000? -6I1954195C000000020G241106800?101260126G000000000?000000000?000000000?000000000? -6I1954195C000000020H241107800?461112106A000000000?000000000?000000000?000000000? -6I1954195C000000020I241108800?201265112B000000000?000000000?000000000?000000000? -6I1954195C000000021?241109800?300003171I000000000?000000000?000000000?000000000? -6I1954195C000000021A241110800?691017112A000000000?000000000?000000000?000000000? -6I1954195C000000021B241111800?691017117A000000000?000000000?000000000?000000000? -6I1954195C000000021C241112800?111017104F000000000?000000000?000000000?000000000? -6I1954195C000000021D241113800?201017109E000000000?000000000?000000000?000000000? -6I1954195C000000021E241114800?670000107E000000000?000000000?000000000?000000000? -6I1954195C000000021F241115800?161023113?000000000?000000000?000000000?000000000? -6I1954195C000000021G241116800?350000126G000000000?000000000?000000000?000000000? -6I1954195C000000021H241117800?350003112E000000000?000000000?000000000?000000000? -6I1954195C000000021I241118800?151023113?000000000?000000000?000000000?000000000? -6I1954195C000000022?241119800?151030800B000000000?000000000?000000000?000000000? -6I1954195C000000022A241120800?601023102G000000000?000000000?000000000?000000000? -6I1954195C000000022B241121800?300001102H000000000?000000000?000000000?000000000? -6I1954195C000000022C241122800?608003103B000000000?000000000?000000000?000000000? -6I1954195C000000022D241123800?600000134H000000000?000000000?000000000?000000000? -6I1954195C000000022E241124800?241278119D000000000?000000000?000000000?000000000? -6I1954195C000000022F241125800?608003118C000000000?000000000?000000000?000000000? -6I1954195C000000022G241126800?101038172I000000000?000000000?000000000?000000000? -6I1954195C000000022H241127800?300003104?000000000?000000000?000000000?000000000? -6I1954195C000000022I241128800?350003800C000000000?000000000?000000000?000000000? -6I1954195C000000023?241129800?300004100D000000000?000000000?000000000?000000000? -6I1954195C000000023A241130800?350003119F000000000?000000000?000000000?000000000? -6I1954195C000000023B241131800?608000144E000000000?000000000?000000000?000000000? -6I1954195C000000023C241132800?118001119?000000000?000000000?000000000?000000000? -6I1954195C000000023D241133800?608002109B000000000?000000000?000000000?000000000? -6I1954195C000000023E241134800?201291127B000000000?000000000?000000000?000000000? -6I1954195C000000023F241135800?101138109C000000000?000000000?000000000?000000000? -6I1954195C000000023G241136800?101039109C000000000?000000000?000000000?000000000? -6I1954195C000000023H241137800?608002144E000000000?000000000?000000000?000000000? -6I1954195C000000023I241138800?000000000A000000000?000000000?000000000?000000000? -6I1954195C000000024?241139800?000100100A000000000?000000000?000000000?000000000? -6I1954195C000000024A241140800?350001135I000000000?000000000?000000000?000000000? -6I1954195C000000024B241141800?827473001H000000000?000000000?000000000?000000000? -6I1954195C000000024C241142800?240000110B000000000?000000000?000000000?000000000? -6I1954195C000000024D241143800?191801126G000000000?000000000?000000000?000000000? -6I1954195C000000024E241144800?608003115H000000000?000000000?000000000?000000000? -6I1954195C000000024F241145800?210000120C000000000?000000000?000000000?000000000? -6I1954195C000000024G241146800?111852190G000000000?000000000?000000000?000000000? -6I1954195C000000024H241147800?350001175C000000000?000000000?000000000?000000000? -6I1954195C000000024I241148800?101853176?000000000?000000000?000000000?000000000? -6I1954195C000000025?241149800?101856176B000000000?000000000?000000000?000000000? -6I1954195C000000025A241150800?031622776F000000000?000000000?000000000?000000000? -6I1954195C000000025B241151800?221058116A000000000?000000000?000000000?000000000? -6I1954195C000000025C241152800?101255120I000000000?000000000?000000000?000000000? -6I1954195C000000025D241153800?108002131B000000000?000000000?000000000?000000000? -6I1954195C000000025E241154800?828875100F000000000?000000000?000000000?000000000? -6I1954195C000000025F241155800?168002111C000000000?000000000?000000000?000000000? -6I1954195C000000025G241156800?111260126G000000000?000000000?000000000?000000000? -6I1954195C000000025H241157800?691160116D000000000?000000000?000000000?000000000? -6I1954195C000000025I241158800?461115111H000000000?000000000?000000000?000000000? -6I1954195C000000026?241159800?441366109E000000000?000000000?000000000?000000000? -6I1954195C000000026A241160800?210000109E000000000?000000000?000000000?000000000? -6I1954195C000000026B241161800?151114800B000000000?000000000?000000000?000000000? -6I1954195C000000026C241162800?600000101F000000000?000000000?000000000?000000000? -6I1954195C000000026D241163800?691116126I000000000?000000000?000000000?000000000? -6I1954195C000000026E241164800?221267117?000000000?000000000?000000000?000000000? -6I1954195C000000026F241165800?601957126A000000000?000000000?000000000?000000000? -6I1954195C000000026G241166800?211277173F000000000?000000000?000000000?000000000? -6I1954195C000000026H241167800?174532934H000000000?000000000?000000000?000000000? -6I1954195C000000026I241168800?241272108A000000000?000000000?000000000?000000000? -6I1954195C000000027?241169800?151022800B000000000?000000000?000000000?000000000? -6I1954195C000000027A241170800?151073800B000000000?000000000?000000000?000000000? -6I1954195C000000027B241171800?300001107H000000000?000000000?000000000?000000000? -6I1954195C000000027C241172800?111325133F000000000?000000000?000000000?000000000? -6I1954195C000000027D241173800?651957141A000000000?000000000?000000000?000000000? -6I1954195C000000027E241174800?241278148F000000000?000000000?000000000?000000000? -6I1954195C000000027F241175800?241986134D000000000?000000000?000000000?000000000? -6I1954195C000000027G241176800?111283800C000000000?000000000?000000000?000000000? -6I1954195C000000027H241177800?691080118D000000000?000000000?000000000?000000000? -6I1954195C000000027I241178800?241017117E000000000?000000000?000000000?000000000? -6I1954195C000000028?241179800?158001800C000000000?000000000?000000000?000000000? -6I1954195C000000028A241180800?101138134C000000000?000000000?000000000?000000000? -6I1954195C000000028B241181800?608003123I000000000?000000000?000000000?000000000? -6I1954195C000000028C241182800?451236123G000000000?000000000?000000000?000000000? -6I1954195C000000028D241183800?300003139B000000000?000000000?000000000?000000000? -6I1954195C000000028E241184800?221289129B000000000?000000000?000000000?000000000? -6I1954195C000000028F241185800?101139109C000000000?000000000?000000000?000000000? -6I1954195C000000028G241186800?651045105B000000000?000000000?000000000?000000000? -6I1954195C000000028H241187800?350003109G000000000?000000000?000000000?000000000? -6I1954195C000000028I241188800?691953800C000000000?000000000?000000000?000000000? -6I1954195C000000029?241189800?300001100D000000000?000000000?000000000?000000000? -6I1954195C000000029A241190800?101045109I000000000?000000000?000000000?000000000? -6I1954195C000000029B241191800?151294124I000000000?000000000?000000000?000000000? -6I1954195C000000029C241192800?441246125G000000000?000000000?000000000?000000000? -6I1954195C000000029D241193800?111268137C000000000?000000000?000000000?000000000? -6I1954195C000000029E241194800?200000117H000000000?000000000?000000000?000000000? -6I1954195C000000029F241195800?241198105C000000000?000000000?000000000?000000000? -6I1954195C000000029G241196800?151265127D000000000?000000000?000000000?000000000? -6I1954195C000000029H241197800?211255117F000000000?000000000?000000000?000000000? -6I1954195C000000029I241198800?350000135I000000000?000000000?000000000?000000000? -6I1954195C000000030?241199800?451203109E000000000?000000000?000000000?000000000? -6I1954195C000000030A241200800?300003105I000000000?000000000?000000000?000000000? -6I1954195C000000030B241201800?101009101E000000000?000000000?000000000?000000000? -6I1954195C000000030C241202800?601009101C000000000?000000000?000000000?000000000? -6I1954195C000000030D241203800?601023102G000000000?000000000?000000000?000000000? -6I1954195C000000030E241204800?651023112G000000000?000000000?000000000?000000000? -6I1954195C000000030F241205800?651023112H000000000?000000000?000000000?000000000? -6I1954195C000000030G241206800?461670121A000000000?000000000?000000000?000000000? -6I1954195C000000030H241207800?151310800B000000000?000000000?000000000?000000000? -6I1954195C000000030I241208800?350001121E000000000?000000000?000000000?000000000? -6I1954195C000000031?241209800?168002121G000000000?000000000?000000000?000000000? -6I1954195C000000031A241210800?168002122H000000000?000000000?000000000?000000000? -6I1954195C000000031B241211800?300002121H000000000?000000000?000000000?000000000? -6I1954195C000000031C241212800?191270122?000000000?000000000?000000000?000000000? -6I1954195C000000031D241213800?350002122A000000000?000000000?000000000?000000000? -6I1954195C000000031E241214800?151219800B000000000?000000000?000000000?000000000? -6I1954195C000000031F241215800?101419122D000000000?000000000?000000000?000000000? -6I1954195C000000031G241216800?161270122E000000000?000000000?000000000?000000000? -6I1954195C000000031H241217800?241270122G000000000?000000000?000000000?000000000? -6I1954195C000000031I241218800?441223144E000000000?000000000?000000000?000000000? -6I1954195C000000032?241219800?600000120F000000000?000000000?000000000?000000000? -6I1954195C000000032A241220800?310000124C000000000?000000000?000000000?000000000? -6I1954195C000000032B241221800?101278144E000000000?000000000?000000000?000000000? -6I1954195C000000032C241222800?191278120H000000000?000000000?000000000?000000000? -6I1954195C000000032D241223800?201278118A000000000?000000000?000000000?000000000? -6I1954195C000000032E241224800?668003194C000000000?000000000?000000000?000000000? -6I1954195C000000032F241225800?300001118B000000000?000000000?000000000?000000000? -6I1954195C000000032G241226800?310002124C000000000?000000000?000000000?000000000? -6I1954195C000000032H241227800?648001123H000000000?000000000?000000000?000000000? -6I1954195C000000032I241228800?198001124D000000000?000000000?000000000?000000000? -6I1954195C000000033?241229800?601234125A000000000?000000000?000000000?000000000? -6I1954195C000000033A241230800?608002144E000000000?000000000?000000000?000000000? -6I1954195C000000033B241231800?151188109D000000000?000000000?000000000?000000000? -6I1954195C000000033C241232800?101045136A000000000?000000000?000000000?000000000? -6I1954195C000000033D241233800?608002119B000000000?000000000?000000000?000000000? -6I1954195C000000033E241234800?000000002B000000000?000000000?000000000?000000000? -6I1954195C000000033F241235800?101240124E000000000?000000000?000000000?000000000? -6I1954195C000000033G241236800?658001119A000000000?000000000?000000000?000000000? -6I1954195C000000033H241237800?601055122B000000000?000000000?000000000?000000000? -6I1954195C000000033I241238800?201294121F000000000?000000000?000000000?000000000? -6I1954195C000000034?241239800?350001124H000000000?000000000?000000000?000000000? -6I1954195C000000034A241240800?000000000A000000000?000000000?000000000?000000000? -6I1954195C000000034B241241800?211277173F000000000?000000000?000000000?000000000? -6I1954195C000000034C241242800?701951134D000000000?000000000?000000000?000000000? -6I1954195C000000034D241243800?608002121C000000000?000000000?000000000?000000000? -6I1954195C000000034E241244800?300001115B000000000?000000000?000000000?000000000? -6I1954195C000000034F241245800?300001115B000000000?000000000?000000000?000000000? -6I1954195C000000034G241246800?601150121B000000000?000000000?000000000?000000000? -6I1954195C000000034H241247800?651250140H000000000?000000000?000000000?000000000? -6I1954195C000000034I241248800?211255122I000000000?000000000?000000000?000000000? -6I1954195C000000035?241249800?101055121?000000000?000000000?000000000?000000000? -6I1954195C000000035A241250800?888888888H000000000?000000000?000000000?000000000? -6I1954195C000000035B241251800?191255123E000000000?000000000?000000000?000000000? -6I1954195C000000035C241252800?888888888H000000000?000000000?000000000?000000000? -6I1954195C000000035D241253800?350007152H000000000?000000000?000000000?000000000? -6I1954195C000000035E241254800?101658141F000000000?000000000?000000000?000000000? -6I1954195C000000035F241255800?888888888H000000000?000000000?000000000?000000000? -6I1954195C000000035G241256800?201272157E000000000?000000000?000000000?000000000? -6I1954195C000000035H241257800?651270122F000000000?000000000?000000000?000000000? -6I1954195C000000035I241258800?168001156C000000000?000000000?000000000?000000000? -6I1954195C000000036?241259800?658003171G000000000?000000000?000000000?000000000? -6I1954195C000000036A241260800?300000178A000000000?000000000?000000000?000000000? -6I1954195C000000036B241261800?350002129C000000000?000000000?000000000?000000000? -6I1954195C000000036C241262800?461266174H000000000?000000000?000000000?000000000? -6I1954195C000000036D241263800?118002172E000000000?000000000?000000000?000000000? -6I1954195C000000036E241264800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000036F241265800?888888888H000000000?000000000?000000000?000000000? -6I1954195C000000036G241266800?108001127A000000000?000000000?000000000?000000000? -6I1954195C000000036H241267800?100000128E000000000?000000000?000000000?000000000? -6I1954195C000000036I241268800?888888888H000000000?000000000?000000000?000000000? -6I1954195C000000037?241269800?221274117G000000000?000000000?000000000?000000000? -6I1954195C000000037A241270800?888888888H000000000?000000000?000000000?000000000? -6I1954195C000000037B241271800?461676163D000000000?000000000?000000000?000000000? -6I1954195C000000037C241272800?211977198I000000000?000000000?000000000?000000000? -6I1954195C000000037D241273800?441677162H000000000?000000000?000000000?000000000? -6I1954195C000000037E241274800?350000126G000000000?000000000?000000000?000000000? -6I1954195C000000037F241275800?300001173D000000000?000000000?000000000?000000000? -6I1954195C000000037G241276800?461393138?000000000?000000000?000000000?000000000? -6I1954195C000000037H241277800?888888888H000000000?000000000?000000000?000000000? -6I1954195C000000037I241278800?601285139?000000000?000000000?000000000?000000000? -6I1954195C000000038?241279800?441383128D000000000?000000000?000000000?000000000? -6I1954195C000000038A241280800?111684138I000000000?000000000?000000000?000000000? -6I1954195C000000038B241281800?000000000A000000000?000000000?000000000?000000000? -6I1954195C000000038C241282800?691635168H000000000?000000000?000000000?000000000? -6I1954195C000000038D241283800?008003126D000000000?000000000?000000000?000000000? -6I1954195C000000038E241284800?310002139E000000000?000000000?000000000?000000000? -6I1954195C000000038F241285800?008003000?000000000?000000000?000000000?000000000? -6I1954195C000000038G241286800?111690144E000000000?000000000?000000000?000000000? -6I1954195C000000038H241287800?101690144E000000000?000000000?000000000?000000000? -6I1954195C000000038I241288800?608001174D000000000?000000000?000000000?000000000? -6I1954195C000000039?241289800?300000110H000000000?000000000?000000000?000000000? -6I1954195C000000039A241290800?191250137A000000000?000000000?000000000?000000000? -6I1954195C000000039B241291800?888888888H000000000?000000000?000000000?000000000? -6I1954195C000000039C241292800?651045134I000000000?000000000?000000000?000000000? -6I1954195C000000039D241293800?000000171F000000000?000000000?000000000?000000000? -6I1954195C000000039E241294800?888888888H000000000?000000000?000000000?000000000? -6I1954195C000000039F241295800?451298174I000000000?000000000?000000000?000000000? -6I1954195C000000039G241296800?191250136H000000000?000000000?000000000?000000000? -6I1954195C000000039H241297800?888888888H000000000?000000000?000000000?000000000? -6I1954195C000000039I241298800?461569167D000000000?000000000?000000000?000000000? -6I1954195C000000040?241299800?441253155D000000000?000000000?000000000?000000000? -6I1954195C000000040A241300800?300003121D000000000?000000000?000000000?000000000? -6I1954195C000000040B241301800?691514146G000000000?000000000?000000000?000000000? -6I1954195C000000040C241302800?691807181H000000000?000000000?000000000?000000000? -6I1954195C000000040D241303800?691256161D000000000?000000000?000000000?000000000? -6I1954195C000000040E241304800?691707166D000000000?000000000?000000000?000000000? -6I1954195C000000040F241305800?691758176A000000000?000000000?000000000?000000000? -6I1954195C000000040G241306800?777777777G000000000?000000000?000000000?000000000? -6I1954195C000000040H241307800?777777777G000000000?000000000?000000000?000000000? -6I1954195C000000040I241308800?777777777G000000000?000000000?000000000?000000000? -6I1954195C000000041?241309800?777777777G000000000?000000000?000000000?000000000? -6I1954195C000000041A241310800?610000147C000000000?000000000?000000000?000000000? -6I1954195C000000041B241311800?300003136I000000000?000000000?000000000?000000000? -6I1954195C000000041C241312800?300003132B000000000?000000000?000000000?000000000? -6I1954195C000000041D241313800?221267137?000000000?000000000?000000000?000000000? -6I1954195C000000041E241314800?777777777G000000000?000000000?000000000?000000000? -6I1954195C000000041F241315800?692222109E000000000?000000000?000000000?000000000? -6I1954195C000000041G241316800?608003153I000000000?000000000?000000000?000000000? -6I1954195C000000041H241317800?777777777G000000000?000000000?000000000?000000000? -6I1954195C000000041I241318800?601285139?000000000?000000000?000000000?000000000? -6I1954195C000000042?241319800?151024113D000000000?000000000?000000000?000000000? -6I1954195C000000042A241320800?151024133E000000000?000000000?000000000?000000000? -6I1954195C000000042B241321800?101024117I000000000?000000000?000000000?000000000? -6I1954195C000000042C241322800?101325133?000000000?000000000?000000000?000000000? -6I1954195C000000042D241323800?777777777G000000000?000000000?000000000?000000000? -6I1954195C000000042E241324800?240000132?000000000?000000000?000000000?000000000? -6I1954195C000000042F241325800?690000800B000000000?000000000?000000000?000000000? -6I1954195C000000042G241326800?111951136E000000000?000000000?000000000?000000000? -6I1954195C000000042H241327800?441315113B000000000?000000000?000000000?000000000? -6I1954195C000000042I241328800?668002134?000000000?000000000?000000000?000000000? -6I1954195C000000043?241329800?201283118G000000000?000000000?000000000?000000000? -6I1954195C000000043A241330800?161283138H000000000?000000000?000000000?000000000? -6I1954195C000000043B241331800?691434153G000000000?000000000?000000000?000000000? -6I1954195C000000043C241332800?608003168I000000000?000000000?000000000?000000000? -6I1954195C000000043D241333800?601242112D000000000?000000000?000000000?000000000? -6I1954195C000000043E241334800?101337142C000000000?000000000?000000000?000000000? -6I1954195C000000043F241335800?108001119C000000000?000000000?000000000?000000000? -6I1954195C000000043G241336800?161142119G000000000?000000000?000000000?000000000? -6I1954195C000000043H241337800?777777777G000000000?000000000?000000000?000000000? -6I1954195C000000043I241338800?658002144E000000000?000000000?000000000?000000000? -6I1954195C000000044?241339800?108001800B000000000?000000000?000000000?000000000? -6I1954195C000000044A241340800?111045136C000000000?000000000?000000000?000000000? -6I1954195C000000044B241341800?350004135I000000000?000000000?000000000?000000000? -6I1954195C000000044C241342800?350007135I000000000?000000000?000000000?000000000? -6I1954195C000000044D241343800?101047100C000000000?000000000?000000000?000000000? -6I1954195C000000044E241344800?601952104B000000000?000000000?000000000?000000000? -6I1954195C000000044F241345800?241061101H000000000?000000000?000000000?000000000? -6I1954195C000000044G241346800?601277158D000000000?000000000?000000000?000000000? -6I1954195C000000044H241347800?111952137B000000000?000000000?000000000?000000000? -6I1954195C000000044I241348800?461156110F000000000?000000000?000000000?000000000? -6I1954195C000000045?241349800?300003115G000000000?000000000?000000000?000000000? -6I1954195C000000045A241350800?300003116I000000000?000000000?000000000?000000000? -6I1954195C000000045B241351800?691464146G000000000?000000000?000000000?000000000? -6I1954195C000000045C241352800?691815181H000000000?000000000?000000000?000000000? -6I1954195C000000045D241353800?691384173I000000000?000000000?000000000?000000000? -6I1954195C000000045E241354800?691385173I000000000?000000000?000000000?000000000? -6I1954195C000000045F241355800?691908176A000000000?000000000?000000000?000000000? -6I1954195C000000045G241356800?777777777G000000000?000000000?000000000?000000000? -6I1954195C000000045H241357800?691360131C000000000?000000000?000000000?000000000? -6I1954195C000000045I241358800?200796090?000000000?000000000?000000000?000000000? -6I1954195C000000046?241359800?658002111G000000000?000000000?000000000?000000000? -6I1954195C000000046A241360800?210000109E000000000?000000000?000000000?000000000? -6I1954195C000000046B241361800?300003131I000000000?000000000?000000000?000000000? -6I1954195C000000046C241362800?151065800B000000000?000000000?000000000?000000000? -6I1954195C000000046D241363800?300003117B000000000?000000000?000000000?000000000? -6I1954195C000000046E241364800?101324168F000000000?000000000?000000000?000000000? -6I1954195C000000046F241365800?441315173C000000000?000000000?000000000?000000000? -6I1954195C000000046G241366800?108001132A000000000?000000000?000000000?000000000? -6I1954195C000000046H241367800?101023132H000000000?000000000?000000000?000000000? -6I1954195C000000046I241368800?608003172H000000000?000000000?000000000?000000000? -6I1954195C000000047?241369800?151072800B000000000?000000000?000000000?000000000? -6I1954195C000000047A241370800?151123800B000000000?000000000?000000000?000000000? -6I1954195C000000047B241371800?608003128?000000000?000000000?000000000?000000000? -6I1954195C000000047C241372800?111277138B000000000?000000000?000000000?000000000? -6I1954195C000000047D241373800?441339127H000000000?000000000?000000000?000000000? -6I1954195C000000047E241374800?693333133H000000000?000000000?000000000?000000000? -6I1954195C000000047F241375800?010000171E000000000?000000000?000000000?000000000? -6I1954195C000000047G241376800?241985139G000000000?000000000?000000000?000000000? -6I1954195C000000047H241377800?691959137F000000000?000000000?000000000?000000000? -6I1954195C000000047I241378800?777777777G000000000?000000000?000000000?000000000? -6I1954195C000000048?241379800?608002173G000000000?000000000?000000000?000000000? -6I1954195C000000048A241380800?601865128C000000000?000000000?000000000?000000000? -6I1954195C000000048B241381800?777777777G000000000?000000000?000000000?000000000? -6I1954195C000000048C241382800?461315174?000000000?000000000?000000000?000000000? -6I1954195C000000048D241383800?310003172B000000000?000000000?000000000?000000000? -6I1954195C000000048E241384800?210000130C000000000?000000000?000000000?000000000? -6I1954195C000000048F241385800?210000130D000000000?000000000?000000000?000000000? -6I1954195C000000048G241386800?651789164C000000000?000000000?000000000?000000000? -6I1954195C000000048H241387800?111490129F000000000?000000000?000000000?000000000? -6I1954195C000000048I241388800?151142119G000000000?000000000?000000000?000000000? -6I1954195C000000049?241389800?191250127E000000000?000000000?000000000?000000000? -6I1954195C000000049A241390800?441346109E000000000?000000000?000000000?000000000? -6I1954195C000000049B241391800?777777777G000000000?000000000?000000000?000000000? -6I1954195C000000049C241392800?161045119I000000000?000000000?000000000?000000000? -6I1954195C000000049D241393800?696666133H000000000?000000000?000000000?000000000? -6I1954195C000000049E241394800?101398172F000000000?000000000?000000000?000000000? -6I1954195C000000049F241395800?350001137I000000000?000000000?000000000?000000000? -6I1954195C000000049G241396800?777777777G000000000?000000000?000000000?000000000? -6I1954195C000000049H241397800?691976134E000000000?000000000?000000000?000000000? -6I1954195C000000049I241398800?157079631H000000000?000000000?000000000?000000000? -6I1954195C000000050?241399800?300003135G000000000?000000000?000000000?000000000? -6I1954195C000000050A241400800?691318117D000000000?000000000?000000000?000000000? -6I1954195C000000050B241401800?010000113A000000000?000000000?000000000?000000000? -6I1954195C000000050C241402800?608003155I000000000?000000000?000000000?000000000? -6I1954195C000000050D241403800?360000152A000000000?000000000?000000000?000000000? -6I1954195C000000050E241404800?211009141D000000000?000000000?000000000?000000000? -6I1954195C000000050F241405800?300002141A000000000?000000000?000000000?000000000? -6I1954195C000000050G241406800?151409800B000000000?000000000?000000000?000000000? -6I1954195C000000050H241407800?350002166C000000000?000000000?000000000?000000000? -6I1954195C000000050I241408800?151272142I000000000?000000000?000000000?000000000? -6I1954195C000000051?241409800?600000144F000000000?000000000?000000000?000000000? -6I1954195C000000051A241410800?691964116H000000000?000000000?000000000?000000000? -6I1954195C000000051B241411800?201265146H000000000?000000000?000000000?000000000? -6I1954195C000000051C241412800?691272163I000000000?000000000?000000000?000000000? -6I1954195C000000051D241413800?158001142I000000000?000000000?000000000?000000000? -6I1954195C000000051E241414800?651023142G000000000?000000000?000000000?000000000? -6I1954195C000000051F241415800?451418146I000000000?000000000?000000000?000000000? -6I1954195C000000051G241416800?191270144H000000000?000000000?000000000?000000000? -6I1954195C000000051H241417800?461420142A000000000?000000000?000000000?000000000? -6I1954195C000000051I241418800?461422142C000000000?000000000?000000000?000000000? -6I1954195C000000052?241419800?000000002E000000000?000000000?000000000?000000000? -6I1954195C000000052A241420800?691424147G000000000?000000000?000000000?000000000? -6I1954195C000000052B241421800?691524147G000000000?000000000?000000000?000000000? -6I1954195C000000052C241422800?608001144E000000000?000000000?000000000?000000000? -6I1954195C000000052D241423800?601278144E000000000?000000000?000000000?000000000? -6I1954195C000000052E241424800?211285143H000000000?000000000?000000000?000000000? -6I1954195C000000052F241425800?241485148H000000000?000000000?000000000?000000000? -6I1954195C000000052G241426800?191252171H000000000?000000000?000000000?000000000? -6I1954195C000000052H241427800?451430109E000000000?000000000?000000000?000000000? -6I1954195C000000052I241428800?441431163B000000000?000000000?000000000?000000000? -6I1954195C000000053?241429800?350002143E000000000?000000000?000000000?000000000? -6I1954195C000000053A241430800?300003143I000000000?000000000?000000000?000000000? -6I1954195C000000053B241431800?601434167E000000000?000000000?000000000?000000000? -6I1954195C000000053C241432800?691250163I000000000?000000000?000000000?000000000? -6I1954195C000000053D241433800?310000141C000000000?000000000?000000000?000000000? -6I1954195C000000053E241434800?100000005?000000000?000000000?000000000?000000000? -6I1954195C000000053F241435800?441489144?000000000?000000000?000000000?000000000? -6I1954195C000000053G241436800?221639144B000000000?000000000?000000000?000000000? -6I1954195C000000053H241437800?678003149E000000000?000000000?000000000?000000000? -6I1954195C000000053I241438800?601665152B000000000?000000000?000000000?000000000? -6I1954195C000000054?241439800?151443144G000000000?000000000?000000000?000000000? -6I1954195C000000054A241440800?451494144E000000000?000000000?000000000?000000000? -6I1954195C000000054B241441800?600000155C000000000?000000000?000000000?000000000? -6I1954195C000000054C241442800?451697124G000000000?000000000?000000000?000000000? -6I1954195C000000054D241443800?240000109E000000000?000000000?000000000?000000000? -6I1954195C000000054E241444800?490000000?000000000?000000000?000000000?000000000? -6I1954195C000000054F241445800?210000140D000000000?000000000?000000000?000000000? -6I1954195C000000054G241446800?210000140E000000000?000000000?000000000?000000000? -6I1954195C000000054H241447800?690000800B000000000?000000000?000000000?000000000? -6I1954195C000000054I241448800?608003160H000000000?000000000?000000000?000000000? -6I1954195C000000055?241449800?300003145G000000000?000000000?000000000?000000000? -6I1954195C000000055A241450800?651961131A000000000?000000000?000000000?000000000? -6I1954195C000000055B241451800?211606160I000000000?000000000?000000000?000000000? -6I1954195C000000055C241452800?000404099H000000000?000000000?000000000?000000000? -6I1954195C000000055D241453800?601009096E000000000?000000000?000000000?000000000? -6I1954195C000000055E241454800?000000109E000000000?000000000?000000000?000000000? -6I1954195C000000055F241455800?151561800B000000000?000000000?000000000?000000000? -6I1954195C000000055G241456800?010000000?000000000?000000000?000000000?000000000? -6I1954195C000000055H241457800?151460800B000000000?000000000?000000000?000000000? -6I1954195C000000055I241458800?441462151B000000000?000000000?000000000?000000000? -6I1954195C000000056?241459800?211264141G000000000?000000000?000000000?000000000? -6I1954195C000000056A241460800?600000147C000000000?000000000?000000000?000000000? -6I1954195C000000056B241461800?181265147A000000000?000000000?000000000?000000000? -6I1954195C000000056C241462800?461615139C000000000?000000000?000000000?000000000? -6I1954195C000000056D241463800?115129277F000000000?000000000?000000000?000000000? -6I1954195C000000056E241464800?221495150B000000000?000000000?000000000?000000000? -6I1954195C000000056F241465800?201270147D000000000?000000000?000000000?000000000? -6I1954195C000000056G241466800?191270169D000000000?000000000?000000000?000000000? -6I1954195C000000056H241467800?300003142E000000000?000000000?000000000?000000000? -6I1954195C000000056I241468800?211272147E000000000?000000000?000000000?000000000? -6I1954195C000000057?241469800?461472162C000000000?000000000?000000000?000000000? -6I1954195C000000057A241470800?350001142H000000000?000000000?000000000?000000000? -6I1954195C000000057B241471800?350002157G000000000?000000000?000000000?000000000? -6I1954195C000000057C241472800?651250141B000000000?000000000?000000000?000000000? -6I1954195C000000057D241473800?211278148C000000000?000000000?000000000?000000000? -6I1954195C000000057E241474800?211278168A000000000?000000000?000000000?000000000? -6I1954195C000000057F241475800?601278158C000000000?000000000?000000000?000000000? -6I1954195C000000057G241476800?101886174A000000000?000000000?000000000?000000000? -6I1954195C000000057H241477800?241480163C000000000?000000000?000000000?000000000? -6I1954195C000000057I241478800?691481148E000000000?000000000?000000000?000000000? -6I1954195C000000058?241479800?608003148G000000000?000000000?000000000?000000000? -6I1954195C000000058A241480800?211285143H000000000?000000000?000000000?000000000? -6I1954195C000000058B241481800?300000146E000000000?000000000?000000000?000000000? -6I1954195C000000058C241482800?350000146E000000000?000000000?000000000?000000000? -6I1954195C000000058D241483800?651289149C000000000?000000000?000000000?000000000? -6I1954195C000000058E241484800?310002174C000000000?000000000?000000000?000000000? -6I1954195C000000058F241485800?221495150B000000000?000000000?000000000?000000000? -6I1954195C000000058G241486800?691241116H000000000?000000000?000000000?000000000? -6I1954195C000000058H241487800?300002154D000000000?000000000?000000000?000000000? -6I1954195C000000058I241488800?151441800B000000000?000000000?000000000?000000000? -6I1954195C000000059?241489800?310003149I000000000?000000000?000000000?000000000? -6I1954195C000000059A241490800?004673765F000000000?000000000?000000000?000000000? -6I1954195C000000059B241491800?461594139C000000000?000000000?000000000?000000000? -6I1954195C000000059C241492800?651045144I000000000?000000000?000000000?000000000? -6I1954195C000000059D241493800?451496149G000000000?000000000?000000000?000000000? -6I1954195C000000059E241494800?608002140C000000000?000000000?000000000?000000000? -6I1954195C000000059F241495800?000000146E000000000?000000000?000000000?000000000? -6I1954195C000000059G241496800?300003140F000000000?000000000?000000000?000000000? -6I1954195C000000059H241497800?600000140E000000000?000000000?000000000?000000000? -6I1954195C000000059I241498800?350002156F000000000?000000000?000000000?000000000? -6I1954195C000000060?241499800?461652170C000000000?000000000?000000000?000000000? -6I1954195C000000060A241500800?651104116C000000000?000000000?000000000?000000000? -6I1954195C000000060B241501800?241265161I000000000?000000000?000000000?000000000? -6I1954195C000000060C241502800?671264166I000000000?000000000?000000000?000000000? -6I1954195C000000060D241503800?300005141E000000000?000000000?000000000?000000000? -6I1954195C000000060E241504800?434294481I000000000?000000000?000000000?000000000? -6I1954195C000000060F241505800?691261158E000000000?000000000?000000000?000000000? -6I1954195C000000060G241506800?000255491H000000000?000000000?000000000?000000000? -6I1954195C000000060H241507800?158001156C000000000?000000000?000000000?000000000? -6I1954195C000000060I241508800?600000165E000000000?000000000?000000000?000000000? -6I1954195C000000061?241509800?191264163A000000000?000000000?000000000?000000000? -6I1954195C000000061A241510800?181267162A000000000?000000000?000000000?000000000? -6I1954195C000000061B241511800?441515131F000000000?000000000?000000000?000000000? -6I1954195C000000061C241512800?300005152E000000000?000000000?000000000?000000000? -6I1954195C000000061D241513800?066273088D000000000?000000000?000000000?000000000? -6I1954195C000000061E241514800?221495155A000000000?000000000?000000000?000000000? -6I1954195C000000061F241515800?211270152C000000000?000000000?000000000?000000000? -6I1954195C000000061G241516800?191270169E000000000?000000000?000000000?000000000? -6I1954195C000000061H241517800?191270160B000000000?000000000?000000000?000000000? -6I1954195C000000061I241518800?000000005?000000000?000000000?000000000?000000000? -6I1954195C000000062?241519800?300004163?000000000?000000000?000000000?000000000? -6I1954195C000000062A241520800?198003148?000000000?000000000?000000000?000000000? -6I1954195C000000062B241521800?118002147I000000000?000000000?000000000?000000000? -6I1954195C000000062C241522800?300002167I000000000?000000000?000000000?000000000? -6I1954195C000000062D241523800?201277153?000000000?000000000?000000000?000000000? -6I1954195C000000062E241524800?658003168G000000000?000000000?000000000?000000000? -6I1954195C000000062F241525800?461478152I000000000?000000000?000000000?000000000? -6I1954195C000000062G241526800?691886174B000000000?000000000?000000000?000000000? -6I1954195C000000062H241527800?451680144E000000000?000000000?000000000?000000000? -6I1954195C000000062I241528800?461581153B000000000?000000000?000000000?000000000? -6I1954195C000000063?241529800?691482148E000000000?000000000?000000000?000000000? -6I1954195C000000063A241530800?601283153G000000000?000000000?000000000?000000000? -6I1954195C000000063B241531800?201285158H000000000?000000000?000000000?000000000? -6I1954195C000000063C241532800?171285153I000000000?000000000?000000000?000000000? -6I1954195C000000063D241533800?310003174C000000000?000000000?000000000?000000000? -6I1954195C000000063E241534800?079689679C000000000?000000000?000000000?000000000? -6I1954195C000000063F241535800?350000171F000000000?000000000?000000000?000000000? -6I1954195C000000063G241536800?658002154E000000000?000000000?000000000?000000000? -6I1954195C000000063H241537800?300002154C000000000?000000000?000000000?000000000? -6I1954195C000000063I241538800?151691129E000000000?000000000?000000000?000000000? -6I1954195C000000064?241539800?350002144E000000000?000000000?000000000?000000000? -6I1954195C000000064A241540800?618003174H000000000?000000000?000000000?000000000? -6I1954195C000000064B241541800?161444165?000000000?000000000?000000000?000000000? -6I1954195C000000064C241542800?651045159I000000000?000000000?000000000?000000000? -6I1954195C000000064D241543800?441547144E000000000?000000000?000000000?000000000? -6I1954195C000000064E241544800?461461161A000000000?000000000?000000000?000000000? -6I1954195C000000064F241545800?300003145E000000000?000000000?000000000?000000000? -6I1954195C000000064G241546800?601252156D000000000?000000000?000000000?000000000? -6I1954195C000000064H241547800?211252155F000000000?000000000?000000000?000000000? -6I1954195C000000064I241548800?000093264C000000000?000000000?000000000?000000000? -6I1954195C000000065?241549800?300003155G000000000?000000000?000000000?000000000? -6I1954195C000000065A241550800?350001145H000000000?000000000?000000000?000000000? -6I1954195C000000065B241551800?601504150I000000000?000000000?000000000?000000000? -6I1954195C000000065C241552800?608003160I000000000?000000000?000000000?000000000? -6I1954195C000000065D241553800?300002145I000000000?000000000?000000000?000000000? -6I1954195C000000065E241554800?461507125H000000000?000000000?000000000?000000000? -6I1954195C000000065F241555800?601167157H000000000?000000000?000000000?000000000? -6I1954195C000000065G241556800?688002156E000000000?000000000?000000000?000000000? -6I1954195C000000065H241557800?151560800B000000000?000000000?000000000?000000000? -6I1954195C000000065I241558800?101562161G000000000?000000000?000000000?000000000? -6I1954195C000000066?241559800?101463151G000000000?000000000?000000000?000000000? -6I1954195C000000066A241560800?600000157H000000000?000000000?000000000?000000000? -6I1954195C000000066B241561800?600000157D000000000?000000000?000000000?000000000? -6I1954195C000000066C241562800?025439357E000000000?000000000?000000000?000000000? -6I1954195C000000066D241563800?608002157A000000000?000000000?000000000?000000000? -6I1954195C000000066E241564800?191270164H000000000?000000000?000000000?000000000? -6I1954195C000000066F241565800?151568157C000000000?000000000?000000000?000000000? -6I1954195C000000066G241566800?608002162E000000000?000000000?000000000?000000000? -6I1954195C000000066H241567800?191270140B000000000?000000000?000000000?000000000? -6I1954195C000000066I241568800?490000000?000000000?000000000?000000000?000000000? -6I1954195C000000067?241569800?681272162G000000000?000000000?000000000?000000000? -6I1954195C000000067A241570800?201278193A000000000?000000000?000000000?000000000? -6I1954195C000000067B241571800?300002152H000000000?000000000?000000000?000000000? -6I1954195C000000067C241572800?000151484B000000000?000000000?000000000?000000000? -6I1954195C000000067D241573800?181277153A000000000?000000000?000000000?000000000? -6I1954195C000000067E241574800?211278158B000000000?000000000?000000000?000000000? -6I1954195C000000067F241575800?688002153H000000000?000000000?000000000?000000000? -6I1954195C000000067G241576800?111886174B000000000?000000000?000000000?000000000? -6I1954195C000000067H241577800?108002144E000000000?000000000?000000000?000000000? -6I1954195C000000067I241578800?211283158F000000000?000000000?000000000?000000000? -6I1954195C000000068?241579800?241283153F000000000?000000000?000000000?000000000? -6I1954195C000000068A241580800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000068B241581800?181285153I000000000?000000000?000000000?000000000? -6I1954195C000000068C241582800?300002168I000000000?000000000?000000000?000000000? -6I1954195C000000068D241583800?300002158I000000000?000000000?000000000?000000000? -6I1954195C000000068E241584800?101952116F000000000?000000000?000000000?000000000? -6I1954195C000000068F241585800?241539169H000000000?000000000?000000000?000000000? -6I1954195C000000068G241586800?651289159C000000000?000000000?000000000?000000000? -6I1954195C000000068H241587800?000000005?000000000?000000000?000000000?000000000? -6I1954195C000000068I241588800?461591159E000000000?000000000?000000000?000000000? -6I1954195C000000069?241589800?201293169F000000000?000000000?000000000?000000000? -6I1954195C000000069A241590800?601952136D000000000?000000000?000000000?000000000? -6I1954195C000000069B241591800?441595154F000000000?000000000?000000000?000000000? -6I1954195C000000069C241592800?651045154I000000000?000000000?000000000?000000000? -6I1954195C000000069D241593800?451596159G000000000?000000000?000000000?000000000? -6I1954195C000000069E241594800?601548151F000000000?000000000?000000000?000000000? -6I1954195C000000069F241595800?695555133H000000000?000000000?000000000?000000000? -6I1954195C000000069G241596800?300003160E000000000?000000000?000000000?000000000? -6I1954195C000000069H241597800?600000165E000000000?000000000?000000000?000000000? -6I1954195C000000069I241598800?608003155H000000000?000000000?000000000?000000000? -6I1954195C000000070?241599800?300003120G000000000?000000000?000000000?000000000? -6I1954195C000000070A241600800?651023118I000000000?000000000?000000000?000000000? -6I1954195C000000070B241601800?350001170I000000000?000000000?000000000?000000000? -6I1954195C000000070C241602800?608003166B000000000?000000000?000000000?000000000? -6I1954195C000000070D241603800?678002166A000000000?000000000?000000000?000000000? -6I1954195C000000070E241604800?350002161F000000000?000000000?000000000?000000000? -6I1954195C000000070F241605800?151508800B000000000?000000000?000000000?000000000? -6I1954195C000000070G241606800?300002161C000000000?000000000?000000000?000000000? -6I1954195C000000070H241607800?151610800B000000000?000000000?000000000?000000000? -6I1954195C000000070I241608800?101612166G000000000?000000000?000000000?000000000? -6I1954195C000000071?241609800?101513156G000000000?000000000?000000000?000000000? -6I1954195C000000071A241610800?600000167C000000000?000000000?000000000?000000000? -6I1954195C000000071B241611800?171265147A000000000?000000000?000000000?000000000? -6I1954195C000000071C241612800?007295173G000000000?000000000?000000000?000000000? -6I1954195C000000071D241613800?201267162?000000000?000000000?000000000?000000000? -6I1954195C000000071E241614800?241267172A000000000?000000000?000000000?000000000? -6I1954195C000000071F241615800?601434144E000000000?000000000?000000000?000000000? -6I1954195C000000071G241616800?108002167E000000000?000000000?000000000?000000000? -6I1954195C000000071H241617800?191270155B000000000?000000000?000000000?000000000? -6I1954195C000000071I241618800?159154943?000000000?000000000?000000000?000000000? -6I1954195C000000072?241619800?651272143B000000000?000000000?000000000?000000000? -6I1954195C000000072A241620800?211274152G000000000?000000000?000000000?000000000? -6I1954195C000000072B241621800?461624159E000000000?000000000?000000000?000000000? -6I1954195C000000072C241622800?691576157I000000000?000000000?000000000?000000000? -6I1954195C000000072D241623800?691293150A000000000?000000000?000000000?000000000? -6I1954195C000000072E241624800?441595167H000000000?000000000?000000000?000000000? -6I1954195C000000072F241625800?101278168C000000000?000000000?000000000?000000000? -6I1954195C000000072G241626800?211283163F000000000?000000000?000000000?000000000? -6I1954195C000000072H241627800?151444160A000000000?000000000?000000000?000000000? -6I1954195C000000072I241628800?691281148D000000000?000000000?000000000?000000000? -6I1954195C000000073?241629800?350001168E000000000?000000000?000000000?000000000? -6I1954195C000000073A241630800?691433143F000000000?000000000?000000000?000000000? -6I1954195C000000073B241631800?350002143G000000000?000000000?000000000?000000000? -6I1954195C000000073C241632800?310002164A000000000?000000000?000000000?000000000? -6I1954195C000000073D241633800?678002154A000000000?000000000?000000000?000000000? -6I1954195C000000073E241634800?118001174H000000000?000000000?000000000?000000000? -6I1954195C000000073F241635800?300000171F000000000?000000000?000000000?000000000? -6I1954195C000000073G241636800?651289164C000000000?000000000?000000000?000000000? -6I1954195C000000073H241637800?300002169C000000000?000000000?000000000?000000000? -6I1954195C000000073I241638800?601291164E000000000?000000000?000000000?000000000? -6I1954195C000000074?241639800?310000141C000000000?000000000?000000000?000000000? -6I1954195C000000074A241640800?658003167B000000000?000000000?000000000?000000000? -6I1954195C000000074B241641800?151444160D000000000?000000000?000000000?000000000? -6I1954195C000000074C241642800?651045169I000000000?000000000?000000000?000000000? -6I1954195C000000074D241643800?451646164G000000000?000000000?000000000?000000000? -6I1954195C000000074E241644800?671297165A000000000?000000000?000000000?000000000? -6I1954195C000000074F241645800?641268171G000000000?000000000?000000000?000000000? -6I1954195C000000074G241646800?300003165F000000000?000000000?000000000?000000000? -6I1954195C000000074H241647800?600000160F000000000?000000000?000000000?000000000? -6I1954195C000000074I241648800?350004125I000000000?000000000?000000000?000000000? -6I1954195C000000075?241649800?300003165G000000000?000000000?000000000?000000000? -6I1954195C000000075A241650800?608003140G000000000?000000000?000000000?000000000? -6I1954195C000000075B241651800?161654151?000000000?000000000?000000000?000000000? -6I1954195C000000075C241652800?161456146A000000000?000000000?000000000?000000000? -6I1954195C000000075D241653800?101506146F000000000?000000000?000000000?000000000? -6I1954195C000000075E241654800?500000000?000000000?000000000?000000000?000000000? -6I1954195C000000075F241655800?300002151A000000000?000000000?000000000?000000000? -6I1954195C000000075G241656800?151659800B000000000?000000000?000000000?000000000? -6I1954195C000000075H241657800?151660800B000000000?000000000?000000000?000000000? -6I1954195C000000075I241658800?001742112?000000000?000000000?000000000?000000000? -6I1954195C000000076?241659800?600000160F000000000?000000000?000000000?000000000? -6I1954195C000000076A241660800?610000157H000000000?000000000?000000000?000000000? -6I1954195C000000076B241661800?181265151I000000000?000000000?000000000?000000000? -6I1954195C000000076C241662800?101665152?000000000?000000000?000000000?000000000? -6I1954195C000000076D241663800?211268167A000000000?000000000?000000000?000000000? -6I1954195C000000076E241664800?241267162B000000000?000000000?000000000?000000000? -6I1954195C000000076F241665800?100000000?000000000?000000000?000000000?000000000? -6I1954195C000000076G241666800?441569167D000000000?000000000?000000000?000000000? -6I1954195C000000076H241667800?191270159H000000000?000000000?000000000?000000000? -6I1954195C000000076I241668800?191572173?000000000?000000000?000000000?000000000? -6I1954195C000000077?241669800?350002149E000000000?000000000?000000000?000000000? -6I1954195C000000077A241670800?694444123?000000000?000000000?000000000?000000000? -6I1954195C000000077B241671800?601274162I000000000?000000000?000000000?000000000? -6I1954195C000000077C241672800?350001127I000000000?000000000?000000000?000000000? -6I1954195C000000077D241673800?451626137D000000000?000000000?000000000?000000000? -6I1954195C000000077E241674800?601278144E000000000?000000000?000000000?000000000? -6I1954195C000000077F241675800?111278144E000000000?000000000?000000000?000000000? -6I1954195C000000077G241676800?108001154?000000000?000000000?000000000?000000000? -6I1954195C000000077H241677800?691580153C000000000?000000000?000000000?000000000? -6I1954195C000000077I241678800?201285163H000000000?000000000?000000000?000000000? -6I1954195C000000078?241679800?641285147?000000000?000000000?000000000?000000000? -6I1954195C000000078A241680800?601283163G000000000?000000000?000000000?000000000? -6I1954195C000000078B241681800?111587149A000000000?000000000?000000000?000000000? -6I1954195C000000078C241682800?691535173H000000000?000000000?000000000?000000000? -6I1954195C000000078D241683800?101587144E000000000?000000000?000000000?000000000? -6I1954195C000000078E241684800?645963711A000000000?000000000?000000000?000000000? -6I1954195C000000078F241685800?211291164D000000000?000000000?000000000?000000000? -6I1954195C000000078G241686800?101951105F000000000?000000000?000000000?000000000? -6I1954195C000000078H241687800?310001149H000000000?000000000?000000000?000000000? -6I1954195C000000078I241688800?221293171E000000000?000000000?000000000?000000000? -6I1954195C000000079?241689800?211252126G000000000?000000000?000000000?000000000? -6I1954195C000000079A241690800?000000005?000000000?000000000?000000000?000000000? -6I1954195C000000079B241691800?470000000?000000000?000000000?000000000?000000000? -6I1954195C000000079C241692800?651045164I000000000?000000000?000000000?000000000? -6I1954195C000000079D241693800?201297165?000000000?000000000?000000000?000000000? -6I1954195C000000079E241694800?608003125D000000000?000000000?000000000?000000000? -6I1954195C000000079F241695800?608003165C000000000?000000000?000000000?000000000? -6I1954195C000000079G241696800?211250160C000000000?000000000?000000000?000000000? -6I1954195C000000079H241697800?690000150C000000000?000000000?000000000?000000000? -6I1954195C000000079I241698800?201289155E000000000?000000000?000000000?000000000? -6I1954195C000000080?241699800?300003160G000000000?000000000?000000000?000000000? -6I1954195C000000080A241700800?661023118I000000000?000000000?000000000?000000000? -6I1954195C000000080B241701800?157079632G000000000?000000000?000000000?000000000? -6I1954195C000000080C241702800?000003000?000000000?000000000?000000000?000000000? -6I1954195C000000080D241703800?151456161A000000000?000000000?000000000?000000000? -6I1954195C000000080E241704800?108003171C000000000?000000000?000000000?000000000? -6I1954195C000000080F241705800?108001126B000000000?000000000?000000000?000000000? -6I1954195C000000080G241706800?118001154?000000000?000000000?000000000?000000000? -6I1954195C000000080H241707800?688002162G000000000?000000000?000000000?000000000? -6I1954195C000000080I241708800?151711166F000000000?000000000?000000000?000000000? -6I1954195C000000081?241709800?441276171D000000000?000000000?000000000?000000000? -6I1954195C000000081A241710800?461375171E000000000?000000000?000000000?000000000? -6I1954195C000000081B241711800?997500000?000000000?000000000?000000000?000000000? -6I1954195C000000081C241712800?608003166H000000000?000000000?000000000?000000000? -6I1954195C000000081D241713800?108003128C000000000?000000000?000000000?000000000? -6I1954195C000000081E241714800?300005172G000000000?000000000?000000000?000000000? -6I1954195C000000081F241715800?601618142F000000000?000000000?000000000?000000000? -6I1954195C000000081G241716800?300001172C000000000?000000000?000000000?000000000? -6I1954195C000000081H241717800?350001127C000000000?000000000?000000000?000000000? -6I1954195C000000081I241718800?350002129C000000000?000000000?000000000?000000000? -6I1954195C000000082?241719800?161024132I000000000?000000000?000000000?000000000? -6I1954195C000000082A241720800?441383172D000000000?000000000?000000000?000000000? -6I1954195C000000082B241721800?691526157I000000000?000000000?000000000?000000000? -6I1954195C000000082C241722800?350002137I000000000?000000000?000000000?000000000? -6I1954195C000000082D241723800?461476174A000000000?000000000?000000000?000000000? -6I1954195C000000082E241724800?201285128H000000000?000000000?000000000?000000000? -6I1954195C000000082F241725800?461286128G000000000?000000000?000000000?000000000? -6I1954195C000000082G241726800?191285164?000000000?000000000?000000000?000000000? -6I1954195C000000082H241727800?461682128B000000000?000000000?000000000?000000000? -6I1954195C000000082I241728800?101534129?000000000?000000000?000000000?000000000? -6I1954195C000000083?241729800?691732173E000000000?000000000?000000000?000000000? -6I1954195C000000083A241730800?608003138G000000000?000000000?000000000?000000000? -6I1954195C000000083B241731800?054041950?000000000?000000000?000000000?000000000? -6I1954195C000000083C241732800?350002144E000000000?000000000?000000000?000000000? -6I1954195C000000083D241733800?601291134G000000000?000000000?000000000?000000000? -6I1954195C000000083E241734800?608003139D000000000?000000000?000000000?000000000? -6I1954195C000000083F241735800?241539104C000000000?000000000?000000000?000000000? -6I1954195C000000083G241736800?701951132F000000000?000000000?000000000?000000000? -6I1954195C000000083H241737800?360000126C000000000?000000000?000000000?000000000? -6I1954195C000000083I241738800?221293174F000000000?000000000?000000000?000000000? -6I1954195C000000084?241739800?241293150E000000000?000000000?000000000?000000000? -6I1954195C000000084A241740800?211285159?000000000?000000000?000000000?000000000? -6I1954195C000000084B241741800?618003170D000000000?000000000?000000000?000000000? -6I1954195C000000084C241742800?108001174G000000000?000000000?000000000?000000000? -6I1954195C000000084D241743800?350002129I000000000?000000000?000000000?000000000? -6I1954195C000000084E241744800?198001174E000000000?000000000?000000000?000000000? -6I1954195C000000084F241745800?211250171B000000000?000000000?000000000?000000000? -6I1954195C000000084G241746800?151702171?000000000?000000000?000000000?000000000? -6I1954195C000000084H241747800?461705170F000000000?000000000?000000000?000000000? -6I1954195C000000084I241748800?300009172?000000000?000000000?000000000?000000000? -6I1954195C000000085?241749800?671252170H000000000?000000000?000000000?000000000? -6I1954195C000000085A241750800?441854180D000000000?000000000?000000000?000000000? -6I1954195C000000085B241751800?608003180I000000000?000000000?000000000?000000000? -6I1954195C000000085C241752800?441755175F000000000?000000000?000000000?000000000? -6I1954195C000000085D241753800?691906190I000000000?000000000?000000000?000000000? -6I1954195C000000085E241754800?221260176C000000000?000000000?000000000?000000000? -6I1954195C000000085F241755800?601759191C000000000?000000000?000000000?000000000? -6I1954195C000000085G241756800?651293114G000000000?000000000?000000000?000000000? -6I1954195C000000085H241757800?211265176H000000000?000000000?000000000?000000000? -6I1954195C000000085I241758800?000000144E000000000?000000000?000000000?000000000? -6I1954195C000000086?241759800?060000000?000000000?000000000?000000000?000000000? -6I1954195C000000086A241760800?191250178G000000000?000000000?000000000?000000000? -6I1954195C000000086B241761800?241264191G000000000?000000000?000000000?000000000? -6I1954195C000000086C241762800?191250179?000000000?000000000?000000000?000000000? -6I1954195C000000086D241763800?461766191H000000000?000000000?000000000?000000000? -6I1954195C000000086E241764800?641277190B000000000?000000000?000000000?000000000? -6I1954195C000000086F241765800?118002186D000000000?000000000?000000000?000000000? -6I1954195C000000086G241766800?601919192C000000000?000000000?000000000?000000000? -6I1954195C000000086H241767800?608001182C000000000?000000000?000000000?000000000? -6I1954195C000000086I241768800?461771177B000000000?000000000?000000000?000000000? -6I1954195C000000087?241769800?691922177G000000000?000000000?000000000?000000000? -6I1954195C000000087A241770800?691924177G000000000?000000000?000000000?000000000? -6I1954195C000000087B241771800?691774177H000000000?000000000?000000000?000000000? -6I1954195C000000087C241772800?691775177H000000000?000000000?000000000?000000000? -6I1954195C000000087D241773800?350001177I000000000?000000000?000000000?000000000? -6I1954195C000000087E241774800?618003126D000000000?000000000?000000000?000000000? -6I1954195C000000087F241775800?608003126D000000000?000000000?000000000?000000000? -6I1954195C000000087G241776800?181818181H000000000?000000000?000000000?000000000? -6I1954195C000000087H241777800?241285178H000000000?000000000?000000000?000000000? -6I1954195C000000087I241778800?241283178F000000000?000000000?000000000?000000000? -6I1954195C000000088?241779800?441783178D000000000?000000000?000000000?000000000? -6I1954195C000000088A241780800?601293179G000000000?000000000?000000000?000000000? -6I1954195C000000088B241781800?678002178I000000000?000000000?000000000?000000000? -6I1954195C000000088C241782800?101785179A000000000?000000000?000000000?000000000? -6I1954195C000000088D241783800?461937193?000000000?000000000?000000000?000000000? -6I1954195C000000088E241784800?300005189G000000000?000000000?000000000?000000000? -6I1954195C000000088F241785800?200000000?000000000?000000000?000000000?000000000? -6I1954195C000000088G241786800?688002179E000000000?000000000?000000000?000000000? -6I1954195C000000088H241787800?608003114F000000000?000000000?000000000?000000000? -6I1954195C000000088I241788800?350001126?000000000?000000000?000000000?000000000? -6I1954195C000000089?241789800?201293179F000000000?000000000?000000000?000000000? -6I1954195C000000089A241790800?608003179H000000000?000000000?000000000?000000000? -6I1954195C000000089B241791800?191278193B000000000?000000000?000000000?000000000? -6I1954195C000000089C241792800?608003189I000000000?000000000?000000000?000000000? -6I1954195C000000089D241793800?310002191F000000000?000000000?000000000?000000000? -6I1954195C000000089E241794800?572957805A000000000?000000000?000000000?000000000? -6I1954195C000000089F241795800?151568177C000000000?000000000?000000000?000000000? -6I1954195C000000089G241796800?151799175B000000000?000000000?000000000?000000000? -6I1954195C000000089H241797800?111759176D000000000?000000000?000000000?000000000? -6I1954195C000000089I241798800?111855191D000000000?000000000?000000000?000000000? -6I1954195C000000090?241799800?972000000?000000000?000000000?000000000?000000000? -6I1954195C000000090A241800800?000000097?000000000?000000000?000000000?000000000? -6I1954195C000000090B241801800?500000000?000000000?000000000?000000000?000000000? -6I1954195C000000090C241802800?111869189A000000000?000000000?000000000?000000000? -6I1954195C000000090D241803800?191806188B000000000?000000000?000000000?000000000? -6I1954195C000000090E241804800?461808181A000000000?000000000?000000000?000000000? -6I1954195C000000090F241805800?300001186F000000000?000000000?000000000?000000000? -6I1954195C000000090G241806800?230258509C000000000?000000000?000000000?000000000? -6I1954195C000000090H241807800?101274182I000000000?000000000?000000000?000000000? -6I1954195C000000090I241808800?151272187I000000000?000000000?000000000?000000000? -6I1954195C000000091?241809800?111812181G000000000?000000000?000000000?000000000? -6I1954195C000000091A241810800?158001181I000000000?000000000?000000000?000000000? -6I1954195C000000091B241811800?161272187H000000000?000000000?000000000?000000000? -6I1954195C000000091C241812800?002718281H000000000?000000000?000000000?000000000? -6I1954195C000000091D241813800?691816187?000000000?000000000?000000000?000000000? -6I1954195C000000091E241814800?691867187?000000000?000000000?000000000?000000000? -6I1954195C000000091F241815800?101274188A000000000?000000000?000000000?000000000? -6I1954195C000000091G241816800?165000000?000000000?000000000?000000000?000000000? -6I1954195C000000091H241817800?461820187A000000000?000000000?000000000?000000000? -6I1954195C000000091I241818800?241821182D000000000?000000000?000000000?000000000? -6I1954195C000000092?241819800?350004188?000000000?000000000?000000000?000000000? -6I1954195C000000092A241820800?108001182E000000000?000000000?000000000?000000000? -6I1954195C000000092B241821800?101274000?000000000?000000000?000000000?000000000? -6I1954195C000000092C241822800?300001188B000000000?000000000?000000000?000000000? -6I1954195C000000092D241823800?191776189D000000000?000000000?000000000?000000000? -6I1954195C000000092E241824800?300003183C000000000?000000000?000000000?000000000? -6I1954195C000000092F241825800?191828181D000000000?000000000?000000000?000000000? -6I1954195C000000092G241826800?211285188H000000000?000000000?000000000?000000000? -6I1954195C000000092H241827800?191830181C000000000?000000000?000000000?000000000? -6I1954195C000000092I241828800?606530659G000000000?000000000?000000000?000000000? -6I1954195C000000093?241829800?211285183H000000000?000000000?000000000?000000000? -6I1954195C000000093A241830800?192049908F000000000?000000000?000000000?000000000? -6I1954195C000000093B241831800?300002183G000000000?000000000?000000000?000000000? -6I1954195C000000093C241832800?000000005B000000000?000000000?000000000?000000000? -6I1954195C000000093D241833800?151836800B000000000?000000000?000000000?000000000? -6I1954195C000000093E241834800?310002184C000000000?000000000?000000000?000000000? -6I1954195C000000093F241835800?350004184F000000000?000000000?000000000?000000000? -6I1954195C000000093G241836800?600000183A000000000?000000000?000000000?000000000? -6I1954195C000000093H241837800?201291184D000000000?000000000?000000000?000000000? -6I1954195C000000093I241838800?601291184E000000000?000000000?000000000?000000000? -6I1954195C000000094?241839800?191842182F000000000?000000000?000000000?000000000? -6I1954195C000000094A241840800?300008181?000000000?000000000?000000000?000000000? -6I1954195C000000094B241841800?211297180B000000000?000000000?000000000?000000000? -6I1954195C000000094C241842800?434294481I000000000?000000000?000000000?000000000? -6I1954195C000000094D241843800?350002175?000000000?000000000?000000000?000000000? -6I1954195C000000094E241844800?441847139C000000000?000000000?000000000?000000000? -6I1954195C000000094F241845800?111848180C000000000?000000000?000000000?000000000? -6I1954195C000000094G241846800?441849144E000000000?000000000?000000000?000000000? -6I1954195C000000094H241847800?461393175A000000000?000000000?000000000?000000000? -6I1954195C000000094I241848800?500000000?000000000?000000000?000000000?000000000? -6I1954195C000000095?241849800?360000186B000000000?000000000?000000000?000000000? -6I1954195C000000095A241850800?101855185I000000000?000000000?000000000?000000000? -6I1954195C000000095B241851800?101856186A000000000?000000000?000000000?000000000? -6I1954195C000000095C241852800?666666666F000000000?000000000?000000000?000000000? -6I1954195C000000095D241853800?400000000?000000000?000000000?000000000?000000000? -6I1954195C000000095E241854800?300001186C000000000?000000000?000000000?000000000? -6I1954195C000000095F241855800?285714285G000000000?000000000?000000000?000000000? -6I1954195C000000095G241856800?222222222B000000000?000000000?000000000?000000000? -6I1954195C000000095H241857800?191264180E000000000?000000000?000000000?000000000? -6I1954195C000000095I241858800?191264188I000000000?000000000?000000000?000000000? -6I1954195C000000096?241859800?191264179B000000000?000000000?000000000?000000000? -6I1954195C000000096A241860800?211264176G000000000?000000000?000000000?000000000? -6I1954195C000000096B241861800?191264189?000000000?000000000?000000000?000000000? -6I1954195C000000096C241862800?691865186H000000000?000000000?000000000?000000000? -6I1954195C000000096D241863800?461872187D000000000?000000000?000000000?000000000? -6I1954195C000000096E241864800?101518128C000000000?000000000?000000000?000000000? -6I1954195C000000096F241865800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000096G241866800?101869187C000000000?000000000?000000000?000000000? -6I1954195C000000096H241867800?050000000?000000000?000000000?000000000?000000000? -6I1954195C000000096I241868800?231272187E000000000?000000000?000000000?000000000? -6I1954195C000000097?241869800?200000000?000000000?000000000?000000000?000000000? -6I1954195C000000097A241870800?241274187G000000000?000000000?000000000?000000000? -6I1954195C000000097B241871800?108001182G000000000?000000000?000000000?000000000? -6I1954195C000000097C241872800?161896180D000000000?000000000?000000000?000000000? -6I1954195C000000097D241873800?608003188D000000000?000000000?000000000?000000000? -6I1954195C000000097E241874800?151896180D000000000?000000000?000000000?000000000? -6I1954195C000000097F241875800?658003183D000000000?000000000?000000000?000000000? -6I1954195C000000097G241876800?608002188E000000000?000000000?000000000?000000000? -6I1954195C000000097H241877800?350002188C000000000?000000000?000000000?000000000? -6I1954195C000000097I241878800?151832188G000000000?000000000?000000000?000000000? -6I1954195C000000098?241879800?161832188G000000000?000000000?000000000?000000000? -6I1954195C000000098A241880800?441835189C000000000?000000000?000000000?000000000? -6I1954195C000000098B241881800?608003183I000000000?000000000?000000000?000000000? -6I1954195C000000098C241882800?691285184?000000000?000000000?000000000?000000000? -6I1954195C000000098D241883800?101886184A000000000?000000000?000000000?000000000? -6I1954195C000000098E241884800?191289182A000000000?000000000?000000000?000000000? -6I1954195C000000098F241885800?241289189B000000000?000000000?000000000?000000000? -6I1954195C000000098G241886800?100000000?000000000?000000000?000000000?000000000? -6I1954195C000000098H241887800?608002144E000000000?000000000?000000000?000000000? -6I1954195C000000098I241888800?601291189E000000000?000000000?000000000?000000000? -6I1954195C000000099?241889800?608003189H000000000?000000000?000000000?000000000? -6I1954195C000000099A241890800?608003185?000000000?000000000?000000000?000000000? -6I1954195C000000099B241891800?641297187F000000000?000000000?000000000?000000000? -6I1954195C000000099C241892800?198001186?000000000?000000000?000000000?000000000? -6I1954195C000000099D241893800?010000183E000000000?000000000?000000000?000000000? -6I1954195C000000099E241894800?608003185A000000000?000000000?000000000?000000000? -6I1954195C000000099F241895800?111848182B000000000?000000000?000000000?000000000? -6I1954195C000000099G241896800?000000000A000000000?000000000?000000000?000000000? -6I1954195C000000099H241897800?691901175D000000000?000000000?000000000?000000000? -6I1954195C000000099I241898800?101852185G000000000?000000000?000000000?000000000? -6I1954195C000000100?241899800?101853185H000000000?000000000?000000000?000000000? -6I1954195C000000100A241900800?300002175G000000000?000000000?000000000?000000000? -6I1954195C000000100B241901800?300000178A000000000?000000000?000000000?000000000? -6I1954195C000000100C241902800?691905190I000000000?000000000?000000000?000000000? -6I1954195C000000100D241903800?618003191A000000000?000000000?000000000?000000000? -6I1954195C000000100E241904800?300001191B000000000?000000000?000000000?000000000? -6I1954195C000000100F241905800?101731128E000000000?000000000?000000000?000000000? -6I1954195C000000100G241906800?101580128E000000000?000000000?000000000?000000000? -6I1954195C000000100H241907800?191250190D000000000?000000000?000000000?000000000? -6I1954195C000000100I241908800?211283193F000000000?000000000?000000000?000000000? -6I1954195C000000101?241909800?241267157?000000000?000000000?000000000?000000000? -6I1954195C000000101A241910800?350001193D000000000?000000000?000000000?000000000? -6I1954195C000000101B241911800?191776194?000000000?000000000?000000000?000000000? -6I1954195C000000101C241912800?608003178B000000000?000000000?000000000?000000000? -6I1954195C000000101D241913800?191293192G000000000?000000000?000000000?000000000? -6I1954195C000000101E241914800?191250193H000000000?000000000?000000000?000000000? -6I1954195C000000101F241915800?350002193E000000000?000000000?000000000?000000000? -6I1954195C000000101G241916800?350001193E000000000?000000000?000000000?000000000? -6I1954195C000000101H241917800?300003192E000000000?000000000?000000000?000000000? -6I1954195C000000101I241918800?161921192F000000000?000000000?000000000?000000000? -6I1954195C000000102?241919800?000100000?000000000?000000000?000000000?000000000? -6I1954195C000000102A241920800?211277178?000000000?000000000?000000000?000000000? -6I1954195C000000102B241921800?000003000?000000000?000000000?000000000?000000000? -6I1954195C000000102C241922800?658003191?000000000?000000000?000000000?000000000? -6I1954195C000000102D241923800?641265177?000000000?000000000?000000000?000000000? -6I1954195C000000102E241924800?000008190D000000000?000000000?000000000?000000000? -6I1954195C000000102F241925800?151928800B000000000?000000000?000000000?000000000? -6I1954195C000000102G241926800?461929193?000000000?000000000?000000000?000000000? -6I1954195C000000102H241927800?350001193C000000000?000000000?000000000?000000000? -6I1954195C000000102I241928800?600000194A000000000?000000000?000000000?000000000? -6I1954195C000000103?241929800?651265176I000000000?000000000?000000000?000000000? -6I1954195C000000103A241930800?601297126D000000000?000000000?000000000?000000000? -6I1954195C000000103B241931800?608002193I000000000?000000000?000000000?000000000? -6I1954195C000000103C241932800?608003114C000000000?000000000?000000000?000000000? -6I1954195C000000103D241933800?101665192?000000000?000000000?000000000?000000000? -6I1954195C000000103E241934800?441942179C000000000?000000000?000000000?000000000? -6I1954195C000000103F241935800?608002194D000000000?000000000?000000000?000000000? -6I1954195C000000103G241936800?601794165E000000000?000000000?000000000?000000000? -6I1954195C000000103H241937800?651701191?000000000?000000000?000000000?000000000? -6I1954195C000000103I241938800?608003114H000000000?000000000?000000000?000000000? -6I1954195C000000104?241939800?198001194E000000000?000000000?000000000?000000000? -6I1954195C000000104A241940800?608003114I000000000?000000000?000000000?000000000? -6I1954195C000000104B241941800?211297190?000000000?000000000?000000000?000000000? -6I1954195C000000104C241942800?310003191E000000000?000000000?000000000?000000000? -6I1954195C000000104D241943800?151701191?000000000?000000000?000000000?000000000? -6I1954195C000000104E241944800?360000176E000000000?000000000?000000000?000000000? -6I1954195C000000104F241945800?211250190C000000000?000000000?000000000?000000000? -6I1954195C000000104G241946800?101978196E000000000?000000000?000000000?000000000? -6I1954195C000000104H241947800?601977194F000000000?000000000?000000000?000000000? -6I1954195C000000104I241948800?101963197?000000000?000000000?000000000?000000000? -6I1954195C000000105?241949800?441973109E000000000?000000000?000000000?000000000? -6I1954195C000000105A241950800?151977198G000000000?000000000?000000000?000000000? -6I1954195C000000105B241951800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000105C241952800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000105D241953800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000105E241954800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000105F241955800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000105G241956800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000105H241957800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000105I241958800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000106?241959800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000106A241960800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000106B241961800?608001196H000000000?000000000?000000000?000000000? -6I1954195C000000106C241962800?111978199I000000000?000000000?000000000?000000000? -6I1954195C000000106D241963800?241978199A000000000?000000000?000000000?000000000? -6I1954195C000000106E241964800?211977198I000000000?000000000?000000000?000000000? -6I1954195C000000106F241965800?211977196F000000000?000000000?000000000?000000000? -6I1954195C000000106G241966800?601969197C000000000?000000000?000000000?000000000? -6I1954195C000000106H241967800?211986199G000000000?000000000?000000000?000000000? -6I1954195C000000106I241968800?300004194H000000000?000000000?000000000?000000000? -6I1954195C000000107?241969800?000005000?000000000?000000000?000000000?000000000? -6I1954195C000000107A241970800?151974195?000000000?000000000?000000000?000000000? -6I1954195C000000107B241971800?101024196G000000000?000000000?000000000?000000000? -6I1954195C000000107C241972800?111977196B000000000?000000000?000000000?000000000? -6I1954195C000000107D241973800?211978198H000000000?000000000?000000000?000000000? -6I1954195C000000107E241974800?690000800C000000000?000000000?000000000?000000000? -6I1954195C000000107F241975800?108001194I000000000?000000000?000000000?000000000? -6I1954195C000000107G241976800?300003101I000000000?000000000?000000000?000000000? -6I1954195C000000107H241977800?691954195U000000000?000000000?000000000?000000000? -6I1954195C000000107I241978800?000000107H000000000?000000000?000000000?000000000? -6I1954195C000000108?241979800?241978800?000000000?000000000?000000000?000000000? -6I1954195C000000108A241980800?241978800?000000000?000000000?000000000?000000000? -6I1954195C000000108B241981800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000108C241982800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000108D241983800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000108E241984800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000108F241985800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000108G241986800?000000000?000000000?000000000?000000000?000000000? -6I1954195C000000108H241987800?101990800B000000000?000000000?000000000?000000000? -6I1954195C000000108I241988800?601291197B000000000?000000000?000000000?000000000? -6I1954195C000000109?241989800?118002199H000000000?000000000?000000000?000000000? -6I1954195C000000109A241990800?000000999I000000000?000000000?000000000?000000000? -6I1954195C000000109B241991800?601986197A000000000?000000000?000000000?000000000? -6I1954195C000000109C241992800?151024198G000000000?000000000?000000000?000000000? -6I1954195C000000109D241993800?151024198G000000000?000000000?000000000?000000000? -6I1954195C000000109E241994800?151024198G000000000?000000000?000000000?000000000? -6I1954195C000000109F241995800?151024198G000000000?000000000?000000000?000000000? -6I1954195C000000109G241996800?151024198G000000000?000000000?000000000?000000000? -6I1954195C000000109H241997800?711977194G000000000?000000000?000000000?000000000? -6I1954195C000000109I241998800?461966131E000000000?000000000?000000000?000000000? -6I1954195C000000110?241999800?461975196A000000000?000000000?000000000?000000000? +6I1954195C000000000A240900800?651653130H000000000?000000000?000000000?000000000? +6I1954195C000000000B240901800?010000090A000000000?000000000?000000000?000000000? +6I1954195C000000000C240902800?651958126C000000000?000000000?000000000?000000000? +6I1954195C000000000D240903800?300008122A000000000?000000000?000000000?000000000? +6I1954195C000000000E240904800?000000094C000000000?000000000?000000000?000000000? +6I1954195C000000000F240905800?651959131C000000000?000000000?000000000?000000000? +6I1954195C000000000G240906800?300008117E000000000?000000000?000000000?000000000? +6I1954195C000000000H240907800?000000095G000000000?000000000?000000000?000000000? +6I1954195C000000000I240908800?651951145E000000000?000000000?000000000?000000000? +6I1954195C000000001?240909800?000000101C000000000?000000000?000000000?000000000? +6I1954195C000000001A240910800?151519127C000000000?000000000?000000000?000000000? +6I1954195C000000001B240911800?151519127C000000000?000000000?000000000?000000000? +6I1954195C000000001C240912800?651986119A000000000?000000000?000000000?000000000? +6I1954195C000000001D240913800?691016096I000000000?000000000?000000000?000000000? +6I1954195C000000001E240914800?000000800C000000000?000000000?000000000?000000000? +6I1954195C000000001F240915800?201519132B000000000?000000000?000000000?000000000? +6I1954195C000000001G240916800?651986119A000000000?000000000?000000000?000000000? +6I1954195C000000001H240917800?651959091E000000000?000000000?000000000?000000000? +6I1954195C000000001I240918800?691371117D000000000?000000000?000000000?000000000? +6I1954195C000000002?240919800?691372127E000000000?000000000?000000000?000000000? +6I1954195C000000002A240920800?651223091E000000000?000000000?000000000?000000000? +6I1954195C000000002B240921800?651986119A000000000?000000000?000000000?000000000? +6I1954195C000000002C240922800?651986119A000000000?000000000?000000000?000000000? +6I1954195C000000002D240923800?201872162H000000000?000000000?000000000?000000000? +6I1954195C000000002E240924800?601585183I000000000?000000000?000000000?000000000? +6I1954195C000000002F240925800?651957093A000000000?000000000?000000000?000000000? +6I1954195C000000002G240926800?691780117D000000000?000000000?000000000?000000000? +6I1954195C000000002H240927800?691830127E000000000?000000000?000000000?000000000? +6I1954195C000000002I240928800?651223093A000000000?000000000?000000000?000000000? +6I1954195C000000003?240929800?651682180A000000000?000000000?000000000?000000000? +6I1954195C000000003A240930800?601585183I000000000?000000000?000000000?000000000? +6I1954195C000000003B240931800?691784175?000000000?000000000?000000000?000000000? +6I1954195C000000003C240932800?601585183I000000000?000000000?000000000?000000000? +6I1954195C000000003D240933800?201872192G000000000?000000000?000000000?000000000? +6I1954195C000000003E240934800?101688174C000000000?000000000?000000000?000000000? +6I1954195C000000003F240935800?691738144B000000000?000000000?000000000?000000000? +6I1954195C000000003G240936800?601585183I000000000?000000000?000000000?000000000? +6I1954195C000000003H240937800?201492095B000000000?000000000?000000000?000000000? +6I1954195C000000003I240938800?601542139H000000000?000000000?000000000?000000000? +6I1954195C000000004?240939800?201793169F000000000?000000000?000000000?000000000? +6I1954195C000000004A240940800?601542139H000000000?000000000?000000000?000000000? +6I1954195C000000004B240941800?651958094D000000000?000000000?000000000?000000000? +6I1954195C000000004C240942800?691645117D000000000?000000000?000000000?000000000? +6I1954195C000000004D240943800?691646127E000000000?000000000?000000000?000000000? +6I1954195C000000004E240944800?691448175?000000000?000000000?000000000?000000000? +6I1954195C000000004F240945800?601542139H000000000?000000000?000000000?000000000? +6I1954195C000000004G240946800?651223094D000000000?000000000?000000000?000000000? +6I1954195C000000004H240947800?651882180A000000000?000000000?000000000?000000000? +6I1954195C000000004I240948800?601542139H000000000?000000000?000000000?000000000? +6I1954195C000000005?240949800?691828182F000000000?000000000?000000000?000000000? +6I1954195C000000005A240950800?210992095A000000000?000000000?000000000?000000000? +6I1954195C000000005B240951800?440952098G000000000?000000000?000000000?000000000? +6I1954195C000000005C240952800?461315095C000000000?000000000?000000000?000000000? +6I1954195C000000005D240953800?350008095D000000000?000000000?000000000?000000000? +6I1954195C000000005E240954800?110990095E000000000?000000000?000000000?000000000? +6I1954195C000000005F240955800?440956096B000000000?000000000?000000000?000000000? +6I1954195C000000005G240956800?110991095G000000000?000000000?000000000?000000000? +6I1954195C000000005H240957800?440958096A000000000?000000000?000000000?000000000? +6I1954195C000000005I240958800?110991095I000000000?000000000?000000000?000000000? +6I1954195C000000006?240959800?441315096?000000000?000000000?000000000?000000000? +6I1954195C000000006A240960800?690969096C000000000?000000000?000000000?000000000? +6I1954195C000000006B240961800?690968096C000000000?000000000?000000000?000000000? +6I1954195C000000006C240962800?690967096C000000000?000000000?000000000?000000000? +6I1954195C000000006D240963800?240984096D000000000?000000000?000000000?000000000? +6I1954195C000000006E240964800?650992098D000000000?000000000?000000000?000000000? +6I1954195C000000006F240965800?300002096F000000000?000000000?000000000?000000000? +6I1954195C000000006G240966800?441120097D000000000?000000000?000000000?000000000? +6I1954195C000000006H240967800?350001098E000000000?000000000?000000000?000000000? +6I1954195C000000006I240968800?350002098E000000000?000000000?000000000?000000000? +6I1954195C000000007?240969800?350003098E000000000?000000000?000000000?000000000? +6I1954195C000000007A240970800?651045097A000000000?000000000?000000000?000000000? +6I1954195C000000007B240971800?450972098G000000000?000000000?000000000?000000000? +6I1954195C000000007C240972800?160998097C000000000?000000000?000000000?000000000? +6I1954195C000000007D240973800?450975097G000000000?000000000?000000000?000000000? +6I1954195C000000007E240974800?601045102G000000000?000000000?000000000?000000000? +6I1954195C000000007F240975800?160998097F000000000?000000000?000000000?000000000? +6I1954195C000000007G240976800?450979097H000000000?000000000?000000000?000000000? +6I1954195C000000007H240977800?690997098?000000000?000000000?000000000?000000000? +6I1954195C000000007I240978800?690996098?000000000?000000000?000000000?000000000? +6I1954195C000000008?240979800?690995098?000000000?000000000?000000000?000000000? +6I1954195C000000008A240980800?240993098A000000000?000000000?000000000?000000000? +6I1954195C000000008B240981800?651023098B000000000?000000000?000000000?000000000? +6I1954195C000000008C240982800?300003098C000000000?000000000?000000000?000000000? +6I1954195C000000008D240983800?150994800B000000000?000000000?000000000?000000000? +6I1954195C000000008E240984800?350003098E000000000?000000000?000000000?000000000? +6I1954195C000000008F240985800?168002098F000000000?000000000?000000000?000000000? +6I1954195C000000008G240986800?690993800A000000000?000000000?000000000?000000000? +6I1954195C000000008H240987800?211017109E000000000?000000000?000000000?000000000? +6I1954195C000000008I240988800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000009?240989800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000009A240990800?500000000?000000000?000000000?000000000?000000000? +6I1954195C000000009B240991800?010000000?000000000?000000000?000000000?000000000? +6I1954195C000000009C240992800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000009D240993800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000009E240994800?600000095?000000000?000000000?000000000?000000000? +6I1954195C000000009F240995800?000000098G000000000?000000000?000000000?000000000? +6I1954195C000000009G240996800?350003098G000000000?000000000?000000000?000000000? +6I1954195C000000009H240997800?350006098G000000000?000000000?000000000?000000000? +6I1954195C000000009I240998800?001000000?000000000?000000000?000000000?000000000? +6I1954195C000000010?240999800?601952140G000000000?000000000?000000000?000000000? +6I1954195C000000010A241000800?300003111I000000000?000000000?000000000?000000000? +6I1954195C000000010B241001800?300005106D000000000?000000000?000000000?000000000? +6I1954195C000000010C241002800?451109118F000000000?000000000?000000000?000000000? +6I1954195C000000010D241003800?101017109C000000000?000000000?000000000?000000000? +6I1954195C000000010E241004800?201260106H000000000?000000000?000000000?000000000? +6I1954195C000000010F241005800?658003116C000000000?000000000?000000000?000000000? +6I1954195C000000010G241006800?651023107I000000000?000000000?000000000?000000000? +6I1954195C000000010H241007800?661023107I000000000?000000000?000000000?000000000? +6I1954195C000000010I241008800?101017107D000000000?000000000?000000000?000000000? +6I1954195C000000011?241009800?555555555E000000000?000000000?000000000?000000000? +6I1954195C000000011A241010800?300004134C000000000?000000000?000000000?000000000? +6I1954195C000000011B241011800?300004118?000000000?000000000?000000000?000000000? +6I1954195C000000011C241012800?461095112?000000000?000000000?000000000?000000000? +6I1954195C000000011D241013800?300002102A000000000?000000000?000000000?000000000? +6I1954195C000000011E241014800?101024172I000000000?000000000?000000000?000000000? +6I1954195C000000011F241015800?461120106I000000000?000000000?000000000?000000000? +6I1954195C000000011G241016800?010000112?000000000?000000000?000000000?000000000? +6I1954195C000000011H241017800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000011I241018800?601951112F000000000?000000000?000000000?000000000? +6I1954195C000000012?241019800?201023102F000000000?000000000?000000000?000000000? +6I1954195C000000012A241020800?698002108A000000000?000000000?000000000?000000000? +6I1954195C000000012B241021800?678002102I000000000?000000000?000000000?000000000? +6I1954195C000000012C241022800?670000113G000000000?000000000?000000000?000000000? +6I1954195C000000012D241023800?555555555E000000000?000000000?000000000?000000000? +6I1954195C000000012E241024800?000001000?000000000?000000000?000000000?000000000? +6I1954195C000000012F241025800?101031109C000000000?000000000?000000000?000000000? +6I1954195C000000012G241026800?608003103C000000000?000000000?000000000?000000000? +6I1954195C000000012H241027800?300003103E000000000?000000000?000000000?000000000? +6I1954195C000000012I241028800?108001113F000000000?000000000?000000000?000000000? +6I1954195C000000013?241029800?300001103F000000000?000000000?000000000?000000000? +6I1954195C000000013A241030800?600000109F000000000?000000000?000000000?000000000? +6I1954195C000000013B241031800?000100000?000000000?000000000?000000000?000000000? +6I1954195C000000013C241032800?300003114D000000000?000000000?000000000?000000000? +6I1954195C000000013D241033800?300003104A000000000?000000000?000000000?000000000? +6I1954195C000000013E241034800?101037800C000000000?000000000?000000000?000000000? +6I1954195C000000013F241035800?101038104C000000000?000000000?000000000?000000000? +6I1954195C000000013G241036800?161045101B000000000?000000000?000000000?000000000? +6I1954195C000000013H241037800?651045100?000000000?000000000?000000000?000000000? +6I1954195C000000013I241038800?600000110G000000000?000000000?000000000?000000000? +6I1954195C000000014?241039800?000100100?000000000?000000000?000000000?000000000? +6I1954195C000000014A241040800?691145115A000000000?000000000?000000000?000000000? +6I1954195C000000014B241041800?201045104H000000000?000000000?000000000?000000000? +6I1954195C000000014C241042800?451364137G000000000?000000000?000000000?000000000? +6I1954195C000000014D241043800?211098800A000000000?000000000?000000000?000000000? +6I1954195C000000014E241044800?777777777G000000000?000000000?000000000?000000000? +6I1954195C000000014F241045800?555555555E000000000?000000000?000000000?000000000? +6I1954195C000000014G241046800?618003106A000000000?000000000?000000000?000000000? +6I1954195C000000014H241047800?000000100?000000000?000000000?000000000?000000000? +6I1954195C000000014I241048800?608003110E000000000?000000000?000000000?000000000? +6I1954195C000000015?241049800?350003105H000000000?000000000?000000000?000000000? +6I1954195C000000015A241050800?651103116C000000000?000000000?000000000?000000000? +6I1954195C000000015B241051800?461054115E000000000?000000000?000000000?000000000? +6I1954195C000000015C241052800?300003136B000000000?000000000?000000000?000000000? +6I1954195C000000015D241053800?658002131A000000000?000000000?000000000?000000000? +6I1954195C000000015E241054800?108001106B000000000?000000000?000000000?000000000? +6I1954195C000000015F241055800?000000000E000000000?000000000?000000000?000000000? +6I1954195C000000015G241056800?211268123A000000000?000000000?000000000?000000000? +6I1954195C000000015H241057800?101017102E000000000?000000000?000000000?000000000? +6I1954195C000000015I241058800?210000120C000000000?000000000?000000000?000000000? +6I1954195C000000016?241059800?151162800B000000000?000000000?000000000?000000000? +6I1954195C000000016A241060800?651023112I000000000?000000000?000000000?000000000? +6I1954195C000000016B241061800?300003101I000000000?000000000?000000000?000000000? +6I1954195C000000016C241062800?211017112?000000000?000000000?000000000?000000000? +6I1954195C000000016D241063800?441067107F000000000?000000000?000000000?000000000? +6I1954195C000000016E241064800?691017107A000000000?000000000?000000000?000000000? +6I1954195C000000016F241065800?600000144E000000000?000000000?000000000?000000000? +6I1954195C000000016G241066800?777777777G000000000?000000000?000000000?000000000? +6I1954195C000000016H241067800?101020800C000000000?000000000?000000000?000000000? +6I1954195C000000016I241068800?651045139I000000000?000000000?000000000?000000000? +6I1954195C000000017?241069800?608002102G000000000?000000000?000000000?000000000? +6I1954195C000000017A241070800?661023112I000000000?000000000?000000000?000000000? +6I1954195C000000017B241071800?300002107G000000000?000000000?000000000?000000000? +6I1954195C000000017C241072800?670000119H000000000?000000000?000000000?000000000? +6I1954195C000000017D241073800?600000128I000000000?000000000?000000000?000000000? +6I1954195C000000017E241074800?101031113E000000000?000000000?000000000?000000000? +6I1954195C000000017F241075800?300003113C000000000?000000000?000000000?000000000? +6I1954195C000000017G241076800?608001103D000000000?000000000?000000000?000000000? +6I1954195C000000017H241077800?108001113E000000000?000000000?000000000?000000000? +6I1954195C000000017I241078800?108001118E000000000?000000000?000000000?000000000? +6I1954195C000000018?241079800?300007100D000000000?000000000?000000000?000000000? +6I1954195C000000018A241080800?300000110H000000000?000000000?000000000?000000000? +6I1954195C000000018B241081800?651023123B000000000?000000000?000000000?000000000? +6I1954195C000000018C241082800?241289149B000000000?000000000?000000000?000000000? +6I1954195C000000018D241083800?241289154B000000000?000000000?000000000?000000000? +6I1954195C000000018E241084800?241289159B000000000?000000000?000000000?000000000? +6I1954195C000000018F241085800?241289164B000000000?000000000?000000000?000000000? +6I1954195C000000018G241086800?241289169B000000000?000000000?000000000?000000000? +6I1954195C000000018H241087800?691140119E000000000?000000000?000000000?000000000? +6I1954195C000000018I241088800?691341119E000000000?000000000?000000000?000000000? +6I1954195C000000019?241089800?691342119E000000000?000000000?000000000?000000000? +6I1954195C000000019A241090800?658002100B000000000?000000000?000000000?000000000? +6I1954195C000000019B241091800?747788001I000000000?000000000?000000000?000000000? +6I1954195C000000019C241092800?151045104I000000000?000000000?000000000?000000000? +6I1954195C000000019D241093800?118002105A000000000?000000000?000000000?000000000? +6I1954195C000000019E241094800?111952800B000000000?000000000?000000000?000000000? +6I1954195C000000019F241095800?601098101D000000000?000000000?000000000?000000000? +6I1954195C000000019G241096800?699999112?000000000?000000000?000000000?000000000? +6I1954195C000000019H241097800?151023132G000000000?000000000?000000000?000000000? +6I1954195C000000019I241098800?600000110G000000000?000000000?000000000?000000000? +6I1954195C000000020?241099800?461367115C000000000?000000000?000000000?000000000? +6I1954195C000000020A241100800?300001105G000000000?000000000?000000000?000000000? +6I1954195C000000020B241101800?300001100H000000000?000000000?000000000?000000000? +6I1954195C000000020C241102800?111255115I000000000?000000000?000000000?000000000? +6I1954195C000000020D241103800?000003000?000000000?000000000?000000000?000000000? +6I1954195C000000020E241104800?000006000?000000000?000000000?000000000?000000000? +6I1954195C000000020F241105800?300003106C000000000?000000000?000000000?000000000? +6I1954195C000000020G241106800?101260126G000000000?000000000?000000000?000000000? +6I1954195C000000020H241107800?461112106A000000000?000000000?000000000?000000000? +6I1954195C000000020I241108800?201265112B000000000?000000000?000000000?000000000? +6I1954195C000000021?241109800?300003171I000000000?000000000?000000000?000000000? +6I1954195C000000021A241110800?691017112A000000000?000000000?000000000?000000000? +6I1954195C000000021B241111800?691017117A000000000?000000000?000000000?000000000? +6I1954195C000000021C241112800?111017104F000000000?000000000?000000000?000000000? +6I1954195C000000021D241113800?201017109E000000000?000000000?000000000?000000000? +6I1954195C000000021E241114800?670000107E000000000?000000000?000000000?000000000? +6I1954195C000000021F241115800?161023113?000000000?000000000?000000000?000000000? +6I1954195C000000021G241116800?350000126G000000000?000000000?000000000?000000000? +6I1954195C000000021H241117800?350003112E000000000?000000000?000000000?000000000? +6I1954195C000000021I241118800?151023113?000000000?000000000?000000000?000000000? +6I1954195C000000022?241119800?151030800B000000000?000000000?000000000?000000000? +6I1954195C000000022A241120800?601023102G000000000?000000000?000000000?000000000? +6I1954195C000000022B241121800?300001102H000000000?000000000?000000000?000000000? +6I1954195C000000022C241122800?608003103B000000000?000000000?000000000?000000000? +6I1954195C000000022D241123800?600000134H000000000?000000000?000000000?000000000? +6I1954195C000000022E241124800?241278119D000000000?000000000?000000000?000000000? +6I1954195C000000022F241125800?608003118C000000000?000000000?000000000?000000000? +6I1954195C000000022G241126800?101038172I000000000?000000000?000000000?000000000? +6I1954195C000000022H241127800?300003104?000000000?000000000?000000000?000000000? +6I1954195C000000022I241128800?350003800C000000000?000000000?000000000?000000000? +6I1954195C000000023?241129800?300004100D000000000?000000000?000000000?000000000? +6I1954195C000000023A241130800?350003119F000000000?000000000?000000000?000000000? +6I1954195C000000023B241131800?608000144E000000000?000000000?000000000?000000000? +6I1954195C000000023C241132800?118001119?000000000?000000000?000000000?000000000? +6I1954195C000000023D241133800?608002109B000000000?000000000?000000000?000000000? +6I1954195C000000023E241134800?201291127B000000000?000000000?000000000?000000000? +6I1954195C000000023F241135800?101138109C000000000?000000000?000000000?000000000? +6I1954195C000000023G241136800?101039109C000000000?000000000?000000000?000000000? +6I1954195C000000023H241137800?608002144E000000000?000000000?000000000?000000000? +6I1954195C000000023I241138800?000000000A000000000?000000000?000000000?000000000? +6I1954195C000000024?241139800?000100100A000000000?000000000?000000000?000000000? +6I1954195C000000024A241140800?350001135I000000000?000000000?000000000?000000000? +6I1954195C000000024B241141800?827473001H000000000?000000000?000000000?000000000? +6I1954195C000000024C241142800?240000110B000000000?000000000?000000000?000000000? +6I1954195C000000024D241143800?191801126G000000000?000000000?000000000?000000000? +6I1954195C000000024E241144800?608003115H000000000?000000000?000000000?000000000? +6I1954195C000000024F241145800?210000120C000000000?000000000?000000000?000000000? +6I1954195C000000024G241146800?111852190G000000000?000000000?000000000?000000000? +6I1954195C000000024H241147800?350001175C000000000?000000000?000000000?000000000? +6I1954195C000000024I241148800?101853176?000000000?000000000?000000000?000000000? +6I1954195C000000025?241149800?101856176B000000000?000000000?000000000?000000000? +6I1954195C000000025A241150800?031622776F000000000?000000000?000000000?000000000? +6I1954195C000000025B241151800?221058116A000000000?000000000?000000000?000000000? +6I1954195C000000025C241152800?101255120I000000000?000000000?000000000?000000000? +6I1954195C000000025D241153800?108002131B000000000?000000000?000000000?000000000? +6I1954195C000000025E241154800?828875100F000000000?000000000?000000000?000000000? +6I1954195C000000025F241155800?168002111C000000000?000000000?000000000?000000000? +6I1954195C000000025G241156800?111260126G000000000?000000000?000000000?000000000? +6I1954195C000000025H241157800?691160116D000000000?000000000?000000000?000000000? +6I1954195C000000025I241158800?461115111H000000000?000000000?000000000?000000000? +6I1954195C000000026?241159800?441366109E000000000?000000000?000000000?000000000? +6I1954195C000000026A241160800?210000109E000000000?000000000?000000000?000000000? +6I1954195C000000026B241161800?151114800B000000000?000000000?000000000?000000000? +6I1954195C000000026C241162800?600000101F000000000?000000000?000000000?000000000? +6I1954195C000000026D241163800?691116126I000000000?000000000?000000000?000000000? +6I1954195C000000026E241164800?221267117?000000000?000000000?000000000?000000000? +6I1954195C000000026F241165800?601957126A000000000?000000000?000000000?000000000? +6I1954195C000000026G241166800?211277173F000000000?000000000?000000000?000000000? +6I1954195C000000026H241167800?174532934H000000000?000000000?000000000?000000000? +6I1954195C000000026I241168800?241272108A000000000?000000000?000000000?000000000? +6I1954195C000000027?241169800?151022800B000000000?000000000?000000000?000000000? +6I1954195C000000027A241170800?151073800B000000000?000000000?000000000?000000000? +6I1954195C000000027B241171800?300001107H000000000?000000000?000000000?000000000? +6I1954195C000000027C241172800?111325133F000000000?000000000?000000000?000000000? +6I1954195C000000027D241173800?651957141A000000000?000000000?000000000?000000000? +6I1954195C000000027E241174800?241278148F000000000?000000000?000000000?000000000? +6I1954195C000000027F241175800?241986134D000000000?000000000?000000000?000000000? +6I1954195C000000027G241176800?111283800C000000000?000000000?000000000?000000000? +6I1954195C000000027H241177800?691080118D000000000?000000000?000000000?000000000? +6I1954195C000000027I241178800?241017117E000000000?000000000?000000000?000000000? +6I1954195C000000028?241179800?158001800C000000000?000000000?000000000?000000000? +6I1954195C000000028A241180800?101138134C000000000?000000000?000000000?000000000? +6I1954195C000000028B241181800?608003123I000000000?000000000?000000000?000000000? +6I1954195C000000028C241182800?451236123G000000000?000000000?000000000?000000000? +6I1954195C000000028D241183800?300003139B000000000?000000000?000000000?000000000? +6I1954195C000000028E241184800?221289129B000000000?000000000?000000000?000000000? +6I1954195C000000028F241185800?101139109C000000000?000000000?000000000?000000000? +6I1954195C000000028G241186800?651045105B000000000?000000000?000000000?000000000? +6I1954195C000000028H241187800?350003109G000000000?000000000?000000000?000000000? +6I1954195C000000028I241188800?691953800C000000000?000000000?000000000?000000000? +6I1954195C000000029?241189800?300001100D000000000?000000000?000000000?000000000? +6I1954195C000000029A241190800?101045109I000000000?000000000?000000000?000000000? +6I1954195C000000029B241191800?151294124I000000000?000000000?000000000?000000000? +6I1954195C000000029C241192800?441246125G000000000?000000000?000000000?000000000? +6I1954195C000000029D241193800?111268137C000000000?000000000?000000000?000000000? +6I1954195C000000029E241194800?200000117H000000000?000000000?000000000?000000000? +6I1954195C000000029F241195800?241198105C000000000?000000000?000000000?000000000? +6I1954195C000000029G241196800?151265127D000000000?000000000?000000000?000000000? +6I1954195C000000029H241197800?211255117F000000000?000000000?000000000?000000000? +6I1954195C000000029I241198800?350000135I000000000?000000000?000000000?000000000? +6I1954195C000000030?241199800?451203109E000000000?000000000?000000000?000000000? +6I1954195C000000030A241200800?300003105I000000000?000000000?000000000?000000000? +6I1954195C000000030B241201800?101009101E000000000?000000000?000000000?000000000? +6I1954195C000000030C241202800?601009101C000000000?000000000?000000000?000000000? +6I1954195C000000030D241203800?601023102G000000000?000000000?000000000?000000000? +6I1954195C000000030E241204800?651023112G000000000?000000000?000000000?000000000? +6I1954195C000000030F241205800?651023112H000000000?000000000?000000000?000000000? +6I1954195C000000030G241206800?461670121A000000000?000000000?000000000?000000000? +6I1954195C000000030H241207800?151310800B000000000?000000000?000000000?000000000? +6I1954195C000000030I241208800?350001121E000000000?000000000?000000000?000000000? +6I1954195C000000031?241209800?168002121G000000000?000000000?000000000?000000000? +6I1954195C000000031A241210800?168002122H000000000?000000000?000000000?000000000? +6I1954195C000000031B241211800?300002121H000000000?000000000?000000000?000000000? +6I1954195C000000031C241212800?191270122?000000000?000000000?000000000?000000000? +6I1954195C000000031D241213800?350002122A000000000?000000000?000000000?000000000? +6I1954195C000000031E241214800?151219800B000000000?000000000?000000000?000000000? +6I1954195C000000031F241215800?101419122D000000000?000000000?000000000?000000000? +6I1954195C000000031G241216800?161270122E000000000?000000000?000000000?000000000? +6I1954195C000000031H241217800?241270122G000000000?000000000?000000000?000000000? +6I1954195C000000031I241218800?441223144E000000000?000000000?000000000?000000000? +6I1954195C000000032?241219800?600000120F000000000?000000000?000000000?000000000? +6I1954195C000000032A241220800?310000124C000000000?000000000?000000000?000000000? +6I1954195C000000032B241221800?101278144E000000000?000000000?000000000?000000000? +6I1954195C000000032C241222800?191278120H000000000?000000000?000000000?000000000? +6I1954195C000000032D241223800?201278118A000000000?000000000?000000000?000000000? +6I1954195C000000032E241224800?668003194C000000000?000000000?000000000?000000000? +6I1954195C000000032F241225800?300001118B000000000?000000000?000000000?000000000? +6I1954195C000000032G241226800?310002124C000000000?000000000?000000000?000000000? +6I1954195C000000032H241227800?648001123H000000000?000000000?000000000?000000000? +6I1954195C000000032I241228800?198001124D000000000?000000000?000000000?000000000? +6I1954195C000000033?241229800?601234125A000000000?000000000?000000000?000000000? +6I1954195C000000033A241230800?608002144E000000000?000000000?000000000?000000000? +6I1954195C000000033B241231800?151188109D000000000?000000000?000000000?000000000? +6I1954195C000000033C241232800?101045136A000000000?000000000?000000000?000000000? +6I1954195C000000033D241233800?608002119B000000000?000000000?000000000?000000000? +6I1954195C000000033E241234800?000000002B000000000?000000000?000000000?000000000? +6I1954195C000000033F241235800?101240124E000000000?000000000?000000000?000000000? +6I1954195C000000033G241236800?658001119A000000000?000000000?000000000?000000000? +6I1954195C000000033H241237800?601055122B000000000?000000000?000000000?000000000? +6I1954195C000000033I241238800?201294121F000000000?000000000?000000000?000000000? +6I1954195C000000034?241239800?350001124H000000000?000000000?000000000?000000000? +6I1954195C000000034A241240800?000000000A000000000?000000000?000000000?000000000? +6I1954195C000000034B241241800?211277173F000000000?000000000?000000000?000000000? +6I1954195C000000034C241242800?701951134D000000000?000000000?000000000?000000000? +6I1954195C000000034D241243800?608002121C000000000?000000000?000000000?000000000? +6I1954195C000000034E241244800?300001115B000000000?000000000?000000000?000000000? +6I1954195C000000034F241245800?300001115B000000000?000000000?000000000?000000000? +6I1954195C000000034G241246800?601150121B000000000?000000000?000000000?000000000? +6I1954195C000000034H241247800?651250140H000000000?000000000?000000000?000000000? +6I1954195C000000034I241248800?211255122I000000000?000000000?000000000?000000000? +6I1954195C000000035?241249800?101055121?000000000?000000000?000000000?000000000? +6I1954195C000000035A241250800?888888888H000000000?000000000?000000000?000000000? +6I1954195C000000035B241251800?191255123E000000000?000000000?000000000?000000000? +6I1954195C000000035C241252800?888888888H000000000?000000000?000000000?000000000? +6I1954195C000000035D241253800?350007152H000000000?000000000?000000000?000000000? +6I1954195C000000035E241254800?101658141F000000000?000000000?000000000?000000000? +6I1954195C000000035F241255800?888888888H000000000?000000000?000000000?000000000? +6I1954195C000000035G241256800?201272157E000000000?000000000?000000000?000000000? +6I1954195C000000035H241257800?651270122F000000000?000000000?000000000?000000000? +6I1954195C000000035I241258800?168001156C000000000?000000000?000000000?000000000? +6I1954195C000000036?241259800?658003171G000000000?000000000?000000000?000000000? +6I1954195C000000036A241260800?300000178A000000000?000000000?000000000?000000000? +6I1954195C000000036B241261800?350002129C000000000?000000000?000000000?000000000? +6I1954195C000000036C241262800?461266174H000000000?000000000?000000000?000000000? +6I1954195C000000036D241263800?118002172E000000000?000000000?000000000?000000000? +6I1954195C000000036E241264800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000036F241265800?888888888H000000000?000000000?000000000?000000000? +6I1954195C000000036G241266800?108001127A000000000?000000000?000000000?000000000? +6I1954195C000000036H241267800?100000128E000000000?000000000?000000000?000000000? +6I1954195C000000036I241268800?888888888H000000000?000000000?000000000?000000000? +6I1954195C000000037?241269800?221274117G000000000?000000000?000000000?000000000? +6I1954195C000000037A241270800?888888888H000000000?000000000?000000000?000000000? +6I1954195C000000037B241271800?461676163D000000000?000000000?000000000?000000000? +6I1954195C000000037C241272800?211977198I000000000?000000000?000000000?000000000? +6I1954195C000000037D241273800?441677162H000000000?000000000?000000000?000000000? +6I1954195C000000037E241274800?350000126G000000000?000000000?000000000?000000000? +6I1954195C000000037F241275800?300001173D000000000?000000000?000000000?000000000? +6I1954195C000000037G241276800?461393138?000000000?000000000?000000000?000000000? +6I1954195C000000037H241277800?888888888H000000000?000000000?000000000?000000000? +6I1954195C000000037I241278800?601285139?000000000?000000000?000000000?000000000? +6I1954195C000000038?241279800?441383128D000000000?000000000?000000000?000000000? +6I1954195C000000038A241280800?111684138I000000000?000000000?000000000?000000000? +6I1954195C000000038B241281800?000000000A000000000?000000000?000000000?000000000? +6I1954195C000000038C241282800?691635168H000000000?000000000?000000000?000000000? +6I1954195C000000038D241283800?008003126D000000000?000000000?000000000?000000000? +6I1954195C000000038E241284800?310002139E000000000?000000000?000000000?000000000? +6I1954195C000000038F241285800?008003000?000000000?000000000?000000000?000000000? +6I1954195C000000038G241286800?111690144E000000000?000000000?000000000?000000000? +6I1954195C000000038H241287800?101690144E000000000?000000000?000000000?000000000? +6I1954195C000000038I241288800?608001174D000000000?000000000?000000000?000000000? +6I1954195C000000039?241289800?300000110H000000000?000000000?000000000?000000000? +6I1954195C000000039A241290800?191250137A000000000?000000000?000000000?000000000? +6I1954195C000000039B241291800?888888888H000000000?000000000?000000000?000000000? +6I1954195C000000039C241292800?651045134I000000000?000000000?000000000?000000000? +6I1954195C000000039D241293800?000000171F000000000?000000000?000000000?000000000? +6I1954195C000000039E241294800?888888888H000000000?000000000?000000000?000000000? +6I1954195C000000039F241295800?451298174I000000000?000000000?000000000?000000000? +6I1954195C000000039G241296800?191250136H000000000?000000000?000000000?000000000? +6I1954195C000000039H241297800?888888888H000000000?000000000?000000000?000000000? +6I1954195C000000039I241298800?461569167D000000000?000000000?000000000?000000000? +6I1954195C000000040?241299800?441253155D000000000?000000000?000000000?000000000? +6I1954195C000000040A241300800?300003121D000000000?000000000?000000000?000000000? +6I1954195C000000040B241301800?691514146G000000000?000000000?000000000?000000000? +6I1954195C000000040C241302800?691807181H000000000?000000000?000000000?000000000? +6I1954195C000000040D241303800?691256161D000000000?000000000?000000000?000000000? +6I1954195C000000040E241304800?691707166D000000000?000000000?000000000?000000000? +6I1954195C000000040F241305800?691758176A000000000?000000000?000000000?000000000? +6I1954195C000000040G241306800?777777777G000000000?000000000?000000000?000000000? +6I1954195C000000040H241307800?777777777G000000000?000000000?000000000?000000000? +6I1954195C000000040I241308800?777777777G000000000?000000000?000000000?000000000? +6I1954195C000000041?241309800?777777777G000000000?000000000?000000000?000000000? +6I1954195C000000041A241310800?610000147C000000000?000000000?000000000?000000000? +6I1954195C000000041B241311800?300003136I000000000?000000000?000000000?000000000? +6I1954195C000000041C241312800?300003132B000000000?000000000?000000000?000000000? +6I1954195C000000041D241313800?221267137?000000000?000000000?000000000?000000000? +6I1954195C000000041E241314800?777777777G000000000?000000000?000000000?000000000? +6I1954195C000000041F241315800?692222109E000000000?000000000?000000000?000000000? +6I1954195C000000041G241316800?608003153I000000000?000000000?000000000?000000000? +6I1954195C000000041H241317800?777777777G000000000?000000000?000000000?000000000? +6I1954195C000000041I241318800?601285139?000000000?000000000?000000000?000000000? +6I1954195C000000042?241319800?151024113D000000000?000000000?000000000?000000000? +6I1954195C000000042A241320800?151024133E000000000?000000000?000000000?000000000? +6I1954195C000000042B241321800?101024117I000000000?000000000?000000000?000000000? +6I1954195C000000042C241322800?101325133?000000000?000000000?000000000?000000000? +6I1954195C000000042D241323800?777777777G000000000?000000000?000000000?000000000? +6I1954195C000000042E241324800?240000132?000000000?000000000?000000000?000000000? +6I1954195C000000042F241325800?690000800B000000000?000000000?000000000?000000000? +6I1954195C000000042G241326800?111951136E000000000?000000000?000000000?000000000? +6I1954195C000000042H241327800?441315113B000000000?000000000?000000000?000000000? +6I1954195C000000042I241328800?668002134?000000000?000000000?000000000?000000000? +6I1954195C000000043?241329800?201283118G000000000?000000000?000000000?000000000? +6I1954195C000000043A241330800?161283138H000000000?000000000?000000000?000000000? +6I1954195C000000043B241331800?691434153G000000000?000000000?000000000?000000000? +6I1954195C000000043C241332800?608003168I000000000?000000000?000000000?000000000? +6I1954195C000000043D241333800?601242112D000000000?000000000?000000000?000000000? +6I1954195C000000043E241334800?101337142C000000000?000000000?000000000?000000000? +6I1954195C000000043F241335800?108001119C000000000?000000000?000000000?000000000? +6I1954195C000000043G241336800?161142119G000000000?000000000?000000000?000000000? +6I1954195C000000043H241337800?777777777G000000000?000000000?000000000?000000000? +6I1954195C000000043I241338800?658002144E000000000?000000000?000000000?000000000? +6I1954195C000000044?241339800?108001800B000000000?000000000?000000000?000000000? +6I1954195C000000044A241340800?111045136C000000000?000000000?000000000?000000000? +6I1954195C000000044B241341800?350004135I000000000?000000000?000000000?000000000? +6I1954195C000000044C241342800?350007135I000000000?000000000?000000000?000000000? +6I1954195C000000044D241343800?101047100C000000000?000000000?000000000?000000000? +6I1954195C000000044E241344800?601952104B000000000?000000000?000000000?000000000? +6I1954195C000000044F241345800?241061101H000000000?000000000?000000000?000000000? +6I1954195C000000044G241346800?601277158D000000000?000000000?000000000?000000000? +6I1954195C000000044H241347800?111952137B000000000?000000000?000000000?000000000? +6I1954195C000000044I241348800?461156110F000000000?000000000?000000000?000000000? +6I1954195C000000045?241349800?300003115G000000000?000000000?000000000?000000000? +6I1954195C000000045A241350800?300003116I000000000?000000000?000000000?000000000? +6I1954195C000000045B241351800?691464146G000000000?000000000?000000000?000000000? +6I1954195C000000045C241352800?691815181H000000000?000000000?000000000?000000000? +6I1954195C000000045D241353800?691384173I000000000?000000000?000000000?000000000? +6I1954195C000000045E241354800?691385173I000000000?000000000?000000000?000000000? +6I1954195C000000045F241355800?691908176A000000000?000000000?000000000?000000000? +6I1954195C000000045G241356800?777777777G000000000?000000000?000000000?000000000? +6I1954195C000000045H241357800?691360131C000000000?000000000?000000000?000000000? +6I1954195C000000045I241358800?200796090?000000000?000000000?000000000?000000000? +6I1954195C000000046?241359800?658002111G000000000?000000000?000000000?000000000? +6I1954195C000000046A241360800?210000109E000000000?000000000?000000000?000000000? +6I1954195C000000046B241361800?300003131I000000000?000000000?000000000?000000000? +6I1954195C000000046C241362800?151065800B000000000?000000000?000000000?000000000? +6I1954195C000000046D241363800?300003117B000000000?000000000?000000000?000000000? +6I1954195C000000046E241364800?101324168F000000000?000000000?000000000?000000000? +6I1954195C000000046F241365800?441315173C000000000?000000000?000000000?000000000? +6I1954195C000000046G241366800?108001132A000000000?000000000?000000000?000000000? +6I1954195C000000046H241367800?101023132H000000000?000000000?000000000?000000000? +6I1954195C000000046I241368800?608003172H000000000?000000000?000000000?000000000? +6I1954195C000000047?241369800?151072800B000000000?000000000?000000000?000000000? +6I1954195C000000047A241370800?151123800B000000000?000000000?000000000?000000000? +6I1954195C000000047B241371800?608003128?000000000?000000000?000000000?000000000? +6I1954195C000000047C241372800?111277138B000000000?000000000?000000000?000000000? +6I1954195C000000047D241373800?441339127H000000000?000000000?000000000?000000000? +6I1954195C000000047E241374800?693333133H000000000?000000000?000000000?000000000? +6I1954195C000000047F241375800?010000171E000000000?000000000?000000000?000000000? +6I1954195C000000047G241376800?241985139G000000000?000000000?000000000?000000000? +6I1954195C000000047H241377800?691959137F000000000?000000000?000000000?000000000? +6I1954195C000000047I241378800?777777777G000000000?000000000?000000000?000000000? +6I1954195C000000048?241379800?608002173G000000000?000000000?000000000?000000000? +6I1954195C000000048A241380800?601865128C000000000?000000000?000000000?000000000? +6I1954195C000000048B241381800?777777777G000000000?000000000?000000000?000000000? +6I1954195C000000048C241382800?461315174?000000000?000000000?000000000?000000000? +6I1954195C000000048D241383800?310003172B000000000?000000000?000000000?000000000? +6I1954195C000000048E241384800?210000130C000000000?000000000?000000000?000000000? +6I1954195C000000048F241385800?210000130D000000000?000000000?000000000?000000000? +6I1954195C000000048G241386800?651789164C000000000?000000000?000000000?000000000? +6I1954195C000000048H241387800?111490129F000000000?000000000?000000000?000000000? +6I1954195C000000048I241388800?151142119G000000000?000000000?000000000?000000000? +6I1954195C000000049?241389800?191250127E000000000?000000000?000000000?000000000? +6I1954195C000000049A241390800?441346109E000000000?000000000?000000000?000000000? +6I1954195C000000049B241391800?777777777G000000000?000000000?000000000?000000000? +6I1954195C000000049C241392800?161045119I000000000?000000000?000000000?000000000? +6I1954195C000000049D241393800?696666133H000000000?000000000?000000000?000000000? +6I1954195C000000049E241394800?101398172F000000000?000000000?000000000?000000000? +6I1954195C000000049F241395800?350001137I000000000?000000000?000000000?000000000? +6I1954195C000000049G241396800?777777777G000000000?000000000?000000000?000000000? +6I1954195C000000049H241397800?691976134E000000000?000000000?000000000?000000000? +6I1954195C000000049I241398800?157079631H000000000?000000000?000000000?000000000? +6I1954195C000000050?241399800?300003135G000000000?000000000?000000000?000000000? +6I1954195C000000050A241400800?691318117D000000000?000000000?000000000?000000000? +6I1954195C000000050B241401800?010000113A000000000?000000000?000000000?000000000? +6I1954195C000000050C241402800?608003155I000000000?000000000?000000000?000000000? +6I1954195C000000050D241403800?360000152A000000000?000000000?000000000?000000000? +6I1954195C000000050E241404800?211009141D000000000?000000000?000000000?000000000? +6I1954195C000000050F241405800?300002141A000000000?000000000?000000000?000000000? +6I1954195C000000050G241406800?151409800B000000000?000000000?000000000?000000000? +6I1954195C000000050H241407800?350002166C000000000?000000000?000000000?000000000? +6I1954195C000000050I241408800?151272142I000000000?000000000?000000000?000000000? +6I1954195C000000051?241409800?600000144F000000000?000000000?000000000?000000000? +6I1954195C000000051A241410800?691964116H000000000?000000000?000000000?000000000? +6I1954195C000000051B241411800?201265146H000000000?000000000?000000000?000000000? +6I1954195C000000051C241412800?691272163I000000000?000000000?000000000?000000000? +6I1954195C000000051D241413800?158001142I000000000?000000000?000000000?000000000? +6I1954195C000000051E241414800?651023142G000000000?000000000?000000000?000000000? +6I1954195C000000051F241415800?451418146I000000000?000000000?000000000?000000000? +6I1954195C000000051G241416800?191270144H000000000?000000000?000000000?000000000? +6I1954195C000000051H241417800?461420142A000000000?000000000?000000000?000000000? +6I1954195C000000051I241418800?461422142C000000000?000000000?000000000?000000000? +6I1954195C000000052?241419800?000000002E000000000?000000000?000000000?000000000? +6I1954195C000000052A241420800?691424147G000000000?000000000?000000000?000000000? +6I1954195C000000052B241421800?691524147G000000000?000000000?000000000?000000000? +6I1954195C000000052C241422800?608001144E000000000?000000000?000000000?000000000? +6I1954195C000000052D241423800?601278144E000000000?000000000?000000000?000000000? +6I1954195C000000052E241424800?211285143H000000000?000000000?000000000?000000000? +6I1954195C000000052F241425800?241485148H000000000?000000000?000000000?000000000? +6I1954195C000000052G241426800?191252171H000000000?000000000?000000000?000000000? +6I1954195C000000052H241427800?451430109E000000000?000000000?000000000?000000000? +6I1954195C000000052I241428800?441431163B000000000?000000000?000000000?000000000? +6I1954195C000000053?241429800?350002143E000000000?000000000?000000000?000000000? +6I1954195C000000053A241430800?300003143I000000000?000000000?000000000?000000000? +6I1954195C000000053B241431800?601434167E000000000?000000000?000000000?000000000? +6I1954195C000000053C241432800?691250163I000000000?000000000?000000000?000000000? +6I1954195C000000053D241433800?310000141C000000000?000000000?000000000?000000000? +6I1954195C000000053E241434800?100000005?000000000?000000000?000000000?000000000? +6I1954195C000000053F241435800?441489144?000000000?000000000?000000000?000000000? +6I1954195C000000053G241436800?221639144B000000000?000000000?000000000?000000000? +6I1954195C000000053H241437800?678003149E000000000?000000000?000000000?000000000? +6I1954195C000000053I241438800?601665152B000000000?000000000?000000000?000000000? +6I1954195C000000054?241439800?151443144G000000000?000000000?000000000?000000000? +6I1954195C000000054A241440800?451494144E000000000?000000000?000000000?000000000? +6I1954195C000000054B241441800?600000155C000000000?000000000?000000000?000000000? +6I1954195C000000054C241442800?451697124G000000000?000000000?000000000?000000000? +6I1954195C000000054D241443800?240000109E000000000?000000000?000000000?000000000? +6I1954195C000000054E241444800?490000000?000000000?000000000?000000000?000000000? +6I1954195C000000054F241445800?210000140D000000000?000000000?000000000?000000000? +6I1954195C000000054G241446800?210000140E000000000?000000000?000000000?000000000? +6I1954195C000000054H241447800?690000800B000000000?000000000?000000000?000000000? +6I1954195C000000054I241448800?608003160H000000000?000000000?000000000?000000000? +6I1954195C000000055?241449800?300003145G000000000?000000000?000000000?000000000? +6I1954195C000000055A241450800?651961131A000000000?000000000?000000000?000000000? +6I1954195C000000055B241451800?211606160I000000000?000000000?000000000?000000000? +6I1954195C000000055C241452800?000404099H000000000?000000000?000000000?000000000? +6I1954195C000000055D241453800?601009096E000000000?000000000?000000000?000000000? +6I1954195C000000055E241454800?000000109E000000000?000000000?000000000?000000000? +6I1954195C000000055F241455800?151561800B000000000?000000000?000000000?000000000? +6I1954195C000000055G241456800?010000000?000000000?000000000?000000000?000000000? +6I1954195C000000055H241457800?151460800B000000000?000000000?000000000?000000000? +6I1954195C000000055I241458800?441462151B000000000?000000000?000000000?000000000? +6I1954195C000000056?241459800?211264141G000000000?000000000?000000000?000000000? +6I1954195C000000056A241460800?600000147C000000000?000000000?000000000?000000000? +6I1954195C000000056B241461800?181265147A000000000?000000000?000000000?000000000? +6I1954195C000000056C241462800?461615139C000000000?000000000?000000000?000000000? +6I1954195C000000056D241463800?115129277F000000000?000000000?000000000?000000000? +6I1954195C000000056E241464800?221495150B000000000?000000000?000000000?000000000? +6I1954195C000000056F241465800?201270147D000000000?000000000?000000000?000000000? +6I1954195C000000056G241466800?191270169D000000000?000000000?000000000?000000000? +6I1954195C000000056H241467800?300003142E000000000?000000000?000000000?000000000? +6I1954195C000000056I241468800?211272147E000000000?000000000?000000000?000000000? +6I1954195C000000057?241469800?461472162C000000000?000000000?000000000?000000000? +6I1954195C000000057A241470800?350001142H000000000?000000000?000000000?000000000? +6I1954195C000000057B241471800?350002157G000000000?000000000?000000000?000000000? +6I1954195C000000057C241472800?651250141B000000000?000000000?000000000?000000000? +6I1954195C000000057D241473800?211278148C000000000?000000000?000000000?000000000? +6I1954195C000000057E241474800?211278168A000000000?000000000?000000000?000000000? +6I1954195C000000057F241475800?601278158C000000000?000000000?000000000?000000000? +6I1954195C000000057G241476800?101886174A000000000?000000000?000000000?000000000? +6I1954195C000000057H241477800?241480163C000000000?000000000?000000000?000000000? +6I1954195C000000057I241478800?691481148E000000000?000000000?000000000?000000000? +6I1954195C000000058?241479800?608003148G000000000?000000000?000000000?000000000? +6I1954195C000000058A241480800?211285143H000000000?000000000?000000000?000000000? +6I1954195C000000058B241481800?300000146E000000000?000000000?000000000?000000000? +6I1954195C000000058C241482800?350000146E000000000?000000000?000000000?000000000? +6I1954195C000000058D241483800?651289149C000000000?000000000?000000000?000000000? +6I1954195C000000058E241484800?310002174C000000000?000000000?000000000?000000000? +6I1954195C000000058F241485800?221495150B000000000?000000000?000000000?000000000? +6I1954195C000000058G241486800?691241116H000000000?000000000?000000000?000000000? +6I1954195C000000058H241487800?300002154D000000000?000000000?000000000?000000000? +6I1954195C000000058I241488800?151441800B000000000?000000000?000000000?000000000? +6I1954195C000000059?241489800?310003149I000000000?000000000?000000000?000000000? +6I1954195C000000059A241490800?004673765F000000000?000000000?000000000?000000000? +6I1954195C000000059B241491800?461594139C000000000?000000000?000000000?000000000? +6I1954195C000000059C241492800?651045144I000000000?000000000?000000000?000000000? +6I1954195C000000059D241493800?451496149G000000000?000000000?000000000?000000000? +6I1954195C000000059E241494800?608002140C000000000?000000000?000000000?000000000? +6I1954195C000000059F241495800?000000146E000000000?000000000?000000000?000000000? +6I1954195C000000059G241496800?300003140F000000000?000000000?000000000?000000000? +6I1954195C000000059H241497800?600000140E000000000?000000000?000000000?000000000? +6I1954195C000000059I241498800?350002156F000000000?000000000?000000000?000000000? +6I1954195C000000060?241499800?461652170C000000000?000000000?000000000?000000000? +6I1954195C000000060A241500800?651104116C000000000?000000000?000000000?000000000? +6I1954195C000000060B241501800?241265161I000000000?000000000?000000000?000000000? +6I1954195C000000060C241502800?671264166I000000000?000000000?000000000?000000000? +6I1954195C000000060D241503800?300005141E000000000?000000000?000000000?000000000? +6I1954195C000000060E241504800?434294481I000000000?000000000?000000000?000000000? +6I1954195C000000060F241505800?691261158E000000000?000000000?000000000?000000000? +6I1954195C000000060G241506800?000255491H000000000?000000000?000000000?000000000? +6I1954195C000000060H241507800?158001156C000000000?000000000?000000000?000000000? +6I1954195C000000060I241508800?600000165E000000000?000000000?000000000?000000000? +6I1954195C000000061?241509800?191264163A000000000?000000000?000000000?000000000? +6I1954195C000000061A241510800?181267162A000000000?000000000?000000000?000000000? +6I1954195C000000061B241511800?441515131F000000000?000000000?000000000?000000000? +6I1954195C000000061C241512800?300005152E000000000?000000000?000000000?000000000? +6I1954195C000000061D241513800?066273088D000000000?000000000?000000000?000000000? +6I1954195C000000061E241514800?221495155A000000000?000000000?000000000?000000000? +6I1954195C000000061F241515800?211270152C000000000?000000000?000000000?000000000? +6I1954195C000000061G241516800?191270169E000000000?000000000?000000000?000000000? +6I1954195C000000061H241517800?191270160B000000000?000000000?000000000?000000000? +6I1954195C000000061I241518800?000000005?000000000?000000000?000000000?000000000? +6I1954195C000000062?241519800?300004163?000000000?000000000?000000000?000000000? +6I1954195C000000062A241520800?198003148?000000000?000000000?000000000?000000000? +6I1954195C000000062B241521800?118002147I000000000?000000000?000000000?000000000? +6I1954195C000000062C241522800?300002167I000000000?000000000?000000000?000000000? +6I1954195C000000062D241523800?201277153?000000000?000000000?000000000?000000000? +6I1954195C000000062E241524800?658003168G000000000?000000000?000000000?000000000? +6I1954195C000000062F241525800?461478152I000000000?000000000?000000000?000000000? +6I1954195C000000062G241526800?691886174B000000000?000000000?000000000?000000000? +6I1954195C000000062H241527800?451680144E000000000?000000000?000000000?000000000? +6I1954195C000000062I241528800?461581153B000000000?000000000?000000000?000000000? +6I1954195C000000063?241529800?691482148E000000000?000000000?000000000?000000000? +6I1954195C000000063A241530800?601283153G000000000?000000000?000000000?000000000? +6I1954195C000000063B241531800?201285158H000000000?000000000?000000000?000000000? +6I1954195C000000063C241532800?171285153I000000000?000000000?000000000?000000000? +6I1954195C000000063D241533800?310003174C000000000?000000000?000000000?000000000? +6I1954195C000000063E241534800?079689679C000000000?000000000?000000000?000000000? +6I1954195C000000063F241535800?350000171F000000000?000000000?000000000?000000000? +6I1954195C000000063G241536800?658002154E000000000?000000000?000000000?000000000? +6I1954195C000000063H241537800?300002154C000000000?000000000?000000000?000000000? +6I1954195C000000063I241538800?151691129E000000000?000000000?000000000?000000000? +6I1954195C000000064?241539800?350002144E000000000?000000000?000000000?000000000? +6I1954195C000000064A241540800?618003174H000000000?000000000?000000000?000000000? +6I1954195C000000064B241541800?161444165?000000000?000000000?000000000?000000000? +6I1954195C000000064C241542800?651045159I000000000?000000000?000000000?000000000? +6I1954195C000000064D241543800?441547144E000000000?000000000?000000000?000000000? +6I1954195C000000064E241544800?461461161A000000000?000000000?000000000?000000000? +6I1954195C000000064F241545800?300003145E000000000?000000000?000000000?000000000? +6I1954195C000000064G241546800?601252156D000000000?000000000?000000000?000000000? +6I1954195C000000064H241547800?211252155F000000000?000000000?000000000?000000000? +6I1954195C000000064I241548800?000093264C000000000?000000000?000000000?000000000? +6I1954195C000000065?241549800?300003155G000000000?000000000?000000000?000000000? +6I1954195C000000065A241550800?350001145H000000000?000000000?000000000?000000000? +6I1954195C000000065B241551800?601504150I000000000?000000000?000000000?000000000? +6I1954195C000000065C241552800?608003160I000000000?000000000?000000000?000000000? +6I1954195C000000065D241553800?300002145I000000000?000000000?000000000?000000000? +6I1954195C000000065E241554800?461507125H000000000?000000000?000000000?000000000? +6I1954195C000000065F241555800?601167157H000000000?000000000?000000000?000000000? +6I1954195C000000065G241556800?688002156E000000000?000000000?000000000?000000000? +6I1954195C000000065H241557800?151560800B000000000?000000000?000000000?000000000? +6I1954195C000000065I241558800?101562161G000000000?000000000?000000000?000000000? +6I1954195C000000066?241559800?101463151G000000000?000000000?000000000?000000000? +6I1954195C000000066A241560800?600000157H000000000?000000000?000000000?000000000? +6I1954195C000000066B241561800?600000157D000000000?000000000?000000000?000000000? +6I1954195C000000066C241562800?025439357E000000000?000000000?000000000?000000000? +6I1954195C000000066D241563800?608002157A000000000?000000000?000000000?000000000? +6I1954195C000000066E241564800?191270164H000000000?000000000?000000000?000000000? +6I1954195C000000066F241565800?151568157C000000000?000000000?000000000?000000000? +6I1954195C000000066G241566800?608002162E000000000?000000000?000000000?000000000? +6I1954195C000000066H241567800?191270140B000000000?000000000?000000000?000000000? +6I1954195C000000066I241568800?490000000?000000000?000000000?000000000?000000000? +6I1954195C000000067?241569800?681272162G000000000?000000000?000000000?000000000? +6I1954195C000000067A241570800?201278193A000000000?000000000?000000000?000000000? +6I1954195C000000067B241571800?300002152H000000000?000000000?000000000?000000000? +6I1954195C000000067C241572800?000151484B000000000?000000000?000000000?000000000? +6I1954195C000000067D241573800?181277153A000000000?000000000?000000000?000000000? +6I1954195C000000067E241574800?211278158B000000000?000000000?000000000?000000000? +6I1954195C000000067F241575800?688002153H000000000?000000000?000000000?000000000? +6I1954195C000000067G241576800?111886174B000000000?000000000?000000000?000000000? +6I1954195C000000067H241577800?108002144E000000000?000000000?000000000?000000000? +6I1954195C000000067I241578800?211283158F000000000?000000000?000000000?000000000? +6I1954195C000000068?241579800?241283153F000000000?000000000?000000000?000000000? +6I1954195C000000068A241580800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000068B241581800?181285153I000000000?000000000?000000000?000000000? +6I1954195C000000068C241582800?300002168I000000000?000000000?000000000?000000000? +6I1954195C000000068D241583800?300002158I000000000?000000000?000000000?000000000? +6I1954195C000000068E241584800?101952116F000000000?000000000?000000000?000000000? +6I1954195C000000068F241585800?241539169H000000000?000000000?000000000?000000000? +6I1954195C000000068G241586800?651289159C000000000?000000000?000000000?000000000? +6I1954195C000000068H241587800?000000005?000000000?000000000?000000000?000000000? +6I1954195C000000068I241588800?461591159E000000000?000000000?000000000?000000000? +6I1954195C000000069?241589800?201293169F000000000?000000000?000000000?000000000? +6I1954195C000000069A241590800?601952136D000000000?000000000?000000000?000000000? +6I1954195C000000069B241591800?441595154F000000000?000000000?000000000?000000000? +6I1954195C000000069C241592800?651045154I000000000?000000000?000000000?000000000? +6I1954195C000000069D241593800?451596159G000000000?000000000?000000000?000000000? +6I1954195C000000069E241594800?601548151F000000000?000000000?000000000?000000000? +6I1954195C000000069F241595800?695555133H000000000?000000000?000000000?000000000? +6I1954195C000000069G241596800?300003160E000000000?000000000?000000000?000000000? +6I1954195C000000069H241597800?600000165E000000000?000000000?000000000?000000000? +6I1954195C000000069I241598800?608003155H000000000?000000000?000000000?000000000? +6I1954195C000000070?241599800?300003120G000000000?000000000?000000000?000000000? +6I1954195C000000070A241600800?651023118I000000000?000000000?000000000?000000000? +6I1954195C000000070B241601800?350001170I000000000?000000000?000000000?000000000? +6I1954195C000000070C241602800?608003166B000000000?000000000?000000000?000000000? +6I1954195C000000070D241603800?678002166A000000000?000000000?000000000?000000000? +6I1954195C000000070E241604800?350002161F000000000?000000000?000000000?000000000? +6I1954195C000000070F241605800?151508800B000000000?000000000?000000000?000000000? +6I1954195C000000070G241606800?300002161C000000000?000000000?000000000?000000000? +6I1954195C000000070H241607800?151610800B000000000?000000000?000000000?000000000? +6I1954195C000000070I241608800?101612166G000000000?000000000?000000000?000000000? +6I1954195C000000071?241609800?101513156G000000000?000000000?000000000?000000000? +6I1954195C000000071A241610800?600000167C000000000?000000000?000000000?000000000? +6I1954195C000000071B241611800?171265147A000000000?000000000?000000000?000000000? +6I1954195C000000071C241612800?007295173G000000000?000000000?000000000?000000000? +6I1954195C000000071D241613800?201267162?000000000?000000000?000000000?000000000? +6I1954195C000000071E241614800?241267172A000000000?000000000?000000000?000000000? +6I1954195C000000071F241615800?601434144E000000000?000000000?000000000?000000000? +6I1954195C000000071G241616800?108002167E000000000?000000000?000000000?000000000? +6I1954195C000000071H241617800?191270155B000000000?000000000?000000000?000000000? +6I1954195C000000071I241618800?159154943?000000000?000000000?000000000?000000000? +6I1954195C000000072?241619800?651272143B000000000?000000000?000000000?000000000? +6I1954195C000000072A241620800?211274152G000000000?000000000?000000000?000000000? +6I1954195C000000072B241621800?461624159E000000000?000000000?000000000?000000000? +6I1954195C000000072C241622800?691576157I000000000?000000000?000000000?000000000? +6I1954195C000000072D241623800?691293150A000000000?000000000?000000000?000000000? +6I1954195C000000072E241624800?441595167H000000000?000000000?000000000?000000000? +6I1954195C000000072F241625800?101278168C000000000?000000000?000000000?000000000? +6I1954195C000000072G241626800?211283163F000000000?000000000?000000000?000000000? +6I1954195C000000072H241627800?151444160A000000000?000000000?000000000?000000000? +6I1954195C000000072I241628800?691281148D000000000?000000000?000000000?000000000? +6I1954195C000000073?241629800?350001168E000000000?000000000?000000000?000000000? +6I1954195C000000073A241630800?691433143F000000000?000000000?000000000?000000000? +6I1954195C000000073B241631800?350002143G000000000?000000000?000000000?000000000? +6I1954195C000000073C241632800?310002164A000000000?000000000?000000000?000000000? +6I1954195C000000073D241633800?678002154A000000000?000000000?000000000?000000000? +6I1954195C000000073E241634800?118001174H000000000?000000000?000000000?000000000? +6I1954195C000000073F241635800?300000171F000000000?000000000?000000000?000000000? +6I1954195C000000073G241636800?651289164C000000000?000000000?000000000?000000000? +6I1954195C000000073H241637800?300002169C000000000?000000000?000000000?000000000? +6I1954195C000000073I241638800?601291164E000000000?000000000?000000000?000000000? +6I1954195C000000074?241639800?310000141C000000000?000000000?000000000?000000000? +6I1954195C000000074A241640800?658003167B000000000?000000000?000000000?000000000? +6I1954195C000000074B241641800?151444160D000000000?000000000?000000000?000000000? +6I1954195C000000074C241642800?651045169I000000000?000000000?000000000?000000000? +6I1954195C000000074D241643800?451646164G000000000?000000000?000000000?000000000? +6I1954195C000000074E241644800?671297165A000000000?000000000?000000000?000000000? +6I1954195C000000074F241645800?641268171G000000000?000000000?000000000?000000000? +6I1954195C000000074G241646800?300003165F000000000?000000000?000000000?000000000? +6I1954195C000000074H241647800?600000160F000000000?000000000?000000000?000000000? +6I1954195C000000074I241648800?350004125I000000000?000000000?000000000?000000000? +6I1954195C000000075?241649800?300003165G000000000?000000000?000000000?000000000? +6I1954195C000000075A241650800?608003140G000000000?000000000?000000000?000000000? +6I1954195C000000075B241651800?161654151?000000000?000000000?000000000?000000000? +6I1954195C000000075C241652800?161456146A000000000?000000000?000000000?000000000? +6I1954195C000000075D241653800?101506146F000000000?000000000?000000000?000000000? +6I1954195C000000075E241654800?500000000?000000000?000000000?000000000?000000000? +6I1954195C000000075F241655800?300002151A000000000?000000000?000000000?000000000? +6I1954195C000000075G241656800?151659800B000000000?000000000?000000000?000000000? +6I1954195C000000075H241657800?151660800B000000000?000000000?000000000?000000000? +6I1954195C000000075I241658800?001742112?000000000?000000000?000000000?000000000? +6I1954195C000000076?241659800?600000160F000000000?000000000?000000000?000000000? +6I1954195C000000076A241660800?610000157H000000000?000000000?000000000?000000000? +6I1954195C000000076B241661800?181265151I000000000?000000000?000000000?000000000? +6I1954195C000000076C241662800?101665152?000000000?000000000?000000000?000000000? +6I1954195C000000076D241663800?211268167A000000000?000000000?000000000?000000000? +6I1954195C000000076E241664800?241267162B000000000?000000000?000000000?000000000? +6I1954195C000000076F241665800?100000000?000000000?000000000?000000000?000000000? +6I1954195C000000076G241666800?441569167D000000000?000000000?000000000?000000000? +6I1954195C000000076H241667800?191270159H000000000?000000000?000000000?000000000? +6I1954195C000000076I241668800?191572173?000000000?000000000?000000000?000000000? +6I1954195C000000077?241669800?350002149E000000000?000000000?000000000?000000000? +6I1954195C000000077A241670800?694444123?000000000?000000000?000000000?000000000? +6I1954195C000000077B241671800?601274162I000000000?000000000?000000000?000000000? +6I1954195C000000077C241672800?350001127I000000000?000000000?000000000?000000000? +6I1954195C000000077D241673800?451626137D000000000?000000000?000000000?000000000? +6I1954195C000000077E241674800?601278144E000000000?000000000?000000000?000000000? +6I1954195C000000077F241675800?111278144E000000000?000000000?000000000?000000000? +6I1954195C000000077G241676800?108001154?000000000?000000000?000000000?000000000? +6I1954195C000000077H241677800?691580153C000000000?000000000?000000000?000000000? +6I1954195C000000077I241678800?201285163H000000000?000000000?000000000?000000000? +6I1954195C000000078?241679800?641285147?000000000?000000000?000000000?000000000? +6I1954195C000000078A241680800?601283163G000000000?000000000?000000000?000000000? +6I1954195C000000078B241681800?111587149A000000000?000000000?000000000?000000000? +6I1954195C000000078C241682800?691535173H000000000?000000000?000000000?000000000? +6I1954195C000000078D241683800?101587144E000000000?000000000?000000000?000000000? +6I1954195C000000078E241684800?645963711A000000000?000000000?000000000?000000000? +6I1954195C000000078F241685800?211291164D000000000?000000000?000000000?000000000? +6I1954195C000000078G241686800?101951105F000000000?000000000?000000000?000000000? +6I1954195C000000078H241687800?310001149H000000000?000000000?000000000?000000000? +6I1954195C000000078I241688800?221293171E000000000?000000000?000000000?000000000? +6I1954195C000000079?241689800?211252126G000000000?000000000?000000000?000000000? +6I1954195C000000079A241690800?000000005?000000000?000000000?000000000?000000000? +6I1954195C000000079B241691800?470000000?000000000?000000000?000000000?000000000? +6I1954195C000000079C241692800?651045164I000000000?000000000?000000000?000000000? +6I1954195C000000079D241693800?201297165?000000000?000000000?000000000?000000000? +6I1954195C000000079E241694800?608003125D000000000?000000000?000000000?000000000? +6I1954195C000000079F241695800?608003165C000000000?000000000?000000000?000000000? +6I1954195C000000079G241696800?211250160C000000000?000000000?000000000?000000000? +6I1954195C000000079H241697800?690000150C000000000?000000000?000000000?000000000? +6I1954195C000000079I241698800?201289155E000000000?000000000?000000000?000000000? +6I1954195C000000080?241699800?300003160G000000000?000000000?000000000?000000000? +6I1954195C000000080A241700800?661023118I000000000?000000000?000000000?000000000? +6I1954195C000000080B241701800?157079632G000000000?000000000?000000000?000000000? +6I1954195C000000080C241702800?000003000?000000000?000000000?000000000?000000000? +6I1954195C000000080D241703800?151456161A000000000?000000000?000000000?000000000? +6I1954195C000000080E241704800?108003171C000000000?000000000?000000000?000000000? +6I1954195C000000080F241705800?108001126B000000000?000000000?000000000?000000000? +6I1954195C000000080G241706800?118001154?000000000?000000000?000000000?000000000? +6I1954195C000000080H241707800?688002162G000000000?000000000?000000000?000000000? +6I1954195C000000080I241708800?151711166F000000000?000000000?000000000?000000000? +6I1954195C000000081?241709800?441276171D000000000?000000000?000000000?000000000? +6I1954195C000000081A241710800?461375171E000000000?000000000?000000000?000000000? +6I1954195C000000081B241711800?997500000?000000000?000000000?000000000?000000000? +6I1954195C000000081C241712800?608003166H000000000?000000000?000000000?000000000? +6I1954195C000000081D241713800?108003128C000000000?000000000?000000000?000000000? +6I1954195C000000081E241714800?300005172G000000000?000000000?000000000?000000000? +6I1954195C000000081F241715800?601618142F000000000?000000000?000000000?000000000? +6I1954195C000000081G241716800?300001172C000000000?000000000?000000000?000000000? +6I1954195C000000081H241717800?350001127C000000000?000000000?000000000?000000000? +6I1954195C000000081I241718800?350002129C000000000?000000000?000000000?000000000? +6I1954195C000000082?241719800?161024132I000000000?000000000?000000000?000000000? +6I1954195C000000082A241720800?441383172D000000000?000000000?000000000?000000000? +6I1954195C000000082B241721800?691526157I000000000?000000000?000000000?000000000? +6I1954195C000000082C241722800?350002137I000000000?000000000?000000000?000000000? +6I1954195C000000082D241723800?461476174A000000000?000000000?000000000?000000000? +6I1954195C000000082E241724800?201285128H000000000?000000000?000000000?000000000? +6I1954195C000000082F241725800?461286128G000000000?000000000?000000000?000000000? +6I1954195C000000082G241726800?191285164?000000000?000000000?000000000?000000000? +6I1954195C000000082H241727800?461682128B000000000?000000000?000000000?000000000? +6I1954195C000000082I241728800?101534129?000000000?000000000?000000000?000000000? +6I1954195C000000083?241729800?691732173E000000000?000000000?000000000?000000000? +6I1954195C000000083A241730800?608003138G000000000?000000000?000000000?000000000? +6I1954195C000000083B241731800?054041950?000000000?000000000?000000000?000000000? +6I1954195C000000083C241732800?350002144E000000000?000000000?000000000?000000000? +6I1954195C000000083D241733800?601291134G000000000?000000000?000000000?000000000? +6I1954195C000000083E241734800?608003139D000000000?000000000?000000000?000000000? +6I1954195C000000083F241735800?241539104C000000000?000000000?000000000?000000000? +6I1954195C000000083G241736800?701951132F000000000?000000000?000000000?000000000? +6I1954195C000000083H241737800?360000126C000000000?000000000?000000000?000000000? +6I1954195C000000083I241738800?221293174F000000000?000000000?000000000?000000000? +6I1954195C000000084?241739800?241293150E000000000?000000000?000000000?000000000? +6I1954195C000000084A241740800?211285159?000000000?000000000?000000000?000000000? +6I1954195C000000084B241741800?618003170D000000000?000000000?000000000?000000000? +6I1954195C000000084C241742800?108001174G000000000?000000000?000000000?000000000? +6I1954195C000000084D241743800?350002129I000000000?000000000?000000000?000000000? +6I1954195C000000084E241744800?198001174E000000000?000000000?000000000?000000000? +6I1954195C000000084F241745800?211250171B000000000?000000000?000000000?000000000? +6I1954195C000000084G241746800?151702171?000000000?000000000?000000000?000000000? +6I1954195C000000084H241747800?461705170F000000000?000000000?000000000?000000000? +6I1954195C000000084I241748800?300009172?000000000?000000000?000000000?000000000? +6I1954195C000000085?241749800?671252170H000000000?000000000?000000000?000000000? +6I1954195C000000085A241750800?441854180D000000000?000000000?000000000?000000000? +6I1954195C000000085B241751800?608003180I000000000?000000000?000000000?000000000? +6I1954195C000000085C241752800?441755175F000000000?000000000?000000000?000000000? +6I1954195C000000085D241753800?691906190I000000000?000000000?000000000?000000000? +6I1954195C000000085E241754800?221260176C000000000?000000000?000000000?000000000? +6I1954195C000000085F241755800?601759191C000000000?000000000?000000000?000000000? +6I1954195C000000085G241756800?651293114G000000000?000000000?000000000?000000000? +6I1954195C000000085H241757800?211265176H000000000?000000000?000000000?000000000? +6I1954195C000000085I241758800?000000144E000000000?000000000?000000000?000000000? +6I1954195C000000086?241759800?060000000?000000000?000000000?000000000?000000000? +6I1954195C000000086A241760800?191250178G000000000?000000000?000000000?000000000? +6I1954195C000000086B241761800?241264191G000000000?000000000?000000000?000000000? +6I1954195C000000086C241762800?191250179?000000000?000000000?000000000?000000000? +6I1954195C000000086D241763800?461766191H000000000?000000000?000000000?000000000? +6I1954195C000000086E241764800?641277190B000000000?000000000?000000000?000000000? +6I1954195C000000086F241765800?118002186D000000000?000000000?000000000?000000000? +6I1954195C000000086G241766800?601919192C000000000?000000000?000000000?000000000? +6I1954195C000000086H241767800?608001182C000000000?000000000?000000000?000000000? +6I1954195C000000086I241768800?461771177B000000000?000000000?000000000?000000000? +6I1954195C000000087?241769800?691922177G000000000?000000000?000000000?000000000? +6I1954195C000000087A241770800?691924177G000000000?000000000?000000000?000000000? +6I1954195C000000087B241771800?691774177H000000000?000000000?000000000?000000000? +6I1954195C000000087C241772800?691775177H000000000?000000000?000000000?000000000? +6I1954195C000000087D241773800?350001177I000000000?000000000?000000000?000000000? +6I1954195C000000087E241774800?618003126D000000000?000000000?000000000?000000000? +6I1954195C000000087F241775800?608003126D000000000?000000000?000000000?000000000? +6I1954195C000000087G241776800?181818181H000000000?000000000?000000000?000000000? +6I1954195C000000087H241777800?241285178H000000000?000000000?000000000?000000000? +6I1954195C000000087I241778800?241283178F000000000?000000000?000000000?000000000? +6I1954195C000000088?241779800?441783178D000000000?000000000?000000000?000000000? +6I1954195C000000088A241780800?601293179G000000000?000000000?000000000?000000000? +6I1954195C000000088B241781800?678002178I000000000?000000000?000000000?000000000? +6I1954195C000000088C241782800?101785179A000000000?000000000?000000000?000000000? +6I1954195C000000088D241783800?461937193?000000000?000000000?000000000?000000000? +6I1954195C000000088E241784800?300005189G000000000?000000000?000000000?000000000? +6I1954195C000000088F241785800?200000000?000000000?000000000?000000000?000000000? +6I1954195C000000088G241786800?688002179E000000000?000000000?000000000?000000000? +6I1954195C000000088H241787800?608003114F000000000?000000000?000000000?000000000? +6I1954195C000000088I241788800?350001126?000000000?000000000?000000000?000000000? +6I1954195C000000089?241789800?201293179F000000000?000000000?000000000?000000000? +6I1954195C000000089A241790800?608003179H000000000?000000000?000000000?000000000? +6I1954195C000000089B241791800?191278193B000000000?000000000?000000000?000000000? +6I1954195C000000089C241792800?608003189I000000000?000000000?000000000?000000000? +6I1954195C000000089D241793800?310002191F000000000?000000000?000000000?000000000? +6I1954195C000000089E241794800?572957805A000000000?000000000?000000000?000000000? +6I1954195C000000089F241795800?151568177C000000000?000000000?000000000?000000000? +6I1954195C000000089G241796800?151799175B000000000?000000000?000000000?000000000? +6I1954195C000000089H241797800?111759176D000000000?000000000?000000000?000000000? +6I1954195C000000089I241798800?111855191D000000000?000000000?000000000?000000000? +6I1954195C000000090?241799800?972000000?000000000?000000000?000000000?000000000? +6I1954195C000000090A241800800?000000097?000000000?000000000?000000000?000000000? +6I1954195C000000090B241801800?500000000?000000000?000000000?000000000?000000000? +6I1954195C000000090C241802800?111869189A000000000?000000000?000000000?000000000? +6I1954195C000000090D241803800?191806188B000000000?000000000?000000000?000000000? +6I1954195C000000090E241804800?461808181A000000000?000000000?000000000?000000000? +6I1954195C000000090F241805800?300001186F000000000?000000000?000000000?000000000? +6I1954195C000000090G241806800?230258509C000000000?000000000?000000000?000000000? +6I1954195C000000090H241807800?101274182I000000000?000000000?000000000?000000000? +6I1954195C000000090I241808800?151272187I000000000?000000000?000000000?000000000? +6I1954195C000000091?241809800?111812181G000000000?000000000?000000000?000000000? +6I1954195C000000091A241810800?158001181I000000000?000000000?000000000?000000000? +6I1954195C000000091B241811800?161272187H000000000?000000000?000000000?000000000? +6I1954195C000000091C241812800?002718281H000000000?000000000?000000000?000000000? +6I1954195C000000091D241813800?691816187?000000000?000000000?000000000?000000000? +6I1954195C000000091E241814800?691867187?000000000?000000000?000000000?000000000? +6I1954195C000000091F241815800?101274188A000000000?000000000?000000000?000000000? +6I1954195C000000091G241816800?165000000?000000000?000000000?000000000?000000000? +6I1954195C000000091H241817800?461820187A000000000?000000000?000000000?000000000? +6I1954195C000000091I241818800?241821182D000000000?000000000?000000000?000000000? +6I1954195C000000092?241819800?350004188?000000000?000000000?000000000?000000000? +6I1954195C000000092A241820800?108001182E000000000?000000000?000000000?000000000? +6I1954195C000000092B241821800?101274000?000000000?000000000?000000000?000000000? +6I1954195C000000092C241822800?300001188B000000000?000000000?000000000?000000000? +6I1954195C000000092D241823800?191776189D000000000?000000000?000000000?000000000? +6I1954195C000000092E241824800?300003183C000000000?000000000?000000000?000000000? +6I1954195C000000092F241825800?191828181D000000000?000000000?000000000?000000000? +6I1954195C000000092G241826800?211285188H000000000?000000000?000000000?000000000? +6I1954195C000000092H241827800?191830181C000000000?000000000?000000000?000000000? +6I1954195C000000092I241828800?606530659G000000000?000000000?000000000?000000000? +6I1954195C000000093?241829800?211285183H000000000?000000000?000000000?000000000? +6I1954195C000000093A241830800?192049908F000000000?000000000?000000000?000000000? +6I1954195C000000093B241831800?300002183G000000000?000000000?000000000?000000000? +6I1954195C000000093C241832800?000000005B000000000?000000000?000000000?000000000? +6I1954195C000000093D241833800?151836800B000000000?000000000?000000000?000000000? +6I1954195C000000093E241834800?310002184C000000000?000000000?000000000?000000000? +6I1954195C000000093F241835800?350004184F000000000?000000000?000000000?000000000? +6I1954195C000000093G241836800?600000183A000000000?000000000?000000000?000000000? +6I1954195C000000093H241837800?201291184D000000000?000000000?000000000?000000000? +6I1954195C000000093I241838800?601291184E000000000?000000000?000000000?000000000? +6I1954195C000000094?241839800?191842182F000000000?000000000?000000000?000000000? +6I1954195C000000094A241840800?300008181?000000000?000000000?000000000?000000000? +6I1954195C000000094B241841800?211297180B000000000?000000000?000000000?000000000? +6I1954195C000000094C241842800?434294481I000000000?000000000?000000000?000000000? +6I1954195C000000094D241843800?350002175?000000000?000000000?000000000?000000000? +6I1954195C000000094E241844800?441847139C000000000?000000000?000000000?000000000? +6I1954195C000000094F241845800?111848180C000000000?000000000?000000000?000000000? +6I1954195C000000094G241846800?441849144E000000000?000000000?000000000?000000000? +6I1954195C000000094H241847800?461393175A000000000?000000000?000000000?000000000? +6I1954195C000000094I241848800?500000000?000000000?000000000?000000000?000000000? +6I1954195C000000095?241849800?360000186B000000000?000000000?000000000?000000000? +6I1954195C000000095A241850800?101855185I000000000?000000000?000000000?000000000? +6I1954195C000000095B241851800?101856186A000000000?000000000?000000000?000000000? +6I1954195C000000095C241852800?666666666F000000000?000000000?000000000?000000000? +6I1954195C000000095D241853800?400000000?000000000?000000000?000000000?000000000? +6I1954195C000000095E241854800?300001186C000000000?000000000?000000000?000000000? +6I1954195C000000095F241855800?285714285G000000000?000000000?000000000?000000000? +6I1954195C000000095G241856800?222222222B000000000?000000000?000000000?000000000? +6I1954195C000000095H241857800?191264180E000000000?000000000?000000000?000000000? +6I1954195C000000095I241858800?191264188I000000000?000000000?000000000?000000000? +6I1954195C000000096?241859800?191264179B000000000?000000000?000000000?000000000? +6I1954195C000000096A241860800?211264176G000000000?000000000?000000000?000000000? +6I1954195C000000096B241861800?191264189?000000000?000000000?000000000?000000000? +6I1954195C000000096C241862800?691865186H000000000?000000000?000000000?000000000? +6I1954195C000000096D241863800?461872187D000000000?000000000?000000000?000000000? +6I1954195C000000096E241864800?101518128C000000000?000000000?000000000?000000000? +6I1954195C000000096F241865800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000096G241866800?101869187C000000000?000000000?000000000?000000000? +6I1954195C000000096H241867800?050000000?000000000?000000000?000000000?000000000? +6I1954195C000000096I241868800?231272187E000000000?000000000?000000000?000000000? +6I1954195C000000097?241869800?200000000?000000000?000000000?000000000?000000000? +6I1954195C000000097A241870800?241274187G000000000?000000000?000000000?000000000? +6I1954195C000000097B241871800?108001182G000000000?000000000?000000000?000000000? +6I1954195C000000097C241872800?161896180D000000000?000000000?000000000?000000000? +6I1954195C000000097D241873800?608003188D000000000?000000000?000000000?000000000? +6I1954195C000000097E241874800?151896180D000000000?000000000?000000000?000000000? +6I1954195C000000097F241875800?658003183D000000000?000000000?000000000?000000000? +6I1954195C000000097G241876800?608002188E000000000?000000000?000000000?000000000? +6I1954195C000000097H241877800?350002188C000000000?000000000?000000000?000000000? +6I1954195C000000097I241878800?151832188G000000000?000000000?000000000?000000000? +6I1954195C000000098?241879800?161832188G000000000?000000000?000000000?000000000? +6I1954195C000000098A241880800?441835189C000000000?000000000?000000000?000000000? +6I1954195C000000098B241881800?608003183I000000000?000000000?000000000?000000000? +6I1954195C000000098C241882800?691285184?000000000?000000000?000000000?000000000? +6I1954195C000000098D241883800?101886184A000000000?000000000?000000000?000000000? +6I1954195C000000098E241884800?191289182A000000000?000000000?000000000?000000000? +6I1954195C000000098F241885800?241289189B000000000?000000000?000000000?000000000? +6I1954195C000000098G241886800?100000000?000000000?000000000?000000000?000000000? +6I1954195C000000098H241887800?608002144E000000000?000000000?000000000?000000000? +6I1954195C000000098I241888800?601291189E000000000?000000000?000000000?000000000? +6I1954195C000000099?241889800?608003189H000000000?000000000?000000000?000000000? +6I1954195C000000099A241890800?608003185?000000000?000000000?000000000?000000000? +6I1954195C000000099B241891800?641297187F000000000?000000000?000000000?000000000? +6I1954195C000000099C241892800?198001186?000000000?000000000?000000000?000000000? +6I1954195C000000099D241893800?010000183E000000000?000000000?000000000?000000000? +6I1954195C000000099E241894800?608003185A000000000?000000000?000000000?000000000? +6I1954195C000000099F241895800?111848182B000000000?000000000?000000000?000000000? +6I1954195C000000099G241896800?000000000A000000000?000000000?000000000?000000000? +6I1954195C000000099H241897800?691901175D000000000?000000000?000000000?000000000? +6I1954195C000000099I241898800?101852185G000000000?000000000?000000000?000000000? +6I1954195C000000100?241899800?101853185H000000000?000000000?000000000?000000000? +6I1954195C000000100A241900800?300002175G000000000?000000000?000000000?000000000? +6I1954195C000000100B241901800?300000178A000000000?000000000?000000000?000000000? +6I1954195C000000100C241902800?691905190I000000000?000000000?000000000?000000000? +6I1954195C000000100D241903800?618003191A000000000?000000000?000000000?000000000? +6I1954195C000000100E241904800?300001191B000000000?000000000?000000000?000000000? +6I1954195C000000100F241905800?101731128E000000000?000000000?000000000?000000000? +6I1954195C000000100G241906800?101580128E000000000?000000000?000000000?000000000? +6I1954195C000000100H241907800?191250190D000000000?000000000?000000000?000000000? +6I1954195C000000100I241908800?211283193F000000000?000000000?000000000?000000000? +6I1954195C000000101?241909800?241267157?000000000?000000000?000000000?000000000? +6I1954195C000000101A241910800?350001193D000000000?000000000?000000000?000000000? +6I1954195C000000101B241911800?191776194?000000000?000000000?000000000?000000000? +6I1954195C000000101C241912800?608003178B000000000?000000000?000000000?000000000? +6I1954195C000000101D241913800?191293192G000000000?000000000?000000000?000000000? +6I1954195C000000101E241914800?191250193H000000000?000000000?000000000?000000000? +6I1954195C000000101F241915800?350002193E000000000?000000000?000000000?000000000? +6I1954195C000000101G241916800?350001193E000000000?000000000?000000000?000000000? +6I1954195C000000101H241917800?300003192E000000000?000000000?000000000?000000000? +6I1954195C000000101I241918800?161921192F000000000?000000000?000000000?000000000? +6I1954195C000000102?241919800?000100000?000000000?000000000?000000000?000000000? +6I1954195C000000102A241920800?211277178?000000000?000000000?000000000?000000000? +6I1954195C000000102B241921800?000003000?000000000?000000000?000000000?000000000? +6I1954195C000000102C241922800?658003191?000000000?000000000?000000000?000000000? +6I1954195C000000102D241923800?641265177?000000000?000000000?000000000?000000000? +6I1954195C000000102E241924800?000008190D000000000?000000000?000000000?000000000? +6I1954195C000000102F241925800?151928800B000000000?000000000?000000000?000000000? +6I1954195C000000102G241926800?461929193?000000000?000000000?000000000?000000000? +6I1954195C000000102H241927800?350001193C000000000?000000000?000000000?000000000? +6I1954195C000000102I241928800?600000194A000000000?000000000?000000000?000000000? +6I1954195C000000103?241929800?651265176I000000000?000000000?000000000?000000000? +6I1954195C000000103A241930800?601297126D000000000?000000000?000000000?000000000? +6I1954195C000000103B241931800?608002193I000000000?000000000?000000000?000000000? +6I1954195C000000103C241932800?608003114C000000000?000000000?000000000?000000000? +6I1954195C000000103D241933800?101665192?000000000?000000000?000000000?000000000? +6I1954195C000000103E241934800?441942179C000000000?000000000?000000000?000000000? +6I1954195C000000103F241935800?608002194D000000000?000000000?000000000?000000000? +6I1954195C000000103G241936800?601794165E000000000?000000000?000000000?000000000? +6I1954195C000000103H241937800?651701191?000000000?000000000?000000000?000000000? +6I1954195C000000103I241938800?608003114H000000000?000000000?000000000?000000000? +6I1954195C000000104?241939800?198001194E000000000?000000000?000000000?000000000? +6I1954195C000000104A241940800?608003114I000000000?000000000?000000000?000000000? +6I1954195C000000104B241941800?211297190?000000000?000000000?000000000?000000000? +6I1954195C000000104C241942800?310003191E000000000?000000000?000000000?000000000? +6I1954195C000000104D241943800?151701191?000000000?000000000?000000000?000000000? +6I1954195C000000104E241944800?360000176E000000000?000000000?000000000?000000000? +6I1954195C000000104F241945800?211250190C000000000?000000000?000000000?000000000? +6I1954195C000000104G241946800?101978196E000000000?000000000?000000000?000000000? +6I1954195C000000104H241947800?601977194F000000000?000000000?000000000?000000000? +6I1954195C000000104I241948800?101963197?000000000?000000000?000000000?000000000? +6I1954195C000000105?241949800?441973109E000000000?000000000?000000000?000000000? +6I1954195C000000105A241950800?151977198G000000000?000000000?000000000?000000000? +6I1954195C000000105B241951800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000105C241952800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000105D241953800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000105E241954800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000105F241955800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000105G241956800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000105H241957800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000105I241958800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000106?241959800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000106A241960800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000106B241961800?608001196H000000000?000000000?000000000?000000000? +6I1954195C000000106C241962800?111978199I000000000?000000000?000000000?000000000? +6I1954195C000000106D241963800?241978199A000000000?000000000?000000000?000000000? +6I1954195C000000106E241964800?211977198I000000000?000000000?000000000?000000000? +6I1954195C000000106F241965800?211977196F000000000?000000000?000000000?000000000? +6I1954195C000000106G241966800?601969197C000000000?000000000?000000000?000000000? +6I1954195C000000106H241967800?211986199G000000000?000000000?000000000?000000000? +6I1954195C000000106I241968800?300004194H000000000?000000000?000000000?000000000? +6I1954195C000000107?241969800?000005000?000000000?000000000?000000000?000000000? +6I1954195C000000107A241970800?151974195?000000000?000000000?000000000?000000000? +6I1954195C000000107B241971800?101024196G000000000?000000000?000000000?000000000? +6I1954195C000000107C241972800?111977196B000000000?000000000?000000000?000000000? +6I1954195C000000107D241973800?211978198H000000000?000000000?000000000?000000000? +6I1954195C000000107E241974800?690000800C000000000?000000000?000000000?000000000? +6I1954195C000000107F241975800?108001194I000000000?000000000?000000000?000000000? +6I1954195C000000107G241976800?300003101I000000000?000000000?000000000?000000000? +6I1954195C000000107H241977800?691954195L000000000?000000000?000000000?000000000? +6I1954195C000000107I241978800?000000107H000000000?000000000?000000000?000000000? +6I1954195C000000108?241979800?241978800?000000000?000000000?000000000?000000000? +6I1954195C000000108A241980800?241978800?000000000?000000000?000000000?000000000? +6I1954195C000000108B241981800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000108C241982800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000108D241983800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000108E241984800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000108F241985800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000108G241986800?000000000?000000000?000000000?000000000?000000000? +6I1954195C000000108H241987800?101990800B000000000?000000000?000000000?000000000? +6I1954195C000000108I241988800?601291197B000000000?000000000?000000000?000000000? +6I1954195C000000109?241989800?118002199H000000000?000000000?000000000?000000000? +6I1954195C000000109A241990800?000000999I000000000?000000000?000000000?000000000? +6I1954195C000000109B241991800?601986197A000000000?000000000?000000000?000000000? +6I1954195C000000109C241992800?151024198G000000000?000000000?000000000?000000000? +6I1954195C000000109D241993800?151024198G000000000?000000000?000000000?000000000? +6I1954195C000000109E241994800?151024198G000000000?000000000?000000000?000000000? +6I1954195C000000109F241995800?151024198G000000000?000000000?000000000?000000000? +6I1954195C000000109G241996800?151024198G000000000?000000000?000000000?000000000? +6I1954195C000000109H241997800?711977194G000000000?000000000?000000000?000000000? +6I1954195C000000109I241998800?461966131E000000000?000000000?000000000?000000000? +6I1954195C000000110?241999800?461975196A000000000?000000000?000000000?000000000? diff --git a/I650/sw/is_example_1_src.txt b/I650/sw/is_example_1_src.txt index 49993d8d..2bd0acdf 100644 --- a/I650/sw/is_example_1_src.txt +++ b/I650/sw/is_example_1_src.txt @@ -5,11 +5,11 @@ uses two extra o2 codes: o2=800 (set lbox) and o2=453 (tr zero) warning: comments are allowed past column 28 but some characters - are forbidden: uppercase letters, question mark, exclamation, number char, - ampersand char. if these chars are used, the line (i.e. the card for this - line) will be interpreted as a load card, and program will crash on trying - to execute it. + are forbidden: uppercase letters, question mark, if these chars + are used, the line (i.e. the card for this line) will be interpreted + as a load card, and interpreter will crash on trying to execute it. + interpretive system syntax c-like equivalent sytax 100 -9 000 201 400 initp -move i1 prime initp: prime[c]=1 101 +0 001 050 100 loop c 050 initp c++; if c<50 goto initp @@ -30,7 +30,7 @@ 111 +1 300 301 301 loop2 add num mult mult loop2: mult=mult+num 112 +2 301 203 000 sub mult i50 last - 113 +0 201 103 114 tr sgn loop1 cont if mult >= 50 goto loop1 (go to b if +, go to c if -) + 113 +0 201 103 114 tr sgn loop1 cont if mult >= 50 goto loop1 // tr to b if +, go to c if - 114 +0 800 003 301 set lbox c mult c=mult 115 -9 000 200 400 -move zero prime prime[c]=0 @@ -40,14 +40,14 @@ 120 +9 000 201 300 loope move i1 num loope: num=1 121 +0 800 002 202 set lbox b i2 b=2 - 122 +1 300 201 300 prt1 add num i1 num prt1: num++ + 122 +1 300 201 300 prt1 add num i1 num prt1: num++ 123 -9 000 400 000 -move prime last last=prime[b] 124 +0 453 127 126 tr zero prt2 cont if last = 0 goto prt2 126 +0 410 300 300 pch num num punch num - 127 +0 010 050 122 prt2 loop b 050 prt1 prt2: b++; if b<50 goto prt1 + 127 +0 010 050 122 prt2 loop b 050 prt1 prt2: b++; if b<50 goto prt1 128 +0 000 000 000 unc stop end diff --git a/I650/sw/is_run.ini b/I650/sw/is_run.ini index 03f0522f..7e1de297 100644 --- a/I650/sw/is_run.ini +++ b/I650/sw/is_run.ini @@ -6,14 +6,14 @@ ; params: %1 source card deck to run with Floating Point Interpretive System (IS) -; %2 input card deck (if empty, do not attach input card +; %2 input card deck (if empty, do not attach input card) -; Load IS deck into (1 word per card format), but does not execute it +; Load is main deck into drum (1 word per card format), but does not execute it set cpu 2k echo *** -echo *** load is deck into drum +echo *** Load is main deck into drum echo *** att cdr1 -q is.dck @@ -22,12 +22,10 @@ d csw 7019519999 d ar 8000 go -; now put IS program cards in reader and load them +; Now put is program in reader and read it -! copy %1 deck_in.dck > nul -if "%2" == "" goto run -! copy %1 + %2 deck_in.dck > nul -:run +carddeck -q join %1 as deck_in.dck +if "%2" != "" carddeck -q join deck_in.dck %2 as deck_in.dck att cdr1 deck_in.dck set cdr1 wiring=is @@ -37,7 +35,7 @@ set cdp1 echo, print, wiring=is att cdp0 -n -q print.txt echo *** -echo *** load and run IS program +echo *** Read and run is program echo *** d csw 7019511333 diff --git a/I650/sw/it_compiler.dck b/I650/sw/it_compiler.dck new file mode 100644 index 00000000..2d6f46ba --- /dev/null +++ b/I650/sw/it_compiler.dck @@ -0,0 +1,1738 @@ +6I1954195C 0000241999800?7000510351 startrd1 0051 28-read +6I1954195C 0000240351800?6003540359 raucntrl 29- +6I1954195C 0000240359800?2119860339 stuw0010 30-header card +6I1954195C 0000240339800?6519570361 rals 31- +6I1954195C 0000240361800?6903640367 ldd sr3 32- +6I1954195C 0000240364800?6905170370 ldd sr3ed 33- +6I1954195C 0000240517800?6005200025 rausix 34-absolute +6I1954195C 0000240025800?2103830336 stua0001ps0 35-value count +6I1954195C 0000240336800?2000410144 ps0 stlpsi 36-clear +6I1954195C 0000240144800?6901470350 lddtau1 37- +6I1954195C 0000240350800?2419601234 stdtau ps 38- +6I1954195C 0000241234800?6019590363 ps rauffbit 39-check last +6I1954195C 0000240363800?4405671111 nzuend reada 40-statement +6I1954195C 0000241111800?7000510651 readard1 0051 41-first read +6I1954195C 0000240651800?6500570511 ral 0057 42-store stmnt +6I1954195C 0000240511800?2000000353 stl 0000 43-number +6I1954195C 0000240353800?6503560661 ralonet 44-tally and +6I1954195C 0000240661800?2003650368 stlflag 45-flag set to +6I1954195C 0000240368800?2003730026 stltallyps1a 46-one +6I1954195C 0000240650800?7000510026 ps1 rd1 0051ps1a 47-next read +6I1954195C 0000240026800?6000290333 ps1a raumax 48-alarm if +6I1954195C 0000240333800?1103730027 suptally 49-tally is +6I1954195C 0000240027800?4403310332 nzu larm 50-maximum +6I1954195C 0000240331800?6503730527 raltally 51-kk xxxx yyyy +6I1954195C 0000240527800?1500300335 alostore 52-is +6I1954195C 0000240335800?6903380341 lddps2 sr1 53-0600510000 +6I1954195C 0000240338800?6503730627 ps2 raltally 54-tally plus +6I1954195C 0000240627800?1503300485 alosixt 55-six is tally +6I1954195C 0000240485800?2003730526 stltally 56-gamma equals +6I1954195C 0000240526800?6000560711 rau 0056 57-word6 times +6I1954195C 0000240711800?3000020667 srt 0002ps2b 58-01 +6I1954195C 0000240667800?2103720525 ps2b stugamma 59-l equals end +6I1954195C 0000240525800?2005290532 stll 60-symbol +6I1954195C 0000240532800?6080020491 rau 8002 61- +6I1954195C 0000240491800?1103440149 suprsl 62-recycle if l +6I1954195C 0000240149800?4406500504 nzups1 63-is not f +6I1954195C 0000240504800?6503570761 ralffty1 64-initialize u +6I1954195C 0000240761800?2005150518 stlu 65-if l is f +6I1954195C 0000240518800?6503730677 raltally 66-tally minus +6I1954195C 0000240677800?1603560811 sloonet 67-one +6I1954195C 0000240811800?3500040371 slt 0004 68-tally in dta +6I1954195C 0000240371800?2003730626 stltally 69-quota equals +6I1954195C 0000240626800?2005310334 stlquotaps2a 70-tally +6I1954195C 0000240334800?2104880541 ps2a stuv1 71- +6I1954195C 0000240541800?2101460199 stuk 72-preset all +6I1954195C 0000240199800?2100420145 stut0001 73-pertinent +6I1954195C 0000240145800?2107000653 stunu 74-counters +6I1954195C 0000240653800?2119770530 stuj0001 75-to zero +6I1954195C 0000240530800?2104840337 stun 76- +6I1954195C 0000240337800?2103420345 stunbar 77- +6I1954195C 0000240345800?2107500703 stumu 78- +6I1954195C 0000240703800?2103580861 stuarith 79- +6I1954195C 0000240861800?2103660369 stuabval 80- +6I1954195C 0000240369800?2105240727 stuopsgn 81- +6I1954195C 0000240727800?2106320535 sturelat 82- +6I1954195C 0000240535800?2103400343 stur ps3 83-r equals 0 +6I1954195C 0000240343800?6003720777 ps3 raugamma 84- +6I1954195C 0000240777800?4406310682 nzu ps5 85-out if gamma +6I1954195C 0000240631800?3000020487 srt 0002 86-is zero +6I1954195C 0000240487800?2103720625 stugamma 87-fetch next +6I1954195C 0000240625800?6080020483 rau 8002 88-symbol s +6I1954195C 0000240483800?4405370343 nzu ps3 89-recycle if s +6I1954195C 0000240537800?1505290533 alol 90-zero if not +6I1954195C 0000240533800?2003400493 stlr ps3d 91-r equals l +6I1954195C 0000240493800?2105290732 ps3d stul ps3a 92-l equal ds +6I1954195C 0000240732800?6580030489 ps3a ral 8003 93-if l equals +6I1954195C 0000240489800?3000080507 srt 0008 94-an integer +6I1954195C 0000240507800?1603600565 sloninty 95-set intgr +6I1954195C 0000240565800?4606680519 bmips3g ps3c 96-to l and l +6I1954195C 0000240668800?6005290633 ps3g raul ps3b 97-equal to 99 +6I1954195C 0000240519800?6005290683 ps3c raul 98-then return +6I1954195C 0000240683800?2105380641 stuintgr 99-to ps3b +6I1954195C 0000240641800?6003600665 rauninty 100- +6I1954195C 0000240665800?3000010521 srt 0001 101- +6I1954195C 0000240521800?1003600715 aupnintyps3ba 102- +6I1954195C 0000240633800?3000080701 ps3b srt 0008 103-generate +6I1954195C 0000240701800?1503400495 alor 104-entry +6I1954195C 0000240495800?3000040355 srt 0004 105-to symbol +6I1954195C 0000240355800?2005090362 stltemp1 106-pair table +6I1954195C 0000240362800?6507650669 ralps4 107-fetch switch +6I1954195C 0000240669800?6905090512 lddtemp1 108-from table +6I1954195C 0000240512800?8401508002 tlu 0150 8002 109-if switch is +6I1954195C 0000240765800?6000000505 ps4 rau 0000 110-admissable +6I1954195C 0000240505800?1105090513 suptemp1 111-go to +6I1954195C 0000240513800?3000040523 srt 0004 112-generators +6I1954195C 0000240523800?4408270028 nzualarm 113-alarm if not +6I1954195C 0000240028800?3500048003 slt 0004 8003 114- +6I1954195C 0000240682800?6003730877 ps5 rautally 115-decrement +6I1954195C 0000240877800?1106300635 supone ps5a 116-tally if +6I1954195C 0000240635800?2103730676 ps5a stutally 117-gamma zero +6I1954195C 0000240676800?4406290680 nzu ps10 118-out if tally +6I1954195C 0000240629800?1007828003 aupps6 8003 119-is zero if +6I1954195C 0000240782800?6000000655 ps6 rau 0000 120-not gamma is +6I1954195C 0000240655800?2103720343 stugammaps3 121-next word +6I1954195C 0000240800800?2407530506 ps7 stdps8 122-store +6I1954195C 0000240506800?4606590510 bmi ps7a 123-generated +6I1954195C 0000240659800?1605150719 slou ps7b 124-indtruction +6I1954195C 0000240510800?1505150719 ps7a alou ps7b 125-and +6I1954195C 0000240719800?6905220675 ps7b lddps7c 126-increment u +6I1954195C 0000240675800?2205228001 sdaps7c 8001 127-by one +6I1954195C 0000240522800?2100000803 ps7c stu 0000 128-and return +6I1954195C 0000240803800?6505150769 ralu 129-to generator +6I1954195C 0000240769800?1506300685 aloone 130-if storage +6I1954195C 0000240685800?2005150718 stlu 131-not exceeded +6I1954195C 0000240718800?1606710725 slomaxu 132-otherwise +6I1954195C 0000240725800?4607530679 bmips8 133-alarm +6I1954195C 0000240679800?6508320332 raloone larm 134- +6I1954195C 0000240753800?0100000753 ps8 hlt 0000ps8 135- +6I1954195C 0000240680800?6505290733 ps10 rall 136-if tally is +6I1954195C 0000240733800?2003400543 stlr 137-zero set lr +6I1954195C 0000240543800?6003600715 raunintyps3ba 138-equal to 90l +6I1954195C 0000240715800?3500080783 ps3baslt 0008 139-and enter +6I1954195C 0000240783800?2105290633 stul ps3b 140-gen table +6I1954195C 0000240850800?6008530657 ps12 rautemp9 141-from end of +6I1954195C 0000240657800?2119800833 stuw0004 142-statement +6I1954195C 0000240833800?2019810534 stlw0005 143-generators +6I1954195C 0000240534800?6000000705 rau 0000 144- +6I1954195C 0000240705800?6905080911 ldd stnon 145-form entry +6I1954195C 0000240508800?1000350539 aupd0004 146-for +6I1954195C 0000240539800?2119770730 stuw0001 147-statement +6I1954195C 0000240730800?6508830637 ralnono 148-dictionary +6I1954195C 0000240637800?3500040347 slt 0004 149- +6I1954195C 0000240347800?2019780681 stlw0002 150- +6I1954195C 0000240681800?6006340639 raunonon 151- +6I1954195C 0000240639800?2019820735 stlw0006 152- +6I1954195C 0000240735800?2119790882 stuw0003 153- +6I1954195C 0000240882800?6907850638 ldd ps133 154- +6I1954195C 0000240785800?6008530707 rautemp9 155- +6I1954195C 0000240707800?2119770780 stuw0001 156- +6I1954195C 0000240780800?6503570961 ralffty1 157-ubar equals +6I1954195C 0000240961800?2005160819 stlubar 158-fiftyone +6I1954195C 0000240819800?1619580663 slopc 159-alarm if +6I1954195C 0000240663800?1605150869 slou 160-storage +6I1954195C 0000240869800?1603830687 sloa0001 161-exceeded +6I1954195C 0000240687800?1519561011 alo 1956 162-but +6I1954195C 0000241011800?4608150514 bmi ps13c 163-with +6I1954195C 0000240815800?6006010755 rauo0002 164-option of +6I1954195C 0000240755800?3000060919 srt 0006 165-final +6I1954195C 0000240919800?2019780731 stlw0002 166-printout +6I1954195C 0000240731800?2019590662 stlffbit 167- +6I1954195C 0000240662800?6908650638 ldd ps133 168- +6I1954195C 0000240865800?6507680332 ralotwo larm 169- +6I1954195C 0000240514800?6503730927 ps13craltally 170- +6I1954195C 0000240927800?1605310835 sloquota 171- +6I1954195C 0000240835800?4506880689 nze ps13a 172-store +6I1954195C 0000240688800?1580010545 alo 8001 173-original +6I1954195C 0000240545800?1501480903 alotwo 174-statement +6I1954195C 0000240903800?2003730726 stltally 175-as +6I1954195C 0000240726800?1507290933 alops13b 176-comments +6I1954195C 0000240933800?6904860341 lddps14 sr1 177- +6I1954195C 0000240689800?2119810684 ps13astuw0005 178- +6I1954195C 0000240684800?2419820486 stdw0006ps14 179- +6I1954195C 0000240729800?0199991981 ps13b 01 9999w0005 180- +6I1954195C 0000240638800?2406910494 ps133stdfini 181- +6I1954195C 0000240494800?6519580713 ralpc 182-increment +6I1954195C 0000240713800?1506300935 aloone 183-program +6I1954195C 0000240935800?2019581061 stlpc 184-counter +6I1954195C 0000241061800?2019850738 stlw0009 185- +6I1954195C 0000240738800?7119770977 pchw0001 186-and +6I1954195C 0000240977800?2119770691 stuw0001fini 187-punch +6I1954195C 0000240486800?6005160721 ps14 rauubar 188-fetch word +6I1954195C 0000240721800?1006248003 aupps14a 8003 189-in ubar +6I1954195C 0000240624800?6500000805 ps14aral 0000 190- +6I1954195C 0000240805800?2007090712 stltemp3 191- +6I1954195C 0000240712800?4609150566 bmi ps16 192-if word is +6I1954195C 0000240915800?6505160771 ralubar 193-negative +6I1954195C 0000240771800?1603571161 sloffty1ps15 194-assign it +6I1954195C 0000241161800?3000040821 ps15 srt 0004 195-a symbolic +6I1954195C 0000240821800?6906740367 lddps15asr3 196-location +6I1954195C 0000240674800?1008530757 ps15aauptemp9 197- +6I1954195C 0000240757800?2119770830 stuw0001 198- +6I1954195C 0000240830800?6707090566 ramtemp3ps16 199- +6I1954195C 0000240566800?3500020673 ps16 slt 0002 200- +6I1954195C 0000240673800?2007090762 stltemp3 201-extract +6I1954195C 0000240762800?6080030969 rau 8003 202-operation +6I1954195C 0000240969800?3500060983 slt 0006 203-from word +6I1954195C 0000240983800?2107880741 stutemp4 204- +6I1954195C 0000240741800?1505440249 alops18 205-fetch op +6I1954195C 0000240249800?2105090812 stutemp1 206-mnemonic +6I1954195C 0000240812800?8406008002 tluo0001 8002 207-from table +6I1954195C 0000240544800?6000000855 ps18 rau 0000 208-and check +6I1954195C 0000240855800?1107880593 suptemp4 209-for admiss +6I1954195C 0000240593800?3000060807 srt 0006 210-store op if +6I1954195C 0000240807800?4408270862 nzualarm 211-admissable +6I1954195C 0000240862800?2019780781 stlw0002ps27 212- +6I1954195C 0000240781800?6507090763 ps27 raltemp3 213-extract +6I1954195C 0000240763800?3500040723 slt 0004 214-data address +6I1954195C 0000240723800?2007090912 stltemp3 215-from word +6I1954195C 0000240912800?6080031019 rau 8003 216-out if d is +6I1954195C 0000241019800?4407730724 nzu ps19 217-next loc +6I1954195C 0000240773800?3000010779 srt 0001 218-out if d is +6I1954195C 0000240779800?4410330734 nzups18a 219-not accum +6I1954195C 0000240734800?6007370724 rauaccumps19 220- +6I1954195C 0000241033800?3000020739 ps18asrt 0002 221-out if d not +6I1954195C 0000240739800?4406430594 nzups20 222-addrss withn +6I1954195C 0000240594800?3000030953 srt 0003 223-statement +6I1954195C 0000240953800?1603571211 sloffty1 224-generate +6I1954195C 0000241211800?3000040871 srt 0004 225-mnemonic +6I1954195C 0000240871800?6907740367 ldd sr3 226-if d is in +6I1954195C 0000240774800?1008530724 auptemp9ps19 227-statement +6I1954195C 0000240643800?2005090962 ps20 stltemp1 228-generate +6I1954195C 0000240962800?6080031069 rau 8003 229-mnemonic if +6I1954195C 0000241069800?3500040829 slt 0004 230-d is neithr +6I1954195C 0000240829800?1009328003 aupps23 8003 231-next nor in +6I1954195C 0000240932800?6000310985 ps23 raud 232-statement +6I1954195C 0000240985800?2104900693 stutemp2 233- +6I1954195C 0000240693800?1100400595 supd0009 234-out if d is +6I1954195C 0000240595800?4402990900 nzups23a 235-not extnsn +6I1954195C 0000240900800?6505090813 raltemp1 236-if extension +6I1954195C 0000240813800?3000070879 srt 0007 237-generate +6I1954195C 0000240879800?6909820367 ldd sr3 238-mnemonic +6I1954195C 0000240982800?1000400724 aupd0009ps19 239- +6I1954195C 0000240299800?6005090863 ps23arautemp1 240- +6I1954195C 0000240863800?3000070929 srt 0007 241-gen numeric +6I1954195C 0000240929800?6910321035 ldd ps100 242-tag if data +6I1954195C 0000241032800?4505360787 nze ps23b 243-is not +6I1954195C 0000240536800?1006340787 aupnononps23b 244-extension +6I1954195C 0000240787800?1004900724 ps23bauptemp2ps19 245- +6I1954195C 0000240724800?2119801083 ps19 stuw0004 246- +6I1954195C 0000241083800?6103651119 rsuflag ps25 247-negative +6I1954195C 0000240365800?1000000000 flag 10 0000 0000 248-flag if data +6I1954195C 0000241119800?2103650818 ps25 stuflag 249-positive +6I1954195C 0000240818800?4609210672 bmi ps26 250-flag if inst +6I1954195C 0000240921800?6019801085 rauw0004 251-recycle +6I1954195C 0000241085800?2119790781 stuw0003ps27 252-if d if not +6I1954195C 0000240672800?6005160971 ps26 rauubar 253-punch and +6I1954195C 0000240971800?1006301135 aupone 254-recycle to +6I1954195C 0000241135800?2105161169 stuubar 255-ps13c if +6I1954195C 0000241169800?1105151219 supu 256-udar not +6I1954195C 0000241219800?4408230824 nzu ps28 257-equal to +6I1954195C 0000240823800?6905140638 lddps13cps133 258-u +6I1954195C 0000240824800?6519571261 ps28 rals 259-s equals s +6I1954195C 0000241261800?1503561311 aloonet 260-plus one +6I1954195C 0000241311800?2019570660 stls 261-and form +6I1954195C 0000240660800?6909130367 ldd sr3 262-next locatn +6I1954195C 0000240913800?6906660370 ldd sr3ed 263- +6I1954195C 0000240666800?6019791133 rauw0003 264- +6I1954195C 0000241133800?4408370838 nzups30 ps29 265- +6I1954195C 0000240837800?6019801185 ps30 rauw0004 266- +6I1954195C 0000241185800?4407890540 nzups32 ps31 267- +6I1954195C 0000240789800?6919600638 ps32 lddtau ps133 268- +6I1954195C 0000240838800?6008530857 ps29 rautemp9 269- +6I1954195C 0000240857800?2119790837 stuw0003ps30 270- +6I1954195C 0000240540800?6008530907 ps31 rautemp9 271- +6I1954195C 0000240907800?2119800789 stuw0004ps32 272- +6I1954195C 0000241960800?0000001234 tau nop 0000ps 273- +6I1954195C 0000240147800?0000001234 tau1 nop 0000ps 274- +6I1954195C 0000240341800?2406440497 sr1 stdexit sr1e 275- +6I1954195C 0000240950800?1610030497 sr1a sloincr sr1e 276- +6I1954195C 0000240497800?3500021053 sr1e slt 0002 277- +6I1954195C 0000241053800?4409570644 nzu exit 278- +6I1954195C 0000240957800?3500020963 slt 0002 279-sr1 blocks +6I1954195C 0000240963800?6907161269 lddsr1d 280-kk consec +6I1954195C 0000241269800?2207161319 sdasr1d 281-locations +6I1954195C 0000241319800?3000040979 srt 0004 282-from xxxx to +6I1954195C 0000240979800?6910821235 lddsr1l 283-yyyy +6I1954195C 0000241235800?2210828001 sdasr1l 8001 284- +6I1954195C 0000240716800?2400000950 sr1d std 0000sr1a 285- +6I1954195C 0000241082800?6900000716 sr1l ldd 0000sr1d 286- +6I1954195C 0000241003800?0099989999 incr 00 9998 9999 287- +6I1954195C 0000240367800?2406440547 sr3 stdexit 288-sr3 converts +6I1954195C 0000240547800?1410001050 divtwsix 289-three digit +6I1954195C 0000241050800?2005091012 stltemp1 290-numbers into +6I1954195C 0000241012800?6909650868 lddsr3b sr3a 291-two letter +6I1954195C 0000240868800?2404900743 sr3a stdtemp2 292-mnemonics +6I1954195C 0000240743800?1003561361 auponet 293- +6I1954195C 0000241361800?3000010717 srt 0001 294- +6I1954195C 0000240717800?4410210722 nzu sr3a1 295- +6I1954195C 0000241021800?1608741029 slonineo 296- +6I1954195C 0000241029800?4411830784 nzu sr3a2 297- +6I1954195C 0000241183800?1506360784 alostl sr3a2 298- +6I1954195C 0000240722800?3500011079 sr3a1slt 0001 299- +6I1954195C 0000241079800?1180010490 sup 8001temp2 300- +6I1954195C 0000240784800?1508741129 sr3a2alonineo 301- +6I1954195C 0000241129800?3500010490 slt 0001temp2 302- +6I1954195C 0000240965800?3000021071 sr3b srt 0002 303- +6I1954195C 0000241071800?1005091013 auptemp1 304- +6I1954195C 0000241013800?6907660868 lddsr3c sr3a 305- +6I1954195C 0000240766800?3500020644 sr3c slt 0002exit 306- +6I1954195C 0000240370800?2406440597 sr3edstdexit 307-generate +6I1954195C 0000240597800?6080030905 rau 8003 308-symbolic +6I1954195C 0000240905800?3500041015 slt 0004 309-location +6I1954195C 0000241015800?1009180873 auplocus 310-for next +6I1954195C 0000240873800?2108530644 stutemp9exit 311-statement +6I1954195C 0000241100800?2406440647 srn stdexit 312-srn forms +6I1954195C 0000240647800?6503581063 ralarith 313-numbers +6I1954195C 0000241063800?4508160767 nzesrn5 314-out if float +6I1954195C 0000240767800?6506700775 ralsrn2 315-ing point +6I1954195C 0000240775800?1607500955 slomu 316-fix asinteg +6I1954195C 0000240955800?1004848002 aupn 8002 317-er if fixed +6I1954195C 0000240670800?3000101027 srn2 srt 0010 318-point +6I1954195C 0000241027800?6080031285 rau 8003srn4 319- +6I1954195C 0000240816800?6507501005 srn5 ralmu 320-floating pt +6I1954195C 0000241005800?1503571411 aloffty1 321-exponent is +6I1954195C 0000241411800?3000041121 srt 0004 322-mu plus +6I1954195C 0000241121800?1503420697 alonbar 323-forty nine +6I1954195C 0000240697800?2005091062 stltemp1 324-plus nbar +6I1954195C 0000241062800?3500080831 slt 0008 325- +6I1954195C 0000240831800?4413350686 nzusrn6 326-mntisa alarm +6I1954195C 0000240686800?6504840839 raln 327- +6I1954195C 0000240839800?3000020645 srt 0002 328-and mantissa +6I1954195C 0000240645800?6080021103 rau 8002 329-is +6I1954195C 0000241103800?4410071285 nzu srn4 330- +6I1954195C 0000241007800?3600001179 sct 0000 331-n to 8 sig +6I1954195C 0000241179800?1005091113 auptemp1 332-nificant fig +6I1954195C 0000241113800?1180021171 sup 8002 333-ures +6I1954195C 0000241171800?6080031285 rau 8003srn4 334- +6I1954195C 0000241335800?6508880332 srn6 ralotreylarm 335-alarm +6I1954195C 0000241285800?2104840644 srn4 stun exit 336- +6I1954195C 0000241150800?2406440747 srac stdexit 337-absolute +6I1954195C 0000240747800?6012001055 raufour 338-constant +6I1954195C 0000241055800?2107101163 stujay sracr 339-routine +6I1954195C 0000241163800?6007101065 sracrraujay 340- +6I1954195C 0000241065800?1103830887 supa0001 341-out if jay +6I1954195C 0000240887800?4407910492 nzu srac3 342-equals abcnt +6I1954195C 0000240791800?6507101115 raljay 343- +6I1954195C 0000241115800?1506301385 aloone 344-incrmnt jay +6I1954195C 0000241385800?2007101213 stljay 345- +6I1954195C 0000241213800?1508668002 alosrac1 8002 346-fetch jayth +6I1954195C 0000240866800?6503830937 srac1rala0001srac2 347-constant +6I1954195C 0000240937800?1604840889 srac2slon 348-recycle if n +6I1954195C 0000240889800?4511630793 nzesracrsrac5 349-equals jth +6I1954195C 0000240793800?6507101165 srac5raljay 350-constant +6I1954195C 0000241165800?1509680923 aloral 351- +6I1954195C 0000240923800?1507760881 aloabcon 352- +6I1954195C 0000240881800?6580020644 ral 8002exit 353- +6I1954195C 0000240492800?6007101215 srac3raujay 354- +6I1954195C 0000241215800?1006301435 aupone 355- +6I1954195C 0000241435800?2103830736 stua0001 356-n stored as +6I1954195C 0000240736800?2107101263 stujay 357- +6I1954195C 0000241263800?1109161221 supabcnt 358-new abcon if +6I1954195C 0000241221800?4609240825 bmi srac7 359-abcnt not +6I1954195C 0000240924800?1080010931 aup 8001 360-exceeded +6I1954195C 0000240931800?1008340939 aupsrac6 361-new ab const +6I1954195C 0000240939800?6904848003 lddn 8003 362- +6I1954195C 0000240825800?6505280332 srac7ralofivelarm 363-alarm +6I1954195C 0000240916800?0000990000 abcnt 00 0099 0000 364-ral a1 plus +6I1954195C 0000240834800?2403830793 srac6stda0001srac5 365-jay in lower +6I1954195C 0000241035800?2406910694 ps100stdfini 366-interlace +6I1954195C 0000240694800?3000031153 srt 0003 367- +6I1954195C 0000241153800?1680021461 slo 8002 368-four +6I1954195C 0000241461800?3500010817 slt 0001 369- +6I1954195C 0000240817800?1580010875 alo 8001 370-digits +6I1954195C 0000240875800?3500010981 slt 0001 371- +6I1954195C 0000240981800?1680020989 slo 8002 372- +6I1954195C 0000240989800?3500010695 slt 0001 373-with +6I1954195C 0000240695800?1580011203 alo 8001 374- +6I1954195C 0000241203800?3500010759 slt 0001 375- +6I1954195C 0000240759800?1680020867 slo 8002 376-zeroes +6I1954195C 0000240867800?3500010973 slt 0001 377- +6I1954195C 0000240973800?1580011031 alo 8001 378- +6I1954195C 0000241031800?3500010691 slt 0001fini 379- +6I1954195C 0000240032800?6900000000 d0001 i 380-symbols for +6I1954195C 0000240033800?8800000000 d0002 y 381-problem +6I1954195C 0000240034800?6300000000 d0003 c 382-variables +6I1954195C 0000240035800?8200000000 d0004 s 383- +6I1954195C 0000240036800?6100000000 d0005 a 384- +6I1954195C 0000240037800?7700000000 d0006 p 385- +6I1954195C 0000240038800?8600000000 d0007 w 386- +6I1954195C 0000240039800?0008000000 d0008 00 0800 0000 387- +6I1954195C 0000240040800?6590906161 d0009 e00aa 388- +6I1954195C 0000240600800?0000757677 o0001 00 0075 7677 389-mnemonics +6I1954195C 0000240601800?0001687383 o0002 00 0168 7383 390-for +6I1954195C 0000240602800?0010618477 o0003 00 1061 8477 391-required +6I1954195C 0000240603800?0015617376 o0004 00 1561 7376 392-operations +6I1954195C 0000240604800?0016827376 o0005 00 1682 7376 393- +6I1954195C 0000240605800?0017617473 o0006 00 1761 7473 394- +6I1954195C 0000240606800?0018827473 o0007 00 1882 7473 395- +6I1954195C 0000240607800?0019747788 o0008 00 1974 7788 396- +6I1954195C 0000240608800?0020828373 o0009 00 2082 8373 397- +6I1954195C 0000240609800?0024828364 o0010 00 2482 8364 398- +6I1954195C 0000240610800?0035827383 o0011 00 3582 7383 399- +6I1954195C 0000240611800?0045758965 o0012 00 4575 8965 400- +6I1954195C 0000240612800?0046627469 o0013 00 4662 7469 401- +6I1954195C 0000240613800?0060796184 o0014 00 6079 6184 402- +6I1954195C 0000240614800?0061798284 o0015 00 6179 8284 403- +6I1954195C 0000240615800?0064648579 o0016 00 6464 8579 404- +6I1954195C 0000240616800?0065796173 o0017 00 6579 6173 405- +6I1954195C 0000240617800?0066798273 o0018 00 6679 8273 406- +6I1954195C 0000240618800?0067796174 o0019 00 6779 6174 407- +6I1954195C 0000240619800?0068798274 o0020 00 6879 8274 408- +6I1954195C 0000240620800?0069736464 o0021 00 6973 6464 409- +6I1954195C 0000240621800?0070796491 o0022 00 7079 6491 410- +6I1954195C 0000240622800?0071776368 o0023 00 7177 6368 411- +6I1954195C 0000240623800?0099687383 o0024 00 9968 7383 412- +6I1954195C 0000240383800?0000060000 a0001 00 0006 0000 413-preset +6I1954195C 0000240384800?0000000001 a0002 00 0000 0001 414-absolute +6I1954195C 0000240387800?0000001000 a0005 00 0000 1000 415-constants +6I1954195C 0000240388800?0000002000 a0006 00 0000 2000 416- +6I1954195C 0000240389800?0000003000 a0007 00 0000 3000 417- +6I1954195C 0000240150800?0061631018 0150 00 6163ai 418-absolute +6I1954195C 0000240151800?0061691018 0151 00 6169ai 419-value +6I1954195C 0000240152800?0061730628 0152 00 6173al 420- +6I1954195C 0000240153800?0061780628 0153 00 6178al 421- +6I1954195C 0000240154800?0061881018 0154 00 6188ai 422- +6I1954195C 0000240155800?0062820987 0155 00 6282bs 423-b minus +6I1954195C 0000240156800?0062990654 0156 00 6299bn 424- +6I1954195C 0000240157800?0063690974 0157 00 6369ci 425-c +6I1954195C 0000240158800?0063730678 0158 00 6373ceel 426- +6I1954195C 0000240159800?0063750880 0159 00 6375cmtx 427- +6I1954195C 0000240160800?0063990704 0160 00 6399cn 428- +6I1954195C 0000240161800?0064631068 0161 00 6463wy 429-divide +6I1954195C 0000240162800?0064661271 0162 00 6466df 430- +6I1954195C 0000240163800?0064691068 0163 00 6469wy 431- +6I1954195C 0000240164800?0064710826 0164 00 6471zn 432- +6I1954195C 0000240165800?0064730728 0165 00 6473wl 433- +6I1954195C 0000240166800?0064781233 0166 00 6478we 434- +6I1954195C 0000240167800?0064881068 0167 00 6488wy 435- +6I1954195C 0000240168800?0064990826 0168 00 6499zn 436- +6I1954195C 0000240169800?0065720343 0169 00 6572ps3 437- +6I1954195C 0000240170800?0066631068 0170 00 6663wy 438-f +6I1954195C 0000240171800?0066661321 0171 00 6666ff 439-o +6I1954195C 0000240172800?0066691068 0172 00 6669wy 440-n +6I1954195C 0000240173800?0066710826 0173 00 6671zn 441-l +6I1954195C 0000240174800?0066730728 0174 00 6673wl 442-e +6I1954195C 0000240175800?0066781233 0175 00 6678we 443-f +6I1954195C 0000240176800?0066820343 0176 00 6682ps3 444-t +6I1954195C 0000240177800?0066881068 0177 00 6688wy 445- +6I1954195C 0000240178800?0066990826 0178 00 6699zn 446- +6I1954195C 0000240179800?0067691024 0179 00 6769gi 447- +6I1954195C 0000240180800?0067730778 0180 00 6773gl 448-go +6I1954195C 0000240181800?0067990754 0181 00 6799gn 449- +6I1954195C 0000240182800?0068660343 0182 00 6866ps3 450- +6I1954195C 0000240183800?0069661371 0183 00 6966if 451-halt +6I1954195C 0000240184800?0069691074 0184 00 6969ii 452-if +6I1954195C 0000240185800?0069730828 0185 00 6973il 453-i +6I1954195C 0000240186800?0069990804 0186 00 6999in 454- +6I1954195C 0000240187800?0071641369 0187 00 7164pw 455- +6I1954195C 0000240188800?0071661421 0188 00 7166pf 456-decimal +6I1954195C 0000240189800?0071721077 0189 00 7172pcmma 457-point +6I1954195C 0000240190800?0071771369 0190 00 7177pw 458- +6I1954195C 0000240191800?0071781421 0191 00 7178pf 459- +6I1954195C 0000240192800?0071791421 0192 00 7179pf 460- +6I1954195C 0000240193800?0071821369 0193 00 7182pw 461- +6I1954195C 0000240194800?0071871369 0194 00 7187pw 462- +6I1954195C 0000240195800?0071990854 0195 00 7199pn 463- +6I1954195C 0000240196800?0072631068 0196 00 7263wy 464- +6I1954195C 0000240197800?0072661471 0197 00 7266qf 465- +6I1954195C 0000240200800?0072691068 0200 00 7269wy 466- +6I1954195C 0000240201800?0072710826 0201 00 7271zn 467- +6I1954195C 0000240202800?0072730728 0202 00 7273wl 468-comma +6I1954195C 0000240203800?0072781233 0203 00 7278we 469- +6I1954195C 0000240204800?0072820343 0204 00 7282ps3 470-comma minus +6I1954195C 0000240205800?0072881068 0205 00 7288wy 471- +6I1954195C 0000240206800?0072990826 0206 00 7299zn 472- +6I1954195C 0000240207800?0073631068 0207 00 7363wy 473- +6I1954195C 0000240208800?0073691068 0208 00 7369wy 474- +6I1954195C 0000240209800?0073710826 0209 00 7371zn 475- +6I1954195C 0000240210800?0073730728 0210 00 7373wl 476- +6I1954195C 0000240211800?0073781233 0211 00 7378we 477- +6I1954195C 0000240212800?0073820343 0212 00 7382ps3 478-left minus +6I1954195C 0000240213800?0073881068 0213 00 7388wy 479- +6I1954195C 0000240214800?0073990826 0214 00 7399zn 480- +6I1954195C 0000240215800?0074631118 0215 00 7463mini 481- +6I1954195C 0000240216800?0074691118 0216 00 7469mini 482-m l +6I1954195C 0000240217800?0074710876 0217 00 7471minn 483-i o e +6I1954195C 0000240218800?0074730878 0218 00 7473minl 484-n n f +6I1954195C 0000240219800?0074780878 0219 00 7478minl 485-u t +6I1954195C 0000240220800?0074881118 0220 00 7488mini 486-s +6I1954195C 0000240221800?0074990876 0221 00 7499minn 487- +6I1954195C 0000240222800?0075730343 0222 00 7573ps3 488- +6I1954195C 0000240223800?0077631068 0223 00 7763wy 489- +6I1954195C 0000240224800?0077691068 0224 00 7769wy 490- +6I1954195C 0000240225800?0077710826 0225 00 7771zn 491- +6I1954195C 0000240226800?0077730728 0226 00 7773wl 492- +6I1954195C 0000240227800?0077781233 0227 00 7778we 493- +6I1954195C 0000240228800?0077820343 0228 00 7782ps3 494-p minus +6I1954195C 0000240229800?0077881068 0229 00 7788wy 495-matrix +6I1954195C 0000240230800?0077990826 0230 00 7799zn 496-power +6I1954195C 0000240231800?0078641419 0231 00 7864ew 497- +6I1954195C 0000240232800?0078661521 0232 00 7866ee 498- +6I1954195C 0000240233800?0078721127 0233 00 7872qcmma 499- +6I1954195C 0000240234800?0078771419 0234 00 7877ew 500- +6I1954195C 0000240235800?0078781521 0235 00 7878ee 501- +6I1954195C 0000240236800?0078791521 0236 00 7879ee 502- +6I1954195C 0000240237800?0078821419 0237 00 7882ew 503- +6I1954195C 0000240238800?0078871419 0238 00 7887ew 504-extensions +6I1954195C 0000240239800?0078990904 0239 00 7899en 505- +6I1954195C 0000240240800?0079641469 0240 00 7964rw 506- +6I1954195C 0000240241800?0079661571 0241 00 7966rr 507- +6I1954195C 0000240242800?0079691571 0242 00 7969rr 508- +6I1954195C 0000240243800?0079721177 0243 00 7972rcmma 509- +6I1954195C 0000240244800?0079771469 0244 00 7977rw 510- +6I1954195C 0000240245800?0079781571 0245 00 7978rr 511- +6I1954195C 0000240246800?0079791571 0246 00 7979rr 512- +6I1954195C 0000240247800?0079821469 0247 00 7982rw 513- +6I1954195C 0000240250800?0079831571 0250 00 7983rr 514- +6I1954195C 0000240251800?0079871469 0251 00 7987rw 515- +6I1954195C 0000240252800?0079890744 0252 00 7989rz 516- +6I1954195C 0000240253800?0082631068 0253 00 8263wy 517-right paren +6I1954195C 0000240254800?0082691068 0254 00 8269wy 518- +6I1954195C 0000240255800?0082710826 0255 00 8271zn 519- +6I1954195C 0000240256800?0082730728 0256 00 8273wl 520- +6I1954195C 0000240257800?0082781233 0257 00 8278we 521- +6I1954195C 0000240258800?0082881068 0258 00 8288wy 522- +6I1954195C 0000240259800?0082990826 0259 00 8299zn 523- +6I1954195C 0000240260800?0083631168 0260 00 8363tc 524- +6I1954195C 0000240261800?0083691124 0261 00 8369ti 525- +6I1954195C 0000240262800?0083730928 0262 00 8373tl 526- +6I1954195C 0000240263800?0083880843 0263 00 8388ty 527- +6I1954195C 0000240264800?0084631218 0264 00 8463my 528- +6I1954195C 0000240265800?0084691218 0265 00 8469my 529- +6I1954195C 0000240266800?0084710926 0266 00 8471mn 530- +6I1954195C 0000240267800?0084730978 0267 00 8473ml 531- +6I1954195C 0000240268800?0084781283 0268 00 8478me 532-sum +6I1954195C 0000240269800?0084881218 0269 00 8488my 533- +6I1954195C 0000240270800?0084990926 0270 00 8499mn 534- +6I1954195C 0000240271800?0085631218 0271 00 8563my 535- +6I1954195C 0000240272800?0085691218 0272 00 8569my 536- +6I1954195C 0000240273800?0085710926 0273 00 8571mn 537- +6I1954195C 0000240274800?0085730978 0274 00 8573ml 538- +6I1954195C 0000240275800?0085781283 0275 00 8578me 539- +6I1954195C 0000240276800?0085881218 0276 00 8588my 540-type +6I1954195C 0000240277800?0085990926 0277 00 8599mn 541- +6I1954195C 0000240278800?0086631218 0278 00 8663my 542- +6I1954195C 0000240279800?0086691218 0279 00 8669my 543- +6I1954195C 0000240280800?0086710926 0280 00 8671mn 544-relations +6I1954195C 0000240281800?0086730978 0281 00 8673ml 545- +6I1954195C 0000240282800?0086781283 0282 00 8678me 546- +6I1954195C 0000240283800?0086881218 0283 00 8688my 547- +6I1954195C 0000240284800?0086990926 0284 00 8699mn 548- +6I1954195C 0000240285800?0087631068 0285 00 8763wy 549- +6I1954195C 0000240286800?0087691068 0286 00 8769wy 550- +6I1954195C 0000240287800?0087710826 0287 00 8771zn 551- +6I1954195C 0000240288800?0087730728 0288 00 8773wl 552- +6I1954195C 0000240289800?0087781233 0289 00 8778we 553- +6I1954195C 0000240290800?0087881068 0290 00 8788wy 554- +6I1954195C 0000240291800?0087990826 0291 00 8799zn 555- +6I1954195C 0000240292800?0088691174 0292 00 8869yi 556- +6I1954195C 0000240293800?0088731028 0293 00 8873yl 557- +6I1954195C 0000240294800?0088750930 0294 00 8875ymtx 558- +6I1954195C 0000240295800?0088990954 0295 00 8899yn 559- +6I1954195C 0000240296800?0089631068 0296 00 8963wy 560- +6I1954195C 0000240297800?0089691068 0297 00 8969wy 561- +6I1954195C 0000240300800?0089710826 0300 00 8971zn 562- +6I1954195C 0000240301800?0089730728 0301 00 8973wl 563- +6I1954195C 0000240302800?0089781233 0302 00 8978we 564- +6I1954195C 0000240303800?0089820343 0303 00 8982ps3 565- +6I1954195C 0000240304800?0089881068 0304 00 8988wy 566- +6I1954195C 0000240305800?0089990826 0305 00 8999zn 567- +6I1954195C 0000240306800?0090631268 0306 00 9063endy 568-times +6I1954195C 0000240307800?0090640850 0307 00 9064ps12 569- +6I1954195C 0000240308800?0090670772 0308 00 9067endg 570- +6I1954195C 0000240309800?0090681023 0309 00 9068endh 571- +6I1954195C 0000240310800?0090691268 0310 00 9069endy 572- +6I1954195C 0000240311800?0090731078 0311 00 9073endl 573- +6I1954195C 0000240312800?0090780850 0312 00 9078ps12 574- +6I1954195C 0000240313800?0090830938 0313 00 9083endt 575- +6I1954195C 0000240314800?0090881268 0314 00 9088endy 576-y +6I1954195C 0000240315800?0099620917 0315 00 9962nf 577- +6I1954195C 0000240316800?0099641519 0316 00 9964nw 578- +6I1954195C 0000240317800?0099650720 0317 00 9965nr 579-substitution +6I1954195C 0000240318800?0099660917 0318 00 9966nf 580- +6I1954195C 0000240319800?0099690720 0319 00 9969nr 581- +6I1954195C 0000240320800?0099710917 0320 00 9971nf 582- +6I1954195C 0000240321800?0099721227 0321 00 9972ncmma 583- +6I1954195C 0000240322800?0099771519 0322 00 9977nw 584- +6I1954195C 0000240323800?0099780720 0323 00 9978nr 585- +6I1954195C 0000240324800?0099790720 0324 00 9979nr 586- +6I1954195C 0000240325800?0099821519 0325 00 9982nw 587- +6I1954195C 0000240326800?0099830720 0326 00 9983nr 588-first +6I1954195C 0000240327800?0099871519 0327 00 9987nw 589-characters +6I1954195C 0000240328800?0099890794 0328 00 9989nz 590- +6I1954195C 0000240329800?0099990917 0329 00 9999nf 591- +6I1954195C 0000241018800?6507681073 ai ralotwo 592-ral rsl +6I1954195C 0000241073800?2007880841 stltemp4 593-become +6I1954195C 0000240841800?6908440797 lddai1 uchge 594-ram rsm +6I1954195C 0000240844800?6908471250 ai1 ldd setel 595-l is r +6I1954195C 0000240847800?2003660343 stlabvalps3 596-abval nonzro +6I1954195C 0000240628800?6910810884 al ldd stbta 597-beta is u +6I1954195C 0000241081800?2104880891 stuv1 598-v1 is zero +6I1954195C 0000240891800?6508940349 ralram 599-compile +6I1954195C 0000240349800?1503521057 alolow 600-ram 8002 +6I1954195C 0000241057800?6907601313 ldd osgn1 601- +6I1954195C 0000240760800?2105240844 stuopsgnai1 602-opsgn zero +6I1954195C 0000240987800?6906400893 bs ldd dropu 603-dcrmnt u +6I1954195C 0000240640800?6503831037 rala0001 604-abcon count +6I1954195C 0000241037800?1606301485 sloone 605-minus one +6I1954195C 0000241485800?2003830786 stla0001 606- +6I1954195C 0000240786800?6004841039 raun bn1 607- +6I1954195C 0000240654800?6910391100 bn lddbn1 srn 608- +6I1954195C 0000241039800?2103420745 bn1 stunbar 609-nbar equals +6I1954195C 0000240745800?6901980751 ldd chkar 610-n +6I1954195C 0000240198800?6503561511 ralonet 611-arith equals +6I1954195C 0000241511800?2104841087 stun 612-one +6I1954195C 0000241087800?2003581561 stlarithnf2 613- +6I1954195C 0000240678800?6511311535 ceel ralthree 614- +6I1954195C 0000241535800?6909741250 lddci setel 615- +6I1954195C 0000240974800?6512771181 ci ralc ci1 616- +6I1954195C 0000241181800?1003561611 ci1 auponet adlow 617- +6I1954195C 0000241611800?2105091112 adlowstutemp1 618-store v and +6I1954195C 0000241112800?2004900943 stltemp2 619-arith +6I1954195C 0000240943800?6903460751 ldd chkar 620- +6I1954195C 0000240346800?6504991253 ralslti3 621-compile +6I1954195C 0000241253800?6906561313 ldd osgn1 622-slt 0004 and +6I1954195C 0000240656800?2105241327 stuopsgn 623- +6I1954195C 0000241327800?6009801585 raulow1 624-alo 8002 +6I1954195C 0000241585800?1009880993 aupalo 625- +6I1954195C 0000240993800?6904960800 ldd ps7 626-compile +6I1954195C 0000240496800?6580031303 ral 8003var2 627-ralv0000 +6I1954195C 0000240880800?6001481353 cmtx rautwo ymtx1 628-v is two +6I1954195C 0000240704800?6512771231 cn ralc cn1 629-v equals c +6I1954195C 0000241231800?1003561661 cn1 auponet var 630-arith is one +6I1954195C 0000241661800?2105091162 var stutemp1 631-store v and +6I1954195C 0000241162800?2004901043 stltemp2 632-arith +6I1954195C 0000241043800?6905460751 ldd chkar 633- +6I1954195C 0000240546800?6905490884 ldd stbta 634- +6I1954195C 0000240549800?6906521100 ldd srn 635-generate n +6I1954195C 0000240652800?6911050658 ldd chknn 636- +6I1954195C 0000241105800?3500041303 slt 0004var2 637- +6I1954195C 0000241303800?1509681123 var2 aloral 638-compile +6I1954195C 0000241123800?1504900795 alotemp2 639-ral vn +6I1954195C 0000240795800?6902481313 lddvar1 osgn1 640- +6I1954195C 0000240248800?6505091363 var1 raltemp1 641-set arith +6I1954195C 0000241363800?2003581711 stlaritheec2 642- +6I1954195C 0000241271800?6512241229 df ralsxtnt 643-begin read +6I1954195C 0000241229800?6906351038 lddps5a ldsr 644- +6I1954195C 0000241521800?6915711274 ee lddrr nuinc 645- +6I1954195C 0000241711800?2105240343 eec2 stuopsgnps3 646- +6I1954195C 0000240904800?6911070751 en ldd chkar 647- +6I1954195C 0000241107800?6908101100 ldd srn 648-generate n +6I1954195C 0000240810800?6914130658 ldd chknn 649- +6I1954195C 0000241413800?1500321137 alod0001 650-compile +6I1954195C 0000241137800?1506900845 aloext 651-ldd0000en +6I1954195C 0000240845800?6902981313 ldd osgn1 652- +6I1954195C 0000240298800?2105241377 stuopsgn 653- +6I1954195C 0000241377800?6507001155 ralnu 654- +6I1954195C 0000241155800?1507081463 aloen1 655- +6I1954195C 0000241463800?1080021621 aup 8002 656-if jnu not +6I1954195C 0000241621800?1606301635 sloone 657-equal jnu +6I1954195C 0000241635800?6910880941 ldden4 658-plus one +6I1954195C 0000240941800?2210888003 sdaen4 8003 659-compile +6I1954195C 0000240708800?6519771281 en1 ralj0001 660-nopphijnu +6I1954195C 0000241281800?2004901088 stltemp2en4 661- +6I1954195C 0000241088800?1619771331 en4 sloj0001 662- +6I1954195C 0000241331800?4509341685 nze en3 663- +6I1954195C 0000240934800?6504900895 raltemp2 664- +6I1954195C 0000240895800?1603561761 sloonet 665- +6I1954195C 0000241761800?3500041671 slt 0004 666- +6I1954195C 0000241671800?1513241279 alophi 667- +6I1954195C 0000241279800?6916851313 ldden3 osgn1 668- +6I1954195C 0000241685800?6004841089 en3 raun 669-extension +6I1954195C 0000241089800?1105420897 supmaxe 670-number +6I1954195C 0000240897800?4613000801 bmi en2a 671-set arith +6I1954195C 0000241300800?6003561811 rauonet en2 672- +6I1954195C 0000240801800?6080021811 en2a rau 8002en2 673- +6I1954195C 0000241811800?2103581861 en2 stuarith 674-v1 to zero +6I1954195C 0000241861800?2004880343 stlv1 ps3 675- +6I1954195C 0000241419800?6914691274 ew lddrw nuinc 676- +6I1954195C 0000240772800?6506321187 endg ralrelat 677-end stmnt if +6I1954195C 0000241187800?4507400850 nze ps12 678-relat zero +6I1954195C 0000240740800?6910930596 lddendg1 679-if go intgr +6I1954195C 0000240596800?2210930646 sdaendg1 680-then +6I1954195C 0000240646800?6905990702 lddendg3 681-inst of +6I1954195C 0000240702800?2205990752 sdaendg3 682-uminustwo +6I1954195C 0000240752800?6505151569 ralu 683-set to data +6I1954195C 0000241569800?1601481403 slotwo 684-of uminus1 +6I1954195C 0000241403800?6907060809 lddendga 685-then +6I1954195C 0000240809800?2207060859 sdaendga 686-decompile +6I1954195C 0000240859800?6912121265 lddendgb 687- +6I1954195C 0000241265800?2212121315 sdaendgb 688-if +6I1954195C 0000241315800?1513188002 alo 8002 689-go i intgr +6I1954195C 0000241318800?6500011205 ral 0001 690-then +6I1954195C 0000241205800?3500021911 slt 0002 691-endgr +6I1954195C 0000241911800?4413650966 nzuendgr 692- +6I1954195C 0000240966800?3000020706 srt 0002endga 693- +6I1954195C 0000240706800?6900001212 endgaldd 0000endgb 694- +6I1954195C 0000241212800?2300001453 endgbsia 0000 695- +6I1954195C 0000241453800?6907560893 ldd dropu 696-if relat +6I1954195C 0000240756800?6506321237 ralrelat 697-neg them +6I1954195C 0000241237800?4607900991 bmiendg2endg5 698-endg2 +6I1954195C 0000241365800?6506321287 endgrralrelat 699-if relat neg +6I1954195C 0000241287800?4607901041 bmiendg2endg4 700-then endg2 +6I1954195C 0000240790800?6780020649 endg2ram 8002 701-inst of +6I1954195C 0000240649800?2015030806 stlbeta 702-relatminus1 +6I1954195C 0000240806800?6910410944 lddendg4bmone 703-set to u +6I1954195C 0000241041800?6505150599 endg4ralu endg3 704-data of +6I1954195C 0000240599800?6900001093 endg3ldd 0000endg1 705-relat set +6I1954195C 0000241093800?2200001553 endg1sda 0000 706-to u +6I1954195C 0000241553800?6105151619 rsuu 707-compile +6I1954195C 0000241619800?6909910800 lddendg5ps7 708-neg nop +6I1954195C 0000240991800?2106320850 endg5sturelatps12 709-relat zero +6I1954195C 0000241023800?6005151669 endh rauu 710-compile +6I1954195C 0000241669800?1008321337 aupoone 711-hlt u 0000 +6I1954195C 0000241337800?6908500800 lddps12 ps7 712- +6I1954195C 0000241078800?6912681721 endl lddendy dropk 713- +6I1954195C 0000240938800?6510910945 endt ralfourt 714-end punch +6I1954195C 0000240945800?1619771381 sloj0001 715-generator +6I1954195C 0000241381800?4608271735 bmialarm 716-compiles +6I1954195C 0000241735800?6580011143 ral 8001 717-ldd pnchsr +6I1954195C 0000241143800?3500041603 slt 0004 718-if nr of +6I1954195C 0000241603800?1500001255 alo 0000 719-variables +6I1954195C 0000241255800?2004841387 stln 720-less than +6I1954195C 0000241387800?6908401150 ldd srac 721-five +6I1954195C 0000240840800?6911931313 ldd osgn1 722- +6I1954195C 0000241193800?6506960851 ralsvntt 723- +6I1954195C 0000240851800?6908501038 lddps12 ldsr 724- +6I1954195C 0000241268800?6917711374 endy ldd chknk 725-if u equals +6I1954195C 0000241771800?6914241427 ldd ubeta 726-beta plus 1 +6I1954195C 0000241424800?4511281329 nzeendy1 727-ral becomes +6I1954195C 0000241329800?6611321437 rslnze 728-stl +6I1954195C 0000241437800?2007881141 stltemp4 729-in beta +6I1954195C 0000241141800?6515031157 ralbeta 730- +6I1954195C 0000241157800?6908601513 ldd chgop 731- +6I1954195C 0000240860800?2005091262 stltemp1 732- +6I1954195C 0000241262800?6515031207 ralbeta 733- +6I1954195C 0000241207800?1606301785 sloone 734- +6I1954195C 0000241785800?2007881191 stltemp4 735- +6I1954195C 0000241191800?1509948002 aloendy2 8002 736-set contents +6I1954195C 0000240994800?6500001305 endy2ral 0000 737-beta minus +6I1954195C 0000241305800?2004901243 stltemp2 738-one equal +6I1954195C 0000241243800?6780020901 ram 8002 739-to content +6I1954195C 0000240901800?1610040909 slostla1 740-beta with +6I1954195C 0000240909800?4508501563 nzeps12 741-sign beta +6I1954195C 0000241563800?6007881293 rautemp4 742-minus one +6I1954195C 0000241293800?2105151368 stuu 743-if beta +6I1954195C 0000241368800?6004900995 rautemp2 744-minus one +6I1954195C 0000240995800?4603480699 bmi endy3 745-contains +6I1954195C 0000240348800?6105091613 rsutemp1endy4 746-stl acc +6I1954195C 0000240699800?6005091613 endy3rautemp1endy4 747- +6I1954195C 0000241613800?6908500800 endy4lddps12 ps7 748- +6I1954195C 0000241128800?6614311835 endy1rslfrone 749-if u not bta +6I1954195C 0000241835800?2007881241 stltemp4 750-plus one +6I1954195C 0000241241800?6910440797 ldd uchge 751-recompile +6I1954195C 0000241044800?6505151719 ralu 752-raly0 0000 +6I1954195C 0000241719800?1601481653 slotwo 753- +6I1954195C 0000241653800?2005151418 stlu 754-to +6I1954195C 0000241418800?1518218002 aloendy6 8002 755- +6I1954195C 0000241821800?6000001355 endy6rau 0000 756-alo u 0000 +6I1954195C 0000241355800?1005151769 aupu 757-ldd acc 8002 +6I1954195C 0000241769800?1001481703 auptwo 758-stdyo 0000 +6I1954195C 0000241703800?3000041663 srt 0004 759- +6I1954195C 0000241663800?6080031871 rau 8003 760-with sgn of +6I1954195C 0000241871800?3500041481 slt 0004 761-last inst +6I1954195C 0000241481800?6909840800 ldd ps7 762-negative +6I1954195C 0000240984800?6505151819 ralu 763- +6I1954195C 0000241819800?1508228002 aloendy7 8002 764- +6I1954195C 0000240822800?6600001405 endy7rsl 0000 765- +6I1954195C 0000241405800?2005091312 stltemp1 766- +6I1954195C 0000241312800?6014151869 rauldac 767- +6I1954195C 0000241869800?6908720800 ldd ps7 768- +6I1954195C 0000240872800?6005091713 rautemp1 769- +6I1954195C 0000241713800?6908500800 lddps12 ps7 770- +6I1954195C 0000241321800?2119590343 ff stuffbitps3 771-ffbit on +6I1954195C 0000241024800?6509881343 gi ralalo 772-compile +6I1954195C 0000241343800?1507761531 aloabcon 773-alo a0 8002 +6I1954195C 0000241531800?1509801885 alolow1 774-where a0 +6I1954195C 0000241885800?6911381313 ldd osgn1 775-will cont +6I1954195C 0000241138800?6008321711 rauoone eec2 776-s0 addrss +6I1954195C 0000240778800?6910240751 gl lddgi chkar 777- +6I1954195C 0000240754800?6912570751 gn ldd chkar 778- +6I1954195C 0000241257800?6909101100 ldd srn 779- +6I1954195C 0000240910800?6917630658 ldd chknn 780-compile +6I1954195C 0000241763800?1510161921 alogo 781-nop0000sn +6I1954195C 0000241921800?6917111313 lddeec2 osgn1 782- +6I1954195C 0000241371800?6914741374 if lddni chknk 783- +6I1954195C 0000241074800?6514771611 ii rali adlow 784- +6I1954195C 0000240828800?6506301935 il ralone 785- +6I1954195C 0000241935800?6910741250 lddii setel 786- +6I1954195C 0000240804800?6514771661 in rali var 787-v equals i +6I1954195C 0000241283800?6909781581 me lddml numin 788-dcrmnt nu +6I1954195C 0000240978800?6016310836 ml rau strel 789-relat is l +6I1954195C 0000241631800?6910341721 ldd dropk 790- +6I1954195C 0000241034800?6914870890 ldd chktk 791-to ml1 if +6I1954195C 0000241487800?4509401291 nze ml1 792-tk is zero +6I1954195C 0000240940800?6912911094 lddml1 tknz1 793-tknz1and ml1 +6I1954195C 0000241291800?6917521134 ml1 ldd setek 794- +6I1954195C 0000241752800?6911440947 ldd nglft a794- +6I1954195C 0000241144800?2103660343 stuabvalps3 795-abval zero +6I1954195C 0000241218800?6019710836 my rau strel 796-relat is l +6I1954195C 0000241971800?6915240890 ldd chktk 797-to mini if +6I1954195C 0000241524800?4511781118 nzemy1 mini 798-tk is zero +6I1954195C 0000241178800?6912911194 my1 lddml1 tknz2 799- +6I1954195C 0000240926800?6013790836 mn rau strel 800-relat is l +6I1954195C 0000241379800?6911820890 ldd chktk 801-to minn if +6I1954195C 0000241182800?4508860876 nze minn 802-tk is zero +6I1954195C 0000240886800?6911391100 ldd srn 803-compile +6I1954195C 0000241139800?6911781681 lddmy1 genn 804-ral ajay +6I1954195C 0000241118800?6508321537 mini raloone 805-ral ram +6I1954195C 0000241537800?2007881341 stltemp4 806-becomes +6I1954195C 0000241341800?6912440797 ldd uchge 807-rsl rsm +6I1954195C 0000241244800?6500351189 rald0004 808-l is s +6I1954195C 0000241189800?2005290668 stll ps3g 809-then ps3g +6I1954195C 0000240878800?6906680947 minl lddps3g nglft 810- +6I1954195C 0000240876800?6914291100 minn ldd srn 811- +6I1954195C 0000241429800?6104841239 rsun 812-n is minus n +6I1954195C 0000241239800?2104841587 stun 813-compile +6I1954195C 0000241587800?6909901681 ldd genn 814-ral ajay +6I1954195C 0000240990800?6500351289 rald0004 815-l is s +6I1954195C 0000241289800?2005291068 stll wy 816-then wy +6I1954195C 0000240500800?8400001455 m0001 84 0000idem 817-switching +6I1954195C 0000240501800?8500001505 m0002 85 0000grtr 818-dictionary +6I1954195C 0000240502800?8600001555 m0003 86 0000grtrz 819-for +6I1954195C 0000240503800?9999990827 m0004 99 9999alarm 820-relations +6I1954195C 0000241455800?6505151919 idem ralu 821-compile +6I1954195C 0000241919800?2006320936 stlrelat 822-nze0000next +6I1954195C 0000240936800?6511321637 ralnze grtr1 823- +6I1954195C 0000241555800?6505151969 grtrzralu 824-v equals u +6I1954195C 0000241969800?2006320986 stlrelatgrtz1 825-compile +6I1954195C 0000240986800?6513391637 grtz1ralbmi grtr1 826-bmi0000next +6I1954195C 0000241637800?6917111313 grtr1lddeec2 osgn1 827-opsgn zero +6I1954195C 0000241505800?6605150770 grtr rslu 828-v equals u +6I1954195C 0000240770800?1606301036 sloone 829-plus one +6I1954195C 0000241036800?2006321086 stlrelat 830-compile +6I1954195C 0000241086800?6511321687 ralnze 831-nze0000next +6I1954195C 0000241687800?6910401313 ldd osgn1 832- +6I1954195C 0000241040800?2105240986 stuopsgngrtz1 833- +6I1954195C 0000241227800?6907201173 ncmmalddnr comma 834- +6I1954195C 0000240917800?6005381393 nf rauintgr 835-n equals l +6I1954195C 0000241393800?3000081961 srt 0008 836-and n +6I1954195C 0000241961800?1504841389 alon 837- +6I1954195C 0000241389800?3000011045 srt 0001 838-mu equals mu +6I1954195C 0000241045800?2004841737 stln 839-plus one +6I1954195C 0000241737800?6007501605 raumu 840- +6I1954195C 0000241605800?1006301561 aupone nf2 841- +6I1954195C 0000241561800?2107500343 nf2 stumu ps3 842- +6I1954195C 0000241474800?6515271731 ni ralni1 843- +6I1954195C 0000241731800?6906321136 lddrelat 844-switch to +6I1954195C 0000241136800?8405008002 tlum0001 8002 845-relation +6I1954195C 0000241527800?6000001655 ni1 rau 0000 846-compiler +6I1954195C 0000241655800?1106328003 suprelat 8003 847- +6I1954195C 0000240720800?2003421095 nr stlnbar 848-n nbar mu +6I1954195C 0000241095800?2004841787 stln 849-del and +6I1954195C 0000241787800?2007501753 stlmu 850-arith zero +6I1954195C 0000241753800?2003580917 stlarithnf 851- +6I1954195C 0000241519800?6907201223 nw lddnr tkop 852-store op +6I1954195C 0000240794800?6907201273 nz lddnr nz4 853- +6I1954195C 0000241273800?2409761479 nz4 stdout 854- +6I1954195C 0000241479800?6912321374 lddnz1 chknk 855- +6I1954195C 0000241232800?6500011705 nz1 ral 0001 856-compile +6I1954195C 0000241705800?3500021362 slt 0002 857-stl acc +6I1954195C 0000241362800?1114650820 supsixtr 858-or +6I1954195C 0000240820800?4413231574 nzu flote 859-ldd floatk +6I1954195C 0000241323800?1103301186 supsixt 860-or +6I1954195C 0000241186800?4414391090 nzu fixva 861-ldd fix +6I1954195C 0000241439800?1105920997 supnnten 862-or +6I1954195C 0000240997800?4409511574 nzu flote 863- +6I1954195C 0000240951800?6510540332 ralfiveolarm 864-alarm +6I1954195C 0000241350800?6004881443 nz3 rauv1 865-to nz2 if +6I1954195C 0000241443800?4409760498 nzuout nz2 866-v1 zero +6I1954195C 0000240498800?6510040959 nz2 ralstla1 867- +6I1954195C 0000240959800?6914121313 ldd osgn1 868- +6I1954195C 0000241412800?2105241577 stuopsgnflot1 869- +6I1954195C 0000241574800?6003581813 floterauarith 870-float if +6I1954195C 0000241813800?4413501468 nzunz3 871- +6I1954195C 0000241468800?6509221627 ralfivet 872-y and fix +6I1954195C 0000241627800?6915771038 lddflot1ldsr 873-c and fix +6I1954195C 0000241577800?6080030976 flot1rau 8003out 874- +6I1954195C 0000241090800?6003581863 fixvarauarith 875- +6I1954195C 0000241863800?4409670498 nzu nz2 876- +6I1954195C 0000240967800?6508700925 ralfixnr 877- +6I1954195C 0000240925800?6904981038 lddnz2 ldsr 878- +6I1954195C 0000241077800?6914211173 pcmmalddpf comma 879- +6I1954195C 0000241421800?2004841837 pf stln 880-n nbar and +6I1954195C 0000241837800?2003421145 stlnbar 881-mu zero +6I1954195C 0000241145800?2007500854 stlmu pn 882-then pn +6I1954195C 0000240854800?6503561462 pn ralonet 883-arith to +6I1954195C 0000241462800?2003581561 stlarithnf2 884-floating +6I1954195C 0000241369800?6914211223 pw lddpf tkop 885-tkop and pf +6I1954195C 0000241127800?6915211173 qcmmalddee comma 886- +6I1954195C 0000241471800?6019601515 qf rautau 887- +6I1954195C 0000241515800?1115181373 suptau5 888-quant +6I1954195C 0000241373800?4416771228 nzutf1 889- +6I1954195C 0000241228800?6916771030 lddtf1 stsmt 890-if so +6I1954195C 0000241030800?2406911294 stsmtstdfini 891-store stmt +6I1954195C 0000241294800?6510471001 ralflop1 892-no of stmt +6I1954195C 0000241001800?1000001755 aup 0000 893-following +6I1954195C 0000241755800?1606301236 sloone 894-quant +6I1954195C 0000241236800?1514898002 alo 8002 895- +6I1954195C 0000241489800?2105680691 stun0001fini 896- +6I1954195C 0000241677800?6000411195 tf1 raupsi 897-if not +6I1954195C 0000241195800?1006301286 aupone 898-incrmnt psi +6I1954195C 0000241286800?2100411344 stupsi 899-ans set +6I1954195C 0000241344800?1903301336 mpysixt 900-count +6I1954195C 0000241336800?2010471400 stlflop1 901- +6I1954195C 0000241400800?6506301386 ralone tf2 902- +6I1954195C 0000241450800?4418031104 qua4 nzu curtn 903-if tally +6I1954195C 0000241803800?1008568003 aup 8003 904-non zero +6I1954195C 0000240856800?6500001805 ral 0000qua20 905-send nxt wrd +6I1954195C 0000241805800?2003720975 qua20stlgammaqua3 906-to gamma +6I1954195C 0000240975800?6003721727 qua3 raugamma 907- +6I1954195C 0000241727800?4417811282 nzu qua1 908- +6I1954195C 0000241781800?3000021887 srt 0002 909-extract +6I1954195C 0000241887800?2103721025 stugamma 910-pewth +6I1954195C 0000241025800?6080021333 rau 8002 911-symbol +6I1954195C 0000241333800?2105091512 stutemp1 912-is +6I1954195C 0000241512800?4415650975 nzuqua2 qua3 913-symbol zero +6I1954195C 0000241282800?6003731777 qua1 rautally 914-incrmnt +6I1954195C 0000241777800?1106301436 supone 915-tally +6I1954195C 0000241436800?2103731450 stutallyqua4 916- +6I1954195C 0000241565800?1115681423 qua2 supsvty2 917-is symbol k +6I1954195C 0000241423800?4418271278 nzuqua5 918- +6I1954195C 0000241278800?6518311486 ralchi 919-incrmnt chi +6I1954195C 0000241486800?1506301386 aloone tf2 920- +6I1954195C 0000241386800?2018311084 tf2 stlchi 921-clear l +6I1954195C 0000241084800?2111881391 stustar 922-and star +6I1954195C 0000241391800?2107460975 stuel qua3 923- +6I1954195C 0000241827800?6007461051 qua5 rauel 924- +6I1954195C 0000241051800?1003561562 auponet 925-incrmnt el +6I1954195C 0000241562800?2107460749 stuel 926-alarm if +6I1954195C 0000240749800?1103301536 supsixt 927-more than +6I1954195C 0000241536800?4415391140 nzuqua7 qua50 928-five symbls +6I1954195C 0000241140800?6500411245 qua50ralpsi 929- +6I1954195C 0000241245800?1606301586 sloone 930- +6I1954195C 0000241586800?2000410827 stlpsi alarm 931- +6I1954195C 0000241539800?6011881493 qua7 raustar 932- +6I1954195C 0000241493800?3000020799 srt 0002 933- +6I1954195C 0000240799800?1005091913 auptemp1 934- +6I1954195C 0000241913800?1510471101 aloflop1 935- +6I1954195C 0000241101800?1518311636 alochi 936- +6I1954195C 0000241636800?1615891543 sloseven 937- +6I1954195C 0000241543800?1507968002 alo 8002 938- +6I1954195C 0000240796800?2105680972 stun0001 939- +6I1954195C 0000240972800?2111880975 stustar qua3 940- +6I1954195C 0000241104800?6913070960 curtnldd flop 941-store +6I1954195C 0000241307800?6519811686 ralw0005curt1 942-convert no +6I1954195C 0000241686800?3500021593 curt1slt 0002 943-of statmnts +6I1954195C 0000241593800?1103601615 supninty 944-being +6I1954195C 0000241615800?1180031473 sup 8003 945-quantified +6I1954195C 0000241473800?4510261877 nze curt2 946-to pure +6I1954195C 0000241026800?1080011686 aup 8001curt1 947-numeric +6I1954195C 0000241877800?1080011736 curt2aup 8001 948- +6I1954195C 0000241736800?3000021643 srt 0002 949- +6I1954195C 0000241643800?1680021151 slo 8002 950- +6I1954195C 0000241151800?3000011357 srt 0001 951- +6I1954195C 0000241357800?1580011665 alo 8001 952- +6I1954195C 0000241665800?1680021523 slo 8002 953- +6I1954195C 0000241523800?3000011529 srt 0001 954- +6I1954195C 0000241529800?1580011937 alo 8001 955- +6I1954195C 0000241937800?3500021693 slt 0002 956- +6I1954195C 0000241693800?1510471201 aloflop1 957- +6I1954195C 0000241201800?1601481853 slotwo 958- +6I1954195C 0000241853800?1509068002 alo 8002 959- +6I1954195C 0000240906800?2105681022 stun0001 960- +6I1954195C 0000241022800?6919801383 lddw0004 961- +6I1954195C 0000241383800?2400011154 std 0001 962-variable +6I1954195C 0000241154800?6914071010 lddz 963- +6I1954195C 0000241010800?2400021855 std 0002 964-z +6I1954195C 0000241855800?6919791332 lddw0003 965-lower +6I1954195C 0000241332800?2400030956 std 0003 966-variable +6I1954195C 0000240956800?6009221927 raufivet 967- +6I1954195C 0000241927800?2000041457 stl 0004 968- +6I1954195C 0000241457800?1510601715 alotau6 qua9 969- +6I1954195C 0000241715800?2103731076 qua9 stutally 970-return to +6I1954195C 0000241076800?2019601963 stltau 971-scanner +6I1954195C 0000241963800?6503440667 ralrsl ps2b 972- +6I1954195C 0000241060800?6515181573 tau6 raltau5 qua11 973-set tau +6I1954195C 0000241573800?2019600564 qua11stltau tau2 974-to tau5 +6I1954195C 0000241518800?6910721030 tau5 ldd stsmt 975- +6I1954195C 0000241072800?6505641573 raltau2 qua11 976- +6I1954195C 0000240564800?6910170920 tau2 lddqua21dcrmt 977- +6I1954195C 0000241017800?6909700960 qua21ldd flop 978- +6I1954195C 0000240970800?6019811786 rauw0005 979- +6I1954195C 0000241786800?4412341190 nzups qua10 980-number +6I1954195C 0000241190800?6519801836 qua10ralw0004 981-store +6I1954195C 0000241836800?2100001903 stu 0000 982- +6I1954195C 0000241903800?2000011204 stl 0001 983-quant varble +6I1954195C 0000241204800?2000031006 stl 0003 984- +6I1954195C 0000241006800?6914071110 lddz 985-z +6I1954195C 0000241110800?2400021905 std 0002 986- +6I1954195C 0000241905800?6519781433 ralw0002 987-increment +6I1954195C 0000241433800?2000050758 stl 0005 988-if minus +6I1954195C 0000240758800?1616121067 slom 989-otherwise +6I1954195C 0000241067800?3500021623 slt 0002 990-z s incrmnt +6I1954195C 0000241623800?4413281378 nzu quamn 991- +6I1954195C 0000241328800?6000351378 raud0004quamn 992- +6I1954195C 0000241378800?2100041507 quamnstu 0004 993- +6I1954195C 0000241507800?6011601765 rausevnt 994- +6I1954195C 0000241765800?2000061009 stl 0006 995- +6I1954195C 0000241009800?1516621715 alotau3 qua9 996-to scanner +6I1954195C 0000240920800?2406911394 dcrmtstdfini 997-decrement +6I1954195C 0000241394800?6000411295 raupsi 998-quant count +6I1954195C 0000241295800?2107091712 stutemp3dcmt3 999-for all +6I1954195C 0000241712800?6007090664 dcmt3rautemp3 1000-psi less +6I1954195C 0000240664800?4411170691 nzu fini 1001-than or +6I1954195C 0000241117800?1106301886 supone 1002-equal to +6I1954195C 0000241886800?2107091762 stutemp3 1003-current +6I1954195C 0000241762800?1903301936 mpysixt 1004-psi +6I1954195C 0000241936800?1516391743 alodcmt1 1005- +6I1954195C 0000241743800?6908460849 ldddcmt2 1006- +6I1954195C 0000240849800?2208468002 sdadcmt2 8002 1007- +6I1954195C 0000241639800?6005721428 dcmt1raun0005 1008- +6I1954195C 0000241428800?1100001056 sup 0000 1009- +6I1954195C 0000241056800?4417120846 nzudcmt3dcmt2 1010- +6I1954195C 0000240846800?2105721712 dcmt2stun0005dcmt3 1011- +6I1954195C 0000241662800?6918150960 tau3 ldd flop 1012-store +6I1954195C 0000241815800?6908941097 lddram 1013- +6I1954195C 0000241097800?2400011254 std 0001 1014-g +6I1954195C 0000241254800?6019821987 rauw0006 1015- +6I1954195C 0000241987800?2000001304 stl 0000 1016- +6I1954195C 0000241304800?2000071210 stl 0007 1017- +6I1954195C 0000241210800?6907140911 ldd stnon 1018- +6I1954195C 0000240714800?2100021106 stu 0002 1019- +6I1954195C 0000241106800?6910591812 lddwdif 1020- +6I1954195C 0000241812800?2400031156 std 0003 1021-if +6I1954195C 0000241156800?6900381441 lddd0007 1022- +6I1954195C 0000241441800?2400050808 std 0005 1023-w +6I1954195C 0000240808800?6519781483 ralw0002 1024-check for +6I1954195C 0000241483800?1616121167 slom 1025-negative +6I1954195C 0000241167800?3500021673 slt 0002 1026-increment +6I1954195C 0000241673800?4414781528 nzuqua30 1027- +6I1954195C 0000241528800?6919801533 lddw0004 1028- +6I1954195C 0000241533800?2400041557 std 0004 1029- +6I1954195C 0000241557800?6919771080 lddw0001qua31 1030- +6I1954195C 0000241478800?6919771130 qua30lddw0001 1031- +6I1954195C 0000241130800?2400041607 std 0004 1032-upper varble +6I1954195C 0000241607800?6919801080 lddw0004qua31 1033- +6I1954195C 0000241080800?2400061109 qua31std 0006 1034-quant varble +6I1954195C 0000241109800?6018621217 rauninet 1035- +6I1954195C 0000241217800?2000071260 stl 0007 1036- +6I1954195C 0000241260800?2400081912 std 0008 1037- +6I1954195C 0000241912800?1518651715 alotau4 qua9 1038-to scanner +6I1954195C 0000241865800?6500411345 tau4 ralpsi 1039- +6I1954195C 0000241345800?1606301238 sloone 1040- +6I1954195C 0000241238800?2000411444 stlpsi 1041- +6I1954195C 0000241444800?4505480336 nzequa22ps0 1042- +6I1954195C 0000240548800?6505641020 qua22raltau2 1043- +6I1954195C 0000241020800?2019601017 stltau qua21 1044- +6I1954195C 0000240960800?2409761579 flop stdout 1045- +6I1954195C 0000241579800?6000411395 raupsi 1046- +6I1954195C 0000241395800?1903301288 mpysixt 1047-store statmt +6I1954195C 0000241288800?2010471500 stlflop1 1048- +6I1954195C 0000241500800?1605201075 slosix 1049- +6I1954195C 0000241075800?1515781583 alo flop3 1050- +6I1954195C 0000241578800?0605681977 06n0001w0001 1051- +6I1954195C 0000241583800?6909760341 flop3lddout sr1 1052- +6I1954195C 0000241177800?6915711173 rcmmalddrr comma 1053- +6I1954195C 0000241571800?6501461251 rr ralk 1054-k equals k +6I1954195C 0000241251800?2104881491 stuv1 1055- +6I1954195C 0000241491800?1506301338 aloone 1056-plus one +6I1954195C 0000241338800?3500051301 slt 0005 1057- +6I1954195C 0000241301800?4408271206 nzualarm 1056- +6I1954195C 0000241206800?3000051070 srt 0005 1059- +6I1954195C 0000241070800?2001460899 stlk rr2 1060- +6I1954195C 0000240899800?1508028002 rr2 alorr1 8002 1061-tk equals +6I1954195C 0000240802800?2100420343 rr1 stut0001ps3 1062-zero +6I1954195C 0000241469800?6506361541 rw ralstl 1063-compile +6I1954195C 0000241541800?1501461351 alok 1064-stl wk +6I1954195C 0000241351800?1513541159 alow 1065- +6I1954195C 0000241159800?6919621313 ldd osgn1 1066-opsgn zero +6I1954195C 0000241962800?2105241628 stuopsgn 1067- +6I1954195C 0000241628800?6918811134 ldd setek 1068- +6I1954195C 0000241881800?6915711223 lddrr tkop 1069- +6I1954195C 0000240744800?6915711273 rz lddrr nz4 1070- +6I1954195C 0000241124800?6506301388 ti ralone tiff 1071-punch +6I1954195C 0000240843800?6501481388 ty raltwo tiff 1072-generators +6I1954195C 0000241168800?6511311388 tc ralthreetiff 1073- +6I1954195C 0000240928800?6519311388 tl ralldsr1tiff 1074- +6I1954195C 0000241388800?1515911445 tiff aloab3 1075-compiles +6I1954195C 0000241445800?2009490852 stltmble 1076-program +6I1954195C 0000240852800?6912561427 ldd ubeta 1077-which +6I1954195C 0000241256800?4513100764 nze ti4 1078-identifies +6I1954195C 0000241310800?6505151120 ralu 1079-varianles +6I1954195C 0000241120800?1611311438 slothree 1080-whose values +6I1954195C 0000241438800?2005151618 stlu 1081-are to be +6I1954195C 0000241618800?6509491404 raltmbleti2 1082-punched +6I1954195C 0000240764800?6912670893 ti4 ldd dropu 1083- +6I1954195C 0000241267800?1511708002 alo 8002 1084- +6I1954195C 0000241170800?6000001306 rau 0000 1085- +6I1954195C 0000241306800?3500020814 slt 0002 1086- +6I1954195C 0000240814800?3000061629 srt 0006 1087- +6I1954195C 0000241629800?2104841488 stun 1088- +6I1954195C 0000241488800?6914041150 lddti2 srac 1089- +6I1954195C 0000241404800?6916571313 ti2 ldd osgn1 1090- +6I1954195C 0000241657800?6903431173 lddps3 comma 1091- +6I1954195C 0000241591800?1550030000 ab3 15 5003 0000 1092- +6I1954195C 0000240949800?0000000000 tmble 00 0000 0000 1093- +6I1954195C 0000241233800?6907281581 we lddwl numin 1094- +6I1954195C 0000240728800?6913821721 wl ldd dropk 1095-is previous +6I1954195C 0000241382800?6915380890 ldd chktk 1096-operation +6I1954195C 0000241538800?4506421793 nzewl1 alpha 1097-zero +6I1954195C 0000241793800?6908961134 alphaldd setek 1098-if so ek +6I1954195C 0000240896800?6501461401 ralk 1099-is arith and +6I1954195C 0000241401800?2103660899 stuabvalrr2 1100-abval zero +6I1954195C 0000240642800?6917931094 wl1 lddalphatknz1 1101-then +6I1954195C 0000241094800?2409761679 tknz1stdout 1102-return ps3 +6I1954195C 0000241679800?2005090864 stltemp1 1103-if not is +6I1954195C 0000240864800?1613171122 slop 1104-ppn p +6I1954195C 0000241122800?4511261678 nze pwrw 1105-if not is +6I1954195C 0000241126800?6917291432 ldd getek 1106-wk fxd or fl +6I1954195C 0000241729800?4514821633 nzefltw1nflw1 1107-if fl is ari +6I1954195C 0000241482800?6503580914 fltw1ralarith 1108-th fixed or +6I1954195C 0000240914800?4516681220 nzefltw2nflw2 1109-floating +6I1954195C 0000241668800?6504881843 fltw2ralv1 wl3a 1110-if v1 zero +6I1954195C 0000241843800?6909460999 wl3a lddgamm swtch 1111-compile +6I1954195C 0000240999800?4509021454 swtchnzeralwkstlac 1112-stl acc +6I1954195C 0000241454800?2406441147 stlacstdexit 1113-and +6I1954195C 0000241147800?6510041209 ralstla1 1114-ral wk +6I1954195C 0000241209800?6909641313 ldd osgn1 1115-if non zero +6I1954195C 0000240964800?2105241728 stuopsgnralw1 1116-compile +6I1954195C 0000241004800?2000010000 stla1stl 0001 0000 1117-ral wk +6I1954195C 0000240902800?2406441728 ralwkstdexit ralw1 1118- +6I1954195C 0000241728800?6501461451 ralw1ralk 1119-set opsgn +6I1954195C 0000241451800?1513541259 alow 1120-to zero +6I1954195C 0000241259800?1509681723 aloral 1121-in both +6I1954195C 0000241723800?6911761313 ldd osgn1 1122-cases +6I1954195C 0000241176800?2105240644 stuopsgnexit 1123- +6I1954195C 0000240946800?6007681773 gamm rauotwo gamm1 1124-increment +6I1954195C 0000241773800?1506301588 gamm1aloone wl3c 1125-opn and +6I1954195C 0000241588800?1005091014 wl3c auptemp1 1126-set v1 +6I1954195C 0000241014800?2105091064 stutemp1netta 1127-then go to +6I1954195C 0000241064800?2004881641 nettastlv1 fl1k 1128-arith gen +6I1954195C 0000241220800?6509221778 nflw2ralfivet 1129-compile +6I1954195C 0000241778800?6915321038 ldd ldsr 1130-ldd floatk +6I1954195C 0000241532800?2105241828 stuopsgn 1131-and merge +6I1954195C 0000241828800?6503561114 ralonet 1132-with float +6I1954195C 0000241114800?2003581843 stlarithwl3a 1133-float +6I1954195C 0000241633800?6503581164 nflw1ralarith 1134-if wk fixed +6I1954195C 0000241164800?4517181270 nzen1fw2n1nw2 1135-is present +6I1954195C 0000241718800?6504881893 n1fw2ralv1 1136-fixed +6I1954195C 0000241893800?6909960999 ldd swtch 1137-to switch if +6I1954195C 0000240996800?6510911495 ralfourt 1138-float then +6I1954195C 0000241495800?6909461038 lddgamm ldsr 1139-ldd float +6I1954195C 0000241270800?6008321588 n1nw2rauoone wl3c 1140-fix fix +6I1954195C 0000241678800?6915821432 pwrw ldd getek 1141-is wk fixed +6I1954195C 0000241582800?4516381688 nze pwrp 1142-if not is +6I1954195C 0000241638800?6503581214 ralarith 1143-present flt +6I1954195C 0000241214800?4517681320 nzepwrfl 1144-if not +6I1954195C 0000241320800?6510911545 ralfourt 1145-compile +6I1954195C 0000241545800?6917681038 lddpwrflldsr 1146-ldd float +6I1954195C 0000241768800?6503561264 pwrflralonet 1147-float float +6I1954195C 0000241264800?2003581314 stlarith 1148-compiles +6I1954195C 0000241314800?6913671038 ldd ldsr 1149-ldd log +6I1954195C 0000241367800?6913701454 lddpwr1 stlac 1150-stl acc +6I1954195C 0000241370800?6008321773 pwr1 rauoone gamm1 1151- +6I1954195C 0000241688800?6504881943 pwrp ralv1 1152-ral wk +6I1954195C 0000241943800?6910460999 ldd swtch 1153-compile +6I1954195C 0000241046800?6503581364 ralarith 1154-stl acc +6I1954195C 0000241364800?2004881691 stlv1 1155-andor +6I1954195C 0000241691800?1514941049 alotwlvt 1156-ral wk and +6I1954195C 0000241049800?6909761038 lddout ldsr 1157-power invrt +6I1954195C 0000241068800?6911720890 wy ldd chktk 1158-is previous +6I1954195C 0000241172800?4512261793 nze alpha 1159-opn zero +6I1954195C 0000241226800?6917931194 lddalphatknz2 1160- +6I1954195C 0000241194800?2409761779 tknz2stdout 1161- +6I1954195C 0000241779800?2005091414 stltemp1 1162-if not is +6I1954195C 0000241414800?1613171222 slop 1163-opn p +6I1954195C 0000241222800?4512761878 nze powr 1164-if not is +6I1954195C 0000241276800?6918291432 ldd getek 1165-prev float +6I1954195C 0000241829800?4516321683 nzeflt1 nflt1 1166-if so go to +6I1954195C 0000241632800?6504881993 flt1 ralv1 1167-altr if prev +6I1954195C 0000241993800?4510961197 nzeflt2 1168-not in acc +6I1954195C 0000241197800?6910961099 lddflt2 altr 1169- +6I1954195C 0000241096800?6503581464 flt2 ralarith 1170-compile +6I1954195C 0000241464800?4510641420 nzenetta 1171-float if +6I1954195C 0000241420800?6510911595 ralfourt 1172-present +6I1954195C 0000241595800?6905981038 ldd ldsr 1173-fixed +6I1954195C 0000240598800?6503561514 ralonet 1174- +6I1954195C 0000241514800?2003581064 stlarithnetta 1175- +6I1954195C 0000241683800?6503581564 nflt1ralarith 1176-if not float +6I1954195C 0000241564800?4518181470 nzefx1f2 1177-fix go to +6I1954195C 0000241470800?6008881588 rauotreywl3c 1178-wl3c if +6I1954195C 0000241818800?6912720944 fx1f2ldd bmone 1179-float fix +6I1954195C 0000241272800?6115031707 rsubeta 1180-compile neg +6I1954195C 0000241707800?1113601915 supar33 1181-ldd beta ftk +6I1954195C 0000241915800?6918680800 lddar34 ps7 1182-to altr3 +6I1954195C 0000241360800?6900009005 ar33 ldd 0000 9005 1183-and then +6I1954195C 0000241868800?6910641417 ar34 lddnetta 1184-netta +6I1954195C 0000241417800?2406441247 stdexit altr3 1185- +6I1954195C 0000241099800?2406441297 altr stdexit 1186-altr perfrms +6I1954195C 0000241297800?6915500944 ldd bmone 1187-following +6I1954195C 0000241550800?6912471600 lddaltr3stac1 1188-sequentially +6I1954195C 0000240944800?2406911544 bmonestdfini 1189-beta minus +6I1954195C 0000241544800?6515031757 ralbeta 1190-one to +6I1954195C 0000241757800?1606301738 sloone 1191-temp4 +6I1954195C 0000241738800?2007881741 stltemp4i4zu1 1192- +6I1954195C 0000241741800?6507881594 i4zu1raltemp4 1193-inst of +6I1954195C 0000241594800?1513471501 aloi4zu3 1194-contents +6I1954195C 0000241501800?6915041807 lddi4zu2 1195-of temp4 +6I1954195C 0000241807800?2215041857 sdai4zu2 1196-equals u +6I1954195C 0000241857800?6080028003 rau 8002 8003 1197-if not ldd +6I1954195C 0000241347800?6900001554 i4zu3ldd 0000 1198- +6I1954195C 0000241554800?2404901644 stdtemp2 1199- +6I1954195C 0000241644800?6780011551 ram 8001 1200-if ldd set +6I1954195C 0000241551800?1616041309 slockldd 1201-data of +6I1954195C 0000241309800?3500021965 slt 0002 1202-contents +6I1954195C 0000241965800?4415201570 nzu i4zu4 1203-of +6I1954195C 0000241520800?6505151620 ralu 1204-temp4 to +6I1954195C 0000241620800?3000041682 srt 0004 1205-u +6I1954195C 0000241682800?1008321788 aupoone i4zu5 1206- +6I1954195C 0000241570800?6505151788 i4zu4ralu i4zu5 1207- +6I1954195C 0000241788800?1015041359 i4zu5aupi4zu2 1208- +6I1954195C 0000241359800?6904908003 lddtemp2 8003 1209- +6I1954195C 0000241504800?2200000691 i4zu2sda 0000fini 1210- +6I1954195C 0000241600800?2406911694 stac1stdfini 1211-compile neg +6I1954195C 0000241694800?6115031907 rsubeta 1212-stl acc bta +6I1954195C 0000241907800?3000041467 srt 0004 1213- +6I1954195C 0000241467800?1110041409 supstla1 1214- +6I1954195C 0000241409800?6906910800 lddfini ps7 1215- +6I1954195C 0000241247800?6916501654 altr3ldd ium2u 1216- +6I1954195C 0000241650800?6515030858 ralbeta 1217- +6I1954195C 0000240858800?2007881791 stltemp4 1218- +6I1954195C 0000241791800?6917441397 ldd bmini 1219- +6I1954195C 0000241744800?6508321838 raloone 1220- +6I1954195C 0000241838800?2005240644 stlopsgnexit 1221- +6I1954195C 0000241654800?2406911794 ium2ustdfini 1222-u minus two +6I1954195C 0000241794800?6505151670 ralu 1223-to temp4 +6I1954195C 0000241670800?1601481704 slotwo 1224-then i4zu1 +6I1954195C 0000241704800?2007881741 stltemp4i4zu1 1225- +6I1954195C 0000241397800?2406911844 bministdfini 1226-contents of +6I1954195C 0000241844800?6107881894 rsutemp4 1227-contents of +6I1954195C 0000241894800?1114478003 supbmin2 8003 1228-temp4 made +6I1954195C 0000241447800?1800001356 bmin2sml 0000 1229-negative +6I1954195C 0000241356800?6080021066 rau 8002 1230- +6I1954195C 0000241066800?1607881944 slotemp4 1231- +6I1954195C 0000241944800?1614978002 slobmin3 8002 1232- +6I1954195C 0000241497800?2100000691 bmin3 21 0000fini 1233- +6I1954195C 0000240644800?0106440644 exit hltexit exit 1234- +6I1954195C 0000240691800?0106910691 fini hltfini fini 1235- +6I1954195C 0000240976800?0109760976 out hltout out 1236- +6I1954195C 0000241313800?2406911994 osgn1stdfini osgn3 1237-set sign of +6I1954195C 0000241994800?1005241879 osgn3aupopsgn 1238-instruction +6I1954195C 0000241879800?1017328003 auposgn2 8003 1239-to be +6I1954195C 0000241732800?6080021841 osgn2rau 8002 1240-compiled +6I1954195C 0000241841800?6906910800 lddfini ps7 1241- +6I1954195C 0000241427800?2406911645 ubetastdfini 1242-is u equal +6I1954195C 0000241645800?6515030908 ralbeta 1243-to beta +6I1954195C 0000240908800?1506301888 aloone 1244-plus one +6I1954195C 0000241888800?1605150691 slou fini 1245- +6I1954195C 0000241513800?2406911695 chgopstdfini chge1 1246-op of +6I1954195C 0000241695800?1506481754 chge1alochg1 1247-contents of +6I1954195C 0000241754800?6909581614 lddchg2 1248-lower +6I1954195C 0000241614800?2209588002 sdachg2 8002 1249-changed by +6I1954195C 0000240648800?6500001406 chg1 ral 0000 1250-contents of +6I1954195C 0000241406800?4614591410 bmi chg3 1251-temp4 +6I1954195C 0000241459800?1607880958 slotemp4chg2 1252- +6I1954195C 0000241410800?1507880958 chg3 alotemp4chg2 1253- +6I1954195C 0000240958800?2000000691 chg2 stl 0000fini 1254- +6I1954195C 0000241878800?6917821432 powr ldd getek 1255-is prev flt +6I1954195C 0000241782800?4519381988 nzepowr1powrf 1256-if so is +6I1954195C 0000241938800?6504881745 powr1ralv1 1257-prev in acc +6I1954195C 0000241745800?4506981149 nzepowr4 1258-altr if not +6I1954195C 0000241149800?6906981099 lddpowr4altr 1259- +6I1954195C 0000240698800?6503581664 powr4ralarith 1260-if pres fix +6I1954195C 0000241664800?4519181720 nzepowr2 1261-compile +6I1954195C 0000241720800?6510911795 ralfourt 1262-float +6I1954195C 0000241795800?6907481038 ldd ldsr 1263-and set +6I1954195C 0000240748800?6503561714 ralonet 1264-opsgn to +6I1954195C 0000241714800?2003581918 stlarithpowr2 1265-one +6I1954195C 0000241918800?6503561764 powr2ralonet 1266-compile +6I1954195C 0000241764800?6913701038 lddpwr1 ldsr 1267-ldd log +6I1954195C 0000241988800?6918911099 powrflddpowr3altr 1268-if prev fix +6I1954195C 0000241891800?6503581814 powr3ralarith 1269-altr +6I1954195C 0000241814800?2004881941 stlv1 1270-compile +6I1954195C 0000241941800?1518451199 alotent opld 1271- +6I1954195C 0000241199800?6909761038 opld lddout ldsr 1272- +6I1954195C 0000241700800?1501461601 opwk alok 1273-compiles +6I1954195C 0000241601800?1513541509 alow opwk1 1274-opn wk next +6I1954195C 0000241509800?6918641313 opwk1lddopwk2osgn1 1275- +6I1954195C 0000241864800?2105240976 opwk2stuopsgnout 1276- +6I1954195C 0000241038800?2419311184 ldsr stdldsr1 1277-opsgn zero +6I1954195C 0000241184800?1516891895 aloldsr2 1278-compiles +6I1954195C 0000241895800?6907981313 ldd osgn1 1279-ldd0000lowr +6I1954195C 0000240798800?2105241931 stuopsgnldsr1 1280-plus 9000 +6I1954195C 0000241931800?0119311931 ldsr1hltldsr1ldsr1 1281- +6I1954195C 0000241689800?6900009000 ldsr2ldd 0000 9000 1282- +6I1954195C 0000241750800?1518041509 opaccaloacc opwk1 1283- +6I1954195C 0000241641800?6519451249 fl1k ralar5 1284-fetch opn +6I1954195C 0000241249800?6905091914 lddtemp1 1285-entry from +6I1954195C 0000241914800?8405508002 tluq0001 8002 1286-switching +6I1954195C 0000241945800?6000001456 ar5 rau 0000 1287-dictionary +6I1954195C 0000241456800?1105091964 suptemp1 1288-alarm if +6I1954195C 0000241964800?3000041125 srt 0004 1289-opn is +6I1954195C 0000241125800?4408271180 nzualarm 1290-invalid +6I1954195C 0000241180800?3500048003 slt 0004 8003 1291-if valid go +6I1954195C 0000240550800?6400001506 q0001 64 0000fpdv 1292-switching +6I1954195C 0000240551800?6500001556 q0002 65 0000fpdv1 1293-dictionary +6I1954195C 0000240552800?6600001606 q0003 66 0000fpdv2 1294-for arithmtc +6I1954195C 0000240553800?6700001656 q0004 67 0000fpdv3 1295-subgenrators +6I1954195C 0000240554800?7800001706 q0005 78 0000fppwr 1296- +6I1954195C 0000240555800?8200001756 q0006 82 0000fpad 1297- +6I1954195C 0000240556800?8300001806 q0007 83 0000fpad1 1298- +6I1954195C 0000240557800?8400001756 q0008 84 0000fpad 1299- +6I1954195C 0000240558800?8500001856 q0009 85 0000fpad3 1300- +6I1954195C 0000240559800?8700001906 q0010 87 0000fpmu 1301- +6I1954195C 0000240560800?8800001008 q0011 88 0000fpmu1 1302- +6I1954195C 0000240561800?8900001906 q0012 89 0000fpmu 1303- +6I1954195C 0000240562800?9000001058 q0013 90 0000fpmu3 1304- +6I1954195C 0000240563800?9900000827 q0014 99 0000alarm 1305- +6I1954195C 0000241756800?6515591199 fpad raleigttopld 1306-to arith +6I1954195C 0000241806800?6509881700 fpad1ralalo opwk 1307-generators +6I1954195C 0000241008800?6511161322 fpmu1ralrau 1308-start of +6I1954195C 0000241322800?1503521108 alolow 1309-arithmetic +6I1954195C 0000241108800?6911661313 ldd osgn1 1310-subgeneratrs +6I1954195C 0000241166800?2105241928 stuopsgn 1311- +6I1954195C 0000241928800?6518321700 ralmpy opwk 1312- +6I1954195C 0000241906800?6518621199 fpmu ralninetopld 1313- +6I1954195C 0000241506800?6503301199 fpdv ralsixt opld 1314- +6I1954195C 0000241556800?6516091700 fpdv1raldvr opwk 1315- +6I1954195C 0000241606800?6516591199 fpdv2ralfrtntopld 1316- +6I1954195C 0000241706800?6518621517 fppwrralninet 1317- +6I1954195C 0000241517800?6917701038 ldd ldsr 1318- +6I1954195C 0000241770800?6518231929 raltwot 1319- +6I1954195C 0000241929800?6904981038 lddnz2 ldsr 1320- +6I1954195C 0000241856800?6917091427 fpad3ldd ubeta 1321-is u equal +6I1954195C 0000241709800?4512161266 nzeadd4 1322-beta plus 1 +6I1954195C 0000241266800?6610541759 rslfiveomultn 1323- +6I1954195C 0000241216800?6918201099 add4 ldd altr 1324-altr and +6I1954195C 0000241820800?6509881750 ralalo opacc 1325-alo acc +6I1954195C 0000241656800?6918091099 fpdv3ldd altr 1326-altr and +6I1954195C 0000241809800?6516091750 raldvr opacc 1327-dvr acc +6I1954195C 0000241058800?6011161372 fpmu3raurau 1328- +6I1954195C 0000241372800?2113261230 stutemp6 1329- +6I1954195C 0000241230800?6505151870 ralu 1330- +6I1954195C 0000241870800?6918731376 ldd chkop 1331- +6I1954195C 0000241873800?2007881991 stltemp4 1332- +6I1954195C 0000241991800?1613391995 slobmi 1333- +6I1954195C 0000241995800?2012990952 stltemp5 1334- +6I1954195C 0000240952800?6911581427 ldd ubeta 1335- +6I1954195C 0000241158800?4513161366 nze mult1 1336- +6I1954195C 0000241316800?6503661422 ralabval 1337- +6I1954195C 0000241422800?4514261280 nzemult3 1338- +6I1954195C 0000241280800?6605281733 rslofive 1339- +6I1954195C 0000241733800?2007880692 stltemp4mult2 1340- +6I1954195C 0000241426800?6511161472 mult3ralrau 1341- +6I1954195C 0000241472800?1503521208 alolow 1342- +6I1954195C 0000241208800?6914161313 ldd osgn1 1343- +6I1954195C 0000241416800?2105241330 stuopsgn 1344- +6I1954195C 0000241330800?2103661920 stuabvalmult4 1345- +6I1954195C 0000240692800?6505151970 mult2ralu 1346- +6I1954195C 0000241970800?1606301739 sloone 1347- +6I1954195C 0000241739800?6919201513 lddmult4chgop 1348- +6I1954195C 0000241920800?6919231099 mult4ldd altr 1349- +6I1954195C 0000241923800?6518321750 ralmpy opacc 1350- +6I1954195C 0000241366800?6503661522 mult1ralabval 1351- +6I1954195C 0000241522800?4514261380 nzemult3 1352- +6I1954195C 0000241380800?6707881146 ramtemp4 1353- +6I1954195C 0000241146800?1513261882 alotemp6 1354- +6I1954195C 0000241882800?2013261430 stltemp6 1355- +6I1954195C 0000241430800?6515031258 ralbeta 1356- +6I1954195C 0000241258800?6914661376 ldd chkop 1357- +6I1954195C 0000241466800?4515721622 nze mlt7a 1358- +6I1954195C 0000241572800?1508321789 alooone 1359- +6I1954195C 0000241789800?4507421196 nzemult6 1360- +6I1954195C 0000241196800?6807881246 rsmtemp4mlt7b 1361- +6I1954195C 0000241622800?6707881246 mlt7aramtemp4mlt7b 1362- +6I1954195C 0000241246800?1605281783 mlt7bsloofive 1363- +6I1954195C 0000241783800?2007880792 stltemp4mult7 1364- +6I1954195C 0000240792800?6515031308 mult7ralbeta 1365- +6I1954195C 0000241308800?1606301839 sloone 1366- +6I1954195C 0000241839800?6908421513 ldd chgop 1367- +6I1954195C 0000240842800?6512991759 raltemp5multn 1368- +6I1954195C 0000241759800?2007880892 multnstltemp4 1369- +6I1954195C 0000240892800?6515031358 ralbeta 1370- +6I1954195C 0000241358800?6918641513 lddopwk2chgop 1371- +6I1954195C 0000241800800?6515031408 mult8ralbeta 1372- +6I1954195C 0000241408800?2005151968 stlu 1373- +6I1954195C 0000241968800?6916721513 ldd chgop 1374- +6I1954195C 0000241672800?2012991002 stltemp5 1375- +6I1954195C 0000241002800?4614581508 bmi mult9 1376- +6I1954195C 0000241458800?6008321508 rauoone mult9 1377- +6I1954195C 0000241508800?2105241480 mult9stuopsgn 1378- +6I1954195C 0000241480800?6513261932 raltemp6 1379- +6I1954195C 0000241932800?1503521558 alolow 1380- +6I1954195C 0000241558800?6915161313 ldd osgn1 1381- +6I1954195C 0000241516800?2105241530 stuopsgn 1382- +6I1954195C 0000241530800?6712991854 ramtemp5 1383- +6I1954195C 0000241854800?6909761313 lddout osgn1 1384- +6I1954195C 0000240742800?6512991904 mult6raltemp5 1385- +6I1954195C 0000241904800?2007881800 stltemp4mult8 1386- +6I1954195C 0000241174800?6515801181 yi raly ci1 1387- +6I1954195C 0000241028800?6501481608 yl raltwo 1388- +6I1954195C 0000241608800?6911741250 lddyi setel 1389- +6I1954195C 0000240930800?6006301353 ymtx rauone ymtx1 1390-v is one +6I1954195C 0000241353800?1009681973 ymtx1aupral 1391-compile +6I1954195C 0000241973800?1014771833 aupi 1392-ral i 0000 +6I1954195C 0000241833800?6918890800 ldd ps7 1393-plus v +6I1954195C 0000241889800?6505151722 ralu 1394-beta is u +6I1954195C 0000241722800?1606301939 sloone 1395-minus one +6I1954195C 0000241939800?2015031658 stlbeta 1396- +6I1954195C 0000241658800?2103661772 stuabval 1397-abval zero +6I1954195C 0000241772800?6911751630 lddymtx2 1398- +6I1954195C 0000241630800?2409761058 stdout fpmu3 1399- +6I1954195C 0000241175800?6603561566 ymtx2rslonet 1400-decrement +6I1954195C 0000241566800?6918221225 ldd setjn 1401-jnu +6I1954195C 0000241822800?1509881296 aloalo 1402-compile +6I1954195C 0000241296800?1513241680 alophi 1403-alo phijnu +6I1954195C 0000241680800?6918831313 ldd osgn1 1404- +6I1954195C 0000241883800?6516121567 ralm 1405-r equals +6I1954195C 0000241567800?1608321989 slooone 1406-left paren +6I1954195C 0000241989800?2003400668 stlr ps3g 1407-yl or cl +6I1954195C 0000240954800?6515801231 yn raly cn1 1408-v equals y +6I1954195C 0000240826800?6917301100 zn ldd srn 1409-generate n +6I1954195C 0000241730800?6910681681 lddwy genn 1410- +6I1954195C 0000240751800?2409761780 chkarstdout 1411-alarm if +6I1954195C 0000241780800?6503581616 ralarith 1412-floating +6I1954195C 0000241616800?4508270976 nzealarmout 1413- +6I1954195C 0000241374800?2406911346 chknkstdfini 1414-alarm if k +6I1954195C 0000241346800?6007001708 raunu 1415-and nu +6I1954195C 0000241708800?1001461651 aupk 1416-non zero +6I1954195C 0000241651800?4408270691 nzualarmfini 1417- +6I1954195C 0000240658800?2406441547 chknnstdexit 1418-alarm if n +6I1954195C 0000241547800?3000041758 srt 0004 1419-is more +6I1954195C 0000241758800?1516661872 alotype3 1420- +6I1954195C 0000241872800?4413351476 nzusrn6 1421-than 2000 +6I1954195C 0000241476800?1680011933 slo 8001 1422- +6I1954195C 0000241933800?3000060644 srt 0006exit 1423-digits +6I1954195C 0000241376800?2406911396 chkopstdfini 1424- +6I1954195C 0000241396800?1513498002 alo 8002 1425- +6I1954195C 0000241349800?6799991808 67 9999 1426- +6I1954195C 0000241808800?3500021716 slt 0002 1427- +6I1954195C 0000241716800?1680021275 slo 8002 1428- +6I1954195C 0000241275800?3000021284 srt 0002 1429- +6I1954195C 0000241284800?1509680691 aloral fini 1430- +6I1954195C 0000240890800?2409761830 chktkstdout 1431- +6I1954195C 0000241830800?6501461701 ralk 1432-fetch tk +6I1954195C 0000241701800?1518588002 alo 8002 1433- +6I1954195C 0000241858800?6500420976 ralt0001out 1434- +6I1954195C 0000241173800?2409761880 commastdout 1435-increment +6I1954195C 0000241880800?6503561766 ralonet 1436-jnu +6I1954195C 0000241766800?6919221225 ldd setjn 1437-then +6I1954195C 0000241922800?1606301240 sloone 1438-compile +6I1954195C 0000241240800?1506360942 alostl 1439-stl phijnu +6I1954195C 0000240942800?1513241930 alophi 1440-minus one +6I1954195C 0000241930800?6913341313 ldd osgn1 1441- +6I1954195C 0000241334800?2105241384 stuopsgn 1442- +6I1954195C 0000241384800?6580030976 ral 8003out 1443- +6I1954195C 0000241721800?2409761434 dropkstdout 1444-decrement +6I1954195C 0000241434800?6501461751 ralk 1445-k +6I1954195C 0000241751800?1606301290 sloone 1446- +6I1954195C 0000241290800?2001460976 stlk out 1447- +6I1954195C 0000240893800?2406441597 dropustdexit 1448-decrmnt u +6I1954195C 0000241597800?6505151972 ralu 1449- +6I1954195C 0000241972800?1606301340 sloone 1450- +6I1954195C 0000241340800?2005150644 stlu exit 1451- +6I1954195C 0000241681800?2409761484 genn stdout 1452- +6I1954195C 0000241484800?6913900884 ldd stbta 1453- +6I1954195C 0000241390800?6914461150 ldd srac 1454- +6I1954195C 0000241446800?6913991313 ldd osgn1 1455- +6I1954195C 0000241399800?2105240976 stuopsgnout 1456- +6I1954195C 0000241432800?2406441647 getekstdexit 1457-get present +6I1954195C 0000241647800?6501461801 ralk 1458-ek value +6I1954195C 0000241801800?1519088002 alo 8002 1459- +6I1954195C 0000241908800?6503740644 rale0001exit 1460- +6I1954195C 0000240947800?2409761534 nglftstdout 1461- +6I1954195C 0000241534800?6500351440 rald0004 1462- +6I1954195C 0000241440800?2005291584 stll 1463- +6I1954195C 0000241584800?2104880992 stuv1 1464- +6I1954195C 0000240992800?6503661624 ralabval 1465- +6I1954195C 0000241624800?4516341684 nze nglna 1466- +6I1954195C 0000241634800?6505151674 ralu 1467- +6I1954195C 0000241674800?6917341376 ldd chkop 1468- +6I1954195C 0000241734800?1507681724 alootwo 1469- +6I1954195C 0000241724800?4517841834 nzenglnb 1470- +6I1954195C 0000241834800?6508321784 raloone nglnb 1471- +6I1954195C 0000241784800?2007881042 nglnbstltemp4 1472- +6I1954195C 0000241042800?6909760797 lddout uchge 1473- +6I1954195C 0000241684800?6914900884 nglnaldd stbta 1474- +6I1954195C 0000241490800?6503441449 ralrsl 1475- +6I1954195C 0000241449800?1503521859 alolow 1476- +6I1954195C 0000241859800?6918161313 ldd osgn1 1477- +6I1954195C 0000241816800?2105240976 stuopsgnout 1478- +6I1954195C 0000241274800?2409761884 nuincstdout 1479- +6I1954195C 0000241884800?6507001909 ralnu 1480-nu equals nu +6I1954195C 0000241909800?1080021617 aup 8002 1481-plus one +6I1954195C 0000241617800?1006301540 aupone 1482-and +6I1954195C 0000241540800?2107001460 stunu 1483-jnu equals +6I1954195C 0000241460800?1018661774 aupnu2 1484-jnuminusone +6I1954195C 0000241774800?1519348002 alonu1 8002 1485- +6I1954195C 0000241934800?6919778003 nu1 lddj0001 8003 1486- +6I1954195C 0000241866800?2419770976 nu2 stdj0001out 1487- +6I1954195C 0000241581800?2409761590 numinstdout 1488- +6I1954195C 0000241590800?6507001510 ralnu 1489-nu equals nu +6I1954195C 0000241510800?1606301640 sloone 1490-minus one +6I1954195C 0000241640800?2007000976 stlnu out 1491- +6I1954195C 0000241134800?2406441697 setekstdexit 1492-set ek +6I1954195C 0000241697800?6003581916 rauarith 1493-equal to +6I1954195C 0000241916800?1501461851 alok 1494-arthh +6I1954195C 0000241851800?1515608002 alo 8002 1495- +6I1954195C 0000241560800?2103740644 stue0001exit 1496- +6I1954195C 0000241250800?2406441747 setelstdexit 1497-set variable +6I1954195C 0000241747800?2019311690 stlldsr1 1498-type +6I1954195C 0000241690800?6503401496 ralr 1499-set l equal +6I1954195C 0000241496800?2005290644 stll exit 1500-to r +6I1954195C 0000241225800?2406441797 setjnstdexit 1501-jnu equals +6I1954195C 0000241797800?2005091966 stltemp1 1502-jnu plus +6I1954195C 0000241966800?6507001610 ralnu 1503- +6I1954195C 0000241610800?1516671824 alostjn1 1504-contents +6I1954195C 0000241824800?6917401546 lddstjn2 1505- +6I1954195C 0000241546800?2217408002 sdastjn2 8002 1506-of lower +6I1954195C 0000241667800?6519771790 stjn1ralj0001 1507- +6I1954195C 0000241790800?1505091740 alotemp1stjn2 1508- +6I1954195C 0000241740800?2019771840 stjn2stlj0001 1509- +6I1954195C 0000241840800?3500040644 slt 0004exit 1510- +6I1954195C 0000240884800?2406441847 stbtastdexit 1511- +6I1954195C 0000241847800?6505151874 ralu 1512- +6I1954195C 0000241874800?2015030644 stlbeta exit 1513- +6I1954195C 0000240911800?2406441897 stnonstdexit 1514- +6I1954195C 0000241897800?6918501035 ldd ps100 1515- +6I1954195C 0000241850800?1006340644 aupnononexit 1516- +6I1954195C 0000240836800?6905291890 strellddl 1517-set relation +6I1954195C 0000241890800?2406328003 stdrelat 8003 1518-type +6I1954195C 0000241223800?2406911596 tkop stdfini 1519-store opn +6I1954195C 0000241596800?6001461901 rauk 1520-in tk +6I1954195C 0000241901800?1016601717 auptkop1 1521-and +6I1954195C 0000241717800?6903408003 lddr 8003 1522-exit from +6I1954195C 0000241660800?2400420691 tkop1stdt0001fini 1523-fini +6I1954195C 0000240797800?2406911646 uchgestdfini 1524-u equals u +6I1954195C 0000241646800?6505151924 ralu 1525-minus one +6I1954195C 0000241924800?1606301695 sloone chge1 1526- +6I1954195C 0000240332800?2005291940 larm stll 1527-set error +6I1954195C 0000241940800?2003400827 stlr alarm 1528-identifctn +6I1954195C 0000240827800?6000001710 alarmrau 0000 1529-alarm +6I1954195C 0000241710800?3500011767 slt 0001 1530-subroutine +6I1954195C 0000241767800?1505291990 alol 1531-displays +6I1954195C 0000241990800?3500031499 slt 0003 1532-l r and +6I1954195C 0000241499800?1503401696 alor 1533-statement +6I1954195C 0000241696800?3500021760 slt 0002 1534-nr +6I1954195C 0000241760800?0112341234 hlt 1234ps 1535- +6I1954195C 0000240567800?6503831092 end rala0001 1536-end and fnlp +6I1954195C 0000241092800?3000041810 srt 0004 1537-punchabcons +6I1954195C 0000241810800?2019551860 stl 1955 1538-and +6I1954195C 0000241860800?6019511910 rau 1951 1539-reservation +6I1954195C 0000241910800?1003841142 aupa0002 1540-cards +6I1954195C 0000241142800?1003841192 aupa0002 1541- +6I1954195C 0000241192800?2103851242 stua0003 1542- +6I1954195C 0000241242800?1019521817 aup 1952 1543- +6I1954195C 0000241817800?1003841292 aupa0002 1544- +6I1954195C 0000241292800?2103861342 stua0004 1545- +6I1954195C 0000241342800?1019531867 aup 1953 1546- +6I1954195C 0000241867800?1003841392 aupa0002 1547- +6I1954195C 0000241392800?6917460911 ldd stnon 1548- +6I1954195C 0000241746800?2119801442 stuw0004 1549- +6I1954195C 0000241442800?6506341492 ralnonon 1550- +6I1954195C 0000241492800?2119811542 stuw0005 1551- +6I1954195C 0000241542800?2119821592 stuw0006 1552- +6I1954195C 0000241592800?2019791642 stlw0003 1553- +6I1954195C 0000241642800?6008831692 raunono 1554- +6I1954195C 0000241692800?3500041917 slt 0004 1555- +6I1954195C 0000241917800?2119781742 stuw0002 1556- +6I1954195C 0000241742800?6000361792 raud0005 1557- +6I1954195C 0000241792800?2119771842 stuw0001 1558- +6I1954195C 0000241842800?6917960638 ldd ps133 1559- +6I1954195C 0000241796800?6003831892 raua0001apch4 1560- +6I1954195C 0000241892800?3000041967 apch4srt 0004 1561- +6I1954195C 0000241967800?6919740911 ldd stnon 1562- +6I1954195C 0000241974800?1000361942 aupd0005 1563- +6I1954195C 0000241942800?2119771992 stuw0001 1564- +6I1954195C 0000241992800?6503831846 rala0001 1565- +6I1954195C 0000241846800?1515498002 alo 8002 1566- +6I1954195C 0000241549800?6503831896 rala0001 1567- +6I1954195C 0000241896800?2005091325 stltemp1 1568- +6I1954195C 0000241325800?4619461996 bmiapch1apch2 1569- +6I1954195C 0000241996800?1003541375 apch2aupcntrl 1570- +6I1954195C 0000241375800?2119861947 stuw0010apch3 1571- +6I1954195C 0000241946800?6000391996 apch1raud0008apch2 1572- +6I1954195C 0000241947800?6705091604 apch3ramtemp1ckldd 1573- +6I1954195C 0000241604800?6980031425 cklddldd 8003 1574- +6I1954195C 0000241425800?2205091475 sdatemp1 1575- +6I1954195C 0000241475800?1080031997 aup 8003 1576- +6I1954195C 0000241997800?2304900848 siatemp2 1577- +6I1954195C 0000240848800?3500021525 slt 0002 1578- +6I1954195C 0000241525800?6080030898 rau 8003 1579- +6I1954195C 0000240898800?6910521035 ldd ps100 1580- +6I1954195C 0000241052800?1008830948 aupnono 1581- +6I1954195C 0000240948800?3500041575 slt 0004 1582- +6I1954195C 0000241575800?2119780998 stuw0002 1583- +6I1954195C 0000240998800?6005091625 rautemp1 1584- +6I1954195C 0000241625800?3000041048 srt 0004 1585- +6I1954195C 0000241048800?6911020911 ldd stnon 1586- +6I1954195C 0000241102800?2119791098 stuw0003 1587- +6I1954195C 0000241098800?6004901148 rautemp2 1588- +6I1954195C 0000241148800?6911520911 ldd stnon 1589- +6I1954195C 0000241152800?2119801198 stuw0004 1590- +6I1954195C 0000241198800?2019811248 stlw0005 1591- +6I1954195C 0000241248800?6912020638 ldd ps133 1592- +6I1954195C 0000241202800?6003831298 raua0001 1593- +6I1954195C 0000241298800?1106301348 supone 1594- +6I1954195C 0000241348800?2103831398 stua0001 1595- +6I1954195C 0000241398800?4418921252 nzuapch4fnlpc 1596- +6I1954195C 0000241252800?2119771448 fnlpcstuw0001 1597- +6I1954195C 0000241448800?2119781498 stuw0002 1598- +6I1954195C 0000241498800?2101461599 stuk 1599- +6I1954195C 0000241599800?2107101675 stujay fnl1 1600- +6I1954195C 0000241675800?6007101725 fnl1 raujay fnl2 1601- +6I1954195C 0000241725800?1003561775 fnl2 auponet 1602- +6I1954195C 0000241775800?2103721825 stugamma 1603- +6I1954195C 0000241825800?6015481875 rautype4 1604- +6I1954195C 0000241875800?2119861598 stuw0010 1605- +6I1954195C 0000241598800?6513021925 ralfnl3 1606- +6I1954195C 0000241925800?1501468002 alok 8002 1607- +6I1954195C 0000241302800?6500321648 fnl3 rald0001 1608- +6I1954195C 0000241648800?2019791698 stlw0003 1609- +6I1954195C 0000241698800?2004901748 stltemp2 1610- +6I1954195C 0000241748800?6003721798 raugamma 1611- +6I1954195C 0000241798800?6913521035 ldd ps100 1612- +6I1954195C 0000241352800?1019751848 aupyou 1613- +6I1954195C 0000241848800?2119801898 stuw0004 1614- +6I1954195C 0000241898800?6914020638 ldd ps133 1615- +6I1954195C 0000241402800?6515261948 ralfnl4 1616- +6I1954195C 0000241948800?1501468002 alok 8002 1617- +6I1954195C 0000241526800?6519511576 fnl4 ral 1951 1618- +6I1954195C 0000241576800?2005091626 stltemp1 1619- +6I1954195C 0000241626800?1503721998 alogamma 1620- +6I1954195C 0000241998800?2007101676 stljay 1621- +6I1954195C 0000241676800?1603721649 slogamma 1622- +6I1954195C 0000241649800?4514521726 nzefnl5 1623- +6I1954195C 0000241726800?6580011699 ral 8001 1624- +6I1954195C 0000241699800?1603561776 sloonet 1625- +6I1954195C 0000241776800?2003721452 stlgammafnl5 1626- +6I1954195C 0000241900800?7119771749 fnl6 pchw0001 1627- +6I1954195C 0000241749800?6001461502 rauk 1628- +6I1954195C 0000241502800?1006301799 aupone 1629- +6I1954195C 0000241799800?2101461849 stuk 1630- +6I1954195C 0000241849800?1115521826 supfive 1631- +6I1954195C 0000241826800?4416759876 nzufnl1 9876 1632-finish +6I1954195C 0000241452800?6016661876 fnl5 rautype3 1633- +6I1954195C 0000241876800?2119861899 stuw0010 1634- +6I1954195C 0000241899800?6007101926 raujay 1635- +6I1954195C 0000241926800?6919490911 ldd stnon 1636- +6I1954195C 0000241949800?2119801950 stuw0004 1637- +6I1954195C 0000241950800?6003721602 raugamma 1638- +6I1954195C 0000241602800?1003561976 auponet 1639- +6I1954195C 0000241976800?6916520911 ldd stnon 1640- +6I1954195C 0000241652800?1004901702 auptemp2 1641- +6I1954195C 0000241702800?2119791900 stuw0003fnl6 1642- +6I1954195C 0000240356800?0000000001 onet 00 0000 0001 1643- +6I1954195C 0000241823800?0000000002 twot 00 0000 0002 1644- +6I1954195C 0000241091800?0000000004 fourt 00 0000 0004 1646- +6I1954195C 0000240922800?0000000005 fivet 00 0000 0005 1647- +6I1954195C 0000240330800?0000000006 sixt 00 0000 0006 1648- +6I1954195C 0000241160800?0000000007 sevnt 00 0000 0007 1649- +6I1954195C 0000241559800?0000000008 eigtt 00 0000 0008 1650- +6I1954195C 0000241862800?0000000009 ninet 00 0000 0009 1651- +6I1954195C 0000241845800?0000000010 tent 00 0000 0010 1652- +6I1954195C 0000241494800?0000000012 twlvt 00 0000 0012 1653- +6I1954195C 0000241659800?0000000014 frtnt 00 0000 0014 1654- +6I1954195C 0000241224800?0000000016 sxtnt 00 0000 0016 1655- +6I1954195C 0000240696800?0000000017 svntt 00 0000 0017 1656- +6I1954195C 0000240592800?0000000019 nnten 00 0000 0019 1657- +6I1954195C 0000241000800?0000000026 twsix 00 0000 0026 1658- +6I1954195C 0000241465800?0000000063 sixtr 00 0000 0063 1659- +6I1954195C 0000240360800?0000000090 ninty 00 0000 0090 1660- +6I1954195C 0000240630800?0000010000 one 00 0001 0000 1661- +6I1954195C 0000240148800?0000020000 two 00 0002 0000 1662- +6I1954195C 0000241131800?0000030000 three 00 0003 0000 1663- +6I1954195C 0000241200800?0000040000 four 00 0004 0000 1664- +6I1954195C 0000241552800?0000050000 five 00 0005 0000 1665- +6I1954195C 0000240520800?0000060000 six 00 0006 0000 1666- +6I1954195C 0000241589800?0000070000 seven 00 0007 0000 1667- +6I1954195C 0000240357800?0000510000 ffty1 00 0051 0000 1668- +6I1954195C 0000240832800?0100000000 oone 01 0000 0000 1669- +6I1954195C 0000240768800?0200000000 otwo 02 0000 0000 1670- +6I1954195C 0000240888800?0300000000 otrey 03 0000 0000 1671- +6I1954195C 0000240528800?0500000000 ofive 05 0000 0000 1672- +6I1954195C 0000241431800?4100000000 frone 41 0000 0000 1673- +6I1954195C 0000241054800?5000000000 fiveo 50 0000 0000 1674- +6I1954195C 0000241568800?7200000000 svty2 72 0000 0000 1675- +6I1954195C 0000240874800?9000000000 nineo 90 0000 0000 1676- +6I1954195C 0000240988800?1500000000 alo 15 0000 0000 1677- +6I1954195C 0000241832800?1900000000 mpy 19 0000 0000 1678- +6I1954195C 0000240636800?2000000000 stl 20 0000 0000 1679- +6I1954195C 0000241132800?4500000000 nze 45 0000 0000 1680- +6I1954195C 0000241339800?4600000000 bmi 46 0000 0000 1681- +6I1954195C 0000241116800?6000000000 rau 60 0000 0000 1682- +6I1954195C 0000241609800?6400000000 dvr 64 0000 0000 1683- +6I1954195C 0000240968800?6500000000 ral 65 0000 0000 1684- +6I1954195C 0000240344800?6600000000 rsl 66 0000 0000 1685- +6I1954195C 0000240894800?6700000000 ram 67 0000 0000 1686- +6I1954195C 0000240776800?0050000000 abcon 00 5000 0000 1687- +6I1954195C 0000241804800?0000010000 acc 00 0001 0000 1688- +6I1954195C 0000240737800?6163630000 accum acc 1689- +6I1954195C 0000241277800?0030000000 c 00 3000 0000 1690- +6I1954195C 0000240354800?0000008000 cntrl 00 0000 8000 1691- +6I1954195C 0000240690800?0000009000 ext 00 0000 9000 1692- +6I1954195C 0000240870800?0000000501 fixnr 00 0000 0501 1693- +6I1954195C 0000241016800?0040004000 go 00 4000 4000 1694- +6I1954195C 0000241415800?6900018002 ldac ldd 0001 8002 1695- +6I1954195C 0000241477800?0010000000 i 00 1000 0000 1696- +6I1954195C 0000240918800?7361616161 locus 73 6161 6161 1697- +6I1954195C 0000240352800?0080020000 low 00 8002 0000 1698- +6I1954195C 0000240980800?0000008002 low1 00 0000 8002 1699- +6I1954195C 0000241612800?7400000000 m m 1700- +6I1954195C 0000240029800?0000000025 max 00 0000 0025 1701- +6I1954195C 0000240542800?0000000500 maxe 00 0000 0500 1702- +6I1954195C 0000240671800?0001430000 maxu 00 0143 0000 1703- +6I1954195C 0000240883800?0000009090 nono 00 0000 9090 1704- +6I1954195C 0000240634800?0090909090 nonon 00 9090 9090 1705- +6I1954195C 0000241317800?7700000000 p p 1706- +6I1954195C 0000241324800?0060000000 phi 00 6000 0000 1707- +6I1954195C 0000240499800?3510030000 slti3 35 1003 0000 1708- +6I1954195C 0000241004800?2000010000 stla1stl 0001 0000 1709- +6I1954195C 0000240030800?0600510000 store 06 0051 0000 1710- +6I1954195C 0000240853800?7361616161 temp9 73 6161 6161 1711- +6I1954195C 0000241666800?8000008000 type3 80 0000 8000 1712- +6I1954195C 0000241548800?8800008000 type4 88 0000 8000 1713- +6I1954195C 0000241354800?0070000000 w 00 7000 0000 1714- +6I1954195C 0000241059800?6966000000 wdif 69 6600 0000 1715- +6I1954195C 0000241580800?0020000000 y 00 2000 0000 1716- +6I1954195C 0000241975800?8490909090 you u0000 1717- +6I1954195C 0000241407800?8900000000 z z 1718- +6I1954195C 0000240041800?0000000000 psi 00 0000 0000 - +6I1954195C 0000240373800?0000000000 tally 00 0000 0000 - +6I1954195C 0000240372800?0000000000 gamma 00 0000 0000 - +6I1954195C 0000240529800?0000000000 l 00 0000 0000 - +6I1954195C 0000240515800?0000000000 u 00 0000 0000 - +6I1954195C 0000240531800?0000000000 quota 00 0000 0000 - +6I1954195C 0000240488800?0000000000 v1 00 0000 0000 - +6I1954195C 0000240146800?0000000000 k 00 0000 0000 - +6I1954195C 0000240700800?0000000000 nu 00 0000 0000 - +6I1954195C 0000240484800?0000000000 n 00 0000 0000 - +6I1954195C 0000240342800?0000000000 nbar 00 0000 0000 - +6I1954195C 0000240750800?0000000000 mu 00 0000 0000 - +6I1954195C 0000240358800?0000000000 arith 00 0000 0000 - +6I1954195C 0000240366800?0000000000 abval 00 0000 0000 - +6I1954195C 0000240524800?0000000000 opsgn 00 0000 0000 - +6I1954195C 0000240632800?0000000000 relat 00 0000 0000 - +6I1954195C 0000240340800?0000000000 r 00 0000 0000 - +6I1954195C 0000240538800?0000000000 intgr 00 0000 0000 - +6I1954195C 0000240509800?0000000000 temp1 00 0000 0000 - +6I1954195C 0000240516800?0000000000 ubar 00 0000 0000 - +6I1954195C 0000240490800?0000000000 temp2 00 0000 0000 - +6I1954195C 0000240709800?0000000000 temp3 00 0000 0000 - +6I1954195C 0000240788800?0000000000 temp4 00 0000 0000 - +6I1954195C 0000241299800?0000000000 temp5 00 0000 0000 - +6I1954195C 0000241326800?0000000000 temp6 00 0000 0000 - +6I1954195C 0000240710800?0000000000 jay 00 0000 0000 - +6I1954195C 0000241503800?0000000000 beta 00 0000 0000 - +6I1954195C 0000241047800?0000000000 flop1 00 0000 0000 - +6I1954195C 0000241831800?0000000000 chi 00 0000 0000 - +6I1954195C 0000241188800?0000000000 star 00 0000 0000 - +6I1954195C 0000240746800?0000000000 el 00 0000 0000 - +6I1954195C 0000241334800?2105241902 stuopsgn 1442- +6I1954195C 0000241902800?2404881384 stdv1 1384 1442- +6I1954195C 0000241065800?1103831137 supa0001 341-out if jay +6I1954195C 0000241137800?2108450887 stunewab 0887 a341- +6I1954195C 0000240987800?6906900893 bs ldd dropu 603-dcrmnt u +6I1954195C 0000240690800?6508450298 ralnewab a603- +6I1954195C 0000240298800?4507860640 nzebsa 0640 b603- +6I1954195C 0000241485800?2003830786 stla0001bsa 606- +6I1954195C 0000240786800?6004841039 bsa raun bn1 607- +6I1954195C 0000241413800?6913771038 ldd 1377ldsr 650-compile +6I1954195C 0000240845800?0000000000 newab 00 0000 0000 - +6I1954195C 0000240940800?6918021094 lddml1a tknz1 793-tknz1and ml1 +6I1954195C 0000241178800?6918021194 my1 lddml1a tknz2 799- +6I1954195C 0000241802800?1680021852 ml1a slo 8002 a793- +6I1954195C 0000241852800?2003661291 stlabvalml1 b793- +6I1954195C 0000241139800?6919711681 ldd 1971genn 804-ral ajay diff --git a/I650/sw/it_compiler_listing.txt b/I650/sw/it_compiler_listing.txt new file mode 100644 index 00000000..daa23bbc --- /dev/null +++ b/I650/sw/it_compiler_listing.txt @@ -0,0 +1,1789 @@ + 1 5 CARNEGIE TECH COMPILER IT 0000 00 0000 0000 + 2 5 MARCH 15 1957 0000 00 0000 0000 + 3 1 0000 0024 0000 00 0000 0000 + 4 4 D U0031 0000 00 0000 0000 + 5 3 D0032 0040 0000 00 0000 0000 + 6 3 T0042 0050 0000 00 0000 0000 + 7 1 0051 0143 0000 00 0000 0000 + 8 1 0150 0197 0000 00 0000 0000 + 9 1 0200 0247 0000 00 0000 0000 + 10 1 0250 0297 0000 00 0000 0000 + 11 1 0300 0329 0000 00 0000 0000 + 12 3 O0600 0623 0000 00 0000 0000 + 13 3 E0374 0382 0000 00 0000 0000 + 14 3 A0383 0482 0000 00 0000 0000 + 15 3 M0500 0503 0000 00 0000 0000 + 16 3 Q0550 0563 0000 00 0000 0000 + 17 3 N0568 0591 0000 00 0000 0000 + 18 1 1951 1960 RESRVE READ 0000 00 0000 0000 + 19 3 J1977 1986 J BAND 0000 00 0000 0000 + 20 3 W1977 1986 W BAND 0000 00 0000 0000 + 21 4 S 1957 0000 00 0000 0000 + 22 4 PC 1958 0000 00 0000 0000 + 23 4 FFBIT 1959 0000 00 0000 0000 + 24 4 TAU 1960 0000 00 0000 0000 + 25 4 PS U1234 0000 00 0000 0000 + 26 4 READA U1111 0000 00 0000 0000 + 27 4 START U1999 0000 00 0000 0000 + 28 START RD1 0051 READ 1999 70 0051 0351 + 29 RAU CNTRL 0351 60 0354 0359 + 30 STU W0010 HEADER CARD 0359 21 1986 0339 + 31 RAL S 0339 65 1957 0361 + 32 LDD SR3 0361 69 0364 0367 + 33 LDD SR3ED 0364 69 0517 0370 + 34 RAU SIX ABSOLUTE 0517 60 0520 0025 + 35 STU A0001 PS0 VALUE COUNT 0025 21 0383 0336 + 36 PS0 STL PSI CLEAR 0336 20 0041 0144 + 37 LDD TAU1 0144 69 0147 0350 + 38 STD TAU PS 0350 24 1960 1234 + 39 PS RAU FFBIT CHECK LAST 1234 60 1959 0363 + 40 NZU END READA STATEMENT 0363 44 0567 1111 + 41 READA RD1 0051 FIRST READ 1111 70 0051 0651 + 42 RAL 0057 STORE STMNT 0651 65 0057 0511 + 43 STL 0000 NUMBER 0511 20 0000 0353 + 44 RAL ONET TALLY AND 0353 65 0356 0661 + 45 STL FLAG FLAG SET TO 0661 20 0365 0368 + 46 STL TALLY PS1A ONE 0368 20 0373 0026 + 47 PS1 RD1 0051 PS1A NEXT READ 0650 70 0051 0026 + 48 PS1A RAU MAX ALARM IF 0026 60 0029 0333 + 49 SUP TALLY TALLY IS 0333 11 0373 0027 + 50 NZU LARM MAXIMUM 0027 44 0331 0332 + 51 RAL TALLY KK XXXX YYYY 0331 65 0373 0527 + 52 ALO STORE IS 0527 15 0030 0335 + 53 LDD PS2 SR1 0600510000 0335 69 0338 0341 + 54 PS2 RAL TALLY TALLY PLUS 0338 65 0373 0627 + 55 ALO SIXT SIX IS TALLY 0627 15 0330 0485 + 56 STL TALLY GAMMA EQUALS 0485 20 0373 0526 + 57 RAU 0056 WORD6 TIMES 0526 60 0056 0711 + 58 SRT 0002 PS2B 01 0711 30 0002 0667 + 59 PS2B STU GAMMA L EQUALS END 0667 21 0372 0525 + 60 STL L SYMBOL 0525 20 0529 0532 + 61 RAU 8002 0532 60 8002 0491 + 62 SUP RSL RECYCLE IF L 0491 11 0344 0149 + 63 NZU PS1 IS NOT F 0149 44 0650 0504 + 64 RAL FFTY1 INITIALIZE U 0504 65 0357 0761 + 65 STL U IF L IS F 0761 20 0515 0518 + 66 RAL TALLY TALLY MINUS 0518 65 0373 0677 + 67 SLO ONET ONE 0677 16 0356 0811 + 68 SLT 0004 TALLY IN DTA 0811 35 0004 0371 + 69 STL TALLY QUOTA EQUALS 0371 20 0373 0626 + 70 STL QUOTA PS2A TALLY 0626 20 0531 0334 + 71 PS2A STU V1 0334 21 0488 0541 + 72 STU K PRESET ALL 0541 21 0146 0199 + 73 STU T0001 PERTINENT 0199 21 0042 0145 + 74 STU NU COUNTERS 0145 21 0700 0653 + 75 STU J0001 TO ZERO 0653 21 1977 0530 + 76 STU N 0530 21 0484 0337 + 77 STU NBAR 0337 21 0342 0345 + 78 STU MU 0345 21 0750 0703 + 79 STU ARITH 0703 21 0358 0861 + 80 STU ABVAL 0861 21 0366 0369 + 81 STU OPSGN 0369 21 0524 0727 + 82 STU RELAT 0727 21 0632 0535 + 83 STU R PS3 R EQUALS 0 0535 21 0340 0343 + 84 PS3 RAU GAMMA 0343 60 0372 0777 + 85 NZU PS5 OUT IF GAMMA 0777 44 0631 0682 + 86 SRT 0002 IS ZERO 0631 30 0002 0487 + 87 STU GAMMA FETCH NEXT 0487 21 0372 0625 + 88 RAU 8002 SYMBOL S 0625 60 8002 0483 + 89 NZU PS3 RECYCLE IF S 0483 44 0537 0343 + 90 ALO L ZERO IF NOT 0537 15 0529 0533 + 91 STL R PS3D R EQUALS L 0533 20 0340 0493 + 92 PS3D STU L PS3A L EQUAL DS 0493 21 0529 0732 + 93 PS3A RAL 8003 IF L EQUALS 0732 65 8003 0489 + 94 SRT 0008 AN INTEGER 0489 30 0008 0507 + 95 SLO NINTY SET INTGR 0507 16 0360 0565 + 96 BMI PS3G PS3C TO L AND L 0565 46 0668 0519 + 97 PS3G RAU L PS3B EQUAL TO 99 0668 60 0529 0633 + 98 PS3C RAU L THEN RETURN 0519 60 0529 0683 + 99 STU INTGR TO PS3B 0683 21 0538 0641 + 100 RAU NINTY 0641 60 0360 0665 + 101 SRT 0001 0665 30 0001 0521 + 102 AUP NINTY PS3BA 0521 10 0360 0715 + 103 PS3B SRT 0008 GENERATE 0633 30 0008 0701 + 104 ALO R ENTRY 0701 15 0340 0495 + 105 SRT 0004 TO SYMBOL 0495 30 0004 0355 + 106 STL TEMP1 PAIR TABLE 0355 20 0509 0362 + 107 RAL PS4 FETCH SWITCH 0362 65 0765 0669 + 108 LDD TEMP1 FROM TABLE 0669 69 0509 0512 + 109 TLU 0150 8002 IF SWITCH IS 0512 84 0150 8002 + 110 PS4 RAU 0000 ADMISSABLE 0765 60 0000 0505 + 111 SUP TEMP1 GO TO 0505 11 0509 0513 + 112 SRT 0004 GENERATORS 0513 30 0004 0523 + 113 NZU ALARM ALARM IF NOT 0523 44 0827 0028 + 114 SLT 0004 8003 0028 35 0004 8003 + 115 PS5 RAU TALLY DECREMENT 0682 60 0373 0877 + 116 SUP ONE PS5A TALLY IF 0877 11 0630 0635 + 117 PS5A STU TALLY GAMMA ZERO 0635 21 0373 0676 + 118 NZU PS10 OUT IF TALLY 0676 44 0629 0680 + 119 AUP PS6 8003 IS ZERO IF 0629 10 0782 8003 + 120 PS6 RAU 0000 NOT GAMMA IS 0782 60 0000 0655 + 121 STU GAMMA PS3 NEXT WORD 0655 21 0372 0343 + 122 PS7 STD PS8 STORE 0800 24 0753 0506 + 123 BMI PS7A GENERATED 0506 46 0659 0510 + 124 SLO U PS7B INDTRUCTION 0659 16 0515 0719 + 125 PS7A ALO U PS7B AND 0510 15 0515 0719 + 126 PS7B LDD PS7C INCREMENT U 0719 69 0522 0675 + 127 SDA PS7C 8001 BY ONE 0675 22 0522 8001 + 128 PS7C STU 0000 AND RETURN 0522 21 0000 0803 + 129 RAL U TO GENERATOR 0803 65 0515 0769 + 130 ALO ONE IF STORAGE 0769 15 0630 0685 + 131 STL U NOT EXCEEDED 0685 20 0515 0718 + 132 SLO MAXU OTHERWISE 0718 16 0671 0725 + 133 BMI PS8 ALARM 0725 46 0753 0679 + 134 RAL OONE LARM 0679 65 0832 0332 + 135 PS8 HLT 0000 PS8 0753 01 0000 0753 + 136 PS10 RAL L IF TALLY IS 0680 65 0529 0733 + 137 STL R ZERO SET LR 0733 20 0340 0543 + 138 RAU NINTY PS3BA EQUAL TO 90L 0543 60 0360 0715 + 139 PS3BA SLT 0008 AND ENTER 0715 35 0008 0783 + 140 STU L PS3B GEN TABLE 0783 21 0529 0633 + 141 PS12 RAU TEMP9 FROM END OF 0850 60 0853 0657 + 142 STU W0004 STATEMENT 0657 21 1980 0833 + 143 STL W0005 GENERATORS 0833 20 1981 0534 + 144 RAU 0000 0534 60 0000 0705 + 145 LDD STNON FORM ENTRY 0705 69 0508 0911 + 146 AUP D0004 FOR 0508 10 0035 0539 + 147 STU W0001 STATEMENT 0539 21 1977 0730 + 148 RAL NONO DICTIONARY 0730 65 0883 0637 + 149 SLT 0004 0637 35 0004 0347 + 150 STL W0002 0347 20 1978 0681 + 151 RAU NONON 0681 60 0634 0639 + 152 STL W0006 0639 20 1982 0735 + 153 STU W0003 0735 21 1979 0882 + 154 LDD PS133 0882 69 0785 0638 + 155 RAU TEMP9 0785 60 0853 0707 + 156 STU W0001 0707 21 1977 0780 + 157 RAL FFTY1 UBAR EQUALS 0780 65 0357 0961 + 158 STL UBAR FIFTYONE 0961 20 0516 0819 + 159 SLO PC ALARM IF 0819 16 1958 0663 + 160 SLO U STORAGE 0663 16 0515 0869 + 161 SLO A0001 EXCEEDED 0869 16 0383 0687 + 162 ALO 1956 BUT 0687 15 1956 1011 + 163 BMI PS13C WITH 1011 46 0815 0514 + 164 RAU O0002 OPTION OF 0815 60 0601 0755 + 165 SRT 0006 FINAL 0755 30 0006 0919 + 166 STL W0002 PRINTOUT 0919 20 1978 0731 + 167 STL FFBIT 0731 20 1959 0662 + 168 LDD PS133 0662 69 0865 0638 + 169 RAL OTWO LARM 0865 65 0768 0332 + 170 PS13C RAL TALLY 0514 65 0373 0927 + 171 SLO QUOTA 0927 16 0531 0835 + 172 NZE PS13A STORE 0835 45 0688 0689 + 173 ALO 8001 ORIGINAL 0688 15 8001 0545 + 174 ALO TWO STATEMENT 0545 15 0148 0903 + 175 STL TALLY AS 0903 20 0373 0726 + 176 ALO PS13B COMMENTS 0726 15 0729 0933 + 177 LDD PS14 SR1 0933 69 0486 0341 + 178 PS13A STU W0005 0689 21 1981 0684 + 179 STD W0006 PS14 0684 24 1982 0486 + 180 PS13B 01 9999 W0005 0729 01 9999 1981 + 181 PS133 STD FINI 0638 24 0691 0494 + 182 RAL PC INCREMENT 0494 65 1958 0713 + 183 ALO ONE PROGRAM 0713 15 0630 0935 + 184 STL PC COUNTER 0935 20 1958 1061 + 185 STL W0009 1061 20 1985 0738 + 186 PCH W0001 AND 0738 71 1977 0977 + 187 STU W0001 FINI PUNCH 0977 21 1977 0691 + 188 PS14 RAU UBAR FETCH WORD 0486 60 0516 0721 + 189 AUP PS14A 8003 IN UBAR 0721 10 0624 8003 + 190 PS14A RAL 0000 0624 65 0000 0805 + 191 STL TEMP3 0805 20 0709 0712 + 192 BMI PS16 IF WORD IS 0712 46 0915 0566 + 193 RAL UBAR NEGATIVE 0915 65 0516 0771 + 194 SLO FFTY1 PS15 ASSIGN IT 0771 16 0357 1161 + 195 PS15 SRT 0004 A SYMBOLIC 1161 30 0004 0821 + 196 LDD PS15A SR3 LOCATION 0821 69 0674 0367 + 197 PS15A AUP TEMP9 0674 10 0853 0757 + 198 STU W0001 0757 21 1977 0830 + 199 RAM TEMP3 PS16 0830 67 0709 0566 + 200 PS16 SLT 0002 0566 35 0002 0673 + 201 STL TEMP3 EXTRACT 0673 20 0709 0762 + 202 RAU 8003 OPERATION 0762 60 8003 0969 + 203 SLT 0006 FROM WORD 0969 35 0006 0983 + 204 STU TEMP4 0983 21 0788 0741 + 205 ALO PS18 FETCH OP 0741 15 0544 0249 + 206 STU TEMP1 MNEMONIC 0249 21 0509 0812 + 207 TLU O0001 8002 FROM TABLE 0812 84 0600 8002 + 208 PS18 RAU 0000 AND CHECK 0544 60 0000 0855 + 209 SUP TEMP4 FOR ADMISS 0855 11 0788 0593 + 210 SRT 0006 STORE OP IF 0593 30 0006 0807 + 211 NZU ALARM ADMISSABLE 0807 44 0827 0862 + 212 STL W0002 PS27 0862 20 1978 0781 + 213 PS27 RAL TEMP3 EXTRACT 0781 65 0709 0763 + 214 SLT 0004 DATA ADDRESS 0763 35 0004 0723 + 215 STL TEMP3 FROM WORD 0723 20 0709 0912 + 216 RAU 8003 OUT IF D IS 0912 60 8003 1019 + 217 NZU PS19 NEXT LOC 1019 44 0773 0724 + 218 SRT 0001 OUT IF D IS 0773 30 0001 0779 + 219 NZU PS18A NOT ACCUM 0779 44 1033 0734 + 220 RAU ACCUM PS19 0734 60 0737 0724 + 221 PS18A SRT 0002 OUT IF D NOT 1033 30 0002 0739 + 222 NZU PS20 ADDRSS WITHN 0739 44 0643 0594 + 223 SRT 0003 STATEMENT 0594 30 0003 0953 + 224 SLO FFTY1 GENERATE 0953 16 0357 1211 + 225 SRT 0004 MNEMONIC 1211 30 0004 0871 + 226 LDD SR3 IF D IS IN 0871 69 0774 0367 + 227 AUP TEMP9 PS19 STATEMENT 0774 10 0853 0724 + 228 PS20 STL TEMP1 GENERATE 0643 20 0509 0962 + 229 RAU 8003 MNEMONIC IF 0962 60 8003 1069 + 230 SLT 0004 D IS NEITHR 1069 35 0004 0829 + 231 AUP PS23 8003 NEXT NOR IN 0829 10 0932 8003 + 232 PS23 RAU D STATEMENT 0932 60 0031 0985 + 233 STU TEMP2 0985 21 0490 0693 + 234 SUP D0009 OUT IF D IS 0693 11 0040 0595 + 235 NZU PS23A NOT EXTNSN 0595 44 0299 0900 + 236 RAL TEMP1 IF EXTENSION 0900 65 0509 0813 + 237 SRT 0007 GENERATE 0813 30 0007 0879 + 238 LDD SR3 MNEMONIC 0879 69 0982 0367 + 239 AUP D0009 PS19 0982 10 0040 0724 + 240 PS23A RAU TEMP1 0299 60 0509 0863 + 241 SRT 0007 GEN NUMERIC 0863 30 0007 0929 + 242 LDD PS100 TAG IF DATA 0929 69 1032 1035 + 243 NZE PS23B IS NOT 1032 45 0536 0787 + 244 AUP NONON PS23B EXTENSION 0536 10 0634 0787 + 245 PS23B AUP TEMP2 PS19 0787 10 0490 0724 + 246 PS19 STU W0004 0724 21 1980 1083 + 247 RSU FLAG PS25 NEGATIVE 1083 61 0365 1119 + 248 FLAG 10 0000 0000 FLAG IF DATA 0365 10 0000 0000 + 249 PS25 STU FLAG POSITIVE 1119 21 0365 0818 + 250 BMI PS26 FLAG IF INST 0818 46 0921 0672 + 251 RAU W0004 RECYCLE 0921 60 1980 1085 + 252 STU W0003 PS27 IF D IF NOT 1085 21 1979 0781 + 253 PS26 RAU UBAR PUNCH AND 0672 60 0516 0971 + 254 AUP ONE RECYCLE TO 0971 10 0630 1135 + 255 STU UBAR PS13C IF 1135 21 0516 1169 + 256 SUP U UDAR NOT 1169 11 0515 1219 + 257 NZU PS28 EQUAL TO 1219 44 0823 0824 + 258 LDD PS13C PS133 U 0823 69 0514 0638 + 259 PS28 RAL S S EQUALS S 0824 65 1957 1261 + 260 ALO ONET PLUS ONE 1261 15 0356 1311 + 261 STL S AND FORM 1311 20 1957 0660 + 262 LDD SR3 NEXT LOCATN 0660 69 0913 0367 + 263 LDD SR3ED 0913 69 0666 0370 + 264 RAU W0003 0666 60 1979 1133 + 265 NZU PS30 PS29 1133 44 0837 0838 + 266 PS30 RAU W0004 0837 60 1980 1185 + 267 NZU PS32 PS31 1185 44 0789 0540 + 268 PS32 LDD TAU PS133 0789 69 1960 0638 + 269 PS29 RAU TEMP9 0838 60 0853 0857 + 270 STU W0003 PS30 0857 21 1979 0837 + 271 PS31 RAU TEMP9 0540 60 0853 0907 + 272 STU W0004 PS32 0907 21 1980 0789 + 273 TAU NOP 0000 PS 1960 00 0000 1234 + 274 TAU1 NOP 0000 PS 0147 00 0000 1234 + 275 SR1 STD EXIT SR1E 0341 24 0644 0497 + 276 SR1A SLO INCR SR1E 0950 16 1003 0497 + 277 SR1E SLT 0002 0497 35 0002 1053 + 278 NZU EXIT 1053 44 0957 0644 + 279 SLT 0002 SR1 BLOCKS 0957 35 0002 0963 + 280 LDD SR1D KK CONSEC 0963 69 0716 1269 + 281 SDA SR1D LOCATIONS 1269 22 0716 1319 + 282 SRT 0004 FROM XXXX TO 1319 30 0004 0979 + 283 LDD SR1L YYYY 0979 69 1082 1235 + 284 SDA SR1L 8001 1235 22 1082 8001 + 285 SR1D STD 0000 SR1A 0716 24 0000 0950 + 286 SR1L LDD 0000 SR1D 1082 69 0000 0716 + 287 INCR 00 9998 9999 1003 00 9998 9999 + 288 SR3 STD EXIT SR3 CONVERTS 0367 24 0644 0547 + 289 DIV TWSIX THREE DIGIT 0547 14 1000 1050 + 290 STL TEMP1 NUMBERS INTO 1050 20 0509 1012 + 291 LDD SR3B SR3A TWO LETTER 1012 69 0965 0868 + 292 SR3A STD TEMP2 MNEMONICS 0868 24 0490 0743 + 293 AUP ONET 0743 10 0356 1361 + 294 SRT 0001 1361 30 0001 0717 + 295 NZU SR3A1 0717 44 1021 0722 + 296 SLO NINEO 1021 16 0874 1029 + 297 NZU SR3A2 1029 44 1183 0784 + 298 ALO STL SR3A2 1183 15 0636 0784 + 299 SR3A1 SLT 0001 0722 35 0001 1079 + 300 SUP 8001 TEMP2 1079 11 8001 0490 + 301 SR3A2 ALO NINEO 0784 15 0874 1129 + 302 SLT 0001 TEMP2 1129 35 0001 0490 + 303 SR3B SRT 0002 0965 30 0002 1071 + 304 AUP TEMP1 1071 10 0509 1013 + 305 LDD SR3C SR3A 1013 69 0766 0868 + 306 SR3C SLT 0002 EXIT 0766 35 0002 0644 + 307 SR3ED STD EXIT GENERATE 0370 24 0644 0597 + 308 RAU 8003 SYMBOLIC 0597 60 8003 0905 + 309 SLT 0004 LOCATION 0905 35 0004 1015 + 310 AUP LOCUS FOR NEXT 1015 10 0918 0873 + 311 STU TEMP9 EXIT STATEMENT 0873 21 0853 0644 + 312 SRN STD EXIT SRN FORMS 1100 24 0644 0647 + 313 RAL ARITH NUMBERS 0647 65 0358 1063 + 314 NZE SRN5 OUT IF FLOAT 1063 45 0816 0767 + 315 RAL SRN2 ING POINT 0767 65 0670 0775 + 316 SLO MU FIX ASINTEG 0775 16 0750 0955 + 317 AUP N 8002 ER IF FIXED 0955 10 0484 8002 + 318 SRN2 SRT 0010 POINT 0670 30 0010 1027 + 319 RAU 8003 SRN4 1027 60 8003 1285 + 320 SRN5 RAL MU FLOATING PT 0816 65 0750 1005 + 321 ALO FFTY1 EXPONENT IS 1005 15 0357 1411 + 322 SRT 0004 MU PLUS 1411 30 0004 1121 + 323 ALO NBAR FORTY NINE 1121 15 0342 0697 + 324 STL TEMP1 PLUS NBAR 0697 20 0509 1062 + 325 SLT 0008 1062 35 0008 0831 + 326 NZU SRN6 MNTISA ALARM 0831 44 1335 0686 + 327 RAL N 0686 65 0484 0839 + 328 SRT 0002 AND MANTISSA 0839 30 0002 0645 + 329 RAU 8002 IS 0645 60 8002 1103 + 330 NZU SRN4 1103 44 1007 1285 + 331 SCT 0000 N TO 8 SIG 1007 36 0000 1179 + 332 AUP TEMP1 NIFICANT FIG 1179 10 0509 1113 + 333 SUP 8002 URES 1113 11 8002 1171 + 334 RAU 8003 SRN4 1171 60 8003 1285 + 335 SRN6 RAL OTREY LARM ALARM 1335 65 0888 0332 + 336 SRN4 STU N EXIT 1285 21 0484 0644 + 337 SRAC STD EXIT ABSOLUTE 1150 24 0644 0747 + 338 RAU FOUR CONSTANT 0747 60 1200 1055 + 339 STU JAY SRACR ROUTINE 1055 21 0710 1163 + 340 SRACR RAU JAY 1163 60 0710 1065 + 341 SUP A0001 OUT IF JAY 1065 11 0383 0887 + 342 NZU SRAC3 EQUALS ABCNT 0887 44 0791 0492 + 343 RAL JAY 0791 65 0710 1115 + 344 ALO ONE INCRMNT JAY 1115 15 0630 1385 + 345 STL JAY 1385 20 0710 1213 + 346 ALO SRAC1 8002 FETCH JAYTH 1213 15 0866 8002 + 347 SRAC1 RAL A0001 SRAC2 CONSTANT 0866 65 0383 0937 + 348 SRAC2 SLO N RECYCLE IF N 0937 16 0484 0889 + 349 NZE SRACR SRAC5 EQUALS JTH 0889 45 1163 0793 + 350 SRAC5 RAL JAY CONSTANT 0793 65 0710 1165 + 351 ALO RAL 1165 15 0968 0923 + 352 ALO ABCON 0923 15 0776 0881 + 353 RAL 8002 EXIT 0881 65 8002 0644 + 354 SRAC3 RAU JAY 0492 60 0710 1215 + 355 AUP ONE 1215 10 0630 1435 + 356 STU A0001 N STORED AS 1435 21 0383 0736 + 357 STU JAY 0736 21 0710 1263 + 358 SUP ABCNT NEW ABCON IF 1263 11 0916 1221 + 359 BMI SRAC7 ABCNT NOT 1221 46 0924 0825 + 360 AUP 8001 EXCEEDED 0924 10 8001 0931 + 361 AUP SRAC6 NEW AB CONST 0931 10 0834 0939 + 362 LDD N 8003 0939 69 0484 8003 + 363 SRAC7 RAL OFIVE LARM ALARM 0825 65 0528 0332 + 364 ABCNT 00 0099 0000 RAL A1 PLUS 0916 00 0099 0000 + 365 SRAC6 STD A0001 SRAC5 JAY IN LOWER 0834 24 0383 0793 + 366 PS100 STD FINI INTERLACE 1035 24 0691 0694 + 367 SRT 0003 0694 30 0003 1153 + 368 SLO 8002 FOUR 1153 16 8002 1461 + 369 SLT 0001 1461 35 0001 0817 + 370 ALO 8001 DIGITS 0817 15 8001 0875 + 371 SLT 0001 0875 35 0001 0981 + 372 SLO 8002 0981 16 8002 0989 + 373 SLT 0001 WITH 0989 35 0001 0695 + 374 ALO 8001 0695 15 8001 1203 + 375 SLT 0001 1203 35 0001 0759 + 376 SLO 8002 ZEROES 0759 16 8002 0867 + 377 SLT 0001 0867 35 0001 0973 + 378 ALO 8001 0973 15 8001 1031 + 379 SLT 0001 FINI 1031 35 0001 0691 + 380 D0001 I SYMBOLS FOR 0032 69 0000 0000 + 381 D0002 Y PROBLEM 0033 88 0000 0000 + 382 D0003 C VARIABLES 0034 63 0000 0000 + 383 D0004 S 0035 82 0000 0000 + 384 D0005 A 0036 61 0000 0000 + 385 D0006 P 0037 77 0000 0000 + 386 D0007 W 0038 86 0000 0000 + 387 D0008 00 0800 0000 0039 00 0800 0000 + 388 D0009 E00AA 0040 65 9090 6161 +A388 5 MNEMONICS FOR REQUIERD OPERATIONS 0000 00 0000 0000 In original listing, some opcodes has a different + 389 O0001 00 0075 7677 NOP 0600 00 0075 7677 name. Changed to regula SOAP names + 390 O0002 00 0168 7383 HLT 0601 00 0168 7383 + 391 O0003 00 1061 8477 AUP 0602 00 1061 8477 original -> new value + 392 O0004 00 1561 7376 ALO 0603 00 1561 7376 + 393 O0005 00 1682 7376 SLO 0604 00 1682 7376 + 394 O0006 00 1761 7473 AML 0605 00 1761 7473 AAB -> AML 00 1761 6162 -> 00 1761 7473 + 395 O0007 00 1882 7473 SML 0606 00 1882 7473 SAB -> SML 00 1882 6162 -> 00 1882 7473 + 396 O0008 00 1974 7788 MPY 0607 00 1974 7788 + 397 O0009 00 2082 8373 STL 0608 00 2082 8373 + 398 O0010 00 2482 8364 STD 0609 00 2482 8364 + 399 O0011 00 3582 7383 SLT 0610 00 3582 7383 + 400 O0012 00 4575 8965 NZE 0611 00 4575 8965 NZA -> NZE 00 4575 8961 -> 00 4575 8965 + 401 O0013 00 4662 7469 BMI 0612 00 4662 7469 + 402 O0014 00 6079 6184 RAU 0613 00 6079 6184 + 403 O0015 00 6179 8284 RSU 0614 00 6179 8284 + 404 O0016 00 6464 8579 DVR 0615 00 6464 8579 + 405 O0017 00 6579 6173 RAL 0616 00 6579 6173 + 406 O0018 00 6679 8273 RSL 0617 00 6679 8273 + 407 O0019 00 6779 6174 RAM 0618 00 6779 6174 RAB -> RAM 00 6779 6162 -> 00 6779 6174 + 408 O0020 00 6879 8274 RSM 0619 00 6879 8274 RSB -> RSM 00 6879 8262 -> 00 6879 8274 + 409 O0021 00 6973 6464 LDD 0620 00 6973 6464 + 410 O0022 00 7079 6491 RD1 0621 00 7079 6491 RDS -> RD1 00 7079 6482 -> 00 7079 6491 + 411 O0023 00 7177 6368 PCH 0622 00 7177 6368 + 412 O0024 00 9968 7383 HLT 0623 00 9968 7383 + 413 A0001 00 0006 0000 PRESET 0383 00 0006 0000 + 414 A0002 00 0000 0001 ABSOLUTE 0384 00 0000 0001 + 415 A0005 00 0000 1000 CONSTANTS 0387 00 0000 1000 + 416 A0006 00 0000 2000 0388 00 0000 2000 + 417 A0007 00 0000 3000 0389 00 0000 3000 + 418 0150 00 6163 AI ABSOLUTE 0150 00 6163 1018 + 419 0151 00 6169 AI VALUE 0151 00 6169 1018 + 420 0152 00 6173 AL 0152 00 6173 0628 + 421 0153 00 6178 AL 0153 00 6178 0628 + 422 0154 00 6188 AI 0154 00 6188 1018 + 423 0155 00 6282 BS B MINUS 0155 00 6282 0987 + 424 0156 00 6299 BN 0156 00 6299 0654 + 425 0157 00 6369 CI C 0157 00 6369 0974 + 426 0158 00 6373 CEEL 0158 00 6373 0678 + 427 0159 00 6375 CMTX 0159 00 6375 0880 + 428 0160 00 6399 CN 0160 00 6399 0704 + 429 0161 00 6463 WY DIVIDE 0161 00 6463 1068 + 430 0162 00 6466 DF 0162 00 6466 1271 + 431 0163 00 6469 WY 0163 00 6469 1068 + 432 0164 00 6471 ZN 0164 00 6471 0826 + 433 0165 00 6473 WL 0165 00 6473 0728 + 434 0166 00 6478 WE 0166 00 6478 1233 + 435 0167 00 6488 WY 0167 00 6488 1068 + 436 0168 00 6499 ZN 0168 00 6499 0826 + 437 0169 00 6572 PS3 0169 00 6572 0343 + 438 0170 00 6663 WY F 0170 00 6663 1068 + 439 0171 00 6666 FF O 0171 00 6666 1321 + 440 0172 00 6669 WY N 0172 00 6669 1068 + 441 0173 00 6671 ZN L 0173 00 6671 0826 + 442 0174 00 6673 WL E 0174 00 6673 0728 + 443 0175 00 6678 WE F 0175 00 6678 1233 + 444 0176 00 6682 PS3 T 0176 00 6682 0343 + 445 0177 00 6688 WY 0177 00 6688 1068 + 446 0178 00 6699 ZN 0178 00 6699 0826 + 447 0179 00 6769 GI 0179 00 6769 1024 + 448 0180 00 6773 GL GO 0180 00 6773 0778 + 449 0181 00 6799 GN 0181 00 6799 0754 + 450 0182 00 6866 PS3 0182 00 6866 0343 + 451 0183 00 6966 IF HALT 0183 00 6966 1371 + 452 0184 00 6969 II IF 0184 00 6969 1074 + 453 0185 00 6973 IL I 0185 00 6973 0828 + 454 0186 00 6999 IN 0186 00 6999 0804 + 455 0187 00 7164 PW 0187 00 7164 1369 + 456 0188 00 7166 PF DECIMAL 0188 00 7166 1421 + 457 0189 00 7172 PCMMA POINT 0189 00 7172 1077 + 458 0190 00 7177 PW 0190 00 7177 1369 + 459 0191 00 7178 PF 0191 00 7178 1421 + 460 0192 00 7179 PF 0192 00 7179 1421 + 461 0193 00 7182 PW 0193 00 7182 1369 + 462 0194 00 7187 PW 0194 00 7187 1369 + 463 0195 00 7199 PN 0195 00 7199 0854 + 464 0196 00 7263 WY 0196 00 7263 1068 + 465 0197 00 7266 QF 0197 00 7266 1471 + 466 0200 00 7269 WY 0200 00 7269 1068 + 467 0201 00 7271 ZN 0201 00 7271 0826 + 468 0202 00 7273 WL COMMA 0202 00 7273 0728 + 469 0203 00 7278 WE 0203 00 7278 1233 + 470 0204 00 7282 PS3 COMMA MINUS 0204 00 7282 0343 + 471 0205 00 7288 WY 0205 00 7288 1068 + 472 0206 00 7299 ZN 0206 00 7299 0826 + 473 0207 00 7363 WY 0207 00 7363 1068 + 474 0208 00 7369 WY 0208 00 7369 1068 + 475 0209 00 7371 ZN 0209 00 7371 0826 + 476 0210 00 7373 WL 0210 00 7373 0728 + 477 0211 00 7378 WE 0211 00 7378 1233 + 478 0212 00 7382 PS3 LEFT MINUS 0212 00 7382 0343 + 479 0213 00 7388 WY 0213 00 7388 1068 + 480 0214 00 7399 ZN 0214 00 7399 0826 + 481 0215 00 7463 MINI 0215 00 7463 1118 + 482 0216 00 7469 MINI M L 0216 00 7469 1118 + 483 0217 00 7471 MINN I O E 0217 00 7471 0876 + 484 0218 00 7473 MINL N N F 0218 00 7473 0878 + 485 0219 00 7478 MINL U T 0219 00 7478 0878 + 486 0220 00 7488 MINI S 0220 00 7488 1118 + 487 0221 00 7499 MINN 0221 00 7499 0876 + 488 0222 00 7573 PS3 0222 00 7573 0343 + 489 0223 00 7763 WY 0223 00 7763 1068 + 490 0224 00 7769 WY 0224 00 7769 1068 + 491 0225 00 7771 ZN 0225 00 7771 0826 + 492 0226 00 7773 WL 0226 00 7773 0728 + 493 0227 00 7778 WE 0227 00 7778 1233 + 494 0228 00 7782 PS3 P MINUS 0228 00 7782 0343 + 495 0229 00 7788 WY MATRIX 0229 00 7788 1068 + 496 0230 00 7799 ZN POWER 0230 00 7799 0826 + 497 0231 00 7864 EW 0231 00 7864 1419 + 498 0232 00 7866 EE 0232 00 7866 1521 + 499 0233 00 7872 QCMMA 0233 00 7872 1127 + 500 0234 00 7877 EW 0234 00 7877 1419 + 501 0235 00 7878 EE 0235 00 7878 1521 + 502 0236 00 7879 EE 0236 00 7879 1521 + 503 0237 00 7882 EW 0237 00 7882 1419 + 504 0238 00 7887 EW EXTENSIONS 0238 00 7887 1419 + 505 0239 00 7899 EN 0239 00 7899 0904 + 506 0240 00 7964 RW 0240 00 7964 1469 + 507 0241 00 7966 RR 0241 00 7966 1571 + 508 0242 00 7969 RR 0242 00 7969 1571 + 509 0243 00 7972 RCMMA 0243 00 7972 1177 + 510 0244 00 7977 RW 0244 00 7977 1469 + 511 0245 00 7978 RR 0245 00 7978 1571 + 512 0246 00 7979 RR 0246 00 7979 1571 + 513 0247 00 7982 RW 0247 00 7982 1469 + 514 0250 00 7983 RR 0250 00 7983 1571 + 515 0251 00 7987 RW 0251 00 7987 1469 + 516 0252 00 7989 RZ 0252 00 7989 0744 + 517 0253 00 8263 WY RIGHT PAREN 0253 00 8263 1068 + 518 0254 00 8269 WY 0254 00 8269 1068 + 519 0255 00 8271 ZN 0255 00 8271 0826 + 520 0256 00 8273 WL 0256 00 8273 0728 + 521 0257 00 8278 WE 0257 00 8278 1233 + 522 0258 00 8288 WY 0258 00 8288 1068 + 523 0259 00 8299 ZN 0259 00 8299 0826 + 524 0260 00 8363 TC 0260 00 8363 1168 + 525 0261 00 8369 TI 0261 00 8369 1124 + 526 0262 00 8373 TL 0262 00 8373 0928 + 527 0263 00 8388 TY 0263 00 8388 0843 + 528 0264 00 8463 MY 0264 00 8463 1218 + 529 0265 00 8469 MY 0265 00 8469 1218 + 530 0266 00 8471 MN 0266 00 8471 0926 + 531 0267 00 8473 ML 0267 00 8473 0978 + 532 0268 00 8478 ME SUM 0268 00 8478 1283 + 533 0269 00 8488 MY 0269 00 8488 1218 + 534 0270 00 8499 MN 0270 00 8499 0926 + 535 0271 00 8563 MY 0271 00 8563 1218 + 536 0272 00 8569 MY 0272 00 8569 1218 + 537 0273 00 8571 MN 0273 00 8571 0926 + 538 0274 00 8573 ML 0274 00 8573 0978 + 539 0275 00 8578 ME 0275 00 8578 1283 + 540 0276 00 8588 MY TYPE 0276 00 8588 1218 + 541 0277 00 8599 MN 0277 00 8599 0926 + 542 0278 00 8663 MY 0278 00 8663 1218 + 543 0279 00 8669 MY 0279 00 8669 1218 + 544 0280 00 8671 MN RELATIONS 0280 00 8671 0926 + 545 0281 00 8673 ML 0281 00 8673 0978 + 546 0282 00 8678 ME 0282 00 8678 1283 + 547 0283 00 8688 MY 0283 00 8688 1218 + 548 0284 00 8699 MN 0284 00 8699 0926 + 549 0285 00 8763 WY 0285 00 8763 1068 + 550 0286 00 8769 WY 0286 00 8769 1068 + 551 0287 00 8771 ZN 0287 00 8771 0826 + 552 0288 00 8773 WL 0288 00 8773 0728 + 553 0289 00 8778 WE 0289 00 8778 1233 + 554 0290 00 8788 WY 0290 00 8788 1068 + 555 0291 00 8799 ZN 0291 00 8799 0826 + 556 0292 00 8869 YI 0292 00 8869 1174 + 557 0293 00 8873 YL 0293 00 8873 1028 + 558 0294 00 8875 YMTX 0294 00 8875 0930 + 559 0295 00 8899 YN 0295 00 8899 0954 + 560 0296 00 8963 WY 0296 00 8963 1068 + 561 0297 00 8969 WY 0297 00 8969 1068 + 562 0300 00 8971 ZN 0300 00 8971 0826 + 563 0301 00 8973 WL 0301 00 8973 0728 + 564 0302 00 8978 WE 0302 00 8978 1233 + 565 0303 00 8982 PS3 0303 00 8982 0343 + 566 0304 00 8988 WY 0304 00 8988 1068 + 567 0305 00 8999 ZN 0305 00 8999 0826 + 568 0306 00 9063 ENDY TIMES 0306 00 9063 1268 + 569 0307 00 9064 PS12 0307 00 9064 0850 + 570 0308 00 9067 ENDG 0308 00 9067 0772 + 571 0309 00 9068 ENDH 0309 00 9068 1023 + 572 0310 00 9069 ENDY 0310 00 9069 1268 + 573 0311 00 9073 ENDL 0311 00 9073 1078 + 574 0312 00 9078 PS12 0312 00 9078 0850 + 575 0313 00 9083 ENDT 0313 00 9083 0938 + 576 0314 00 9088 ENDY Y 0314 00 9088 1268 + 577 0315 00 9962 NF 0315 00 9962 0917 + 578 0316 00 9964 NW 0316 00 9964 1519 + 579 0317 00 9965 NR SUBSTITUTION 0317 00 9965 0720 + 580 0318 00 9966 NF 0318 00 9966 0917 + 581 0319 00 9969 NR 0319 00 9969 0720 + 582 0320 00 9971 NF 0320 00 9971 0917 + 583 0321 00 9972 NCMMA 0321 00 9972 1227 + 584 0322 00 9977 NW 0322 00 9977 1519 + 585 0323 00 9978 NR 0323 00 9978 0720 + 586 0324 00 9979 NR 0324 00 9979 0720 + 587 0325 00 9982 NW 0325 00 9982 1519 + 588 0326 00 9983 NR FIRST 0326 00 9983 0720 + 589 0327 00 9987 NW CHARACTERS 0327 00 9987 1519 + 590 0328 00 9989 NZ 0328 00 9989 0794 + 591 0329 00 9999 NF 0329 00 9999 0917 + 592 AI RAL OTWO RAL RSL 1018 65 0768 1073 + 593 STL TEMP4 BECOME 1073 20 0788 0841 + 594 LDD AI1 UCHGE RAM RSM 0841 69 0844 0797 + 595 AI1 LDD SETEL L IS R 0844 69 0847 1250 + 596 STL ABVAL PS3 ABVAL NONZRO 0847 20 0366 0343 + 597 AL LDD STBTA BETA IS U 0628 69 1081 0884 + 598 STU V1 V1 IS ZERO 1081 21 0488 0891 + 599 RAL RAM COMPILE 0891 65 0894 0349 + 600 ALO LOW RAM 8002 0349 15 0352 1057 + 601 LDD OSGN1 1057 69 0760 1313 + 602 STU OPSGN AI1 OPSGN ZERO 0760 21 0524 0844 + 603 BS LDD DROPU DCRMNT U 0987 69 0640 0893 + 604 RAL A0001 ABCON COUNT 0640 65 0383 1037 + 605 SLO ONE MINUS ONE 1037 16 0630 1485 + 606 STL A0001 1485 20 0383 0786 + 607 RAU N BN1 0786 60 0484 1039 + 608 BN LDD BN1 SRN 0654 69 1039 1100 + 609 BN1 STU NBAR NBAR EQUALS 1039 21 0342 0745 + 610 LDD CHKAR N 0745 69 0198 0751 + 611 RAL ONET ARITH EQUALS 0198 65 0356 1511 + 612 STU N ONE 1511 21 0484 1087 + 613 STL ARITH NF2 1087 20 0358 1561 + 614 CEEL RAL THREE 0678 65 1131 1535 + 615 LDD CI SETEL 1535 69 0974 1250 + 616 CI RAL C CI1 0974 65 1277 1181 + 617 CI1 AUP ONET ADLOW 1181 10 0356 1611 + 618 ADLOW STU TEMP1 STORE V AND 1611 21 0509 1112 + 619 STL TEMP2 ARITH 1112 20 0490 0943 + 620 LDD CHKAR 0943 69 0346 0751 + 621 RAL SLTI3 COMPILE 0346 65 0499 1253 + 622 LDD OSGN1 SLT 0004 AND 1253 69 0656 1313 + 623 STU OPSGN 0656 21 0524 1327 + 624 RAU LOW1 ALO 8002 1327 60 0980 1585 + 625 AUP ALO 1585 10 0988 0993 + 626 LDD PS7 COMPILE 0993 69 0496 0800 + 627 RAL 8003 VAR2 RALV0000 0496 65 8003 1303 + 628 CMTX RAU TWO YMTX1 V IS TWO 0880 60 0148 1353 + 629 CN RAL C CN1 V EQUALS C 0704 65 1277 1231 + 630 CN1 AUP ONET VAR ARITH IS ONE 1231 10 0356 1661 + 631 VAR STU TEMP1 STORE V AND 1661 21 0509 1162 + 632 STL TEMP2 ARITH 1162 20 0490 1043 + 633 LDD CHKAR 1043 69 0546 0751 + 634 LDD STBTA 0546 69 0549 0884 + 635 LDD SRN GENERATE N 0549 69 0652 1100 + 636 LDD CHKNN 0652 69 1105 0658 + 637 SLT 0004 VAR2 1105 35 0004 1303 + 638 VAR2 ALO RAL COMPILE 1303 15 0968 1123 + 639 ALO TEMP2 RAL VN 1123 15 0490 0795 + 640 LDD VAR1 OSGN1 0795 69 0248 1313 + 641 VAR1 RAL TEMP1 SET ARITH 0248 65 0509 1363 + 642 STL ARITH EEC2 1363 20 0358 1711 + 643 DF RAL SXTNT BEGIN READ 1271 65 1224 1229 + 644 LDD PS5A LDSR 1229 69 0635 1038 + 645 EE LDD RR NUINC 1521 69 1571 1274 + 646 EEC2 STU OPSGN PS3 1711 21 0524 0343 + 647 EN LDD CHKAR 0904 69 1107 0751 + 648 LDD SRN GENERATE N 1107 69 0810 1100 + 649 LDD CHKNN 0810 69 1413 0658 + 650 ALO D0001 COMPILE 1413 15 0032 1137 + 651 ALO EXT LDD0000EN 1137 15 0690 0845 + 652 LDD OSGN1 0845 69 0298 1313 + 653 STU OPSGN 0298 21 0524 1377 + 654 RAL NU 1377 65 0700 1155 + 655 ALO EN1 1155 15 0708 1463 + 656 AUP 8002 IF JNU NOT 1463 10 8002 1621 + 657 SLO ONE EQUAL JNU 1621 16 0630 1635 + 658 LDD EN4 PLUS ONE 1635 69 1088 0941 + 659 SDA EN4 8003 COMPILE 0941 22 1088 8003 + 660 EN1 RAL J0001 NOPPHIJNU 0708 65 1977 1281 + 661 STL TEMP2 EN4 1281 20 0490 1088 + 662 EN4 SLO J0001 1088 16 1977 1331 + 663 NZE EN3 1331 45 0934 1685 + 664 RAL TEMP2 0934 65 0490 0895 + 665 SLO ONET 0895 16 0356 1761 + 666 SLT 0004 1761 35 0004 1671 + 667 ALO PHI 1671 15 1324 1279 + 668 LDD EN3 OSGN1 1279 69 1685 1313 + 669 EN3 RAU N EXTENSION 1685 60 0484 1089 + 670 SUP MAXE NUMBER 1089 11 0542 0897 + 671 BMI EN2A SET ARITH 0897 46 1300 0801 + 672 RAU ONET EN2 1300 60 0356 1811 + 673 EN2A RAU 8002 EN2 0801 60 8002 1811 + 674 EN2 STU ARITH V1 TO ZERO 1811 21 0358 1861 + 675 STL V1 PS3 1861 20 0488 0343 + 676 EW LDD RW NUINC 1419 69 1469 1274 + 677 ENDG RAL RELAT END STMNT IF 0772 65 0632 1187 + 678 NZE PS12 RELAT ZERO 1187 45 0740 0850 + 679 LDD ENDG1 IF GO INTGR 0740 69 1093 0596 + 680 SDA ENDG1 THEN 0596 22 1093 0646 + 681 LDD ENDG3 INST OF 0646 69 0599 0702 + 682 SDA ENDG3 UMINUSTWO 0702 22 0599 0752 + 683 RAL U SET TO DATA 0752 65 0515 1569 + 684 SLO TWO OF UMINUS1 1569 16 0148 1403 + 685 LDD ENDGA THEN 1403 69 0706 0809 + 686 SDA ENDGA DECOMPILE 0809 22 0706 0859 + 687 LDD ENDGB 0859 69 1212 1265 + 688 SDA ENDGB IF 1265 22 1212 1315 + 689 ALO 8002 GO I INTGR 1315 15 1318 8002 + 690 RAL 0001 THEN 1318 65 0001 1205 + 691 SLT 0002 ENDGR 1205 35 0002 1911 + 692 NZU ENDGR 1911 44 1365 0966 + 693 SRT 0002 ENDGA 0966 30 0002 0706 + 694 ENDGA LDD 0000 ENDGB 0706 69 0000 1212 + 695 ENDGB SIA 0000 1212 23 0000 1453 + 696 LDD DROPU IF RELAT 1453 69 0756 0893 + 697 RAL RELAT NEG THEM 0756 65 0632 1237 + 698 BMI ENDG2 ENDG5 ENDG2 1237 46 0790 0991 + 699 ENDGR RAL RELAT IF RELAT NEG 1365 65 0632 1287 + 700 BMI ENDG2 ENDG4 THEN ENDG2 1287 46 0790 1041 + 701 ENDG2 RAM 8002 INST OF 0790 67 8002 0649 + 702 STL BETA RELATMINUS1 0649 20 1503 0806 + 703 LDD ENDG4 BMONE SET TO U 0806 69 1041 0944 + 704 ENDG4 RAL U ENDG3 DATA OF 1041 65 0515 0599 + 705 ENDG3 LDD 0000 ENDG1 RELAT SET 0599 69 0000 1093 + 706 ENDG1 SDA 0000 TO U 1093 22 0000 1553 + 707 RSU U COMPILE 1553 61 0515 1619 + 708 LDD ENDG5 PS7 NEG NOP 1619 69 0991 0800 + 709 ENDG5 STU RELAT PS12 RELAT ZERO 0991 21 0632 0850 + 710 ENDH RAU U COMPILE 1023 60 0515 1669 + 711 AUP OONE HLT U 0000 1669 10 0832 1337 + 712 LDD PS12 PS7 1337 69 0850 0800 + 713 ENDL LDD ENDY DROPK 1078 69 1268 1721 + 714 ENDT RAL FOURT END PUNCH 0938 65 1091 0945 + 715 SLO J0001 GENERATOR 0945 16 1977 1381 + 716 BMI ALARM COMPILES 1381 46 0827 1735 + 717 RAL 8001 LDD PNCHSR 1735 65 8001 1143 + 718 SLT 0004 IF NR OF 1143 35 0004 1603 + 719 ALO 0000 VARIABLES 1603 15 0000 1255 + 720 STL N LESS THAN 1255 20 0484 1387 + 721 LDD SRAC FIVE 1387 69 0840 1150 + 722 LDD OSGN1 0840 69 1193 1313 + 723 RAL SVNTT 1193 65 0696 0851 + 724 LDD PS12 LDSR 0851 69 0850 1038 + 725 ENDY LDD CHKNK IF U EQUALS 1268 69 1771 1374 + 726 LDD UBETA BETA PLUS 1 1771 69 1424 1427 + 727 NZE ENDY1 RAL BECOMES 1424 45 1128 1329 + 728 RSL NZE STL 1329 66 1132 1437 + 729 STL TEMP4 IN BETA 1437 20 0788 1141 + 730 RAL BETA 1141 65 1503 1157 + 731 LDD CHGOP 1157 69 0860 1513 + 732 STL TEMP1 0860 20 0509 1262 + 733 RAL BETA 1262 65 1503 1207 + 734 SLO ONE 1207 16 0630 1785 + 735 STL TEMP4 1785 20 0788 1191 + 736 ALO ENDY2 8002 SET CONTENTS 1191 15 0994 8002 + 737 ENDY2 RAL 0000 BETA MINUS 0994 65 0000 1305 + 738 STL TEMP2 ONE EQUAL 1305 20 0490 1243 + 739 RAM 8002 TO CONTENT 1243 67 8002 0901 + 740 SLO STLA1 BETA WITH 0901 16 1004 0909 + 741 NZE PS12 SIGN BETA 0909 45 0850 1563 + 742 RAU TEMP4 MINUS ONE 1563 60 0788 1293 + 743 STU U IF BETA 1293 21 0515 1368 + 744 RAU TEMP2 MINUS ONE 1368 60 0490 0995 + 745 BMI ENDY3 CONTAINS 0995 46 0348 0699 + 746 RSU TEMP1 ENDY4 STL ACC 0348 61 0509 1613 + 747 ENDY3 RAU TEMP1 ENDY4 0699 60 0509 1613 + 748 ENDY4 LDD PS12 PS7 1613 69 0850 0800 + 749 ENDY1 RSL FRONE IF U NOT BTA 1128 66 1431 1835 + 750 STL TEMP4 PLUS ONE 1835 20 0788 1241 + 751 LDD UCHGE RECOMPILE 1241 69 1044 0797 + 752 RAL U RALY0 0000 1044 65 0515 1719 + 753 SLO TWO 1719 16 0148 1653 + 754 STL U TO 1653 20 0515 1418 + 755 ALO ENDY6 8002 1418 15 1821 8002 + 756 ENDY6 RAU 0000 ALO U 0000 1821 60 0000 1355 + 757 AUP U LDD ACC 8002 1355 10 0515 1769 + 758 AUP TWO STDYO 0000 1769 10 0148 1703 + 759 SRT 0004 1703 30 0004 1663 + 760 RAU 8003 WITH SGN OF 1663 60 8003 1871 + 761 SLT 0004 LAST INST 1871 35 0004 1481 + 762 LDD PS7 NEGATIVE 1481 69 0984 0800 + 763 RAL U 0984 65 0515 1819 + 764 ALO ENDY7 8002 1819 15 0822 8002 + 765 ENDY7 RSL 0000 0822 66 0000 1405 + 766 STL TEMP1 1405 20 0509 1312 + 767 RAU LDAC 1312 60 1415 1869 + 768 LDD PS7 1869 69 0872 0800 + 769 RAU TEMP1 0872 60 0509 1713 + 770 LDD PS12 PS7 1713 69 0850 0800 + 771 FF STU FFBIT PS3 FFBIT ON 1321 21 1959 0343 + 772 GI RAL ALO COMPILE 1024 65 0988 1343 + 773 ALO ABCON ALO A0 8002 1343 15 0776 1531 + 774 ALO LOW1 WHERE A0 1531 15 0980 1885 + 775 LDD OSGN1 WILL CONT 1885 69 1138 1313 + 776 RAU OONE EEC2 S0 ADDRSS 1138 60 0832 1711 + 777 GL LDD GI CHKAR 0778 69 1024 0751 + 778 GN LDD CHKAR 0754 69 1257 0751 + 779 LDD SRN 1257 69 0910 1100 + 780 LDD CHKNN COMPILE 0910 69 1763 0658 + 781 ALO GO NOP0000SN 1763 15 1016 1921 + 782 LDD EEC2 OSGN1 1921 69 1711 1313 + 783 IF LDD NI CHKNK 1371 69 1474 1374 + 784 II RAL I ADLOW 1074 65 1477 1611 + 785 IL RAL ONE 0828 65 0630 1935 + 786 LDD II SETEL 1935 69 1074 1250 + 787 IN RAL I VAR V EQUALS I 0804 65 1477 1661 + 788 ME LDD ML NUMIN DCRMNT NU 1283 69 0978 1581 + 789 ML RAU STREL RELAT IS L 0978 60 1631 0836 + 790 LDD DROPK 1631 69 1034 1721 + 791 LDD CHKTK TO ML1 IF 1034 69 1487 0890 + 792 NZE ML1 TK IS ZERO 1487 45 0940 1291 + 793 LDD ML1 TKNZ1 TKNZ1AND ML1 0940 69 1291 1094 + 794 ML1 LDD SETEK 1291 69 1752 1134 +A794 LDD NGLFT 1752 69 1144 0947 + 795 STU ABVAL PS3 ABVAL ZERO 1144 21 0366 0343 + 796 MY RAU STREL RELAT IS L 1218 60 1971 0836 + 797 LDD CHKTK TO MINI IF 1971 69 1524 0890 + 798 NZE MY1 MINI TK IS ZERO 1524 45 1178 1118 + 799 MY1 LDD ML1 TKNZ2 1178 69 1291 1194 + 800 MN RAU STREL RELAT IS L 0926 60 1379 0836 + 801 LDD CHKTK TO MINN IF 1379 69 1182 0890 + 802 NZE MINN TK IS ZERO 1182 45 0886 0876 + 803 LDD SRN COMPILE 0886 69 1139 1100 + 804 LDD MY1 GENN RAL AJAY 1139 69 1178 1681 + 805 MINI RAL OONE RAL RAM 1118 65 0832 1537 + 806 STL TEMP4 BECOMES 1537 20 0788 1341 + 807 LDD UCHGE RSL RSM 1341 69 1244 0797 + 808 RAL D0004 L IS S 1244 65 0035 1189 + 809 STL L PS3G THEN PS3G 1189 20 0529 0668 + 810 MINL LDD PS3G NGLFT 0878 69 0668 0947 + 811 MINN LDD SRN 0876 69 1429 1100 + 812 RSU N N IS MINUS N 1429 61 0484 1239 + 813 STU N COMPILE 1239 21 0484 1587 + 814 LDD GENN RAL AJAY 1587 69 0990 1681 + 815 RAL D0004 L IS S 0990 65 0035 1289 + 816 STL L WY THEN WY 1289 20 0529 1068 + 817 M0001 84 0000 IDEM SWITCHING 0500 84 0000 1455 + 818 M0002 85 0000 GRTR DICTIONARY 0501 85 0000 1505 + 819 M0003 86 0000 GRTRZ FOR 0502 86 0000 1555 + 820 M0004 99 9999 ALARM RELATIONS 0503 99 9999 0827 + 821 IDEM RAL U COMPILE 1455 65 0515 1919 + 822 STL RELAT NZE0000NEXT 1919 20 0632 0936 + 823 RAL NZE GRTR1 0936 65 1132 1637 + 824 GRTRZ RAL U V EQUALS U 1555 65 0515 1969 + 825 STL RELAT GRTZ1 COMPILE 1969 20 0632 0986 + 826 GRTZ1 RAL BMI GRTR1 BMI0000NEXT 0986 65 1339 1637 + 827 GRTR1 LDD EEC2 OSGN1 OPSGN ZERO 1637 69 1711 1313 + 828 GRTR RSL U V EQUALS U 1505 66 0515 0770 + 829 SLO ONE PLUS ONE 0770 16 0630 1036 + 830 STL RELAT COMPILE 1036 20 0632 1086 + 831 RAL NZE NZE0000NEXT 1086 65 1132 1687 + 832 LDD OSGN1 1687 69 1040 1313 + 833 STU OPSGN GRTZ1 1040 21 0524 0986 + 834 NCMMA LDD NR COMMA 1227 69 0720 1173 + 835 NF RAU INTGR N EQUALS L 0917 60 0538 1393 + 836 SRT 0008 AND N 1393 30 0008 1961 + 837 ALO N 1961 15 0484 1389 + 838 SRT 0001 MU EQUALS MU 1389 30 0001 1045 + 839 STL N PLUS ONE 1045 20 0484 1737 + 840 RAU MU 1737 60 0750 1605 + 841 AUP ONE NF2 1605 10 0630 1561 + 842 NF2 STU MU PS3 1561 21 0750 0343 + 843 NI RAL NI1 1474 65 1527 1731 + 844 LDD RELAT SWITCH TO 1731 69 0632 1136 + 845 TLU M0001 8002 RELATION 1136 84 0500 8002 + 846 NI1 RAU 0000 COMPILER 1527 60 0000 1655 + 847 SUP RELAT 8003 1655 11 0632 8003 + 848 NR STL NBAR N NBAR MU 0720 20 0342 1095 + 849 STL N DEL AND 1095 20 0484 1787 + 850 STL MU ARITH ZERO 1787 20 0750 1753 + 851 STL ARITH NF 1753 20 0358 0917 + 852 NW LDD NR TKOP STORE OP 1519 69 0720 1223 + 853 NZ LDD NR NZ4 0794 69 0720 1273 + 854 NZ4 STD OUT 1273 24 0976 1479 + 855 LDD NZ1 CHKNK 1479 69 1232 1374 + 856 NZ1 RAL 0001 COMPILE 1232 65 0001 1705 + 857 SLT 0002 STL ACC 1705 35 0002 1362 + 858 SUP SIXTR OR 1362 11 1465 0820 + 859 NZU FLOTE LDD FLOATK 0820 44 1323 1574 + 860 SUP SIXT OR 1323 11 0330 1186 + 861 NZU FIXVA LDD FIX 1186 44 1439 1090 + 862 SUP NNTEN OR 1439 11 0592 0997 + 863 NZU FLOTE 0997 44 0951 1574 + 864 RAL FIVEO LARM ALARM 0951 65 1054 0332 + 865 NZ3 RAU V1 TO NZ2 IF 1350 60 0488 1443 + 866 NZU OUT NZ2 V1 ZERO 1443 44 0976 0498 + 867 NZ2 RAL STLA1 0498 65 1004 0959 + 868 LDD OSGN1 0959 69 1412 1313 + 869 STU OPSGN FLOT1 1412 21 0524 1577 + 870 FLOTE RAU ARITH FLOAT IF 1574 60 0358 1813 + 871 NZU NZ3 1813 44 1350 1468 + 872 RAL FIVET Y AND FIX 1468 65 0922 1627 + 873 LDD FLOT1 LDSR C AND FIX 1627 69 1577 1038 + 874 FLOT1 RAU 8003 OUT 1577 60 8003 0976 + 875 FIXVA RAU ARITH 1090 60 0358 1863 + 876 NZU NZ2 1863 44 0967 0498 + 877 RAL FIXNR 0967 65 0870 0925 + 878 LDD NZ2 LDSR 0925 69 0498 1038 + 879 PCMMA LDD PF COMMA 1077 69 1421 1173 + 880 PF STL N N NBAR AND 1421 20 0484 1837 + 881 STL NBAR MU ZERO 1837 20 0342 1145 + 882 STL MU PN THEN PN 1145 20 0750 0854 + 883 PN RAL ONET ARITH TO 0854 65 0356 1462 + 884 STL ARITH NF2 FLOATING 1462 20 0358 1561 + 885 PW LDD PF TKOP TKOP AND PF 1369 69 1421 1223 + 886 QCMMA LDD EE COMMA 1127 69 1521 1173 + 887 QF RAU TAU 1471 60 1960 1515 + 888 SUP TAU5 QUANT 1515 11 1518 1373 + 889 NZU TF1 1373 44 1677 1228 + 890 LDD TF1 STSMT IF SO 1228 69 1677 1030 + 891 STSMT STD FINI STORE STMT 1030 24 0691 1294 + 892 RAL FLOP1 NO OF STMT 1294 65 1047 1001 + 893 AUP 0000 FOLLOWING 1001 10 0000 1755 + 894 SLO ONE QUANT 1755 16 0630 1236 + 895 ALO 8002 1236 15 1489 8002 + 896 STU N0001 FINI 1489 21 0568 0691 + 897 TF1 RAU PSI IF NOT 1677 60 0041 1195 + 898 AUP ONE INCRMNT PSI 1195 10 0630 1286 + 899 STU PSI ANS SET 1286 21 0041 1344 + 900 MPY SIXT COUNT 1344 19 0330 1336 + 901 STL FLOP1 1336 20 1047 1400 + 902 RAL ONE TF2 1400 65 0630 1386 + 903 QUA4 NZU CURTN IF TALLY 1450 44 1803 1104 + 904 AUP 8003 NON ZERO 1803 10 0856 8003 + 905 RAL 0000 QUA20 SEND NXT WRD 0856 65 0000 1805 + 906 QUA20 STL GAMMA QUA3 TO GAMMA 1805 20 0372 0975 + 907 QUA3 RAU GAMMA 0975 60 0372 1727 + 908 NZU QUA1 1727 44 1781 1282 + 909 SRT 0002 EXTRACT 1781 30 0002 1887 + 910 STU GAMMA PEWTH 1887 21 0372 1025 + 911 RAU 8002 SYMBOL 1025 60 8002 1333 + 912 STU TEMP1 IS 1333 21 0509 1512 + 913 NZU QUA2 QUA3 SYMBOL ZERO 1512 44 1565 0975 + 914 QUA1 RAU TALLY INCRMNT 1282 60 0373 1777 + 915 SUP ONE TALLY 1777 11 0630 1436 + 916 STU TALLY QUA4 1436 21 0373 1450 + 917 QUA2 SUP SVTY2 IS SYMBOL K 1565 11 1568 1423 + 918 NZU QUA5 1423 44 1827 1278 + 919 RAL CHI INCRMNT CHI 1278 65 1831 1486 + 920 ALO ONE TF2 1486 15 0630 1386 + 921 TF2 STL CHI CLEAR L 1386 20 1831 1084 + 922 STU STAR AND STAR 1084 21 1188 1391 + 923 STU EL QUA3 1391 21 0746 0975 + 924 QUA5 RAU EL 1827 60 0746 1051 + 925 AUP ONET INCRMNT EL 1051 10 0356 1562 + 926 STU EL ALARM IF 1562 21 0746 0749 + 927 SUP SIXT MORE THAN 0749 11 0330 1536 + 928 NZU QUA7 QUA50 FIVE SYMBLS 1536 44 1539 1140 + 929 QUA50 RAL PSI 1140 65 0041 1245 + 930 SLO ONE 1245 16 0630 1586 + 931 STL PSI ALARM 1586 20 0041 0827 + 932 QUA7 RAU STAR 1539 60 1188 1493 + 933 SRT 0002 1493 30 0002 0799 + 934 AUP TEMP1 0799 10 0509 1913 + 935 ALO FLOP1 1913 15 1047 1101 + 936 ALO CHI 1101 15 1831 1636 + 937 SLO SEVEN 1636 16 1589 1543 + 938 ALO 8002 1543 15 0796 8002 + 939 STU N0001 0796 21 0568 0972 + 940 STU STAR QUA3 0972 21 1188 0975 + 941 CURTN LDD FLOP STORE 1104 69 1307 0960 + 942 RAL W0005 CURT1 CONVERT NO 1307 65 1981 1686 + 943 CURT1 SLT 0002 OF STATMNTS 1686 35 0002 1593 + 944 SUP NINTY BEING 1593 11 0360 1615 + 945 SUP 8003 QUANTIFIED 1615 11 8003 1473 + 946 NZE CURT2 TO PURE 1473 45 1026 1877 + 947 AUP 8001 CURT1 NUMERIC 1026 10 8001 1686 + 948 CURT2 AUP 8001 1877 10 8001 1736 + 949 SRT 0002 1736 30 0002 1643 + 950 SLO 8002 1643 16 8002 1151 + 951 SRT 0001 1151 30 0001 1357 + 952 ALO 8001 1357 15 8001 1665 + 953 SLO 8002 1665 16 8002 1523 + 954 SRT 0001 1523 30 0001 1529 + 955 ALO 8001 1529 15 8001 1937 + 956 SLT 0002 1937 35 0002 1693 + 957 ALO FLOP1 1693 15 1047 1201 + 958 SLO TWO 1201 16 0148 1853 + 959 ALO 8002 1853 15 0906 8002 + 960 STU N0001 0906 21 0568 1022 + 961 LDD W0004 1022 69 1980 1383 + 962 STD 0001 VARIABLE 1383 24 0001 1154 + 963 LDD Z 1154 69 1407 1010 + 964 STD 0002 Z 1010 24 0002 1855 + 965 LDD W0003 LOWER 1855 69 1979 1332 + 966 STD 0003 VARIABLE 1332 24 0003 0956 + 967 RAU FIVET 0956 60 0922 1927 + 968 STL 0004 1927 20 0004 1457 + 969 ALO TAU6 QUA9 1457 15 1060 1715 + 970 QUA9 STU TALLY RETURN TO 1715 21 0373 1076 + 971 STL TAU SCANNER 1076 20 1960 1963 + 972 RAL RSL PS2B 1963 65 0344 0667 + 973 TAU6 RAL TAU5 QUA11 SET TAU 1060 65 1518 1573 + 974 QUA11 STL TAU TAU2 TO TAU5 1573 20 1960 0564 + 975 TAU5 LDD STSMT 1518 69 1072 1030 + 976 RAL TAU2 QUA11 1072 65 0564 1573 + 977 TAU2 LDD QUA21 DCRMT 0564 69 1017 0920 + 978 QUA21 LDD FLOP 1017 69 0970 0960 + 979 RAU W0005 0970 60 1981 1786 + 980 NZU PS QUA10 NUMBER 1786 44 1234 1190 + 981 QUA10 RAL W0004 STORE 1190 65 1980 1836 + 982 STU 0000 1836 21 0000 1903 + 983 STL 0001 QUANT VARBLE 1903 20 0001 1204 + 984 STL 0003 1204 20 0003 1006 + 985 LDD Z Z 1006 69 1407 1110 + 986 STD 0002 1110 24 0002 1905 + 987 RAL W0002 INCREMENT 1905 65 1978 1433 + 988 STL 0005 IF MINUS 1433 20 0005 0758 + 989 SLO M OTHERWISE 0758 16 1612 1067 + 990 SLT 0002 Z S INCRMNT 1067 35 0002 1623 + 991 NZU QUAMN 1623 44 1328 1378 + 992 RAU D0004 QUAMN 1328 60 0035 1378 + 993 QUAMN STU 0004 1378 21 0004 1507 + 994 RAU SEVNT 1507 60 1160 1765 + 995 STL 0006 1765 20 0006 1009 + 996 ALO TAU3 QUA9 TO SCANNER 1009 15 1662 1715 + 997 DCRMT STD FINI DECREMENT 0920 24 0691 1394 + 998 RAU PSI QUANT COUNT 1394 60 0041 1295 + 999 STU TEMP3 DCMT3 FOR ALL 1295 21 0709 1712 +1000 DCMT3 RAU TEMP3 PSI LESS 1712 60 0709 0664 +1001 NZU FINI THAN OR 0664 44 1117 0691 +1002 SUP ONE EQUAL TO 1117 11 0630 1886 +1003 STU TEMP3 CURRENT 1886 21 0709 1762 +1004 MPY SIXT PSI 1762 19 0330 1936 +1005 ALO DCMT1 1936 15 1639 1743 +1006 LDD DCMT2 1743 69 0846 0849 +1007 SDA DCMT2 8002 0849 22 0846 8002 +1008 DCMT1 RAU N0005 1639 60 0572 1428 +1009 SUP 0000 1428 11 0000 1056 +1010 NZU DCMT3 DCMT2 1056 44 1712 0846 +1011 DCMT2 STU N0005 DCMT3 0846 21 0572 1712 +1012 TAU3 LDD FLOP STORE 1662 69 1815 0960 +1013 LDD RAM 1815 69 0894 1097 +1014 STD 0001 G 1097 24 0001 1254 +1015 RAU W0006 1254 60 1982 1987 +1016 STL 0000 1987 20 0000 1304 +1017 STL 0007 1304 20 0007 1210 +1018 LDD STNON 1210 69 0714 0911 +1019 STU 0002 0714 21 0002 1106 +1020 LDD WDIF 1106 69 1059 1812 +1021 STD 0003 IF 1812 24 0003 1156 +1022 LDD D0007 1156 69 0038 1441 +1023 STD 0005 W 1441 24 0005 0808 +1024 RAL W0002 CHECK FOR 0808 65 1978 1483 +1025 SLO M NEGATIVE 1483 16 1612 1167 +1026 SLT 0002 INCREMENT 1167 35 0002 1673 +1027 NZU QUA30 1673 44 1478 1528 +1028 LDD W0004 1528 69 1980 1533 +1029 STD 0004 1533 24 0004 1557 +1030 LDD W0001 QUA31 1557 69 1977 1080 +1031 QUA30 LDD W0001 1478 69 1977 1130 +1032 STD 0004 UPPER VARBLE 1130 24 0004 1607 +1033 LDD W0004 QUA31 1607 69 1980 1080 +1034 QUA31 STD 0006 QUANT VARBLE 1080 24 0006 1109 +1035 RAU NINET 1109 60 1862 1217 +1036 STL 0007 1217 20 0007 1260 +1037 STD 0008 1260 24 0008 1912 +1038 ALO TAU4 QUA9 TO SCANNER 1912 15 1865 1715 +1039 TAU4 RAL PSI 1865 65 0041 1345 +1040 SLO ONE 1345 16 0630 1238 +1041 STL PSI 1238 20 0041 1444 +1042 NZE QUA22 PS0 1444 45 0548 0336 +1043 QUA22 RAL TAU2 0548 65 0564 1020 +1044 STL TAU QUA21 1020 20 1960 1017 +1045 FLOP STD OUT 0960 24 0976 1579 +1046 RAU PSI 1579 60 0041 1395 +1047 MPY SIXT STORE STATMT 1395 19 0330 1288 +1048 STL FLOP1 1288 20 1047 1500 +1049 SLO SIX 1500 16 0520 1075 +1050 ALO FLOP3 1075 15 1578 1583 +1051 06 N0001 W0001 1578 06 0568 1977 +1052 FLOP3 LDD OUT SR1 1583 69 0976 0341 +1053 RCMMA LDD RR COMMA 1177 69 1571 1173 +1054 RR RAL K K EQUALS K 1571 65 0146 1251 +1055 STU V1 1251 21 0488 1491 +1056 ALO ONE PLUS ONE 1491 15 0630 1338 +1057 SLT 0005 1338 35 0005 1301 +1056 NZU ALARM 1301 44 0827 1206 +1059 SRT 0005 1206 30 0005 1070 +1060 STL K RR2 1070 20 0146 0899 +1061 RR2 ALO RR1 8002 TK EQUALS 0899 15 0802 8002 +1062 RR1 STU T0001 PS3 ZERO 0802 21 0042 0343 +1063 RW RAL STL COMPILE 1469 65 0636 1541 +1064 ALO K STL WK 1541 15 0146 1351 +1065 ALO W 1351 15 1354 1159 +1066 LDD OSGN1 OPSGN ZERO 1159 69 1962 1313 +1067 STU OPSGN 1962 21 0524 1628 +1068 LDD SETEK 1628 69 1881 1134 +1069 LDD RR TKOP 1881 69 1571 1223 +1070 RZ LDD RR NZ4 0744 69 1571 1273 +1071 TI RAL ONE TIFF PUNCH 1124 65 0630 1388 +1072 TY RAL TWO TIFF GENERATORS 0843 65 0148 1388 +1073 TC RAL THREE TIFF 1168 65 1131 1388 +1074 TL RAL LDSR1 TIFF 0928 65 1931 1388 +1075 TIFF ALO AB3 COMPILES 1388 15 1591 1445 +1076 STL TMBLE PROGRAM 1445 20 0949 0852 +1077 LDD UBETA WHICH 0852 69 1256 1427 +1078 NZE TI4 IDENTIFIES 1256 45 1310 0764 +1079 RAL U VARIANLES 1310 65 0515 1120 +1080 SLO THREE WHOSE VALUES 1120 16 1131 1438 +1081 STL U ARE TO BE 1438 20 0515 1618 +1082 RAL TMBLE TI2 PUNCHED 1618 65 0949 1404 +1083 TI4 LDD DROPU 0764 69 1267 0893 +1084 ALO 8002 1267 15 1170 8002 +1085 RAU 0000 1170 60 0000 1306 +1086 SLT 0002 1306 35 0002 0814 +1087 SRT 0006 0814 30 0006 1629 +1088 STU N 1629 21 0484 1488 +1089 LDD TI2 SRAC 1488 69 1404 1150 +1090 TI2 LDD OSGN1 1404 69 1657 1313 +1091 LDD PS3 COMMA 1657 69 0343 1173 +1092 AB3 15 5003 0000 1591 15 5003 0000 +1093 TMBLE 00 0000 0000 0949 00 0000 0000 +1094 WE LDD WL NUMIN 1233 69 0728 1581 +1095 WL LDD DROPK IS PREVIOUS 0728 69 1382 1721 +1096 LDD CHKTK OPERATION 1382 69 1538 0890 +1097 NZE WL1 ALPHA ZERO 1538 45 0642 1793 +1098 ALPHA LDD SETEK IF SO EK 1793 69 0896 1134 +1099 RAL K IS ARITH AND 0896 65 0146 1401 +1100 STU ABVAL RR2 ABVAL ZERO 1401 21 0366 0899 +1101 WL1 LDD ALPHA TKNZ1 THEN 0642 69 1793 1094 +1102 TKNZ1 STD OUT RETURN PS3 1094 24 0976 1679 +1103 STL TEMP1 IF NOT IS 1679 20 0509 0864 +1104 SLO P PPN P 0864 16 1317 1122 +1105 NZE PWRW IF NOT IS 1122 45 1126 1678 +1106 LDD GETEK WK FXD OR FL 1126 69 1729 1432 +1107 NZE FLTW1 NFLW1 IF FL IS ARI 1729 45 1482 1633 +1108 FLTW1 RAL ARITH TH FIXED OR 1482 65 0358 0914 +1109 NZE FLTW2 NFLW2 FLOATING 0914 45 1668 1220 +1110 FLTW2 RAL V1 WL3A IF V1 ZERO 1668 65 0488 1843 +1111 WL3A LDD GAMM SWTCH COMPILE 1843 69 0946 0999 +1112 SWTCH NZE RALWK STLAC STL ACC 0999 45 0902 1454 +1113 STLAC STD EXIT AND 1454 24 0644 1147 +1114 RAL STLA1 RAL WK 1147 65 1004 1209 +1115 LDD OSGN1 IF NON ZERO 1209 69 0964 1313 +1116 STU OPSGN RALW1 COMPILE 0964 21 0524 1728 +1117 STLA1 STL 0001 0000 RAL WK 1004 20 0001 0000 +1118 RALWK STD EXIT RALW1 0902 24 0644 1728 +1119 RALW1 RAL K SET OPSGN 1728 65 0146 1451 +1120 ALO W TO ZERO 1451 15 1354 1259 +1121 ALO RAL IN BOTH 1259 15 0968 1723 +1122 LDD OSGN1 CASES 1723 69 1176 1313 +1123 STU OPSGN EXIT 1176 21 0524 0644 +1124 GAMM RAU OTWO GAMM1 INCREMENT 0946 60 0768 1773 +1125 GAMM1 ALO ONE WL3C OPN AND 1773 15 0630 1588 +1126 WL3C AUP TEMP1 SET V1 1588 10 0509 1014 +1127 STU TEMP1 NETTA THEN GO TO 1014 21 0509 1064 +1128 NETTA STL V1 FL1K ARITH GEN 1064 20 0488 1641 +1129 NFLW2 RAL FIVET COMPILE 1220 65 0922 1778 +1130 LDD LDSR LDD FLOATK 1778 69 1532 1038 +1131 STU OPSGN AND MERGE 1532 21 0524 1828 +1132 RAL ONET WITH FLOAT 1828 65 0356 1114 +1133 STL ARITH WL3A FLOAT 1114 20 0358 1843 +1134 NFLW1 RAL ARITH IF WK FIXED 1633 65 0358 1164 +1135 NZE N1FW2 N1NW2 IS PRESENT 1164 45 1718 1270 +1136 N1FW2 RAL V1 FIXED 1718 65 0488 1893 +1137 LDD SWTCH TO SWITCH IF 1893 69 0996 0999 +1138 RAL FOURT FLOAT THEN 0996 65 1091 1495 +1139 LDD GAMM LDSR LDD FLOAT 1495 69 0946 1038 +1140 N1NW2 RAU OONE WL3C FIX FIX 1270 60 0832 1588 +1141 PWRW LDD GETEK IS WK FIXED 1678 69 1582 1432 +1142 NZE PWRP IF NOT IS 1582 45 1638 1688 +1143 RAL ARITH PRESENT FLT 1638 65 0358 1214 +1144 NZE PWRFL IF NOT 1214 45 1768 1320 +1145 RAL FOURT COMPILE 1320 65 1091 1545 +1146 LDD PWRFL LDSR LDD FLOAT 1545 69 1768 1038 +1147 PWRFL RAL ONET FLOAT FLOAT 1768 65 0356 1264 +1148 STL ARITH COMPILES 1264 20 0358 1314 +1149 LDD LDSR LDD LOG 1314 69 1367 1038 +1150 LDD PWR1 STLAC STL ACC 1367 69 1370 1454 +1151 PWR1 RAU OONE GAMM1 1370 60 0832 1773 +1152 PWRP RAL V1 RAL WK 1688 65 0488 1943 +1153 LDD SWTCH COMPILE 1943 69 1046 0999 +1154 RAL ARITH STL ACC 1046 65 0358 1364 +1155 STL V1 ANDOR 1364 20 0488 1691 +1156 ALO TWLVT RAL WK AND 1691 15 1494 1049 +1157 LDD OUT LDSR POWER INVRT 1049 69 0976 1038 +1158 WY LDD CHKTK IS PREVIOUS 1068 69 1172 0890 +1159 NZE ALPHA OPN ZERO 1172 45 1226 1793 +1160 LDD ALPHA TKNZ2 1226 69 1793 1194 +1161 TKNZ2 STD OUT 1194 24 0976 1779 +1162 STL TEMP1 IF NOT IS 1779 20 0509 1414 +1163 SLO P OPN P 1414 16 1317 1222 +1164 NZE POWR IF NOT IS 1222 45 1276 1878 +1165 LDD GETEK PREV FLOAT 1276 69 1829 1432 +1166 NZE FLT1 NFLT1 IF SO GO TO 1829 45 1632 1683 +1167 FLT1 RAL V1 ALTR IF PREV 1632 65 0488 1993 +1168 NZE FLT2 NOT IN ACC 1993 45 1096 1197 +1169 LDD FLT2 ALTR 1197 69 1096 1099 +1170 FLT2 RAL ARITH COMPILE 1096 65 0358 1464 +1171 NZE NETTA FLOAT IF 1464 45 1064 1420 +1172 RAL FOURT PRESENT 1420 65 1091 1595 +1173 LDD LDSR FIXED 1595 69 0598 1038 +1174 RAL ONET 0598 65 0356 1514 +1175 STL ARITH NETTA 1514 20 0358 1064 +1176 NFLT1 RAL ARITH IF NOT FLOAT 1683 65 0358 1564 +1177 NZE FX1F2 FIX GO TO 1564 45 1818 1470 +1178 RAU OTREY WL3C WL3C IF 1470 60 0888 1588 +1179 FX1F2 LDD BMONE FLOAT FIX 1818 69 1272 0944 +1180 RSU BETA COMPILE NEG 1272 61 1503 1707 +1181 SUP AR33 LDD BETA FTK 1707 11 1360 1915 +1182 LDD AR34 PS7 TO ALTR3 1915 69 1868 0800 +1183 AR33 LDD 0000 9005 AND THEN 1360 69 0000 9005 +1184 AR34 LDD NETTA NETTA 1868 69 1064 1417 +1185 STD EXIT ALTR3 1417 24 0644 1247 +1186 ALTR STD EXIT ALTR PERFRMS 1099 24 0644 1297 +1187 LDD BMONE FOLLOWING 1297 69 1550 0944 +1188 LDD ALTR3 STAC1 SEQUENTIALLY 1550 69 1247 1600 +1189 BMONE STD FINI BETA MINUS 0944 24 0691 1544 +1190 RAL BETA ONE TO 1544 65 1503 1757 +1191 SLO ONE TEMP4 1757 16 0630 1738 +1192 STL TEMP4 I4ZU1 1738 20 0788 1741 +1193 I4ZU1 RAL TEMP4 INST OF 1741 65 0788 1594 +1194 ALO I4ZU3 CONTENTS 1594 15 1347 1501 +1195 LDD I4ZU2 OF TEMP4 1501 69 1504 1807 +1196 SDA I4ZU2 EQUALS U 1807 22 1504 1857 +1197 RAU 8002 8003 IF NOT LDD 1857 60 8002 8003 +1198 I4ZU3 LDD 0000 1347 69 0000 1554 +1199 STD TEMP2 1554 24 0490 1644 +1200 RAM 8001 IF LDD SET 1644 67 8001 1551 +1201 SLO CKLDD DATA OF 1551 16 1604 1309 +1202 SLT 0002 CONTENTS 1309 35 0002 1965 +1203 NZU I4ZU4 OF 1965 44 1520 1570 +1204 RAL U TEMP4 TO 1520 65 0515 1620 +1205 SRT 0004 U 1620 30 0004 1682 +1206 AUP OONE I4ZU5 1682 10 0832 1788 +1207 I4ZU4 RAL U I4ZU5 1570 65 0515 1788 +1208 I4ZU5 AUP I4ZU2 1788 10 1504 1359 +1209 LDD TEMP2 8003 1359 69 0490 8003 +1210 I4ZU2 SDA 0000 FINI 1504 22 0000 0691 +1211 STAC1 STD FINI COMPILE NEG 1600 24 0691 1694 +1212 RSU BETA STL ACC BTA 1694 61 1503 1907 +1213 SRT 0004 1907 30 0004 1467 +1214 SUP STLA1 1467 11 1004 1409 +1215 LDD FINI PS7 1409 69 0691 0800 +1216 ALTR3 LDD IUM2U 1247 69 1650 1654 +1217 RAL BETA 1650 65 1503 0858 +1218 STL TEMP4 0858 20 0788 1791 +1219 LDD BMINI 1791 69 1744 1397 +1220 RAL OONE 1744 65 0832 1838 +1221 STL OPSGN EXIT 1838 20 0524 0644 +1222 IUM2U STD FINI U MINUS TWO 1654 24 0691 1794 +1223 RAL U TO TEMP4 1794 65 0515 1670 +1224 SLO TWO THEN I4ZU1 1670 16 0148 1704 +1225 STL TEMP4 I4ZU1 1704 20 0788 1741 +1226 BMINI STD FINI CONTENTS OF 1397 24 0691 1844 +1227 RSU TEMP4 CONTENTS OF 1844 61 0788 1894 +1228 SUP BMIN2 8003 TEMP4 MADE 1894 11 1447 8003 +1229 BMIN2 SML 0000 NEGATIVE 1447 18 0000 1356 +1230 RAU 8002 1356 60 8002 1066 +1231 SLO TEMP4 1066 16 0788 1944 +1232 SLO BMIN3 8002 1944 16 1497 8002 +1233 BMIN3 21 0000 FINI 1497 21 0000 0691 +1234 EXIT HLT EXIT EXIT 0644 01 0644 0644 +1235 FINI HLT FINI FINI 0691 01 0691 0691 +1236 OUT HLT OUT OUT 0976 01 0976 0976 +1237 OSGN1 STD FINI OSGN3 SET SIGN OF 1313 24 0691 1994 +1238 OSGN3 AUP OPSGN INSTRUCTION 1994 10 0524 1879 +1239 AUP OSGN2 8003 TO BE 1879 10 1732 8003 +1240 OSGN2 RAU 8002 COMPILED 1732 60 8002 1841 +1241 LDD FINI PS7 1841 69 0691 0800 +1242 UBETA STD FINI IS U EQUAL 1427 24 0691 1645 +1243 RAL BETA TO BETA 1645 65 1503 0908 +1244 ALO ONE PLUS ONE 0908 15 0630 1888 +1245 SLO U FINI 1888 16 0515 0691 +1246 CHGOP STD FINI CHGE1 OP OF 1513 24 0691 1695 +1247 CHGE1 ALO CHG1 CONTENTS OF 1695 15 0648 1754 +1248 LDD CHG2 LOWER 1754 69 0958 1614 +1249 SDA CHG2 8002 CHANGED BY 1614 22 0958 8002 +1250 CHG1 RAL 0000 CONTENTS OF 0648 65 0000 1406 +1251 BMI CHG3 TEMP4 1406 46 1459 1410 +1252 SLO TEMP4 CHG2 1459 16 0788 0958 +1253 CHG3 ALO TEMP4 CHG2 1410 15 0788 0958 +1254 CHG2 STL 0000 FINI 0958 20 0000 0691 +1255 POWR LDD GETEK IS PREV FLT 1878 69 1782 1432 +1256 NZE POWR1 POWRF IF SO IS 1782 45 1938 1988 +1257 POWR1 RAL V1 PREV IN ACC 1938 65 0488 1745 +1258 NZE POWR4 ALTR IF NOT 1745 45 0698 1149 +1259 LDD POWR4 ALTR 1149 69 0698 1099 +1260 POWR4 RAL ARITH IF PRES FIX 0698 65 0358 1664 +1261 NZE POWR2 COMPILE 1664 45 1918 1720 +1262 RAL FOURT FLOAT 1720 65 1091 1795 +1263 LDD LDSR AND SET 1795 69 0748 1038 +1264 RAL ONET OPSGN TO 0748 65 0356 1714 +1265 STL ARITH POWR2 ONE 1714 20 0358 1918 +1266 POWR2 RAL ONET COMPILE 1918 65 0356 1764 +1267 LDD PWR1 LDSR LDD LOG 1764 69 1370 1038 +1268 POWRF LDD POWR3 ALTR IF PREV FIX 1988 69 1891 1099 +1269 POWR3 RAL ARITH ALTR 1891 65 0358 1814 +1270 STL V1 COMPILE 1814 20 0488 1941 +1271 ALO TENT OPLD 1941 15 1845 1199 +1272 OPLD LDD OUT LDSR 1199 69 0976 1038 +1273 OPWK ALO K COMPILES 1700 15 0146 1601 +1274 ALO W OPWK1 OPN WK NEXT 1601 15 1354 1509 +1275 OPWK1 LDD OPWK2 OSGN1 1509 69 1864 1313 +1276 OPWK2 STU OPSGN OUT 1864 21 0524 0976 +1277 LDSR STD LDSR1 OPSGN ZERO 1038 24 1931 1184 +1278 ALO LDSR2 COMPILES 1184 15 1689 1895 +1279 LDD OSGN1 LDD0000LOWR 1895 69 0798 1313 +1280 STU OPSGN LDSR1 PLUS 9000 0798 21 0524 1931 +1281 LDSR1 HLT LDSR1 LDSR1 1931 01 1931 1931 +1282 LDSR2 LDD 0000 9000 1689 69 0000 9000 +1283 OPACC ALO ACC OPWK1 1750 15 1804 1509 +1284 FL1K RAL AR5 FETCH OPN 1641 65 1945 1249 +1285 LDD TEMP1 ENTRY FROM 1249 69 0509 1914 +1286 TLU Q0001 8002 SWITCHING 1914 84 0550 8002 +1287 AR5 RAU 0000 DICTIONARY 1945 60 0000 1456 +1288 SUP TEMP1 ALARM IF 1456 11 0509 1964 +1289 SRT 0004 OPN IS 1964 30 0004 1125 +1290 NZU ALARM INVALID 1125 44 0827 1180 +1291 SLT 0004 8003 IF VALID GO 1180 35 0004 8003 +1292 Q0001 64 0000 FPDV SWITCHING 0550 64 0000 1506 +1293 Q0002 65 0000 FPDV1 DICTIONARY 0551 65 0000 1556 +1294 Q0003 66 0000 FPDV2 FOR ARITHMTC 0552 66 0000 1606 +1295 Q0004 67 0000 FPDV3 SUBGENRATORS 0553 67 0000 1656 +1296 Q0005 78 0000 FPPWR 0554 78 0000 1706 +1297 Q0006 82 0000 FPAD 0555 82 0000 1756 +1298 Q0007 83 0000 FPAD1 0556 83 0000 1806 +1299 Q0008 84 0000 FPAD 0557 84 0000 1756 +1300 Q0009 85 0000 FPAD3 0558 85 0000 1856 +1301 Q0010 87 0000 FPMU 0559 87 0000 1906 +1302 Q0011 88 0000 FPMU1 0560 88 0000 1008 +1303 Q0012 89 0000 FPMU 0561 89 0000 1906 +1304 Q0013 90 0000 FPMU3 0562 90 0000 1058 +1305 Q0014 99 0000 ALARM 0563 99 0000 0827 +1306 FPAD RAL EIGTT OPLD TO ARITH 1756 65 1559 1199 +1307 FPAD1 RAL ALO OPWK GENERATORS 1806 65 0988 1700 +1308 FPMU1 RAL RAU START OF 1008 65 1116 1322 +1309 ALO LOW ARITHMETIC 1322 15 0352 1108 +1310 LDD OSGN1 SUBGENERATRS 1108 69 1166 1313 +1311 STU OPSGN 1166 21 0524 1928 +1312 RAL MPY OPWK 1928 65 1832 1700 +1313 FPMU RAL NINET OPLD 1906 65 1862 1199 +1314 FPDV RAL SIXT OPLD 1506 65 0330 1199 +1315 FPDV1 RAL DVR OPWK 1556 65 1609 1700 +1316 FPDV2 RAL FRTNT OPLD 1606 65 1659 1199 +1317 FPPWR RAL NINET 1706 65 1862 1517 +1318 LDD LDSR 1517 69 1770 1038 +1319 RAL TWOT 1770 65 1823 1929 +1320 LDD NZ2 LDSR 1929 69 0498 1038 +1321 FPAD3 LDD UBETA IS U EQUAL 1856 69 1709 1427 +1322 NZE ADD4 BETA PLUS 1 1709 45 1216 1266 +1323 RSL FIVEO MULTN 1266 66 1054 1759 +1324 ADD4 LDD ALTR ALTR AND 1216 69 1820 1099 +1325 RAL ALO OPACC ALO ACC 1820 65 0988 1750 +1326 FPDV3 LDD ALTR ALTR AND 1656 69 1809 1099 +1327 RAL DVR OPACC DVR ACC 1809 65 1609 1750 +1328 FPMU3 RAU RAU 1058 60 1116 1372 +1329 STU TEMP6 1372 21 1326 1230 +1330 RAL U 1230 65 0515 1870 +1331 LDD CHKOP 1870 69 1873 1376 +1332 STL TEMP4 1873 20 0788 1991 +1333 SLO BMI 1991 16 1339 1995 +1334 STL TEMP5 1995 20 1299 0952 +1335 LDD UBETA 0952 69 1158 1427 +1336 NZE MULT1 1158 45 1316 1366 +1337 RAL ABVAL 1316 65 0366 1422 +1338 NZE MULT3 1422 45 1426 1280 +1339 RSL OFIVE 1280 66 0528 1733 +1340 STL TEMP4 MULT2 1733 20 0788 0692 +1341 MULT3 RAL RAU 1426 65 1116 1472 +1342 ALO LOW 1472 15 0352 1208 +1343 LDD OSGN1 1208 69 1416 1313 +1344 STU OPSGN 1416 21 0524 1330 +1345 STU ABVAL MULT4 1330 21 0366 1920 +1346 MULT2 RAL U 0692 65 0515 1970 +1347 SLO ONE 1970 16 0630 1739 +1348 LDD MULT4 CHGOP 1739 69 1920 1513 +1349 MULT4 LDD ALTR 1920 69 1923 1099 +1350 RAL MPY OPACC 1923 65 1832 1750 +1351 MULT1 RAL ABVAL 1366 65 0366 1522 +1352 NZE MULT3 1522 45 1426 1380 +1353 RAM TEMP4 1380 67 0788 1146 +1354 ALO TEMP6 1146 15 1326 1882 +1355 STL TEMP6 1882 20 1326 1430 +1356 RAL BETA 1430 65 1503 1258 +1357 LDD CHKOP 1258 69 1466 1376 +1358 NZE MLT7A 1466 45 1572 1622 +1359 ALO OONE 1572 15 0832 1789 +1360 NZE MULT6 1789 45 0742 1196 +1361 RSM TEMP4 MLT7B 1196 68 0788 1246 +1362 MLT7A RAM TEMP4 MLT7B 1622 67 0788 1246 +1363 MLT7B SLO OFIVE 1246 16 0528 1783 +1364 STL TEMP4 MULT7 1783 20 0788 0792 +1365 MULT7 RAL BETA 0792 65 1503 1308 +1366 SLO ONE 1308 16 0630 1839 +1367 LDD CHGOP 1839 69 0842 1513 +1368 RAL TEMP5 MULTN 0842 65 1299 1759 +1369 MULTN STL TEMP4 1759 20 0788 0892 +1370 RAL BETA 0892 65 1503 1358 +1371 LDD OPWK2 CHGOP 1358 69 1864 1513 +1372 MULT8 RAL BETA 1800 65 1503 1408 +1373 STL U 1408 20 0515 1968 +1374 LDD CHGOP 1968 69 1672 1513 +1375 STL TEMP5 1672 20 1299 1002 +1376 BMI MULT9 1002 46 1458 1508 +1377 RAU OONE MULT9 1458 60 0832 1508 +1378 MULT9 STU OPSGN 1508 21 0524 1480 +1379 RAL TEMP6 1480 65 1326 1932 +1380 ALO LOW 1932 15 0352 1558 +1381 LDD OSGN1 1558 69 1516 1313 +1382 STU OPSGN 1516 21 0524 1530 +1383 RAM TEMP5 1530 67 1299 1854 +1384 LDD OUT OSGN1 1854 69 0976 1313 +1385 MULT6 RAL TEMP5 0742 65 1299 1904 +1386 STL TEMP4 MULT8 1904 20 0788 1800 +1387 YI RAL Y CI1 1174 65 1580 1181 +1388 YL RAL TWO 1028 65 0148 1608 +1389 LDD YI SETEL 1608 69 1174 1250 +1390 YMTX RAU ONE YMTX1 V IS ONE 0930 60 0630 1353 +1391 YMTX1 AUP RAL COMPILE 1353 10 0968 1973 +1392 AUP I RAL I 0000 1973 10 1477 1833 +1393 LDD PS7 PLUS V 1833 69 1889 0800 +1394 RAL U BETA IS U 1889 65 0515 1722 +1395 SLO ONE MINUS ONE 1722 16 0630 1939 +1396 STL BETA 1939 20 1503 1658 +1397 STU ABVAL ABVAL ZERO 1658 21 0366 1772 +1398 LDD YMTX2 1772 69 1175 1630 +1399 STD OUT FPMU3 1630 24 0976 1058 +1400 YMTX2 RSL ONET DECREMENT 1175 66 0356 1566 +1401 LDD SETJN JNU 1566 69 1822 1225 +1402 ALO ALO COMPILE 1822 15 0988 1296 +1403 ALO PHI ALO PHIJNU 1296 15 1324 1680 +1404 LDD OSGN1 1680 69 1883 1313 +1405 RAL M R EQUALS 1883 65 1612 1567 +1406 SLO OONE LEFT PAREN 1567 16 0832 1989 +1407 STL R PS3G YL OR CL 1989 20 0340 0668 +1408 YN RAL Y CN1 V EQUALS Y 0954 65 1580 1231 +1409 ZN LDD SRN GENERATE N 0826 69 1730 1100 +1410 LDD WY GENN 1730 69 1068 1681 +1411 CHKAR STD OUT ALARM IF 0751 24 0976 1780 +1412 RAL ARITH FLOATING 1780 65 0358 1616 +1413 NZE ALARM OUT 1616 45 0827 0976 +1414 CHKNK STD FINI ALARM IF K 1374 24 0691 1346 +1415 RAU NU AND NU 1346 60 0700 1708 +1416 AUP K NON ZERO 1708 10 0146 1651 +1417 NZU ALARM FINI 1651 44 0827 0691 +1418 CHKNN STD EXIT ALARM IF N 0658 24 0644 1547 +1419 SRT 0004 IS MORE 1547 30 0004 1758 +1420 ALO TYPE3 1758 15 1666 1872 +1421 NZU SRN6 THAN 2000 1872 44 1335 1476 +1422 SLO 8001 1476 16 8001 1933 +1423 SRT 0006 EXIT DIGITS 1933 30 0006 0644 +1424 CHKOP STD FINI 1376 24 0691 1396 +1425 ALO 8002 1396 15 1349 8002 +1426 67 9999 1349 67 9999 1808 +1427 SLT 0002 1808 35 0002 1716 +1428 SLO 8002 1716 16 8002 1275 +1429 SRT 0002 1275 30 0002 1284 +1430 ALO RAL FINI 1284 15 0968 0691 +1431 CHKTK STD OUT 0890 24 0976 1830 +1432 RAL K FETCH TK 1830 65 0146 1701 +1433 ALO 8002 1701 15 1858 8002 +1434 RAL T0001 OUT 1858 65 0042 0976 +1435 COMMA STD OUT INCREMENT 1173 24 0976 1880 +1436 RAL ONET JNU 1880 65 0356 1766 +1437 LDD SETJN THEN 1766 69 1922 1225 +1438 SLO ONE COMPILE 1922 16 0630 1240 +1439 ALO STL STL PHIJNU 1240 15 0636 0942 +1440 ALO PHI MINUS ONE 0942 15 1324 1930 +1441 LDD OSGN1 1930 69 1334 1313 +1442 STU OPSGN 1334 21 0524 1384 +1443 RAL 8003 OUT 1384 65 8003 0976 +1444 DROPK STD OUT DECREMENT 1721 24 0976 1434 +1445 RAL K K 1434 65 0146 1751 +1446 SLO ONE 1751 16 0630 1290 +1447 STL K OUT 1290 20 0146 0976 +1448 DROPU STD EXIT DECRMNT U 0893 24 0644 1597 +1449 RAL U 1597 65 0515 1972 +1450 SLO ONE 1972 16 0630 1340 +1451 STL U EXIT 1340 20 0515 0644 +1452 GENN STD OUT 1681 24 0976 1484 +1453 LDD STBTA 1484 69 1390 0884 +1454 LDD SRAC 1390 69 1446 1150 +1455 LDD OSGN1 1446 69 1399 1313 +1456 STU OPSGN OUT 1399 21 0524 0976 +1457 GETEK STD EXIT GET PRESENT 1432 24 0644 1647 +1458 RAL K EK VALUE 1647 65 0146 1801 +1459 ALO 8002 1801 15 1908 8002 +1460 RAL E0001 EXIT 1908 65 0374 0644 +1461 NGLFT STD OUT 0947 24 0976 1534 +1462 RAL D0004 1534 65 0035 1440 +1463 STL L 1440 20 0529 1584 +1464 STU V1 1584 21 0488 0992 +1465 RAL ABVAL 0992 65 0366 1624 +1466 NZE NGLNA 1624 45 1634 1684 +1467 RAL U 1634 65 0515 1674 +1468 LDD CHKOP 1674 69 1734 1376 +1469 ALO OTWO 1734 15 0768 1724 +1470 NZE NGLNB 1724 45 1784 1834 +1471 RAL OONE NGLNB 1834 65 0832 1784 +1472 NGLNB STL TEMP4 1784 20 0788 1042 +1473 LDD OUT UCHGE 1042 69 0976 0797 +1474 NGLNA LDD STBTA 1684 69 1490 0884 +1475 RAL RSL 1490 65 0344 1449 +1476 ALO LOW 1449 15 0352 1859 +1477 LDD OSGN1 1859 69 1816 1313 +1478 STU OPSGN OUT 1816 21 0524 0976 +1479 NUINC STD OUT 1274 24 0976 1884 +1480 RAL NU NU EQUALS NU 1884 65 0700 1909 +1481 AUP 8002 PLUS ONE 1909 10 8002 1617 +1482 AUP ONE AND 1617 10 0630 1540 +1483 STU NU JNU EQUALS 1540 21 0700 1460 +1484 AUP NU2 JNUMINUSONE 1460 10 1866 1774 +1485 ALO NU1 8002 1774 15 1934 8002 +1486 NU1 LDD J0001 8003 1934 69 1977 8003 +1487 NU2 STD J0001 OUT 1866 24 1977 0976 +1488 NUMIN STD OUT 1581 24 0976 1590 +1489 RAL NU NU EQUALS NU 1590 65 0700 1510 +1490 SLO ONE MINUS ONE 1510 16 0630 1640 +1491 STL NU OUT 1640 20 0700 0976 +1492 SETEK STD EXIT SET EK 1134 24 0644 1697 +1493 RAU ARITH EQUAL TO 1697 60 0358 1916 +1494 ALO K ARTHH 1916 15 0146 1851 +1495 ALO 8002 1851 15 1560 8002 +1496 STU E0001 EXIT 1560 21 0374 0644 +1497 SETEL STD EXIT SET VARIABLE 1250 24 0644 1747 +1498 STL LDSR1 TYPE 1747 20 1931 1690 +1499 RAL R SET L EQUAL 1690 65 0340 1496 +1500 STL L EXIT TO R 1496 20 0529 0644 +1501 SETJN STD EXIT JNU EQUALS 1225 24 0644 1797 +1502 STL TEMP1 JNU PLUS 1797 20 0509 1966 +1503 RAL NU 1966 65 0700 1610 +1504 ALO STJN1 CONTENTS 1610 15 1667 1824 +1505 LDD STJN2 1824 69 1740 1546 +1506 SDA STJN2 8002 OF LOWER 1546 22 1740 8002 +1507 STJN1 RAL J0001 1667 65 1977 1790 +1508 ALO TEMP1 STJN2 1790 15 0509 1740 +1509 STJN2 STL J0001 1740 20 1977 1840 +1510 SLT 0004 EXIT 1840 35 0004 0644 +1511 STBTA STD EXIT 0884 24 0644 1847 +1512 RAL U 1847 65 0515 1874 +1513 STL BETA EXIT 1874 20 1503 0644 +1514 STNON STD EXIT 0911 24 0644 1897 +1515 LDD PS100 1897 69 1850 1035 +1516 AUP NONON EXIT 1850 10 0634 0644 +1517 STREL LDD L SET RELATION 0836 69 0529 1890 +1518 STD RELAT 8003 TYPE 1890 24 0632 8003 +1519 TKOP STD FINI STORE OPN 1223 24 0691 1596 +1520 RAU K IN TK 1596 60 0146 1901 +1521 AUP TKOP1 AND 1901 10 1660 1717 +1522 LDD R 8003 EXIT FROM 1717 69 0340 8003 +1523 TKOP1 STD T0001 FINI FINI 1660 24 0042 0691 +1524 UCHGE STD FINI U EQUALS U 0797 24 0691 1646 +1525 RAL U MINUS ONE 1646 65 0515 1924 +1526 SLO ONE CHGE1 1924 16 0630 1695 +1527 LARM STL L SET ERROR 0332 20 0529 1940 +1528 STL R ALARM IDENTIFCTN 1940 20 0340 0827 +1529 ALARM RAU 0000 ALARM 0827 60 0000 1710 +1530 SLT 0001 SUBROUTINE 1710 35 0001 1767 +1531 ALO L DISPLAYS 1767 15 0529 1990 +1532 SLT 0003 L R AND 1990 35 0003 1499 +1533 ALO R STATEMENT 1499 15 0340 1696 +1534 SLT 0002 NR 1696 35 0002 1760 +1535 HLT 1234 PS 1760 01 1234 1234 +1536 END RAL A0001 END AND FNLP 0567 65 0383 1092 +1537 SRT 0004 PUNCHABCONS 1092 30 0004 1810 +1538 STL 1955 AND 1810 20 1955 1860 +1539 RAU 1951 RESERVATION 1860 60 1951 1910 +1540 AUP A0002 CARDS 1910 10 0384 1142 +1541 AUP A0002 1142 10 0384 1192 +1542 STU A0003 1192 21 0385 1242 +1543 AUP 1952 1242 10 1952 1817 +1544 AUP A0002 1817 10 0384 1292 +1545 STU A0004 1292 21 0386 1342 +1546 AUP 1953 1342 10 1953 1867 +1547 AUP A0002 1867 10 0384 1392 +1548 LDD STNON 1392 69 1746 0911 +1549 STU W0004 1746 21 1980 1442 +1550 RAL NONON 1442 65 0634 1492 +1551 STU W0005 1492 21 1981 1542 +1552 STU W0006 1542 21 1982 1592 +1553 STL W0003 1592 20 1979 1642 +1554 RAU NONO 1642 60 0883 1692 +1555 SLT 0004 1692 35 0004 1917 +1556 STU W0002 1917 21 1978 1742 +1557 RAU D0005 1742 60 0036 1792 +1558 STU W0001 1792 21 1977 1842 +1559 LDD PS133 1842 69 1796 0638 +1560 RAU A0001 APCH4 1796 60 0383 1892 +1561 APCH4 SRT 0004 1892 30 0004 1967 +1562 LDD STNON 1967 69 1974 0911 +1563 AUP D0005 1974 10 0036 1942 +1564 STU W0001 1942 21 1977 1992 +1565 RAL A0001 1992 65 0383 1846 +1566 ALO 8002 1846 15 1549 8002 +1567 RAL A0001 1549 65 0383 1896 +1568 STL TEMP1 1896 20 0509 1325 +1569 BMI APCH1 APCH2 1325 46 1946 1996 +1570 APCH2 AUP CNTRL 1996 10 0354 1375 +1571 STU W0010 APCH3 1375 21 1986 1947 +1572 APCH1 RAU D0008 APCH2 1946 60 0039 1996 +1573 APCH3 RAM TEMP1 CKLDD 1947 67 0509 1604 +1574 CKLDD LDD 8003 1604 69 8003 1425 +1575 SDA TEMP1 1425 22 0509 1475 +1576 AUP 8003 1475 10 8003 1997 +1577 SIA TEMP2 1997 23 0490 0848 +1578 SLT 0002 0848 35 0002 1525 +1579 RAU 8003 1525 60 8003 0898 +1580 LDD PS100 0898 69 1052 1035 +1581 AUP NONO 1052 10 0883 0948 +1582 SLT 0004 0948 35 0004 1575 +1583 STU W0002 1575 21 1978 0998 +1584 RAU TEMP1 0998 60 0509 1625 +1585 SRT 0004 1625 30 0004 1048 +1586 LDD STNON 1048 69 1102 0911 +1587 STU W0003 1102 21 1979 1098 +1588 RAU TEMP2 1098 60 0490 1148 +1589 LDD STNON 1148 69 1152 0911 +1590 STU W0004 1152 21 1980 1198 +1591 STL W0005 1198 20 1981 1248 +1592 LDD PS133 1248 69 1202 0638 +1593 RAU A0001 1202 60 0383 1298 +1594 SUP ONE 1298 11 0630 1348 +1595 STU A0001 1348 21 0383 1398 +1596 NZU APCH4 FNLPC 1398 44 1892 1252 +1597 FNLPC STU W0001 1252 21 1977 1448 +1598 STU W0002 1448 21 1978 1498 +1599 STU K 1498 21 0146 1599 +1600 STU JAY FNL1 1599 21 0710 1675 +1601 FNL1 RAU JAY FNL2 1675 60 0710 1725 +1602 FNL2 AUP ONET 1725 10 0356 1775 +1603 STU GAMMA 1775 21 0372 1825 +1604 RAU TYPE4 1825 60 1548 1875 +1605 STU W0010 1875 21 1986 1598 +1606 RAL FNL3 1598 65 1302 1925 +1607 ALO K 8002 1925 15 0146 8002 +1608 FNL3 RAL D0001 1302 65 0032 1648 +1609 STL W0003 1648 20 1979 1698 +1610 STL TEMP2 1698 20 0490 1748 +1611 RAU GAMMA 1748 60 0372 1798 +1612 LDD PS100 1798 69 1352 1035 +1613 AUP YOU 1352 10 1975 1848 +1614 STU W0004 1848 21 1980 1898 +1615 LDD PS133 1898 69 1402 0638 +1616 RAL FNL4 1402 65 1526 1948 +1617 ALO K 8002 1948 15 0146 8002 +1618 FNL4 RAL 1951 1526 65 1951 1576 +1619 STL TEMP1 1576 20 0509 1626 +1620 ALO GAMMA 1626 15 0372 1998 +1621 STL JAY 1998 20 0710 1676 +1622 SLO GAMMA 1676 16 0372 1649 +1623 NZE FNL5 1649 45 1452 1726 +1624 RAL 8001 1726 65 8001 1699 +1625 SLO ONET 1699 16 0356 1776 +1626 STL GAMMA FNL5 1776 20 0372 1452 +1627 FNL6 PCH W0001 1900 71 1977 1749 +1628 RAU K 1749 60 0146 1502 +1629 AUP ONE 1502 10 0630 1799 +1630 STU K 1799 21 0146 1849 +1631 SUP FIVE 1849 11 1552 1826 +1632 NZU FNL1 9876 FINISH 1826 44 1675 9876 +1633 FNL5 RAU TYPE3 1452 60 1666 1876 +1634 STU W0010 1876 21 1986 1899 +1635 RAU JAY 1899 60 0710 1926 +1636 LDD STNON 1926 69 1949 0911 +1637 STU W0004 1949 21 1980 1950 +1638 RAU GAMMA 1950 60 0372 1602 +1639 AUP ONET 1602 10 0356 1976 +1640 LDD STNON 1976 69 1652 0911 +1641 AUP TEMP2 1652 10 0490 1702 +1642 STU W0003 FNL6 1702 21 1979 1900 +1643 ONET 00 0000 0001 0356 00 0000 0001 +1644 TWOT 00 0000 0002 1823 00 0000 0002 +1646 FOURT 00 0000 0004 1091 00 0000 0004 +1647 FIVET 00 0000 0005 0922 00 0000 0005 +1648 SIXT 00 0000 0006 0330 00 0000 0006 +1649 SEVNT 00 0000 0007 1160 00 0000 0007 +1650 EIGTT 00 0000 0008 1559 00 0000 0008 +1651 NINET 00 0000 0009 1862 00 0000 0009 +1652 TENT 00 0000 0010 1845 00 0000 0010 +1653 TWLVT 00 0000 0012 1494 00 0000 0012 +1654 FRTNT 00 0000 0014 1659 00 0000 0014 +1655 SXTNT 00 0000 0016 1224 00 0000 0016 +1656 SVNTT 00 0000 0017 0696 00 0000 0017 +1657 NNTEN 00 0000 0019 0592 00 0000 0019 +1658 TWSIX 00 0000 0026 1000 00 0000 0026 +1659 SIXTR 00 0000 0063 1465 00 0000 0063 +1660 NINTY 00 0000 0090 0360 00 0000 0090 +1661 ONE 00 0001 0000 0630 00 0001 0000 +1662 TWO 00 0002 0000 0148 00 0002 0000 +1663 THREE 00 0003 0000 1131 00 0003 0000 +1664 FOUR 00 0004 0000 1200 00 0004 0000 +1665 FIVE 00 0005 0000 1552 00 0005 0000 +1666 SIX 00 0006 0000 0520 00 0006 0000 +1667 SEVEN 00 0007 0000 1589 00 0007 0000 +1668 FFTY1 00 0051 0000 0357 00 0051 0000 +1669 OONE 01 0000 0000 0832 01 0000 0000 +1670 OTWO 02 0000 0000 0768 02 0000 0000 +1671 OTREY 03 0000 0000 0888 03 0000 0000 +1672 OFIVE 05 0000 0000 0528 05 0000 0000 +1673 FRONE 41 0000 0000 1431 41 0000 0000 +1674 FIVEO 50 0000 0000 1054 50 0000 0000 +1675 SVTY2 72 0000 0000 1568 72 0000 0000 +1676 NINEO 90 0000 0000 0874 90 0000 0000 +1677 ALO 15 0000 0000 0988 15 0000 0000 +1678 MPY 19 0000 0000 1832 19 0000 0000 +1679 STL 20 0000 0000 0636 20 0000 0000 +1680 NZE 45 0000 0000 1132 45 0000 0000 +1681 BMI 46 0000 0000 1339 46 0000 0000 +1682 RAU 60 0000 0000 1116 60 0000 0000 +1683 DVR 64 0000 0000 1609 64 0000 0000 +1684 RAL 65 0000 0000 0968 65 0000 0000 +1685 RSL 66 0000 0000 0344 66 0000 0000 +1686 RAM 67 0000 0000 0894 67 0000 0000 +1687 ABCON 00 5000 0000 0776 00 5000 0000 +1688 ACC 00 0001 0000 1804 00 0001 0000 +1689 ACCUM ACC 0737 61 6363 0000 +1690 C 00 3000 0000 1277 00 3000 0000 +1691 CNTRL 00 0000 8000 0354 00 0000 8000 +1692 EXT 00 0000 9000 0690 00 0000 9000 +1693 FIXNR 00 0000 0501 0870 00 0000 0501 +1694 GO 00 4000 4000 1016 00 4000 4000 +1695 LDAC LDD 0001 8002 1415 69 0001 8002 +1696 I 00 1000 0000 1477 00 1000 0000 +1697 LOCUS 73 6161 6161 0918 73 6161 6161 +1698 LOW 00 8002 0000 0352 00 8002 0000 +1699 LOW1 00 0000 8002 0980 00 0000 8002 +1700 M M 1612 74 0000 0000 +1701 MAX 00 0000 0025 0029 00 0000 0025 +1702 MAXE 00 0000 0500 0542 00 0000 0500 +1703 MAXU 00 0143 0000 0671 00 0143 0000 +1704 NONO 00 0000 9090 0883 00 0000 9090 +1705 NONON 00 9090 9090 0634 00 9090 9090 +1706 P P 1317 77 0000 0000 +1707 PHI 00 6000 0000 1324 00 6000 0000 +1708 SLTI3 35 1003 0000 0499 35 1003 0000 +1709 STLA1 STL 0001 0000 1004 20 0001 0000 +1710 STORE 06 0051 0000 0030 06 0051 0000 +1711 TEMP9 73 6161 6161 0853 73 6161 6161 +1712 TYPE3 80 0000 8000 1666 80 0000 8000 +1713 TYPE4 88 0000 8000 1548 88 0000 8000 +1714 W 00 7000 0000 1354 00 7000 0000 +1715 WDIF 69 6600 0000 1059 69 6600 0000 +1716 Y 00 2000 0000 1580 00 2000 0000 +1717 YOU U0000 1975 84 9090 9090 +1718 Z Z 1407 89 0000 0000 + PSI 00 0000 0000 0041 00 0000 0000 + TALLY 00 0000 0000 0373 00 0000 0000 + GAMMA 00 0000 0000 0372 00 0000 0000 + L 00 0000 0000 0529 00 0000 0000 + U 00 0000 0000 0515 00 0000 0000 + QUOTA 00 0000 0000 0531 00 0000 0000 + V1 00 0000 0000 0488 00 0000 0000 + K 00 0000 0000 0146 00 0000 0000 + NU 00 0000 0000 0700 00 0000 0000 + N 00 0000 0000 0484 00 0000 0000 + NBAR 00 0000 0000 0342 00 0000 0000 + MU 00 0000 0000 0750 00 0000 0000 + ARITH 00 0000 0000 0358 00 0000 0000 + ABVAL 00 0000 0000 0366 00 0000 0000 + OPSGN 00 0000 0000 0524 00 0000 0000 + RELAT 00 0000 0000 0632 00 0000 0000 + R 00 0000 0000 0340 00 0000 0000 + INTGR 00 0000 0000 0538 00 0000 0000 + TEMP1 00 0000 0000 0509 00 0000 0000 + UBAR 00 0000 0000 0516 00 0000 0000 + TEMP2 00 0000 0000 0490 00 0000 0000 + TEMP3 00 0000 0000 0709 00 0000 0000 + TEMP4 00 0000 0000 0788 00 0000 0000 + TEMP5 00 0000 0000 1299 00 0000 0000 + TEMP6 00 0000 0000 1326 00 0000 0000 + JAY 00 0000 0000 0710 00 0000 0000 + BETA 00 0000 0000 1503 00 0000 0000 + FLOP1 00 0000 0000 1047 00 0000 0000 + CHI 00 0000 0000 1831 00 0000 0000 + STAR 00 0000 0000 1188 00 0000 0000 + EL 00 0000 0000 0746 00 0000 0000 + 1 5 + 2 5 CARNEGIE TECH COMPILER IT + 3 5 DECEMBER 18 1957 + 4 5 + 5 5 ERRATA BUGFIX + 6 5 +1442X STU OPSGN 1334 21 0524 1902 +1442A STD V1 1384 1902 24 0488 1384 + 1 5 + 2 5 CARNEGIE TECH COMPILER IT + 3 5 APRIL 18 1958 + 4 5 + 5 5 ERRATA BUGFIX + 6 5 + 341X SUP A0001 OUT IF JAY 1065 11 0383 1137 +A341X STU NEWAB 0887 1137 21 0845 0887 + 603X BS LDD DROPU DCRMNT U 0987 69 0690 0893 +A603X RAL NEWAB 0690 65 0845 0298 +B603X NZE BSA 0640 0298 45 0786 0640 + 606X STL A0001 BSA 1485 20 0383 0786 + 607X BSA RAU N BN1 0786 60 0484 1039 + 650X LDD 1377 LDSR COMPILE 1413 69 1377 1038 + X NEWAB 00 0000 0000 0845 00 0000 0000 + 1 5 + 2 5 CARNEGIE TECH COMPILER IT + 3 5 NO DATE + 4 5 + 5 5 ERRATA BUGFIX + 6 5 + 793X LDD ML1A TKNZ1 TKNZ1AND ML1 0940 69 1802 1094 + 799X MY1 LDD ML1A TKNZ2 1178 69 1802 1194 +A793X ML1A SLO 8002 1802 16 8002 1852 +B793X STL ABVAL ML1 1852 20 0366 1291 + 804X LDD 1971 GENN RAL AJAY 1139 69 1971 1681 + + + + + diff --git a/I650/sw/it_example_1_data.txt b/I650/sw/it_example_1_data.txt new file mode 100644 index 00000000..fe4ab385 --- /dev/null +++ b/I650/sw/it_example_1_data.txt @@ -0,0 +1,12 @@ +02+ 1 11000000050 +03+ 1 902100000005! +03+ 2 9022000000050 +03+ 3 9033000000050 +03+ 4 9044000000050 +03+ 5 9055000000050 +03+ 6 9066000000050 +03+ 7 9077000000050 +03+ 8 9088000000050 +03+ 9 9099000000050 ++3 10 210000000511100000051 +01+ 5 80! 11 diff --git a/I650/sw/it_example_1_out.txt b/I650/sw/it_example_1_out.txt new file mode 100644 index 00000000..d5efd40d --- /dev/null +++ b/I650/sw/it_example_1_out.txt @@ -0,0 +1 @@ + 3 ~ ~ ~d diff --git a/I650/sw/it_example_1_src.txt b/I650/sw/it_example_1_src.txt new file mode 100644 index 00000000..13dbf98f --- /dev/null +++ b/I650/sw/it_example_1_src.txt @@ -0,0 +1,8 @@ ++0000000050000000002000000001100000000070000000000001725 + +0001+ read f rd dta +0002+ y2 z 0j f set p +0003+ 4k i1k i5k m1k 1k f i loop +0004+ y2 z ci1 s y1 x y2 f new p +0005+ t y2 t i5 f pch p +0007+ h ff stop diff --git a/I650/sw/it_example_2_src.txt b/I650/sw/it_example_2_src.txt new file mode 100644 index 00000000..d32e3d21 --- /dev/null +++ b/I650/sw/it_example_2_src.txt @@ -0,0 +1,62 @@ ++ 2 0 50 10 1672 + + 1+ 2k i1k 1k 1k 50k f c1 to + 2+ ci1 z 1j f c50=1 + + i1 z 1 f n=1 + 3+ i1 z i1 s 1 f n=n+1 + + g 5 if i1 w 50 f gt 50 + + g 3 if ci1 u 0j f c(n)=0 + + i2 z i1 f m=n + 4+ i2 z i2 s i1 f m=m+n + + g 3 if i2 w 50 f gt 50 + + ci2 z 0j f c(m)=0 + + g 4 f goto 4 + 5+ i1 z 1 f n=1 + 6+ i1 z i1 s 1 f n=n+1 + + g 10 if i1 w 50 f gt 50 + + g 8 if ci1 u 0j f c(n)=0 + 7+ t i1 f pch n + 8+ g 6 f goto 6 + 10+ h ff stop + + +prime number generator using the sieve of eratosthenes +converted to ibm 650 IT compliler + + IT system syntax IT notation in manual c-like equivalent syntax + + 1+ 2k i1k 1k 1k 50k 1: 2,i1,1,1,50, for(num=1,num<=50;num++) + 2+ ci1 z 1j 2: ci1 <- 1. prime(num) = 1.0 + + + i1 z 1 i1 <- 1 num=1 + + 3+ i1 z i1 s 1 3: i1 <- i1 + 1 loop1: num++ + + g 5 if i1 w 50 g 5 if i1 >= 50 if num >= 50 goto loope + + + g 3 if ci1 u 0j g 3 if ci1 = 0. if prime(num)=0 goto loop1 + + i2 z i1 i2 <- i1 mult=num + + 4+ i2 z i2 s i1 4: i2 <- i2 + i1 loop2: mult=mult+num + + g 3 if i2 w 50 g 3 if i2 >= 50 if mult >= 50 goto loop1 + + + ci2 z 0j ci2 <- 0. prime(mult) = 0.0 + + g 4 g 4 goto loop2 + + 5+ i1 z 1 5: i1 <- 1 loope: num = 1 + 6+ i1 z i1 s 1 i1 <- i1 + 1 prt1: num++ + + g 10 if i1 w 50 g 10 if i1 >= 50 if num >= 50 goto prt3 + + + g 8 if ci1 u 0j g 8 if ci1 = 0. if prime(num)=0 goto prt2 + 7+ t i1 t i1 punch num + 8+ g 6 g 6 prt2: goto prt1 +10+ h h prt3: end + +control card is calculated as follows + +number of i integer variables: 2 (i1 and i2) +number of y float variables: 0 +number of c float variables: 50 (ci1 ranges from c1 to c50) +higher statement number: 10 +using run time package p1 (265 words) +mem avail N = 1999 - (2 + 0 + 50 + 10 + 265) = 1672 + diff --git a/I650/sw/it_package_p1.dck b/I650/sw/it_package_p1.dck new file mode 100644 index 00000000..d4c8bd0f --- /dev/null +++ b/I650/sw/it_package_p1.dck @@ -0,0 +1,254 @@ +6I1954195C 0000241833800?2417861789 e00aistdarthxai1 1-add +6I1954195C 0000241789800?2017941799 ai1 stlarthg 2- +6I1954195C 0000241799800?6918021805 ldd arthb 3- +6I1954195C 0000241802800?6780021767 ram 8002 4-store acc +6I1954195C 0000241767800?2017721894 stlarthf 5-power +6I1954195C 0000241894800?1819021759 smlarthe 6- +6I1954195C 0000241759800?3500011766 slt 0001 7- +6I1954195C 0000241766800?4417731771 nzuai12 8-find max +6I1954195C 0000241771800?6917741777 lddai3a 9- +6I1954195C 0000241777800?3000051790 srt 0005 10-power +6I1954195C 0000241790800?2217931796 sdaai3 11-set expnnts +6I1954195C 0000241796800?4618991754 bmi ai2 12-and then +6I1954195C 0000241899800?6719021817 ramarthe 13-perform +6I1954195C 0000241817800?2017721776 stlarthf 14-addition +6I1954195C 0000241776800?6517881943 ralarthh 15- +6I1954195C 0000241943800?6918241793 lddarthmai3 16- +6I1954195C 0000241793800?3000001811 ai3 srt 0000ai3b 17- +6I1954195C 0000241774800?3000001811 ai3a srt 0000ai3b 18- +6I1954195C 0000241811800?1580011770 ai3b alo 8001ai5 19- +6I1954195C 0000241754800?6518241779 ai2 ralarthm 20- +6I1954195C 0000241779800?6917881793 lddarthhai3 21- +6I1954195C 0000241770800?6080021780 ai5 rau 8002 22-clear arthe +6I1954195C 0000241780800?2019021762 stlarthearths 23-to scale +6I1954195C 0000241773800?4617781828 ai12 bmi ai13 24- +6I1954195C 0000241778800?6517941904 ralarthgai10 25- +6I1954195C 0000241828800?6500001786 ai13 ralacc arthx 26- +6I1954195C 0000241805800?2418081826 arthbstdarthy 27-break up exp +6I1954195C 0000241826800?3500081996 slt 0008 28-and mantissa +6I1954195C 0000241996800?2019021755 stlarthe 29-store power +6I1954195C 0000241755800?6080031763 rau 8003 30-and mantissa +6I1954195C 0000241763800?3500011769 slt 0001 31-of lower +6I1954195C 0000241769800?2118241997 stuarthm 32- +6I1954195C 0000241997800?6000001855 rauacc 33- +6I1954195C 0000241855800?3000021761 srt 0002 34-store power +6I1954195C 0000241761800?1680021819 slo 8002 35-and mantissa +6I1954195C 0000241819800?3500011775 slt 0001 36-of acc +6I1954195C 0000241775800?1580011783 alo 8001 37- +6I1954195C 0000241783800?2117881808 stuarthharthy 38- +6I1954195C 0000241762800?3600001782 arthssct 0000 39-normalize +6I1954195C 0000241782800?4719421787 bovai6 40-brnch if zro +6I1954195C 0000241787800?2017941797 stlarthg 41-shift count +6I1954195C 0000241797800?6580031905 ral 8003 42-round on +6I1954195C 0000241905800?3100021813 srd 0002 43-ninth digit +6I1954195C 0000241813800?3500021869 slt 0002 44-check for +6I1954195C 0000241869800?2018241877 stlarthm 45-roundoff +6I1954195C 0000241877800?4418311834 nzuai7 ai8 46-overflow +6I1954195C 0000241834800?6780031841 ai8 ram 8003 47-and +6I1954195C 0000241841800?1817941800 smlarthg 48-correct if +6I1954195C 0000241800800?1519031822 aloaj2 49-necessary +6I1954195C 0000241822800?3500081791 slt 0008 50- +6I1954195C 0000241791800?6580021849 ral 8002 51- +6I1954195C 0000241849800?1719021757 amlarthe 52- +6I1954195C 0000241757800?1517721827 aloarthf 53- +6I1954195C 0000241827800?4617521781 bmiai11a 54-pwr too smal +6I1954195C 0000241781800?4417851836 nzuai11 55-pwr too lrge +6I1954195C 0000241836800?3500021893 slt 0002 56- +6I1954195C 0000241893800?2119981901 stuacc1 57- +6I1954195C 0000241901800?6518241829 ralarthm 58- +6I1954195C 0000241829800?4619441995 bmi ai9 59-combine +6I1954195C 0000241944800?1619981904 sloacc1 ai10 60- +6I1954195C 0000241904800?2000001786 ai10 stlacc arthx 61-and +6I1954195C 0000241995800?1519981904 ai9 aloacc1 ai10 62- +6I1954195C 0000241831800?3000011792 ai7 srt 0001 63-adjust +6I1954195C 0000241792800?2018241927 stlarthm 64- +6I1954195C 0000241927800?3500011834 slt 0001ai8 65- +6I1954195C 0000241942800?6580031904 ai6 ral 8003ai10 66- +6I1954195C 0000241832800?2417861839 e00ajstdarthx 67-multiply +6I1954195C 0000241839800?6918521805 ldd arthb 68- +6I1954195C 0000241852800?6780021867 ram 8002 69-acc power +6I1954195C 0000241867800?1618201825 sloaj1 70-minus 48 +6I1954195C 0000241825800?2017721875 stlarthf 71- +6I1954195C 0000241875800?6017881756 rauarthh 72- +6I1954195C 0000241756800?1918241762 mpyarthmarths 73- +6I1954195C 0000241830800?2417861889 e00agstdarthxag1 74-divide +6I1954195C 0000241889800?6918421805 ag1 ldd arthb 75-is divisor +6I1954195C 0000241842800?4418121846 nzu ag3 76-zer0 +6I1954195C 0000241812800?6880021821 rsm 8002 77-divisor +6I1954195C 0000241821800?1518761895 aloag2 78-power minus +6I1954195C 0000241895800?2017721768 stlarthf 79-49 +6I1954195C 0000241768800?6018241879 rauarthm 80-sh1ft +6I1954195C 0000241879800?3000011885 srt 0001 81-dividend +6I1954195C 0000241885800?6417881803 dvrarthh 82-do divide +6I1954195C 0000241803800?6080021762 rau 8002arths 83- +6I1954195C 0000241882800?2417861989 e00aostdarthx 84-div reverse +6I1954195C 0000241989800?2018431896 stlacc2 85- +6I1954195C 0000241896800?6500001810 ralacc 86- +6I1954195C 0000241810800?6918431897 lddacc2 87- +6I1954195C 0000241897800?2400001889 stdacc ag1 88- +6I1954195C 0000241947800?2418581911 e00afstdacc6 89-fl0at to lwr +6I1954195C 0000241911800?6919251928 lddae4 e00ae 90-and acc +6I1954195C 0000241925800?2000001858 ae4 stlacc acc6 91- +6I1954195C 0000241928800?2417861840 e00aestdarthx 92-float to lwr +6I1954195C 0000241840800?6080021753 rau 8002 93-only +6I1954195C 0000241753800?3600001975 sct 0000 94-normalize +6I1954195C 0000241975800?2018811784 stlacc3 95- +6I1954195C 0000241784800?4718511890 bovad1 96-zer0 check +6I1954195C 0000241890800?6580031798 ral 8003 97- +6I1954195C 0000241798800?3100021807 srd 0002 98-round for +6I1954195C 0000241807800?3500021764 slt 0002 99-placing exp +6I1954195C 0000241764800?4418181891 nzu ae6 100-check round +6I1954195C 0000241818800?6980031874 ldd 8003 101-overflow +6I1954195C 0000241874800?3000011884 srt 0001 102- +6I1954195C 0000241884800?1580011891 alo 8001ae6 103- +6I1954195C 0000241891800?4618441845 ae6 bmiae2 104-insert +6I1954195C 0000241845800?1518481804 aloaj3 ae5 105-exp0nent +6I1954195C 0000241844800?1618481804 ae2 sloaj3 ae5 106- +6I1954195C 0000241804800?1618811786 ae5 sloacc3 arthx 107- +6I1954195C 0000241932800?2417861990 e00thstdarthx 108-fix l0wer +6I1954195C 0000241990800?3500081859 slt 0008 109-to lower +6I1954195C 0000241859800?2118241878 stuarthm 110- +6I1954195C 0000241878800?6780021887 ram 8002 111-test exp +6I1954195C 0000241887800?1619401945 sloaj5 112-store zer0 +6I1954195C 0000241945800?4618511850 bmiad1 113-if less than +6I1954195C 0000241850800?1618531758 sloaj4 114-50 alarm +6I1954195C 0000241758800?4618611862 bmi ad3 115-1f grtr than +6I1954195C 0000241861800?3000041921 srt 0004 116-59 +6I1954195C 0000241921800?1519241929 aloar7 117- +6I1954195C 0000241929800?6918351838 lddad2a 118-modify +6I1954195C 0000241838800?2219911971 sdaad2 119-shift +6I1954195C 0000241971800?6518241930 ralarthm 120- +6I1954195C 0000241930800?3500021991 slt 0002ad2 121- +6I1954195C 0000241851800?6580031786 ad1 ral 8003arthx 122-store zero +6I1954195C 0000241991800?3000001786 ad2 srt 0000arthx 123-shift c0nst +6I1954195C 0000241835800?3000001786 ad2a srt 0000arthx 124- +6I1954195C 0000241862800?6917863031 ad3 lddarthx 3031 125-fix alarm +6I1954195C 0000241846800?6917863061 ag3 lddarthx 3061 126-divide alarm +6I1954195C 0000241785800?6917863081 ai11 lddarthx 3081 127-scale alarm +6I1954195C 0000241752800?0110811942 ai11ahlt 1081ai6 128- +6I1954195C 0000241876800?4900000000 ag2 49 0000 0000 129- +6I1954195C 0000241820800?4800000000 aj1 48 0000 0000 130- +6I1954195C 0000241903800?0000000001 aj2 00 0000 0001 131- +6I1954195C 0000241848800?0000000059 aj3 00 0000 0059 132- +6I1954195C 0000241853800?1000000000 aj4 10 0000 0000 133- +6I1954195C 0000241940800?5000000000 aj5 50 0000 0000 134- +6I1954195C 0000241974800?2419771880 e00aqstdj0001aq1 135-read +6I1954195C 0000241880800?7019761898 aq1 rd1 1976aq3 136- +6I1954195C 0000241898800?6719511806 aq3 ramp0001aq3a 137- +6I1954195C 0000241892800?6719511806 aq3b ramp0001aq3a 138-check for +6I1954195C 0000241806800?4518601837 aq3a nze aq8 139-last word +6I1954195C 0000241860800?6918631816 lddaq5 aq4 140-on card +6I1954195C 0000241816800?2418701873 aq4 stdacc4 141- +6I1954195C 0000241873800?1080031931 aup 8003 142-read in +6I1954195C 0000241931800?3000041941 srt 0004 143-label for +6I1954195C 0000241941800?2317951948 siaacc5 144-present +6I1954195C 0000241948800?1680011856 slo 8001 145-variable +6I1954195C 0000241856800?1518098002 alo 8002 146-get i y 0r c +6I1954195C 0000241809800?6000001987 rau 0000 147-address from +6I1954195C 0000241987800?1017951949 aupacc5 146-abcon dict +6I1954195C 0000241949800?3500041870 slt 0004acc4 149-generate +6I1954195C 0000241863800?1018661857 aq5 aupaq7 150-1nstruction +6I1954195C 0000241857800?1519601965 alop0010 151- +6I1954195C 0000241965800?1519688002 alo 8002 152-get and +6I1954195C 0000241968800?6919528003 lddp0002 8003 153-store word +6I1954195C 0000241866800?2400001907 aq7 std 0000 154- +6I1954195C 0000241907800?6519601915 ralp0010 155-increment +6I1954195C 0000241915800?1519181854 aloaq9 156-word count +6I1954195C 0000241854800?2019601963 stlp0010 157- +6I1954195C 0000241963800?1518928002 aloaq3b 8002 158- +6I1954195C 0000241837800?6519511765 aq8 ralp0001 159-check for +6I1954195C 0000241765800?4619771880 bmij0001aq1 160-last card +6I1954195C 0000241801800?2419551908 e00arstdp0005 161-punch 0ut +6I1954195C 0000241908800?2119791935 stuj0003 162- +6I1954195C 0000241935800?2319581912 siap0008 163-store stmnt +6I1954195C 0000241912800?2119801886 stuj0004 164-number +6I1954195C 0000241886800?2219541909 sdap0004 165-store word +6I1954195C 0000241909800?1680011917 slo 8001 166-count +6I1954195C 0000241917800?4519201872 nzear10 ar9 167-test zero +6I1954195C 0000241920800?2119811814 ar10 stuj0005 168-stmt number +6I1954195C 0000241814800?2419821972 stdj0006 169-set punch +6I1954195C 0000241972800?2419831864 stdj0007 170-band to +6I1954195C 0000241864800?2419841888 stdj0008 171-zeroes +6I1954195C 0000241888800?2419601913 stdp0010ar3 172-set counter +6I1954195C 0000241913800?6519541910 ar3 ralp0004 173- +6I1954195C 0000241910800?1619241936 sloar7 174- +6I1954195C 0000241936800?4619941992 bmiar8 175-test word +6I1954195C 0000241992800?2019541865 stlp0004ar4 176-count +6I1954195C 0000241865800?1518688002 ar4 alo 8002 177-get word +6I1954195C 0000241868800?6519501914 ralp0000 178-label from +6I1954195C 0000241914800?1080031922 aup 8003 179-punch consts +6I1954195C 0000241922800?3500011938 slt 0001 180- +6I1954195C 0000241938800?2219571961 sdap0007 181-modify label +6I1954195C 0000241961800?1680011919 slo 8001 182- +6I1954195C 0000241919800?3000011926 srt 0001 183- +6I1954195C 0000241926800?1519571962 alop0007 184- +6I1954195C 0000241962800?3500041923 slt 0004 185-insert stmnt +6I1954195C 0000241923800?1519581964 alop0008 186-number +6I1954195C 0000241964800?1019601916 aupp0010 187- +6I1954195C 0000241916800?1019698003 aup 8003 188- +6I1954195C 0000241969800?2019771988 stlj0001 189-store label +6I1954195C 0000241988800?6580021900 ral 8002 190-for punching +6I1954195C 0000241900800?6919061816 ldd aq4 191-modify label +6I1954195C 0000241906800?1019661934 aupar6 192-into drum +6I1954195C 0000241934800?1519601967 alop0010 193-loc in read +6I1954195C 0000241967800?1519708003 alo 8003 194-get word +6I1954195C 0000241970800?2419781993 stdj0002 195-store in +6I1954195C 0000241993800?6519601815 ralp0010 196-punch band +6I1954195C 0000241815800?1519181973 aloaq9 197- +6I1954195C 0000241973800?2019601913 stlp0010ar3 196- +6I1954195C 0000241966800?6900008002 ar6 ldd 0000 8002 199- +6I1954195C 0000241924800?0000010000 ar7 00 0001 0000 200- +6I1954195C 0000241994800?7119771955 ar8 pchj0001p0005 201-punch +6I1954195C 0000241872800?6580001937 ar9 ral 8000 202-if stmt nmbr +6I1954195C 0000241937800?4619201955 bmiar10 p0005 203-zro pch only +6I1954195C 0000241918800?0000020000 aq9 00 0002 0000 204-if 8000 neg +6I1954195C 0000241986800?8000008800 j0010 80 0000 8800 205-control cnst +6I1954195C 0000241976800?6719511744 1976ram 1951 206-read +6I1954195C 0000241744800?1080031741 aup 8003 207-up to +6I1954195C 0000241741800?3500041748 slt 0004 208-seven +6I1954195C 0000241748800?2219591737 sdap0009 209-contiguous +6I1954195C 0000241737800?3000041746 srt 0004 210-variables +6I1954195C 0000241746800?6917501816 ldd aq4 211-per card +6I1954195C 0000241750800?6580031749 ral 8003 212- +6I1954195C 0000241749800?1019591740 aupp0009 213- +6I1954195C 0000241740800?1580011751 alo 8001 214- +6I1954195C 0000241751800?1017381742 aupaq9b 215- +6I1954195C 0000241742800?1517451735 aloaq10 aq11 216- +6I1954195C 0000241735800?1117381743 aq11 supaq9b 217- +6I1954195C 0000241743800?4417471837 nzu aq8 218- +6I1954195C 0000241747800?1080011736 aup 8001 219- +6I1954195C 0000241736800?1119241739 supar7 220- +6I1954195C 0000241739800?1680018003 slo 8001 8003 221- +6I1954195C 0000241738800?6919528002 aq9b ldd 1952 8002 222- +6I1954195C 0000241745800?2400001735 aq10 std 0000aq11 223- +6I1954195C 0000241786800?0000000000 arthx 00 0000 0000 - +6I1954195C 0000241794800?0000000000 arthg 00 0000 0000 - +6I1954195C 0000241772800?0000000000 arthf 00 0000 0000 - +6I1954195C 0000241902800?0000000000 arthe 00 0000 0000 - +6I1954195C 0000241788800?0000000000 arthh 00 0000 0000 - +6I1954195C 0000241824800?0000000000 arthm 00 0000 0000 - +6I1954195C 0000241808800?0000000000 arthy 00 0000 0000 - +6I1954195C 0000240000800?0000000000 acc 00 0000 0000 - +6I1954195C 0000241998800?0000000000 acc1 00 0000 0000 - +6I1954195C 0000241843800?0000000000 acc2 00 0000 0000 - +6I1954195C 0000241881800?0000000000 acc3 00 0000 0000 - +6I1954195C 0000241870800?0000000000 acc4 00 0000 0000 - +6I1954195C 0000241795800?0000000000 acc5 00 0000 0000 - +6I1954195C 0000241858800?0000000000 acc6 00 0000 0000 - +6I1954195C 0000241977800?0000000000 j0001 00 0000 0000 - +6I1954195C 0000241978800?0000000000 j0002 00 0000 0000 - +6I1954195C 0000241979800?0000000000 j0003 00 0000 0000 - +6I1954195C 0000241980800?0000000000 j0004 00 0000 0000 - +6I1954195C 0000241981800?0000000000 j0005 00 0000 0000 - +6I1954195C 0000241982800?0000000000 j0006 00 0000 0000 - +6I1954195C 0000241983800?0000000000 j0007 00 0000 0000 - +6I1954195C 0000241984800?0000000000 j0008 00 0000 0000 - +6I1954195C 0000241950800?0000000000 p0000 00 0000 0000 - +6I1954195C 0000241951800?0000000000 p0001 00 0000 0000 - +6I1954195C 0000241952800?0000000000 p0002 00 0000 0000 - +6I1954195C 0000241954800?0000000000 p0004 00 0000 0000 - +6I1954195C 0000241955800?0000000000 p0005 00 0000 0000 - +6I1954195C 0000241957800?0000000000 p0007 00 0000 0000 - +6I1954195C 0000241958800?0000000000 p0008 00 0000 0000 - +6I1954195C 0000241959800?0000000000 p0009 00 0000 0000 - +6I1954195C 0000241960800?0000000000 p0010 00 0000 0000 - diff --git a/I650/sw/it_package_p1_listing.txt b/I650/sw/it_package_p1_listing.txt new file mode 100644 index 00000000..a6a5e4fa --- /dev/null +++ b/I650/sw/it_package_p1_listing.txt @@ -0,0 +1,267 @@ + 5 PACKAGE 1 + 5 CONTAINS FOLLOWING + 5 ROUTINES + 5 E00AI ADDITION + 5 E00AJ MULTIPLICATION + 5 E00AG DIVISION + 5 E00AO DIVIDE REVERSE + 5 E00AF FLOAT TO LOWER AND ACC + 5 E00AE FLOAT TO LOWER + 5 E00AQ READ + 5 E00AR PUNCH + 5 E00TH FIX TO LOWER + 1 E00AI STD ARTHX AI1 ADD 1833 24 1786 1789 + 2 AI1 STL ARTHG 1789 20 1794 1799 + 3 LDD ARTHB 1799 69 1802 1805 + 4 RAM 8002 STORE ACC 1802 67 8002 1767 + 5 STL ARTHF POWER 1767 20 1772 1894 + 6 SML ARTHE 1894 18 1902 1759 + 7 SLT 0001 1759 35 0001 1766 + 8 NZU AI12 FIND MAX 1766 44 1773 1771 + 9 LDD AI3A 1771 69 1774 1777 + 10 SRT 0005 POWER 1777 30 0005 1790 + 11 SDA AI3 SET EXPNNTS 1790 22 1793 1796 + 12 BMI AI2 AND THEN 1796 46 1899 1754 + 13 RAM ARTHE PERFORM 1899 67 1902 1817 + 14 STL ARTHF ADDITION 1817 20 1772 1776 + 15 RAL ARTHH 1776 65 1788 1943 + 16 LDD ARTHM AI3 1943 69 1824 1793 + 17 AI3 SRT 0000 AI3B 1793 30 0000 1811 + 18 AI3A SRT 0000 AI3B 1774 30 0000 1811 + 19 AI3B ALO 8001 AI5 1811 15 8001 1770 + 20 AI2 RAL ARTHM 1754 65 1824 1779 + 21 LDD ARTHH AI3 1779 69 1788 1793 + 22 AI5 RAU 8002 CLEAR ARTHE 1770 60 8002 1780 + 23 STL ARTHE ARTHS TO SCALE 1780 20 1902 1762 + 24 AI12 BMI AI13 1773 46 1778 1828 + 25 RAL ARTHG AI10 1778 65 1794 1904 + 26 AI13 RAL ACC ARTHX 1828 65 0000 1786 + 27 ARTHB STD ARTHY BREAK UP EXP 1805 24 1808 1826 + 28 SLT 0008 AND MANTISSA 1826 35 0008 1996 + 29 STL ARTHE STORE POWER 1996 20 1902 1755 + 30 RAU 8003 AND MANTISSA 1755 60 8003 1763 + 31 SLT 0001 OF LOWER 1763 35 0001 1769 + 32 STU ARTHM 1769 21 1824 1997 + 33 RAU ACC 1997 60 0000 1855 + 34 SRT 0002 STORE POWER 1855 30 0002 1761 + 35 SLO 8002 AND MANTISSA 1761 16 8002 1819 + 36 SLT 0001 OF ACC 1819 35 0001 1775 + 37 ALO 8001 1775 15 8001 1783 + 38 STU ARTHH ARTHY 1783 21 1788 1808 + 39 ARTHS SCT 0000 NORMALIZE 1762 36 0000 1782 + 40 BOV AI6 BRNCH IF ZRO 1782 47 1942 1787 + 41 STL ARTHG SHIFT COUNT 1787 20 1794 1797 + 42 RAL 8003 ROUND ON 1797 65 8003 1905 + 43 SRD 0002 NINTH DIGIT 1905 31 0002 1813 + 44 SLT 0002 CHECK FOR 1813 35 0002 1869 + 45 STL ARTHM ROUNDOFF 1869 20 1824 1877 + 46 NZU AI7 AI8 OVERFLOW 1877 44 1831 1834 + 47 AI8 RAM 8003 AND 1834 67 8003 1841 + 48 SML ARTHG CORRECT IF 1841 18 1794 1800 + 49 ALO AJ2 NECESSARY 1800 15 1903 1822 + 50 SLT 0008 1822 35 0008 1791 + 51 RAL 8002 1791 65 8002 1849 + 52 AML ARTHE 1849 17 1902 1757 + 53 ALO ARTHF 1757 15 1772 1827 + 54 BMI AI11A PWR TOO SMAL 1827 46 1752 1781 + 55 NZU AI11 PWR TOO LRGE 1781 44 1785 1836 + 56 SLT 0002 1836 35 0002 1893 + 57 STU ACC1 1893 21 1998 1901 + 58 RAL ARTHM 1901 65 1824 1829 + 59 BMI AI9 COMBINE 1829 46 1944 1995 + 60 SLO ACC1 AI10 1944 16 1998 1904 + 61 AI10 STL ACC ARTHX AND 1904 20 0000 1786 + 62 AI9 ALO ACC1 AI10 1995 15 1998 1904 + 63 AI7 SRT 0001 ADJUST 1831 30 0001 1792 + 64 STL ARTHM 1792 20 1824 1927 + 65 SLT 0001 AI8 1927 35 0001 1834 + 66 AI6 RAL 8003 AI10 1942 65 8003 1904 + 67 E00AJ STD ARTHX MULTIPLY 1832 24 1786 1839 + 68 LDD ARTHB 1839 69 1852 1805 + 69 RAM 8002 ACC POWER 1852 67 8002 1867 + 70 SLO AJ1 MINUS 48 1867 16 1820 1825 + 71 STL ARTHF 1825 20 1772 1875 + 72 RAU ARTHH 1875 60 1788 1756 + 73 MPY ARTHM ARTHS 1756 19 1824 1762 + 74 E00AG STD ARTHX AG1 DIVIDE 1830 24 1786 1889 + 75 AG1 LDD ARTHB IS DIVISOR 1889 69 1842 1805 + 76 NZU AG3 ZER0 1842 44 1812 1846 + 77 RSM 8002 DIVISOR 1812 68 8002 1821 + 78 ALO AG2 POWER MINUS 1821 15 1876 1895 + 79 STL ARTHF 49 1895 20 1772 1768 + 80 RAU ARTHM SH1FT 1768 60 1824 1879 + 81 SRT 0001 DIVIDEND 1879 30 0001 1885 + 82 DVR ARTHH DO DIVIDE 1885 64 1788 1803 + 83 RAU 8002 ARTHS 1803 60 8002 1762 + 84 E00AO STD ARTHX DIV REVERSE 1882 24 1786 1989 + 85 STL ACC2 1989 20 1843 1896 + 86 RAL ACC 1896 65 0000 1810 + 87 LDD ACC2 1810 69 1843 1897 + 88 STD ACC AG1 1897 24 0000 1889 + 89 E00AF STD ACC6 FL0AT TO LWR 1947 24 1858 1911 + 90 LDD AE4 E00AE AND ACC 1911 69 1925 1928 + 91 AE4 STL ACC ACC6 1925 20 0000 1858 + 92 E00AE STD ARTHX FLOAT TO LWR 1928 24 1786 1840 + 93 RAU 8002 ONLY 1840 60 8002 1753 + 94 SCT 0000 NORMALIZE 1753 36 0000 1975 + 95 STL ACC3 1975 20 1881 1784 + 96 BOV AD1 ZER0 CHECK 1784 47 1851 1890 + 97 RAL 8003 1890 65 8003 1798 + 98 SRD 0002 ROUND FOR 1798 31 0002 1807 + 99 SLT 0002 PLACING EXP 1807 35 0002 1764 + 100 NZU AE6 CHECK ROUND 1764 44 1818 1891 + 101 LDD 8003 OVERFLOW 1818 69 8003 1874 + 102 SRT 0001 1874 30 0001 1884 + 103 ALO 8001 AE6 1884 15 8001 1891 + 104 AE6 BMI AE2 INSERT 1891 46 1844 1845 + 105 ALO AJ3 AE5 EXP0NENT 1845 15 1848 1804 + 106 AE2 SLO AJ3 AE5 1844 16 1848 1804 + 107 AE5 SLO ACC3 ARTHX 1804 16 1881 1786 + 108 E00TH STD ARTHX FIX L0WER 1932 24 1786 1990 + 109 SLT 0008 TO LOWER 1990 35 0008 1859 + 110 STU ARTHM 1859 21 1824 1878 + 111 RAM 8002 TEST EXP 1878 67 8002 1887 + 112 SLO AJ5 STORE ZER0 1887 16 1940 1945 + 113 BMI AD1 IF LESS THAN 1945 46 1851 1850 + 114 SLO AJ4 50 ALARM 1850 16 1853 1758 + 115 BMI AD3 1F GRTR THAN 1758 46 1861 1862 + 116 SRT 0004 59 1861 30 0004 1921 + 117 ALO AR7 1921 15 1924 1929 + 118 LDD AD2A MODIFY 1929 69 1835 1838 + 119 SDA AD2 SHIFT 1838 22 1991 1971 + 120 RAL ARTHM 1971 65 1824 1930 + 121 SLT 0002 AD2 1930 35 0002 1991 + 122 AD1 RAL 8003 ARTHX STORE ZERO 1851 65 8003 1786 + 123 AD2 SRT 0000 ARTHX SHIFT C0NST 1991 30 0000 1786 + 124 AD2A SRT 0000 ARTHX 1835 30 0000 1786 + 125 AD3 LDD ARTHX 3031 FIX ALARM 1862 69 1786 3031 + 126 AG3 LDD ARTHX 3061 DIVIDE ALARM 1846 69 1786 3061 + 127 AI11 LDD ARTHX 3081 SCALE ALARM 1785 69 1786 3081 + 128 AI11A HLT 1081 AI6 1752 01 1081 1942 + 129 AG2 49 0000 0000 1876 49 0000 0000 + 130 AJ1 48 0000 0000 1820 48 0000 0000 + 131 AJ2 00 0000 0001 1903 00 0000 0001 + 132 AJ3 00 0000 0059 1848 00 0000 0059 + 133 AJ4 10 0000 0000 1853 10 0000 0000 + 134 AJ5 50 0000 0000 1940 50 0000 0000 + 135 E00AQ STD J0001 AQ1 READ 1974 24 1977 1880 + 136 AQ1 RD1 1976 AQ3 1880 70 1976 1898 + 137 AQ3 RAM P0001 AQ3A 1898 67 1951 1806 + 138 AQ3B RAM P0001 AQ3A CHECK FOR 1892 67 1951 1806 + 139 AQ3A NZE AQ8 LAST WORD 1806 45 1860 1837 + 140 LDD AQ5 AQ4 ON CARD 1860 69 1863 1816 + 141 AQ4 STD ACC4 1816 24 1870 1873 + 142 AUP 8003 READ IN 1873 10 8003 1931 + 143 SRT 0004 LABEL FOR 1931 30 0004 1941 + 144 SIA ACC5 PRESENT 1941 23 1795 1948 + 145 SLO 8001 VARIABLE 1948 16 8001 1856 + 146 ALO 8002 GET I Y OR C 1856 15 1809 8002 + 147 RAU 0000 ADDRESS FROM 1809 60 0000 1987 was RAU A000 - 00 0000 0000 + 146 AUP ACC5 ABCON DICT 1987 10 1795 1949 + 149 SLT 0004 ACC4 GENERATE 1949 35 0004 1870 + 150 AQ5 AUP AQ7 INSTRUCTION 1863 10 1866 1857 + 151 ALO P0010 1857 15 1960 1965 + 152 ALO 8002 GET AND 1965 15 1968 8002 + 153 LDD P0002 8003 STORE WORD 1968 69 1952 8003 + 154 AQ7 STD 0000 1866 24 0000 1907 + 155 RAL P0010 INCREMENT 1907 65 1960 1915 + 156 ALO AQ9 WORD COUNT 1915 15 1918 1854 + 157 STL P0010 1854 20 1960 1963 + 158 ALO AQ3B 8002 1963 15 1892 8002 + 159 AQ8 RAL P0001 CHECK FOR 1837 65 1951 1765 + 160 BMI J0001 AQ1 LAST CARD 1765 46 1977 1880 + 161 E00AR STD P0005 PUNCH 0UT 1801 24 1955 1908 + 162 STU J0003 1908 21 1979 1935 + 163 SIA P0008 STORE STMNT 1935 23 1958 1912 + 164 STU J0004 NUMBER 1912 21 1980 1886 + 165 SDA P0004 STORE WORD 1886 22 1954 1909 + 166 SLO 8001 COUNT 1909 16 8001 1917 + 167 NZE AR10 AR9 TEST ZERO 1917 45 1920 1872 + 168 AR10 STU J0005 STMT NUMBER 1920 21 1981 1814 + 169 STD J0006 SET PUNCH 1814 24 1982 1972 + 170 STD J0007 BAND TO 1972 24 1983 1864 + 171 STD J0008 ZEROES 1864 24 1984 1888 + 172 STD P0010 AR3 SET COUNTER 1888 24 1960 1913 + 173 AR3 RAL P0004 1913 65 1954 1910 + 174 SLO AR7 1910 16 1924 1936 + 175 BMI AR8 TEST WORD 1936 46 1994 1992 + 176 STL P0004 AR4 COUNT 1992 20 1954 1865 + 177 AR4 ALO 8002 GET WORD 1865 15 1868 8002 + 178 RAL P0000 LABEL FROM 1868 65 1950 1914 + 179 AUP 8003 PUNCH CONSTS 1914 10 8003 1922 + 180 SLT 0001 1922 35 0001 1938 + 181 SDA P0007 MODIFY LABEL 1938 22 1957 1961 + 182 SLO 8001 1961 16 8001 1919 + 183 SRT 0001 1919 30 0001 1926 + 184 ALO P0007 1926 15 1957 1962 + 185 SLT 0004 INSERT STMNT 1962 35 0004 1923 + 186 ALO P0008 NUMBER 1923 15 1958 1964 + 187 AUP P0010 1964 10 1960 1916 + 188 AUP 8003 1916 10 1969 8003 + 189 STL J0001 STORE LABEL 1969 20 1977 1988 + 190 RAL 8002 FOR PUNCHING 1988 65 8002 1900 + 191 LDD AQ4 MODIFY LABEL 1900 69 1906 1816 + 192 AUP AR6 INTO DRUM 1906 10 1966 1934 + 193 ALO P0010 LOC IN READ 1934 15 1960 1967 + 194 ALO 8003 GET WORD 1967 15 1970 8003 + 195 STD J0002 STORE IN 1970 24 1978 1993 + 196 RAL P0010 PUNCH BAND 1993 65 1960 1815 + 197 ALO AQ9 1815 15 1918 1973 + 196 STL P0010 AR3 1973 20 1960 1913 + 199 AR6 LDD 0000 8002 1966 69 0000 8002 + 200 AR7 00 0001 0000 1924 00 0001 0000 + 201 AR8 PCH J0001 P0005 PUNCH 1994 71 1977 1955 + 202 AR9 RAL 8000 IF STMT NMBR 1872 65 8000 1937 + 203 BMI AR10 P0005 ZRO PCH ONLY 1937 46 1920 1955 + 204 AQ9 00 0002 0000 IF 8000 NEG 1918 00 0002 0000 + 205 J0010 80 0000 8800 CONTROL CNST 1986 80 0000 8800 + 206 1976 RAM 1951 READ 1976 67 1951 1744 + 207 AUP 8003 UP TO 1744 10 8003 1741 + 208 SLT 0004 SEVEN 1741 35 0004 1748 + 209 SDA P0009 CONTIGUOUS 1748 22 1959 1737 + 210 SRT 0004 VARIABLES 1737 30 0004 1746 + 211 LDD AQ4 PER CARD 1746 69 1750 1816 + 212 RAL 8003 1750 65 8003 1749 + 213 AUP P0009 1749 10 1959 1740 + 214 ALO 8001 1740 15 8001 1751 + 215 AUP AQ9B 1751 10 1738 1742 + 216 ALO AQ10 AQ11 1742 15 1745 1735 + 217 AQ11 SUP AQ9B 1735 11 1738 1743 + 218 NZU AQ8 1743 44 1747 1837 + 219 AUP 8001 1747 10 8001 1736 + 220 SUP AR7 1736 11 1924 1739 + 221 SLO 8001 8003 1739 16 8001 8003 + 222 AQ9B LDD 1952 8002 1738 69 1952 8002 + 223 AQ10 STD 0000 AQ11 1745 24 0000 1735 + 1 VARS + ARTHX 00 0000 0000 1786 00 0000 0000 + ARTHG 00 0000 0000 1794 00 0000 0000 + ARTHF 00 0000 0000 1772 00 0000 0000 + ARTHE 00 0000 0000 1902 00 0000 0000 + ARTHH 00 0000 0000 1788 00 0000 0000 + ARTHM 00 0000 0000 1824 00 0000 0000 + ARTHY 00 0000 0000 1808 00 0000 0000 + ACC 00 0000 0000 0000 00 0000 0000 + ACC1 00 0000 0000 1998 00 0000 0000 + ACC2 00 0000 0000 1843 00 0000 0000 + ACC3 00 0000 0000 1881 00 0000 0000 + ACC4 00 0000 0000 1870 00 0000 0000 + ACC5 00 0000 0000 1795 00 0000 0000 + ACC6 00 0000 0000 1858 00 0000 0000 + J0001 00 0000 0000 1977 00 0000 0000 + J0002 00 0000 0000 1978 00 0000 0000 + J0003 00 0000 0000 1979 00 0000 0000 + J0004 00 0000 0000 1980 00 0000 0000 + J0005 00 0000 0000 1981 00 0000 0000 + J0006 00 0000 0000 1982 00 0000 0000 + J0007 00 0000 0000 1983 00 0000 0000 + J0008 00 0000 0000 1984 00 0000 0000 + P0000 00 0000 0000 1950 00 0000 0000 + P0001 00 0000 0000 1951 00 0000 0000 + P0002 00 0000 0000 1952 00 0000 0000 + P0004 00 0000 0000 1954 00 0000 0000 + P0005 00 0000 0000 1955 00 0000 0000 + P0007 00 0000 0000 1957 00 0000 0000 + P0008 00 0000 0000 1958 00 0000 0000 + P0009 00 0000 0000 1959 00 0000 0000 + P0010 00 0000 0000 1960 00 0000 0000 diff --git a/I650/sw/it_package_p2.dck b/I650/sw/it_package_p2.dck new file mode 100644 index 00000000..205a04b9 --- /dev/null +++ b/I650/sw/it_package_p2.dck @@ -0,0 +1,370 @@ +6I1954195C 0000241833800?2417861789 e00aistdarthxai1 1-add +6I1954195C 0000241789800?2017941799 ai1 stlarthg 2- +6I1954195C 0000241799800?6918021805 ldd arthb 3- +6I1954195C 0000241802800?6780021767 ram 8002 4-store acc +6I1954195C 0000241767800?2017721894 stlarthf 5-power +6I1954195C 0000241894800?1819021759 smlarthe 6- +6I1954195C 0000241759800?3500011766 slt 0001 7- +6I1954195C 0000241766800?4417731771 nzuai12 8-find max +6I1954195C 0000241771800?6917741777 lddai3a 9- +6I1954195C 0000241777800?3000051790 srt 0005 10-power +6I1954195C 0000241790800?2217931796 sdaai3 11-set expnnts +6I1954195C 0000241796800?4618991754 bmi ai2 12-and then +6I1954195C 0000241899800?6719021817 ramarthe 13-perform +6I1954195C 0000241817800?2017721776 stlarthf 14-addition +6I1954195C 0000241776800?6517881943 ralarthh 15- +6I1954195C 0000241943800?6918241793 lddarthmai3 16- +6I1954195C 0000241793800?3000001811 ai3 srt 0000ai3b 17- +6I1954195C 0000241774800?3000001811 ai3a srt 0000ai3b 18- +6I1954195C 0000241811800?1580011770 ai3b alo 8001ai5 19- +6I1954195C 0000241754800?6518241779 ai2 ralarthm 20- +6I1954195C 0000241779800?6917881793 lddarthhai3 21- +6I1954195C 0000241770800?6080021780 ai5 rau 8002 22-clear arthe +6I1954195C 0000241780800?2019021762 stlarthearths 23-to scale +6I1954195C 0000241773800?4617781828 ai12 bmi ai13 24- +6I1954195C 0000241778800?6517941904 ralarthgai10 25- +6I1954195C 0000241828800?6500001786 ai13 ralacc arthx 26- +6I1954195C 0000241805800?2418081826 arthbstdarthy 27-break up exp +6I1954195C 0000241826800?3500081996 slt 0008 28-and mantissa +6I1954195C 0000241996800?2019021755 stlarthe 29-store power +6I1954195C 0000241755800?6080031763 rau 8003 30-and mantissa +6I1954195C 0000241763800?3500011769 slt 0001 31-of lower +6I1954195C 0000241769800?2118241997 stuarthm 32- +6I1954195C 0000241997800?6000001855 rauacc 33- +6I1954195C 0000241855800?3000021761 srt 0002 34-store power +6I1954195C 0000241761800?1680021819 slo 8002 35-and mantissa +6I1954195C 0000241819800?3500011775 slt 0001 36-of acc +6I1954195C 0000241775800?1580011783 alo 8001 37- +6I1954195C 0000241783800?2117881808 stuarthharthy 38- +6I1954195C 0000241762800?3600001782 arthssct 0000 39-normalize +6I1954195C 0000241782800?4719421787 bovai6 40-brnch if zro +6I1954195C 0000241787800?2017941797 stlarthg 41-shift count +6I1954195C 0000241797800?6580031905 ral 8003 42-round on +6I1954195C 0000241905800?3100021813 srd 0002 43-ninth digit +6I1954195C 0000241813800?3500021869 slt 0002 44-check for +6I1954195C 0000241869800?2018241877 stlarthm 45-roundoff +6I1954195C 0000241877800?4418311834 nzuai7 ai8 46-overflow +6I1954195C 0000241834800?6780031841 ai8 ram 8003 47-and +6I1954195C 0000241841800?1817941800 smlarthg 48-correct if +6I1954195C 0000241800800?1519031822 aloaj2 49-necessary +6I1954195C 0000241822800?3500081791 slt 0008 50- +6I1954195C 0000241791800?6580021849 ral 8002 51- +6I1954195C 0000241849800?1719021757 amlarthe 52- +6I1954195C 0000241757800?1517721827 aloarthf 53- +6I1954195C 0000241827800?4617521781 bmiai11a 54-pwr too smal +6I1954195C 0000241781800?4417851836 nzuai11 55-pwr too lrge +6I1954195C 0000241836800?3500021893 slt 0002 56- +6I1954195C 0000241893800?2119981901 stuacc1 57- +6I1954195C 0000241901800?6518241829 ralarthm 58- +6I1954195C 0000241829800?4619441995 bmi ai9 59-combine +6I1954195C 0000241944800?1619981904 sloacc1 ai10 60- +6I1954195C 0000241904800?2000001786 ai10 stlacc arthx 61-and +6I1954195C 0000241995800?1519981904 ai9 aloacc1 ai10 62- +6I1954195C 0000241831800?3000011792 ai7 srt 0001 63-adjust +6I1954195C 0000241792800?2018241927 stlarthm 64- +6I1954195C 0000241927800?3500011834 slt 0001ai8 65- +6I1954195C 0000241942800?6580031904 ai6 ral 8003ai10 66- +6I1954195C 0000241832800?2417861839 e00ajstdarthx 67-multiply +6I1954195C 0000241839800?6918521805 ldd arthb 68- +6I1954195C 0000241852800?6780021867 ram 8002 69-acc power +6I1954195C 0000241867800?1618201825 sloaj1 70-minus 48 +6I1954195C 0000241825800?2017721875 stlarthf 71- +6I1954195C 0000241875800?6017881756 rauarthh 72- +6I1954195C 0000241756800?1918241762 mpyarthmarths 73- +6I1954195C 0000241830800?2417861889 e00agstdarthxag1 74-divide +6I1954195C 0000241889800?6918421805 ag1 ldd arthb 75-is divisor +6I1954195C 0000241842800?4418121846 nzu ag3 76-zer0 +6I1954195C 0000241812800?6880021821 rsm 8002 77-divisor +6I1954195C 0000241821800?1518761895 aloag2 78-power minus +6I1954195C 0000241895800?2017721768 stlarthf 79-49 +6I1954195C 0000241768800?6018241879 rauarthm 80-sh1ft +6I1954195C 0000241879800?3000011885 srt 0001 81-dividend +6I1954195C 0000241885800?6417881803 dvrarthh 82-do divide +6I1954195C 0000241803800?6080021762 rau 8002arths 83- +6I1954195C 0000241882800?2417861989 e00aostdarthx 84-div reverse +6I1954195C 0000241989800?2018431896 stlacc2 85- +6I1954195C 0000241896800?6500001810 ralacc 86- +6I1954195C 0000241810800?6918431897 lddacc2 87- +6I1954195C 0000241897800?2400001889 stdacc ag1 88- +6I1954195C 0000241947800?2418581911 e00afstdacc6 89-fl0at to lwr +6I1954195C 0000241911800?6919251928 lddae4 e00ae 90-and acc +6I1954195C 0000241925800?2000001858 ae4 stlacc acc6 91- +6I1954195C 0000241928800?2417861840 e00aestdarthx 92-float to lwr +6I1954195C 0000241840800?6080021753 rau 8002 93-only +6I1954195C 0000241753800?3600001975 sct 0000 94-normalize +6I1954195C 0000241975800?2018811784 stlacc3 95- +6I1954195C 0000241784800?4718511890 bovad1 96-zer0 check +6I1954195C 0000241890800?6580031798 ral 8003 97- +6I1954195C 0000241798800?3100021807 srd 0002 98-round for +6I1954195C 0000241807800?3500021764 slt 0002 99-placing exp +6I1954195C 0000241764800?4418181891 nzu ae6 100-check round +6I1954195C 0000241818800?6980031874 ldd 8003 101-overflow +6I1954195C 0000241874800?3000011884 srt 0001 102- +6I1954195C 0000241884800?1580011891 alo 8001ae6 103- +6I1954195C 0000241891800?4618441845 ae6 bmiae2 104-insert +6I1954195C 0000241845800?1518481804 aloaj3 ae5 105-exp0nent +6I1954195C 0000241844800?1618481804 ae2 sloaj3 ae5 106- +6I1954195C 0000241804800?1618811786 ae5 sloacc3 arthx 107- +6I1954195C 0000241932800?2417861990 e00thstdarthx 108-fix l0wer +6I1954195C 0000241990800?3500081859 slt 0008 109-to lower +6I1954195C 0000241859800?2118241878 stuarthm 110- +6I1954195C 0000241878800?6780021887 ram 8002 111-test exp +6I1954195C 0000241887800?1619401945 sloaj5 112-store zer0 +6I1954195C 0000241945800?4618511850 bmiad1 113-if less than +6I1954195C 0000241850800?1618531758 sloaj4 114-50 alarm +6I1954195C 0000241758800?4618611862 bmi ad3 115-1f grtr than +6I1954195C 0000241861800?3000041921 srt 0004 116-59 +6I1954195C 0000241921800?1519241929 aloar7 117- +6I1954195C 0000241929800?6918351838 lddad2a 118-modify +6I1954195C 0000241838800?2219911971 sdaad2 119-shift +6I1954195C 0000241971800?6518241930 ralarthm 120- +6I1954195C 0000241930800?3500021991 slt 0002ad2 121- +6I1954195C 0000241851800?6580031786 ad1 ral 8003arthx 122-store zero +6I1954195C 0000241991800?3000001786 ad2 srt 0000arthx 123-shift c0nst +6I1954195C 0000241835800?3000001786 ad2a srt 0000arthx 124- +6I1954195C 0000241862800?6917863031 ad3 lddarthx 3031 125-fix alarm +6I1954195C 0000241846800?6917863061 ag3 lddarthx 3061 126-divide alarm +6I1954195C 0000241785800?6917863081 ai11 lddarthx 3081 127-scale alarm +6I1954195C 0000241752800?0110811942 ai11ahlt 1081ai6 128- +6I1954195C 0000241876800?4900000000 ag2 49 0000 0000 129- +6I1954195C 0000241820800?4800000000 aj1 48 0000 0000 130- +6I1954195C 0000241903800?0000000001 aj2 00 0000 0001 131- +6I1954195C 0000241848800?0000000059 aj3 00 0000 0059 132- +6I1954195C 0000241853800?1000000000 aj4 10 0000 0000 133- +6I1954195C 0000241940800?5000000000 aj5 50 0000 0000 134- +6I1954195C 0000241974800?2419771880 e00aqstdj0001aq1 135-read +6I1954195C 0000241880800?7019761898 aq1 rd1 1976aq3 136- +6I1954195C 0000241898800?6719511806 aq3 ramp0001aq3a 137- +6I1954195C 0000241892800?6719511806 aq3b ramp0001aq3a 138-check for +6I1954195C 0000241806800?4518601837 aq3a nze aq8 139-last word +6I1954195C 0000241860800?6918631816 lddaq5 aq4 140-on card +6I1954195C 0000241816800?2418701873 aq4 stdacc4 141- +6I1954195C 0000241873800?1080031931 aup 8003 142-read in +6I1954195C 0000241931800?3000041941 srt 0004 143-label for +6I1954195C 0000241941800?2317951948 siaacc5 144-present +6I1954195C 0000241948800?1680011856 slo 8001 145-variable +6I1954195C 0000241856800?1518098002 alo 8002 146-get i y 0r c +6I1954195C 0000241809800?6000001987 rau 0000 147-address from +6I1954195C 0000241987800?1017951949 aupacc5 146-abcon dict +6I1954195C 0000241949800?3500041870 slt 0004acc4 149-generate +6I1954195C 0000241863800?1018661857 aq5 aupaq7 150-1nstruction +6I1954195C 0000241857800?1519601965 alop0010 151- +6I1954195C 0000241965800?1519688002 alo 8002 152-get and +6I1954195C 0000241968800?6919528003 lddp0002 8003 153-store word +6I1954195C 0000241866800?2400001907 aq7 std 0000 154- +6I1954195C 0000241907800?6519601915 ralp0010 155-increment +6I1954195C 0000241915800?1519181854 aloaq9 156-word count +6I1954195C 0000241854800?2019601963 stlp0010 157- +6I1954195C 0000241963800?1518928002 aloaq3b 8002 158- +6I1954195C 0000241837800?6519511765 aq8 ralp0001 159-check for +6I1954195C 0000241765800?4619771880 bmij0001aq1 160-last card +6I1954195C 0000241801800?2419551908 e00arstdp0005 161-punch 0ut +6I1954195C 0000241908800?2119791935 stuj0003 162- +6I1954195C 0000241935800?2319581912 siap0008 163-store stmnt +6I1954195C 0000241912800?2119801886 stuj0004 164-number +6I1954195C 0000241886800?2219541909 sdap0004 165-store word +6I1954195C 0000241909800?1680011917 slo 8001 166-count +6I1954195C 0000241917800?4519201872 nzear10 ar9 167-test zero +6I1954195C 0000241920800?2119811814 ar10 stuj0005 168-stmt number +6I1954195C 0000241814800?2419821972 stdj0006 169-set punch +6I1954195C 0000241972800?2419831864 stdj0007 170-band to +6I1954195C 0000241864800?2419841888 stdj0008 171-zeroes +6I1954195C 0000241888800?2419601913 stdp0010ar3 172-set counter +6I1954195C 0000241913800?6519541910 ar3 ralp0004 173- +6I1954195C 0000241910800?1619241936 sloar7 174- +6I1954195C 0000241936800?4619941992 bmiar8 175-test word +6I1954195C 0000241992800?2019541865 stlp0004ar4 176-count +6I1954195C 0000241865800?1518688002 ar4 alo 8002 177-get word +6I1954195C 0000241868800?6519501914 ralp0000 178-label from +6I1954195C 0000241914800?1080031922 aup 8003 179-punch consts +6I1954195C 0000241922800?3500011938 slt 0001 180- +6I1954195C 0000241938800?2219571961 sdap0007 181-modify label +6I1954195C 0000241961800?1680011919 slo 8001 182- +6I1954195C 0000241919800?3000011926 srt 0001 183- +6I1954195C 0000241926800?1519571962 alop0007 184- +6I1954195C 0000241962800?3500041923 slt 0004 185-insert stmnt +6I1954195C 0000241923800?1519581964 alop0008 186-number +6I1954195C 0000241964800?1019601916 aupp0010 187- +6I1954195C 0000241916800?1019698003 aup 8003 188- +6I1954195C 0000241969800?2019771988 stlj0001 189-store label +6I1954195C 0000241988800?6580021900 ral 8002 190-for punching +6I1954195C 0000241900800?6919061816 ldd aq4 191-modify label +6I1954195C 0000241906800?1019661934 aupar6 192-into drum +6I1954195C 0000241934800?1519601967 alop0010 193-loc in read +6I1954195C 0000241967800?1519708003 alo 8003 194-get word +6I1954195C 0000241970800?2419781993 stdj0002 195-store in +6I1954195C 0000241993800?6519601815 ralp0010 196-punch band +6I1954195C 0000241815800?1519181973 aloaq9 197- +6I1954195C 0000241973800?2019601913 stlp0010ar3 196- +6I1954195C 0000241966800?6900008002 ar6 ldd 0000 8002 199- +6I1954195C 0000241924800?0000010000 ar7 00 0001 0000 200- +6I1954195C 0000241994800?7119771955 ar8 pchj0001p0005 201-punch +6I1954195C 0000241872800?6580001937 ar9 ral 8000 202-if stmt nmbr +6I1954195C 0000241937800?4619201955 bmiar10 p0005 203-zro pch only +6I1954195C 0000241918800?0000020000 aq9 00 0002 0000 204-if 8000 neg +6I1954195C 0000241986800?8000008800 j0010 80 0000 8800 205-control cnst +6I1954195C 0000241654800?2418081732 e00alstdarthy 206- +6I1954195C 0000241732800?2017881694 stlarthh 207- +6I1954195C 0000241694800?6500001709 ralacc al17a 208-is power +6I1954195C 0000241709800?2418701723 al17astdacc4 209-two +6I1954195C 0000241723800?2417861739 stdarthx 210-if so +6I1954195C 0000241739800?1616861692 sloal16 211-multiply +6I1954195C 0000241692800?4517311751 nzeal18 212- +6I1954195C 0000241751800?6517881645 ralarthh 213- +6I1954195C 0000241645800?2400001655 stdacc 214- +6I1954195C 0000241655800?6918081832 lddarthye00aj 215- +6I1954195C 0000241731800?6517881693 al18 ralarthhal17 216- +6I1954195C 0000241693800?3500081661 al17 slt 0008 217- +6I1954195C 0000241661800?1680021720 slo 8002 218- +6I1954195C 0000241720800?3500021677 slt 0002 219-q equals +6I1954195C 0000241677800?1580011690 alo 8001 220-mantissa +6I1954195C 0000241690800?2117721675 stuarthf 221-of argument +6I1954195C 0000241675800?6780021683 ram 8002 222- +6I1954195C 0000241683800?1617361691 sloal1 223-store expnnt +6I1954195C 0000241691800?3500021698 slt 0002 224-of argmnt +6I1954195C 0000241698800?2119021706 stuarthe 225- +6I1954195C 0000241706800?6516601666 ralal2 226-mantissa of +6I1954195C 0000241666800?2018241678 stlarthm 227-z is one +6I1954195C 0000241678800?6517361695 ralal1 228- +6I1954195C 0000241695800?3500021702 slt 0002 229-exp of z is +6I1954195C 0000241702800?2117941747 stuarthgal3 230-50 +6I1954195C 0000241747800?6000001708 al3 rauacc 231-k is grtst +6I1954195C 0000241708800?1917361738 mpyal1 232-integer in +6I1954195C 0000241738800?2100001658 stuacc 233-k over two +6I1954195C 0000241658800?6580021667 ral 8002 234-is remainder +6I1954195C 0000241667800?4516701646 nze al4 235-zer0 +6I1954195C 0000241670800?6018241729 rauarthm 236-if not set z +6I1954195C 0000241729800?6916821737 ldd al5 237-equals to +6I1954195C 0000241682800?1517941715 aloarthg 238-z times q +6I1954195C 0000241715800?2017941699 stlarthg 239-via +6I1954195C 0000241699800?6516651669 ralarthd 240-subroutine +6I1954195C 0000241669800?2018241638 stlarthm 241- +6I1954195C 0000241638800?4516461741 nzeal4 al20 242- +6I1954195C 0000241646800?6000001712 al4 rauacc 243-if k nonzero +6I1954195C 0000241712800?4416681721 nzu al7 244-q equals +6I1954195C 0000241668800?6017721679 rauarthf 245- +6I1954195C 0000241679800?6916841737 ldd al5 246-via subrtne +6I1954195C 0000241684800?1519021714 aloarthe 247- +6I1954195C 0000241714800?2019021662 stlarthe 248- +6I1954195C 0000241662800?6516651719 ralarthd 249- +6I1954195C 0000241719800?2017721747 stlarthfal3 250- +6I1954195C 0000241721800?6017941700 al7 rauarthg 251-set exponnts +6I1954195C 0000241700800?3000021663 srt 0002 252-arths +6I1954195C 0000241663800?4417851722 nzuai11 253-exp overscal +6I1954195C 0000241722800?2019021664 stlarthe 254- +6I1954195C 0000241664800?2117721671 stuarthf 255- +6I1954195C 0000241671800?6018241680 rauarthm 256- +6I1954195C 0000241680800?3000011741 srt 0001al20 257- +6I1954195C 0000241741800?6917161724 al20 lddal8 258- +6I1954195C 0000241724800?2417861762 stdarthxarths 259- +6I1954195C 0000241716800?6518701648 al8 ralacc4 260- +6I1954195C 0000241648800?4617011743 bmial10 261- +6I1954195C 0000241743800?6500001808 ralacc arthy 262- +6I1954195C 0000241701800?6500001672 al10 ralacc 263-z equals one +6I1954195C 0000241672800?4516761681 nze al12 264-over z if +6I1954195C 0000241676800?6516851649 ralal11 265-k neg and z +6I1954195C 0000241649800?6918081830 lddarthye00ag 266-non zero +6I1954195C 0000241681800?6918083111 al12 lddarthy 3111 267-alarm if zro +6I1954195C 0000241737800?2417861652 al5 stdarthx 268- +6I1954195C 0000241652800?1917721673 mpyarthf 269- +6I1954195C 0000241673800?3000091644 srt 0009 270- +6I1954195C 0000241644800?4416501639 nzual14 271- +6I1954195C 0000241639800?2016651640 stlarthd 272- +6I1954195C 0000241640800?6580031641 ral 8003al15 273- +6I1954195C 0000241641800?1519021786 al15 aloarthearthx 274- +6I1954195C 0000241650800?3000011643 al14 srt 0001 275- +6I1954195C 0000241643800?2016651642 stlarthd 276- +6I1954195C 0000241642800?6519031641 ralaj2 al15 277- +6I1954195C 0000241736800?5000000000 al1 50 0000 0000 278- +6I1954195C 0000241660800?1000000000 al2 10 0000 0000 279- +6I1954195C 0000241685800?1000000050 al11 10 0000 0050 280- +6I1954195C 0000241686800?0000000002 al16 00 0000 0002 281- +6I1954195C 0000241903800?0000000001 aj2 00 0000 0001 282- +6I1954195C 0000241651800?2418081687 e00anstdarthy 283-power +6I1954195C 0000241687800?6900001674 lddacc 284-float fix +6I1954195C 0000241674800?2417881745 stdarthh 285-reverse +6I1954195C 0000241745800?2000001709 stlacc al17a 286- +6I1954195C 0000241704800?2418081711 e00akstdarthy 287-power fixfix +6I1954195C 0000241711800?2017941647 stlarthgak1 288-q is argmnt +6I1954195C 0000241647800?6700001705 ak1 ramacc 289-k equals +6I1954195C 0000241705800?2017721725 stlarthf 290-abval power +6I1954195C 0000241725800?6519031707 ralaj2 291-z equals +6I1954195C 0000241707800?2017881718 stlarthhak3 292-one +6I1954195C 0000241718800?6017721727 ak3 rauarthf 293-k is gtst +6I1954195C 0000241727800?1917301717 mpyak4 294-intgr in +6I1954195C 0000241717800?2117721726 stuarthf 295-k over two +6I1954195C 0000241726800?6580021735 ral 8002 296-is remainder +6I1954195C 0000241735800?4517341742 nze ak5 297-zero +6I1954195C 0000241734800?6017881688 rauarthh 298-if not z is +6I1954195C 0000241688800?1917941733 mpyarthg 299-z times q +6I1954195C 0000241733800?2017881742 stlarthhak5 300- +6I1954195C 0000241742800?6017721728 ak5 rauarthf 301- +6I1954195C 0000241728800?4417401746 nzu ak6 302-1s k zero +6I1954195C 0000241740800?6017941749 rauarthg 303-if not +6I1954195C 0000241749800?1980011689 mpy 8001 304-q equals +6I1954195C 0000241689800?2017941718 stlarthgak3 305-q squared +6I1954195C 0000241746800?6000001656 ak6 rauacc 306-is power neg +6I1954195C 0000241656800?4616591713 bmi ak7 307-if so is z +6I1954195C 0000241659800?6717881744 ramarthh 308-zero +6I1954195C 0000241744800?4517481750 nze ak8 309-if not is z +6I1954195C 0000241748800?1619031657 sloaj2 310-one +6I1954195C 0000241657800?4517101713 nzeak10 ak7 311- +6I1954195C 0000241713800?6517881808 ak7 ralarthharthy 312-exhibit z +6I1954195C 0000241710800?6580031808 ak10 ral 8003arthy 313- +6I1954195C 0000241750800?6918083101 ak8 lddarthy 3101 314-alarm +6I1954195C 0000241730800?5000000000 ak4 50 0000 0000 315- +6I1954195C 0000241903800?0000000001 aj2 00 0000 0001 316- +6I1954195C 0000241653800?2418081696 e00amstdarthy 317-interchge +6I1954195C 0000241696800?6900001703 lddacc 318-acc and +6I1954195C 0000241703800?2417941697 stdarthg 319-lower +6I1954195C 0000241697800?2000001647 stlacc ak1 320-then e00ak +6I1954195C 0000241976800?6719511623 1976ram 1951 321- +6I1954195C 0000241623800?1080031632 aup 8003 322- +6I1954195C 0000241632800?3500041624 slt 0004 323- +6I1954195C 0000241624800?2219591626 sdap0009 324- +6I1954195C 0000241626800?3000041637 srt 0004 325- +6I1954195C 0000241637800?6916271816 ldd aq4 326- +6I1954195C 0000241627800?6580031636 ral 8003 327- +6I1954195C 0000241636800?1019591633 aupp0009 328- +6I1954195C 0000241633800?1580011631 alo 8001 329- +6I1954195C 0000241631800?1016251628 aupaq9b 330- +6I1954195C 0000241628800?1516341622 aloaq10 aq11 331- +6I1954195C 0000241622800?1116251630 aq11 supaq9b 332- +6I1954195C 0000241630800?4416351837 nzu aq8 333- +6I1954195C 0000241635800?1080011621 aup 8001 334- +6I1954195C 0000241621800?1119241629 supar7 335- +6I1954195C 0000241629800?1680018003 slo 8001 8003 336- +6I1954195C 0000241625800?6919528002 aq9b ldd 1952 8002 337- +6I1954195C 0000241634800?2400001622 aq10 std 0000aq11 338- +6I1954195C 0000241786800?0000000000 arthx 00 0000 0000 - +6I1954195C 0000241665800?0000000000 arthd 00 0000 0000 - +6I1954195C 0000241794800?0000000000 arthg 00 0000 0000 - +6I1954195C 0000241772800?0000000000 arthf 00 0000 0000 - +6I1954195C 0000241902800?0000000000 arthe 00 0000 0000 - +6I1954195C 0000241788800?0000000000 arthh 00 0000 0000 - +6I1954195C 0000241824800?0000000000 arthm 00 0000 0000 - +6I1954195C 0000241808800?0000000000 arthy 00 0000 0000 - +6I1954195C 0000240000800?0000000000 acc 00 0000 0000 - +6I1954195C 0000241998800?0000000000 acc1 00 0000 0000 - +6I1954195C 0000241843800?0000000000 acc2 00 0000 0000 - +6I1954195C 0000241881800?0000000000 acc3 00 0000 0000 - +6I1954195C 0000241870800?0000000000 acc4 00 0000 0000 - +6I1954195C 0000241795800?0000000000 acc5 00 0000 0000 - +6I1954195C 0000241858800?0000000000 acc6 00 0000 0000 - +6I1954195C 0000241977800?0000000000 j0001 00 0000 0000 - +6I1954195C 0000241978800?0000000000 j0002 00 0000 0000 - +6I1954195C 0000241979800?0000000000 j0003 00 0000 0000 - +6I1954195C 0000241980800?0000000000 j0004 00 0000 0000 - +6I1954195C 0000241981800?0000000000 j0005 00 0000 0000 - +6I1954195C 0000241982800?0000000000 j0006 00 0000 0000 - +6I1954195C 0000241983800?0000000000 j0007 00 0000 0000 - +6I1954195C 0000241984800?0000000000 j0008 00 0000 0000 - +6I1954195C 0000241950800?0000000000 p0000 00 0000 0000 - +6I1954195C 0000241951800?0000000000 p0001 00 0000 0000 - +6I1954195C 0000241952800?0000000000 p0002 00 0000 0000 - +6I1954195C 0000241954800?0000000000 p0004 00 0000 0000 - +6I1954195C 0000241955800?0000000000 p0005 00 0000 0000 - +6I1954195C 0000241957800?0000000000 p0007 00 0000 0000 - +6I1954195C 0000241958800?0000000000 p0008 00 0000 0000 - +6I1954195C 0000241959800?0000000000 p0009 00 0000 0000 - +6I1954195C 0000241960800?0000000000 p0010 00 0000 0000 - diff --git a/I650/sw/it_package_p2_listing.txt b/I650/sw/it_package_p2_listing.txt new file mode 100644 index 00000000..2af19c87 --- /dev/null +++ b/I650/sw/it_package_p2_listing.txt @@ -0,0 +1,379 @@ + 5 PACKAGE 2 + 5 CONTAINS PACKAGE 1 + 5 PLUS THE FOLLOWING + 5 ROUTINES + 5 E00AK POWER FIX FIX + 5 E00Am POWER FIX FIX REVERSE + 5 E00AL POWER FLOAT FIX + 5 E00AN POWER FLOAT FIX REVERSE + 1 E00AI STD ARTHX AI1 ADD 1833 24 1786 1789 + 2 AI1 STL ARTHG 1789 20 1794 1799 + 3 LDD ARTHB 1799 69 1802 1805 + 4 RAM 8002 STORE ACC 1802 67 8002 1767 + 5 STL ARTHF POWER 1767 20 1772 1894 + 6 SML ARTHE 1894 18 1902 1759 + 7 SLT 0001 1759 35 0001 1766 + 8 NZU AI12 FIND MAX 1766 44 1773 1771 + 9 LDD AI3A 1771 69 1774 1777 + 10 SRT 0005 POWER 1777 30 0005 1790 + 11 SDA AI3 SET EXPNNTS 1790 22 1793 1796 + 12 BMI AI2 AND THEN 1796 46 1899 1754 + 13 RAM ARTHE PERFORM 1899 67 1902 1817 + 14 STL ARTHF ADDITION 1817 20 1772 1776 + 15 RAL ARTHH 1776 65 1788 1943 + 16 LDD ARTHM AI3 1943 69 1824 1793 + 17 AI3 SRT 0000 AI3B 1793 30 0000 1811 + 18 AI3A SRT 0000 AI3B 1774 30 0000 1811 + 19 AI3B ALO 8001 AI5 1811 15 8001 1770 + 20 AI2 RAL ARTHM 1754 65 1824 1779 + 21 LDD ARTHH AI3 1779 69 1788 1793 + 22 AI5 RAU 8002 CLEAR ARTHE 1770 60 8002 1780 + 23 STL ARTHE ARTHS TO SCALE 1780 20 1902 1762 + 24 AI12 BMI AI13 1773 46 1778 1828 + 25 RAL ARTHG AI10 1778 65 1794 1904 + 26 AI13 RAL ACC ARTHX 1828 65 0000 1786 + 27 ARTHB STD ARTHY BREAK UP EXP 1805 24 1808 1826 + 28 SLT 0008 AND MANTISSA 1826 35 0008 1996 + 29 STL ARTHE STORE POWER 1996 20 1902 1755 + 30 RAU 8003 AND MANTISSA 1755 60 8003 1763 + 31 SLT 0001 OF LOWER 1763 35 0001 1769 + 32 STU ARTHM 1769 21 1824 1997 + 33 RAU ACC 1997 60 0000 1855 + 34 SRT 0002 STORE POWER 1855 30 0002 1761 + 35 SLO 8002 AND MANTISSA 1761 16 8002 1819 + 36 SLT 0001 OF ACC 1819 35 0001 1775 + 37 ALO 8001 1775 15 8001 1783 + 38 STU ARTHH ARTHY 1783 21 1788 1808 + 39 ARTHS SCT 0000 NORMALIZE 1762 36 0000 1782 + 40 BOV AI6 BRNCH IF ZRO 1782 47 1942 1787 + 41 STL ARTHG SHIFT COUNT 1787 20 1794 1797 + 42 RAL 8003 ROUND ON 1797 65 8003 1905 + 43 SRD 0002 NINTH DIGIT 1905 31 0002 1813 + 44 SLT 0002 CHECK FOR 1813 35 0002 1869 + 45 STL ARTHM ROUNDOFF 1869 20 1824 1877 + 46 NZU AI7 AI8 OVERFLOW 1877 44 1831 1834 + 47 AI8 RAM 8003 AND 1834 67 8003 1841 + 48 SML ARTHG CORRECT IF 1841 18 1794 1800 + 49 ALO AJ2 NECESSARY 1800 15 1903 1822 + 50 SLT 0008 1822 35 0008 1791 + 51 RAL 8002 1791 65 8002 1849 + 52 AML ARTHE 1849 17 1902 1757 + 53 ALO ARTHF 1757 15 1772 1827 + 54 BMI AI11A PWR TOO SMAL 1827 46 1752 1781 + 55 NZU AI11 PWR TOO LRGE 1781 44 1785 1836 + 56 SLT 0002 1836 35 0002 1893 + 57 STU ACC1 1893 21 1998 1901 + 58 RAL ARTHM 1901 65 1824 1829 + 59 BMI AI9 COMBINE 1829 46 1944 1995 + 60 SLO ACC1 AI10 1944 16 1998 1904 + 61 AI10 STL ACC ARTHX AND 1904 20 0000 1786 + 62 AI9 ALO ACC1 AI10 1995 15 1998 1904 + 63 AI7 SRT 0001 ADJUST 1831 30 0001 1792 + 64 STL ARTHM 1792 20 1824 1927 + 65 SLT 0001 AI8 1927 35 0001 1834 + 66 AI6 RAL 8003 AI10 1942 65 8003 1904 + 67 E00AJ STD ARTHX MULTIPLY 1832 24 1786 1839 + 68 LDD ARTHB 1839 69 1852 1805 + 69 RAM 8002 ACC POWER 1852 67 8002 1867 + 70 SLO AJ1 MINUS 48 1867 16 1820 1825 + 71 STL ARTHF 1825 20 1772 1875 + 72 RAU ARTHH 1875 60 1788 1756 + 73 MPY ARTHM ARTHS 1756 19 1824 1762 + 74 E00AG STD ARTHX AG1 DIVIDE 1830 24 1786 1889 + 75 AG1 LDD ARTHB IS DIVISOR 1889 69 1842 1805 + 76 NZU AG3 ZER0 1842 44 1812 1846 + 77 RSM 8002 DIVISOR 1812 68 8002 1821 + 78 ALO AG2 POWER MINUS 1821 15 1876 1895 + 79 STL ARTHF 49 1895 20 1772 1768 + 80 RAU ARTHM SH1FT 1768 60 1824 1879 + 81 SRT 0001 DIVIDEND 1879 30 0001 1885 + 82 DVR ARTHH DO DIVIDE 1885 64 1788 1803 + 83 RAU 8002 ARTHS 1803 60 8002 1762 + 84 E00AO STD ARTHX DIV REVERSE 1882 24 1786 1989 + 85 STL ACC2 1989 20 1843 1896 + 86 RAL ACC 1896 65 0000 1810 + 87 LDD ACC2 1810 69 1843 1897 + 88 STD ACC AG1 1897 24 0000 1889 + 89 E00AF STD ACC6 FL0AT TO LWR 1947 24 1858 1911 + 90 LDD AE4 E00AE AND ACC 1911 69 1925 1928 + 91 AE4 STL ACC ACC6 1925 20 0000 1858 + 92 E00AE STD ARTHX FLOAT TO LWR 1928 24 1786 1840 + 93 RAU 8002 ONLY 1840 60 8002 1753 + 94 SCT 0000 NORMALIZE 1753 36 0000 1975 + 95 STL ACC3 1975 20 1881 1784 + 96 BOV AD1 ZER0 CHECK 1784 47 1851 1890 + 97 RAL 8003 1890 65 8003 1798 + 98 SRD 0002 ROUND FOR 1798 31 0002 1807 + 99 SLT 0002 PLACING EXP 1807 35 0002 1764 + 100 NZU AE6 CHECK ROUND 1764 44 1818 1891 + 101 LDD 8003 OVERFLOW 1818 69 8003 1874 + 102 SRT 0001 1874 30 0001 1884 + 103 ALO 8001 AE6 1884 15 8001 1891 + 104 AE6 BMI AE2 INSERT 1891 46 1844 1845 + 105 ALO AJ3 AE5 EXP0NENT 1845 15 1848 1804 + 106 AE2 SLO AJ3 AE5 1844 16 1848 1804 + 107 AE5 SLO ACC3 ARTHX 1804 16 1881 1786 + 108 E00TH STD ARTHX FIX L0WER 1932 24 1786 1990 + 109 SLT 0008 TO LOWER 1990 35 0008 1859 + 110 STU ARTHM 1859 21 1824 1878 + 111 RAM 8002 TEST EXP 1878 67 8002 1887 + 112 SLO AJ5 STORE ZER0 1887 16 1940 1945 + 113 BMI AD1 IF LESS THAN 1945 46 1851 1850 + 114 SLO AJ4 50 ALARM 1850 16 1853 1758 + 115 BMI AD3 1F GRTR THAN 1758 46 1861 1862 + 116 SRT 0004 59 1861 30 0004 1921 + 117 ALO AR7 1921 15 1924 1929 + 118 LDD AD2A MODIFY 1929 69 1835 1838 + 119 SDA AD2 SHIFT 1838 22 1991 1971 + 120 RAL ARTHM 1971 65 1824 1930 + 121 SLT 0002 AD2 1930 35 0002 1991 + 122 AD1 RAL 8003 ARTHX STORE ZERO 1851 65 8003 1786 + 123 AD2 SRT 0000 ARTHX SHIFT C0NST 1991 30 0000 1786 + 124 AD2A SRT 0000 ARTHX 1835 30 0000 1786 + 125 AD3 LDD ARTHX 3031 FIX ALARM 1862 69 1786 3031 + 126 AG3 LDD ARTHX 3061 DIVIDE ALARM 1846 69 1786 3061 + 127 AI11 LDD ARTHX 3081 SCALE ALARM 1785 69 1786 3081 + 128 AI11A HLT 1081 AI6 1752 01 1081 1942 + 129 AG2 49 0000 0000 1876 49 0000 0000 + 130 AJ1 48 0000 0000 1820 48 0000 0000 + 131 AJ2 00 0000 0001 1903 00 0000 0001 + 132 AJ3 00 0000 0059 1848 00 0000 0059 + 133 AJ4 10 0000 0000 1853 10 0000 0000 + 134 AJ5 50 0000 0000 1940 50 0000 0000 + 135 E00AQ STD J0001 AQ1 READ 1974 24 1977 1880 + 136 AQ1 RD1 1976 AQ3 1880 70 1976 1898 + 137 AQ3 RAM P0001 AQ3A 1898 67 1951 1806 + 138 AQ3B RAM P0001 AQ3A CHECK FOR 1892 67 1951 1806 + 139 AQ3A NZE AQ8 LAST WORD 1806 45 1860 1837 + 140 LDD AQ5 AQ4 ON CARD 1860 69 1863 1816 + 141 AQ4 STD ACC4 1816 24 1870 1873 + 142 AUP 8003 READ IN 1873 10 8003 1931 + 143 SRT 0004 LABEL FOR 1931 30 0004 1941 + 144 SIA ACC5 PRESENT 1941 23 1795 1948 + 145 SLO 8001 VARIABLE 1948 16 8001 1856 + 146 ALO 8002 GET I Y 0R C 1856 15 1809 8002 + 147 RAU 0000 ADDRESS FROM 1809 60 0000 1987 was RAU A000 - 00 0000 0000 + 146 AUP ACC5 ABCON DICT 1987 10 1795 1949 + 149 SLT 0004 ACC4 GENERATE 1949 35 0004 1870 + 150 AQ5 AUP AQ7 1NSTRUCTION 1863 10 1866 1857 + 151 ALO P0010 1857 15 1960 1965 + 152 ALO 8002 GET AND 1965 15 1968 8002 + 153 LDD P0002 8003 STORE WORD 1968 69 1952 8003 + 154 AQ7 STD 0000 1866 24 0000 1907 + 155 RAL P0010 INCREMENT 1907 65 1960 1915 + 156 ALO AQ9 WORD COUNT 1915 15 1918 1854 + 157 STL P0010 1854 20 1960 1963 + 158 ALO AQ3B 8002 1963 15 1892 8002 + 159 AQ8 RAL P0001 CHECK FOR 1837 65 1951 1765 + 160 BMI J0001 AQ1 LAST CARD 1765 46 1977 1880 + 161 E00AR STD P0005 PUNCH 0UT 1801 24 1955 1908 + 162 STU J0003 1908 21 1979 1935 + 163 SIA P0008 STORE STMNT 1935 23 1958 1912 + 164 STU J0004 NUMBER 1912 21 1980 1886 + 165 SDA P0004 STORE WORD 1886 22 1954 1909 + 166 SLO 8001 COUNT 1909 16 8001 1917 + 167 NZE AR10 AR9 TEST ZERO 1917 45 1920 1872 + 168 AR10 STU J0005 STMT NUMBER 1920 21 1981 1814 + 169 STD J0006 SET PUNCH 1814 24 1982 1972 + 170 STD J0007 BAND TO 1972 24 1983 1864 + 171 STD J0008 ZEROES 1864 24 1984 1888 + 172 STD P0010 AR3 SET COUNTER 1888 24 1960 1913 + 173 AR3 RAL P0004 1913 65 1954 1910 + 174 SLO AR7 1910 16 1924 1936 + 175 BMI AR8 TEST WORD 1936 46 1994 1992 + 176 STL P0004 AR4 COUNT 1992 20 1954 1865 + 177 AR4 ALO 8002 GET WORD 1865 15 1868 8002 + 178 RAL P0000 LABEL FROM 1868 65 1950 1914 + 179 AUP 8003 PUNCH CONSTS 1914 10 8003 1922 + 180 SLT 0001 1922 35 0001 1938 + 181 SDA P0007 MODIFY LABEL 1938 22 1957 1961 + 182 SLO 8001 1961 16 8001 1919 + 183 SRT 0001 1919 30 0001 1926 + 184 ALO P0007 1926 15 1957 1962 + 185 SLT 0004 INSERT STMNT 1962 35 0004 1923 + 186 ALO P0008 NUMBER 1923 15 1958 1964 + 187 AUP P0010 1964 10 1960 1916 + 188 AUP 8003 1916 10 1969 8003 + 189 STL J0001 STORE LABEL 1969 20 1977 1988 + 190 RAL 8002 FOR PUNCHING 1988 65 8002 1900 + 191 LDD AQ4 MODIFY LABEL 1900 69 1906 1816 + 192 AUP AR6 INTO DRUM 1906 10 1966 1934 + 193 ALO P0010 LOC IN READ 1934 15 1960 1967 + 194 ALO 8003 GET WORD 1967 15 1970 8003 + 195 STD J0002 STORE IN 1970 24 1978 1993 + 196 RAL P0010 PUNCH BAND 1993 65 1960 1815 + 197 ALO AQ9 1815 15 1918 1973 + 196 STL P0010 AR3 1973 20 1960 1913 + 199 AR6 LDD 0000 8002 1966 69 0000 8002 + 200 AR7 00 0001 0000 1924 00 0001 0000 + 201 AR8 PCH J0001 P0005 PUNCH 1994 71 1977 1955 + 202 AR9 RAL 8000 IF STMT NMBR 1872 65 8000 1937 + 203 BMI AR10 P0005 ZRO PCH ONLY 1937 46 1920 1955 + 204 AQ9 00 0002 0000 IF 8000 NEG 1918 00 0002 0000 + 205 J0010 80 0000 8800 CONTROL CNST 1986 80 0000 8800 + 206 E00AL STD ARTHY 1654 24 1808 1732 + 207 STL ARTHH 1732 20 1788 1694 + 208 RAL ACC AL17A IS POWER 1694 65 0000 1709 + 209 AL17A STD ACC4 TWO 1709 24 1870 1723 + 210 STD ARTHX IF SO 1723 24 1786 1739 + 211 SLO AL16 MULTIPLY 1739 16 1686 1692 + 212 NZE AL18 1692 45 1731 1751 + 213 RAL ARTHH 1751 65 1788 1645 + 214 STD ACC 1645 24 0000 1655 + 215 LDD ARTHY E00AJ 1655 69 1808 1832 + 216 AL18 RAL ARTHH AL17 1731 65 1788 1693 + 217 AL17 SLT 0008 1693 35 0008 1661 + 218 SLO 8002 1661 16 8002 1720 + 219 SLT 0002 Q EQUALS 1720 35 0002 1677 + 220 ALO 8001 MANTISSA 1677 15 8001 1690 + 221 STU ARTHF OF ARGUMENT 1690 21 1772 1675 + 222 RAM 8002 1675 67 8002 1683 + 223 SLO AL1 STORE EXPNNT 1683 16 1736 1691 + 224 SLT 0002 OF ARGMNT 1691 35 0002 1698 + 225 STU ARTHE 1698 21 1902 1706 + 226 RAL AL2 MANTISSA OF 1706 65 1660 1666 + 227 STL ARTHM Z IS ONE 1666 20 1824 1678 + 228 RAL AL1 1678 65 1736 1695 + 229 SLT 0002 EXP OF Z IS 1695 35 0002 1702 + 230 STU ARTHG AL3 50 1702 21 1794 1747 + 231 AL3 RAU ACC K IS GRTST 1747 60 0000 1708 + 232 MPY AL1 INTEGER IN 1708 19 1736 1738 + 233 STU ACC K OVER TWO 1738 21 0000 1658 + 234 RAL 8002 IS REMAINDER 1658 65 8002 1667 + 235 NZE AL4 ZER0 1667 45 1670 1646 + 236 RAU ARTHM IF NOT SET Z 1670 60 1824 1729 + 237 LDD AL5 EQUALS TO 1729 69 1682 1737 + 238 ALO ARTHG Z TIMES Q 1682 15 1794 1715 + 239 STL ARTHG VIA 1715 20 1794 1699 + 240 RAL ARTHD SUBROUTINE 1699 65 1665 1669 + 241 STL ARTHM 1669 20 1824 1638 + 242 NZE AL4 AL20 1638 45 1646 1741 + 243 AL4 RAU ACC IF K NONZERO 1646 60 0000 1712 + 244 NZU AL7 Q EQUALS 1712 44 1668 1721 + 245 RAU ARTHF 1668 60 1772 1679 + 246 LDD AL5 VIA SUBRTNE 1679 69 1684 1737 + 247 ALO ARTHE 1684 15 1902 1714 + 248 STL ARTHE 1714 20 1902 1662 + 249 RAL ARTHD 1662 65 1665 1719 + 250 STL ARTHF AL3 1719 20 1772 1747 + 251 AL7 RAU ARTHG SET EXPONNTS 1721 60 1794 1700 + 252 SRT 0002 ARTHS 1700 30 0002 1663 + 253 NZU AI11 EXP OVERSCAL 1663 44 1785 1722 + 254 STL ARTHE 1722 20 1902 1664 + 255 STU ARTHF 1664 21 1772 1671 + 256 RAU ARTHM 1671 60 1824 1680 + 257 SRT 0001 AL20 1680 30 0001 1741 + 258 AL20 LDD AL8 1741 69 1716 1724 + 259 STD ARTHX ARTHS 1724 24 1786 1762 + 260 AL8 RAL ACC4 1716 65 1870 1648 + 261 BMI AL10 1648 46 1701 1743 + 262 RAL ACC ARTHY 1743 65 0000 1808 + 263 AL10 RAL ACC Z EQUALS ONE 1701 65 0000 1672 + 264 NZE AL12 OVER Z IF 1672 45 1676 1681 + 265 RAL AL11 K NEG AND Z 1676 65 1685 1649 + 266 LDD ARTHY E00AG NON ZERO 1649 69 1808 1830 + 267 AL12 LDD ARTHY 3111 ALARM IF ZRO 1681 69 1808 3111 + 268 AL5 STD ARTHX 1737 24 1786 1652 + 269 MPY ARTHF 1652 19 1772 1673 + 270 SRT 0009 1673 30 0009 1644 + 271 NZU AL14 1644 44 1650 1639 + 272 STL ARTHD 1639 20 1665 1640 + 273 RAL 8003 AL15 1640 65 8003 1641 + 274 AL15 ALO ARTHE ARTHX 1641 15 1902 1786 + 275 AL14 SRT 0001 1650 30 0001 1643 + 276 STL ARTHD 1643 20 1665 1642 + 277 RAL AJ2 AL15 1642 65 1903 1641 + 278 AL1 50 0000 0000 1736 50 0000 0000 + 279 AL2 10 0000 0000 1660 10 0000 0000 + 280 AL11 10 0000 0050 1685 10 0000 0050 + 281 AL16 00 0000 0002 1686 00 0000 0002 + 282 AJ2 00 0000 0001 1903 00 0000 0001 + 283 E00AN STD ARTHY POWER 1651 24 1808 1687 + 284 LDD ACC FLOAT FIX 1687 69 0000 1674 + 285 STD ARTHH REVERSE 1674 24 1788 1745 + 286 STL ACC AL17A 1745 20 0000 1709 + 287 E00AK STD ARTHY POWER FIXFIX 1704 24 1808 1711 + 288 STL ARTHG AK1 Q IS ARGMNT 1711 20 1794 1647 + 289 AK1 RAM ACC K EQUALS 1647 67 0000 1705 + 290 STL ARTHF ABVAL POWER 1705 20 1772 1725 + 291 RAL AJ2 Z EQUALS 1725 65 1903 1707 + 292 STL ARTHH AK3 ONE 1707 20 1788 1718 + 293 AK3 RAU ARTHF K IS GTST 1718 60 1772 1727 + 294 MPY AK4 INTGR IN 1727 19 1730 1717 + 295 STU ARTHF K OVER TWO 1717 21 1772 1726 + 296 RAL 8002 IS REMAINDER 1726 65 8002 1735 + 297 NZE AK5 ZERO 1735 45 1734 1742 + 298 RAU ARTHH IF NOT Z IS 1734 60 1788 1688 + 299 MPY ARTHG Z TIMES Q 1688 19 1794 1733 + 300 STL ARTHH AK5 1733 20 1788 1742 + 301 AK5 RAU ARTHF 1742 60 1772 1728 + 302 NZU AK6 1S K ZERO 1728 44 1740 1746 + 303 RAU ARTHG IF NOT 1740 60 1794 1749 + 304 MPY 8001 Q EQUALS 1749 19 8001 1689 + 305 STL ARTHG AK3 Q SQUARED 1689 20 1794 1718 + 306 AK6 RAU ACC IS POWER NEG 1746 60 0000 1656 + 307 BMI AK7 IF SO IS Z 1656 46 1659 1713 + 308 RAM ARTHH ZERO 1659 67 1788 1744 + 309 NZE AK8 IF NOT IS Z 1744 45 1748 1750 + 310 SLO AJ2 ONE 1748 16 1903 1657 + 311 NZE AK10 AK7 1657 45 1710 1713 + 312 AK7 RAL ARTHH ARTHY EXHIBIT Z 1713 65 1788 1808 + 313 AK10 RAL 8003 ARTHY 1710 65 8003 1808 + 314 AK8 LDD ARTHY 3101 ALARM 1750 69 1808 3101 + 315 AK4 50 0000 0000 1730 50 0000 0000 + 316 AJ2 00 0000 0001 1903 00 0000 0001 + 317 E00AM STD ARTHY INTERCHGE 1653 24 1808 1696 + 318 LDD ACC ACC AND 1696 69 0000 1703 + 319 STD ARTHG LOWER 1703 24 1794 1697 + 320 STL ACC AK1 THEN E00AK 1697 20 0000 1647 + 321 1976 RAM 1951 1976 67 1951 1623 + 322 AUP 8003 1623 10 8003 1632 + 323 SLT 0004 1632 35 0004 1624 + 324 SDA P0009 1624 22 1959 1626 + 325 SRT 0004 1626 30 0004 1637 + 326 LDD AQ4 1637 69 1627 1816 + 327 RAL 8003 1627 65 8003 1636 + 328 AUP P0009 1636 10 1959 1633 + 329 ALO 8001 1633 15 8001 1631 + 330 AUP AQ9B 1631 10 1625 1628 + 331 ALO AQ10 AQ11 1628 15 1634 1622 + 332 AQ11 SUP AQ9B 1622 11 1625 1630 + 333 NZU AQ8 1630 44 1635 1837 + 334 AUP 8001 1635 10 8001 1621 + 335 SUP AR7 1621 11 1924 1629 + 336 SLO 8001 8003 1629 16 8001 8003 + 337 AQ9B LDD 1952 8002 1625 69 1952 8002 + 338 AQ10 STD 0000 AQ11 1634 24 0000 1622 + 1 VARS + ARTHX 00 0000 0000 1786 00 0000 0000 + ARTHD 00 0000 0000 1665 00 0000 0000 + ARTHG 00 0000 0000 1794 00 0000 0000 + ARTHF 00 0000 0000 1772 00 0000 0000 + ARTHE 00 0000 0000 1902 00 0000 0000 + ARTHH 00 0000 0000 1788 00 0000 0000 + ARTHM 00 0000 0000 1824 00 0000 0000 + ARTHY 00 0000 0000 1808 00 0000 0000 + ACC 00 0000 0000 0000 00 0000 0000 + ACC1 00 0000 0000 1998 00 0000 0000 + ACC2 00 0000 0000 1843 00 0000 0000 + ACC3 00 0000 0000 1881 00 0000 0000 + ACC4 00 0000 0000 1870 00 0000 0000 + ACC5 00 0000 0000 1795 00 0000 0000 + ACC6 00 0000 0000 1858 00 0000 0000 + J0001 00 0000 0000 1977 00 0000 0000 + J0002 00 0000 0000 1978 00 0000 0000 + J0003 00 0000 0000 1979 00 0000 0000 + J0004 00 0000 0000 1980 00 0000 0000 + J0005 00 0000 0000 1981 00 0000 0000 + J0006 00 0000 0000 1982 00 0000 0000 + J0007 00 0000 0000 1983 00 0000 0000 + J0008 00 0000 0000 1984 00 0000 0000 + P0000 00 0000 0000 1950 00 0000 0000 + P0001 00 0000 0000 1951 00 0000 0000 + P0002 00 0000 0000 1952 00 0000 0000 + P0004 00 0000 0000 1954 00 0000 0000 + P0005 00 0000 0000 1955 00 0000 0000 + P0007 00 0000 0000 1957 00 0000 0000 + P0008 00 0000 0000 1958 00 0000 0000 + P0009 00 0000 0000 1959 00 0000 0000 + P0010 00 0000 0000 1960 00 0000 0000 diff --git a/I650/sw/it_package_p3.dck b/I650/sw/it_package_p3.dck new file mode 100644 index 00000000..bcc91f0f --- /dev/null +++ b/I650/sw/it_package_p3.dck @@ -0,0 +1,377 @@ +6I1954195C 0000241833800?2417861789 e00aistdarthxai1 1-add +6I1954195C 0000241789800?2017941799 ai1 stlarthg 2- +6I1954195C 0000241799800?6918021805 ldd arthb 3- +6I1954195C 0000241802800?6780021767 ram 8002 4-store acc +6I1954195C 0000241767800?2017721894 stlarthf 5-power +6I1954195C 0000241894800?1819021759 smlarthe 6- +6I1954195C 0000241759800?3500011766 slt 0001 7- +6I1954195C 0000241766800?4417731771 nzuai12 8-find max +6I1954195C 0000241771800?6917741777 lddai3a 9- +6I1954195C 0000241777800?3000051790 srt 0005 10-power +6I1954195C 0000241790800?2217931796 sdaai3 11-set expnnts +6I1954195C 0000241796800?4618991754 bmi ai2 12-and then +6I1954195C 0000241899800?6719021817 ramarthe 13-perform +6I1954195C 0000241817800?2017721776 stlarthf 14-addition +6I1954195C 0000241776800?6517881943 ralarthh 15- +6I1954195C 0000241943800?6918241793 lddarthmai3 16- +6I1954195C 0000241793800?3000001811 ai3 srt 0000ai3b 17- +6I1954195C 0000241774800?3000001811 ai3a srt 0000ai3b 18- +6I1954195C 0000241811800?1580011770 ai3b alo 8001ai5 19- +6I1954195C 0000241754800?6518241779 ai2 ralarthm 20- +6I1954195C 0000241779800?6917881793 lddarthhai3 21- +6I1954195C 0000241770800?6080021780 ai5 rau 8002 22-clear arthe +6I1954195C 0000241780800?2019021762 stlarthearths 23-to scale +6I1954195C 0000241773800?4617781828 ai12 bmi ai13 24- +6I1954195C 0000241778800?6517941904 ralarthgai10 25- +6I1954195C 0000241828800?6500001786 ai13 ralacc arthx 26- +6I1954195C 0000241805800?2418081826 arthbstdarthy 27-break up exp +6I1954195C 0000241826800?3500081996 slt 0008 28-and mantissa +6I1954195C 0000241996800?2019021755 stlarthe 29-store power +6I1954195C 0000241755800?6080031763 rau 8003 30-and mantissa +6I1954195C 0000241763800?3500011769 slt 0001 31-of lower +6I1954195C 0000241769800?2118241997 stuarthm 32- +6I1954195C 0000241997800?6000001855 rauacc 33- +6I1954195C 0000241855800?3000021761 srt 0002 34-store power +6I1954195C 0000241761800?1680021819 slo 8002 35-and mantissa +6I1954195C 0000241819800?3500011775 slt 0001 36-of acc +6I1954195C 0000241775800?1580011783 alo 8001 37- +6I1954195C 0000241783800?2117881808 stuarthharthy 38- +6I1954195C 0000241762800?3600001782 arthssct 0000 39-normalize +6I1954195C 0000241782800?4719421787 bovai6 40-brnch if zro +6I1954195C 0000241787800?2017941797 stlarthg 41-shift count +6I1954195C 0000241797800?6580031905 ral 8003 42-round on +6I1954195C 0000241905800?3100021813 srd 0002 43-ninth digit +6I1954195C 0000241813800?3500021869 slt 0002 44-check for +6I1954195C 0000241869800?2018241877 stlarthm 45-roundoff +6I1954195C 0000241877800?4418311834 nzuai7 ai8 46-overflow +6I1954195C 0000241834800?6780031841 ai8 ram 8003 47-and +6I1954195C 0000241841800?1817941800 smlarthg 48-correct if +6I1954195C 0000241800800?1519031822 aloaj2 49-necessary +6I1954195C 0000241822800?3500081791 slt 0008 50- +6I1954195C 0000241791800?6580021849 ral 8002 51- +6I1954195C 0000241849800?1719021757 amlarthe 52- +6I1954195C 0000241757800?1517721827 aloarthf 53- +6I1954195C 0000241827800?4617521781 bmiai11a 54-pwr too smal +6I1954195C 0000241781800?4417851836 nzuai11 55-pwr too lrge +6I1954195C 0000241836800?3500021893 slt 0002 56- +6I1954195C 0000241893800?2119981901 stuacc1 57- +6I1954195C 0000241901800?6518241829 ralarthm 58- +6I1954195C 0000241829800?4619441995 bmi ai9 59-combine +6I1954195C 0000241944800?1619981904 sloacc1 ai10 60- +6I1954195C 0000241904800?2000001786 ai10 stlacc arthx 61-and +6I1954195C 0000241995800?1519981904 ai9 aloacc1 ai10 62- +6I1954195C 0000241831800?3000011792 ai7 srt 0001 63-adjust +6I1954195C 0000241792800?2018241927 stlarthm 64- +6I1954195C 0000241927800?3500011834 slt 0001ai8 65- +6I1954195C 0000241942800?6580031904 ai6 ral 8003ai10 66- +6I1954195C 0000241832800?2417861839 e00ajstdarthx 67-multiply +6I1954195C 0000241839800?6918521805 ldd arthb 68- +6I1954195C 0000241852800?6780021867 ram 8002 69-acc power +6I1954195C 0000241867800?1618201825 sloaj1 70-minus 48 +6I1954195C 0000241825800?2017721875 stlarthf 71- +6I1954195C 0000241875800?6017881756 rauarthh 72- +6I1954195C 0000241756800?1918241762 mpyarthmarths 73- +6I1954195C 0000241830800?2417861889 e00agstdarthxag1 74-divide +6I1954195C 0000241889800?6918421805 ag1 ldd arthb 75-is divisor +6I1954195C 0000241842800?4418121846 nzu ag3 76-zer0 +6I1954195C 0000241812800?6880021821 rsm 8002 77-divisor +6I1954195C 0000241821800?1518761895 aloag2 78-power minus +6I1954195C 0000241895800?2017721768 stlarthf 79-49 +6I1954195C 0000241768800?6018241879 rauarthm 80-sh1ft +6I1954195C 0000241879800?3000011885 srt 0001 81-dividend +6I1954195C 0000241885800?6417881803 dvrarthh 82-do divide +6I1954195C 0000241803800?6080021762 rau 8002arths 83- +6I1954195C 0000241882800?2417861989 e00aostdarthx 84-div reverse +6I1954195C 0000241989800?2018431896 stlacc2 85- +6I1954195C 0000241896800?6500001810 ralacc 86- +6I1954195C 0000241810800?6918431897 lddacc2 87- +6I1954195C 0000241897800?2400001889 stdacc ag1 88- +6I1954195C 0000241947800?2418581911 e00afstdacc6 89-fl0at to lwr +6I1954195C 0000241911800?6919251928 lddae4 e00ae 90-and acc +6I1954195C 0000241925800?2000001858 ae4 stlacc acc6 91- +6I1954195C 0000241928800?2417861840 e00aestdarthx 92-float to lwr +6I1954195C 0000241840800?6080021753 rau 8002 93-only +6I1954195C 0000241753800?3600001975 sct 0000 94-normalize +6I1954195C 0000241975800?2018811784 stlacc3 95- +6I1954195C 0000241784800?4718511890 bovad1 96-zer0 check +6I1954195C 0000241890800?6580031798 ral 8003 97- +6I1954195C 0000241798800?3100021807 srd 0002 98-round for +6I1954195C 0000241807800?3500021764 slt 0002 99-placing exp +6I1954195C 0000241764800?4418181891 nzu ae6 100-check round +6I1954195C 0000241818800?6980031874 ldd 8003 101-overflow +6I1954195C 0000241874800?3000011884 srt 0001 102- +6I1954195C 0000241884800?1580011891 alo 8001ae6 103- +6I1954195C 0000241891800?4618441845 ae6 bmiae2 104-insert +6I1954195C 0000241845800?1518481804 aloaj3 ae5 105-exp0nent +6I1954195C 0000241844800?1618481804 ae2 sloaj3 ae5 106- +6I1954195C 0000241804800?1618811786 ae5 sloacc3 arthx 107- +6I1954195C 0000241932800?2417861990 e00thstdarthx 108-fix l0wer +6I1954195C 0000241990800?3500081859 slt 0008 109-to lower +6I1954195C 0000241859800?2118241878 stuarthm 110- +6I1954195C 0000241878800?6780021887 ram 8002 111-test exp +6I1954195C 0000241887800?1619401945 sloaj5 112-store zer0 +6I1954195C 0000241945800?4618511850 bmiad1 113-if less than +6I1954195C 0000241850800?1618531758 sloaj4 114-50 alarm +6I1954195C 0000241758800?4618611862 bmi ad3 115-1f grtr than +6I1954195C 0000241861800?3000041921 srt 0004 116-59 +6I1954195C 0000241921800?1519241929 aloar7 117- +6I1954195C 0000241929800?6918351838 lddad2a 118-modify +6I1954195C 0000241838800?2219911971 sdaad2 119-shift +6I1954195C 0000241971800?6518241930 ralarthm 120- +6I1954195C 0000241930800?3500021991 slt 0002ad2 121- +6I1954195C 0000241851800?6580031786 ad1 ral 8003arthx 122-store zero +6I1954195C 0000241991800?3000001786 ad2 srt 0000arthx 123-shift c0nst +6I1954195C 0000241835800?3000001786 ad2a srt 0000arthx 124- +6I1954195C 0000241862800?6917863031 ad3 lddarthx 3031 125-fix alarm +6I1954195C 0000241846800?6917863061 ag3 lddarthx 3061 126-divide alarm +6I1954195C 0000241785800?6917863081 ai11 lddarthx 3081 127-scale alarm +6I1954195C 0000241752800?0110811942 ai11ahlt 1081ai6 128- +6I1954195C 0000241876800?4900000000 ag2 49 0000 0000 129- +6I1954195C 0000241820800?4800000000 aj1 48 0000 0000 130- +6I1954195C 0000241903800?0000000001 aj2 00 0000 0001 131- +6I1954195C 0000241848800?0000000059 aj3 00 0000 0059 132- +6I1954195C 0000241853800?1000000000 aj4 10 0000 0000 133- +6I1954195C 0000241940800?5000000000 aj5 50 0000 0000 134- +6I1954195C 0000241974800?2419771880 e00aqstdj0001aq1 135-read +6I1954195C 0000241880800?7019761898 aq1 rd1 1976aq3 136- +6I1954195C 0000241898800?6719511806 aq3 ramp0001aq3a 137- +6I1954195C 0000241892800?6719511806 aq3b ramp0001aq3a 138-check for +6I1954195C 0000241806800?4518601837 aq3a nze aq8 139-last word +6I1954195C 0000241860800?6918631816 lddaq5 aq4 140-on card +6I1954195C 0000241816800?2418701873 aq4 stdacc4 141- +6I1954195C 0000241873800?1080031931 aup 8003 142-read in +6I1954195C 0000241931800?3000041941 srt 0004 143-label for +6I1954195C 0000241941800?2317951948 siaacc5 144-present +6I1954195C 0000241948800?1680011856 slo 8001 145-variable +6I1954195C 0000241856800?1518098002 alo 8002 146-get i y 0r c +6I1954195C 0000241809800?6000001987 rau 0000 147-address from +6I1954195C 0000241987800?1017951949 aupacc5 146-abcon dict +6I1954195C 0000241949800?3500041870 slt 0004acc4 149-generate +6I1954195C 0000241863800?1018661857 aq5 aupaq7 150-1nstruction +6I1954195C 0000241857800?1519601965 alop0010 151- +6I1954195C 0000241965800?1519688002 alo 8002 152-get and +6I1954195C 0000241968800?6919528003 lddp0002 8003 153-store word +6I1954195C 0000241866800?2400001907 aq7 std 0000 154- +6I1954195C 0000241907800?6519601915 ralp0010 155-increment +6I1954195C 0000241915800?1519181854 aloaq9 156-word count +6I1954195C 0000241854800?2019601963 stlp0010 157- +6I1954195C 0000241963800?1518928002 aloaq3b 8002 158- +6I1954195C 0000241837800?6519511765 aq8 ralp0001 159-check for +6I1954195C 0000241765800?4619771880 bmij0001aq1 160-last card +6I1954195C 0000241801800?2419551908 e00arstdp0005 161-punch 0ut +6I1954195C 0000241908800?2119791935 stuj0003 162- +6I1954195C 0000241935800?2319581912 siap0008 163-store stmnt +6I1954195C 0000241912800?2119801886 stuj0004 164-number +6I1954195C 0000241886800?2219541909 sdap0004 165-store word +6I1954195C 0000241909800?1680011917 slo 8001 166-count +6I1954195C 0000241917800?4519201872 nzear10 ar9 167-test zero +6I1954195C 0000241920800?2119811814 ar10 stuj0005 168-stmt number +6I1954195C 0000241814800?2419821972 stdj0006 169-set punch +6I1954195C 0000241972800?2419831864 stdj0007 170-band to +6I1954195C 0000241864800?2419841888 stdj0008 171-zeroes +6I1954195C 0000241888800?2419601913 stdp0010ar3 172-set counter +6I1954195C 0000241913800?6519541910 ar3 ralp0004 173- +6I1954195C 0000241910800?1619241936 sloar7 174- +6I1954195C 0000241936800?4619941992 bmiar8 175-test word +6I1954195C 0000241992800?2019541865 stlp0004ar4 176-count +6I1954195C 0000241865800?1518688002 ar4 alo 8002 177-get word +6I1954195C 0000241868800?6519501914 ralp0000 178-label from +6I1954195C 0000241914800?1080031922 aup 8003 179-punch consts +6I1954195C 0000241922800?3500011938 slt 0001 180- +6I1954195C 0000241938800?2219571961 sdap0007 181-modify label +6I1954195C 0000241961800?1680011919 slo 8001 182- +6I1954195C 0000241919800?3000011926 srt 0001 183- +6I1954195C 0000241926800?1519571962 alop0007 184- +6I1954195C 0000241962800?3500041923 slt 0004 185-insert stmnt +6I1954195C 0000241923800?1519581964 alop0008 186-number +6I1954195C 0000241964800?1019601916 aupp0010 187- +6I1954195C 0000241916800?1019698003 aup 8003 188- +6I1954195C 0000241969800?2019771988 stlj0001 189-store label +6I1954195C 0000241988800?6580021900 ral 8002 190-for punching +6I1954195C 0000241900800?6919061816 ldd aq4 191-modify label +6I1954195C 0000241906800?1019661934 aupar6 192-into drum +6I1954195C 0000241934800?1519601967 alop0010 193-loc in read +6I1954195C 0000241967800?1519708003 alo 8003 194-get word +6I1954195C 0000241970800?2419781993 stdj0002 195-store in +6I1954195C 0000241993800?6519601815 ralp0010 196-punch band +6I1954195C 0000241815800?1519181973 aloaq9 197- +6I1954195C 0000241973800?2019601913 stlp0010ar3 196- +6I1954195C 0000241966800?6900008002 ar6 ldd 0000 8002 199- +6I1954195C 0000241924800?0000010000 ar7 00 0001 0000 200- +6I1954195C 0000241994800?7119771955 ar8 pchj0001p0005 201-punch +6I1954195C 0000241872800?6580001937 ar9 ral 8000 202-if stmt nmbr +6I1954195C 0000241937800?4619201955 bmiar10 p0005 203-zro pch only +6I1954195C 0000241918800?0000020000 aq9 00 0002 0000 204-if 8000 neg +6I1954195C 0000241986800?8000008800 j0010 80 0000 8800 205-control cnst +6I1954195C 0000241976800?6719511744 1976ram 1951 206-read +6I1954195C 0000241744800?1080031741 aup 8003 207-up to +6I1954195C 0000241741800?3500041748 slt 0004 208-seven +6I1954195C 0000241748800?2219591737 sdap0009 209-contiguous +6I1954195C 0000241737800?3000041746 srt 0004 210-variables +6I1954195C 0000241746800?6917501816 ldd aq4 211-per card +6I1954195C 0000241750800?6580031749 ral 8003 212- +6I1954195C 0000241749800?1019591740 aupp0009 213- +6I1954195C 0000241740800?1580011751 alo 8001 214- +6I1954195C 0000241751800?1017381742 aupaq9b 215- +6I1954195C 0000241742800?1517451735 aloaq10 aq11 216- +6I1954195C 0000241735800?1117381743 aq11 supaq9b 217- +6I1954195C 0000241743800?4417471837 nzu aq8 218- +6I1954195C 0000241747800?1080011736 aup 8001 219- +6I1954195C 0000241736800?1119241739 supar7 220- +6I1954195C 0000241739800?1680018003 slo 8001 8003 221- +6I1954195C 0000241738800?6919528002 aq9b ldd 1952 8002 222- +6I1954195C 0000241745800?2400001735 aq10 std 0000aq11 223- +6I1954195C 0000241705800?2418581711 e00acstdacc6 224-exponential +6I1954195C 0000241711800?4517151710 nze ac5 225-is argument +6I1954195C 0000241715800?3500081683 slt 0008 226-zero +6I1954195C 0000241683800?2117881692 stuarthh 227-if not let +6I1954195C 0000241692800?6880021701 rsm 8002 228-n be mantsa +6I1954195C 0000241701800?1517041709 aloac3 229-x be power +6I1954195C 0000241709800?4616631713 bmiac4 230-1s x grtr +6I1954195C 0000241713800?3500011719 slt 0001 231-than two +6I1954195C 0000241719800?4417101724 nzuac5 232-or less than +6I1954195C 0000241724800?3000051687 srt 0005 233-minus eight +6I1954195C 0000241687800?1516901695 aloac6 234-if x within +6I1954195C 0000241695800?2016651718 stlarthd 235-bounds gen +6I1954195C 0000241718800?6017881693 rauarthh 236-int and +6I1954195C 0000241693800?3000061665 srt 0006arthd 237-fract parts +6I1954195C 0000241704800?5100000000 ac3 51 0000 0000 238-of argument +6I1954195C 0000241690800?3000001684 ac6 srt 0000 239-is arg neg +6I1954195C 0000241684800?4616891702 bmiac8 240-if so int is +6I1954195C 0000241702800?2116651685 stuarthdac1 241-int minus 1 +6I1954195C 0000241689800?1119031707 ac8 supaj2 242-and fract is +6I1954195C 0000241707800?2116651668 stuarthd 243-fract plus 1 +6I1954195C 0000241668800?6580021677 ral 8002 244- +6I1954195C 0000241677800?1516801685 aloac2 ac1 245- +6I1954195C 0000241680800?9999999999 ac2 99 9999 9999 246- +6I1954195C 0000241685800?2017881694 ac1 stlarthh 247- +6I1954195C 0000241694800?6080021703 rau 8002 248- +6I1954195C 0000241703800?1917061708 mpyac18 249-generate +6I1954195C 0000241708800?6080031716 rau 8003 250- +6I1954195C 0000241716800?1017201686 aupac17 251-polynomial +6I1954195C 0000241686800?1917881691 mpyarthh 252- +6I1954195C 0000241691800?6080031661 rau 8003 253-approxim +6I1954195C 0000241661800?1016661682 aupac16 254-ation +6I1954195C 0000241682800?1917881696 mpyarthh 255- +6I1954195C 0000241696800?6080031712 rau 8003 256-for +6I1954195C 0000241712800?1017171678 aupac15 257- +6I1954195C 0000241678800?1917881650 mpyarthh 258-exponential +6I1954195C 0000241650800?6080031714 rau 8003 259- +6I1954195C 0000241714800?1016671679 aupac14 260- +6I1954195C 0000241679800?1917881698 mpyarthh 261- +6I1954195C 0000241698800?6080031655 rau 8003 262- +6I1954195C 0000241655800?1016601676 aupac13 263- +6I1954195C 0000241676800?1917881652 mpyarthh 264- +6I1954195C 0000241652800?6080031659 rau 8003 265- +6I1954195C 0000241659800?1016641672 aupac12 266- +6I1954195C 0000241672800?1917881673 mpyarthh 267-square +6I1954195C 0000241673800?6080031700 rau 8003 268-result +6I1954195C 0000241700800?1018531671 aupaj4 269-scale and +6I1954195C 0000241671800?1980031657 mpy 8003 270-float then +6I1954195C 0000241657800?3000011688 srt 0001 271-exit +6I1954195C 0000241688800?2118431697 stuacc2 272- +6I1954195C 0000241697800?6016511656 rauac19 273- +6I1954195C 0000241656800?1016651933 auparthd 274- +6I1954195C 0000241933800?4618581669 bmiacc6 a274- +6I1954195C 0000241669800?3000021675 srt 0002 275- +6I1954195C 0000241675800?4416741681 nzuac21 276- +6I1954195C 0000241681800?1018431699 aupacc2 277- +6I1954195C 0000241699800?3000081858 srt 0008acc6 278- +6I1954195C 0000241663800?6517881653 ac4 ralarthh 279- +6I1954195C 0000241653800?4616251674 bmi ac21 280- +6I1954195C 0000241625800?6580031858 ral 8003acc6 281- +6I1954195C 0000241710800?6516271858 ac5 ralac20 acc6 282-argmnt zero +6I1954195C 0000241674800?6918583021 ac21 lddacc6 3021 283-alarm stop +6I1954195C 0000241664800?1151292776 ac12 11 5129 2776 286- +6I1954195C 0000241660800?0662730884 ac13 06 6273 0884 287- +6I1954195C 0000241667800?0254393575 ac14 02 5439 3575 288- +6I1954195C 0000241717800?0072951737 ac15 00 7295 1737 289- +6I1954195C 0000241666800?0017421120 ac16 00 1742 1120 290- +6I1954195C 0000241720800?0002554918 ac17 00 0255 4918 291- +6I1954195C 0000241706800?0000932643 ac18 00 0093 2643 292- +6I1954195C 0000241651800?0000000050 ac19 00 0000 0050 293- +6I1954195C 0000241627800?1000000050 ac20 10 0000 0050 294- +6I1954195C 0000241638800?4516621632 e00abnze ab10 295-is arg zero +6I1954195C 0000241662800?2416651670 stdarthd 296- +6I1954195C 0000241670800?4616321624 bmiab10 297-is arg neg +6I1954195C 0000241624800?3500081643 slt 0008 298- +6I1954195C 0000241643800?2019021658 stlarthe 299-store power +6I1954195C 0000241658800?6080031615 rau 8003 300-form z +6I1954195C 0000241615800?1016181623 aupab1 301-equal arg +6I1954195C 0000241623800?2118811635 stuacc3 302-minus root +6I1954195C 0000241635800?1117231728 supab2 303-ten over arg +6I1954195C 0000241728800?6418811731 dvracc3 304-plus root +6I1954195C 0000241731800?2017861639 stlarthx 305-ten +6I1954195C 0000241639800?6080021647 rau 8002 306- +6I1954195C 0000241647800?1980011721 mpy 8001 307-z square +6I1954195C 0000241721800?2118811636 stuacc3 308- +6I1954195C 0000241636800?6080031644 rau 8003 309-generate +6I1954195C 0000241644800?1916481654 mpyab7 310- +6I1954195C 0000241654800?6080031614 rau 8003 311-polynomial +6I1954195C 0000241614800?1016171726 aupab6 312- +6I1954195C 0000241726800?1918811730 mpyacc3 313-approximatn +6I1954195C 0000241730800?6080031640 rau 8003 314- +6I1954195C 0000241640800?1016491727 aupab5 315- +6I1954195C 0000241727800?1918811613 mpyacc3 316- +6I1954195C 0000241613800?6080031616 rau 8003 317- +6I1954195C 0000241616800?1016191628 aupab4 318- +6I1954195C 0000241628800?1918811633 mpyacc3 319- +6I1954195C 0000241633800?6080031641 rau 8003 320- +6I1954195C 0000241641800?1016451733 aupab3 321- +6I1954195C 0000241733800?1917861722 mpyarthx 322- +6I1954195C 0000241722800?6580031729 ral 8003 323- +6I1954195C 0000241729800?1517321637 aloab8 324- +6I1954195C 0000241637800?3000021646 srt 0002 325- +6I1954195C 0000241646800?1519021725 aloarthe 326-add power +6I1954195C 0000241725800?1617321642 sloab8 327- +6I1954195C 0000241642800?3100021620 srd 0002 328-round +6I1954195C 0000241620800?6080021734 rau 8002 329- +6I1954195C 0000241734800?3600001621 sct 0000 330-normalize +6I1954195C 0000241621800?4716311626 bovab12 331- +6I1954195C 0000241626800?4616291630 bmi ab13 332- +6I1954195C 0000241629800?1116341622 supab9 ab11 333-adjust +6I1954195C 0000241622800?1180021631 ab11 sup 8002ab12 334-power +6I1954195C 0000241631800?6580031665 ab12 ral 8003arthd 335- +6I1954195C 0000241630800?1016341622 ab13 aupab9 ab11 336- +6I1954195C 0000241632800?6916653011 ab10 lddarthd 3011 337-alarm +6I1954195C 0000241618800?0031622780 ab1 00 3162 2780 338- +6I1954195C 0000241723800?0063245560 ab2 00 6324 5560 339- +6I1954195C 0000241645800?8685917180 ab3 86 8591 7180 340- +6I1954195C 0000241619800?2893355240 ab4 28 9335 5240 341- +6I1954195C 0000241649800?1775220710 ab5 17 7522 0710 342- +6I1954195C 0000241617800?0943764760 ab6 09 4376 4760 343- +6I1954195C 0000241648800?1913377140 ab7 19 1337 7140 344- +6I1954195C 0000241732800?5000000000 ab8 50 0000 0000 345- +6I1954195C 0000241634800?0000000053 ab9 00 0000 0053 346- +6I1954195C 0000241665800?0000000000 arthd 00 0000 0000 - +6I1954195C 0000241786800?0000000000 arthx 00 0000 0000 - +6I1954195C 0000241794800?0000000000 arthg 00 0000 0000 - +6I1954195C 0000241772800?0000000000 arthf 00 0000 0000 - +6I1954195C 0000241902800?0000000000 arthe 00 0000 0000 - +6I1954195C 0000241788800?0000000000 arthh 00 0000 0000 - +6I1954195C 0000241824800?0000000000 arthm 00 0000 0000 - +6I1954195C 0000241808800?0000000000 arthy 00 0000 0000 - +6I1954195C 0000240000800?0000000000 acc 00 0000 0000 - +6I1954195C 0000241998800?0000000000 acc1 00 0000 0000 - +6I1954195C 0000241843800?0000000000 acc2 00 0000 0000 - +6I1954195C 0000241881800?0000000000 acc3 00 0000 0000 - +6I1954195C 0000241870800?0000000000 acc4 00 0000 0000 - +6I1954195C 0000241795800?0000000000 acc5 00 0000 0000 - +6I1954195C 0000241858800?0000000000 acc6 00 0000 0000 - +6I1954195C 0000241977800?0000000000 j0001 00 0000 0000 - +6I1954195C 0000241978800?0000000000 j0002 00 0000 0000 - +6I1954195C 0000241979800?0000000000 j0003 00 0000 0000 - +6I1954195C 0000241980800?0000000000 j0004 00 0000 0000 - +6I1954195C 0000241981800?0000000000 j0005 00 0000 0000 - +6I1954195C 0000241982800?0000000000 j0006 00 0000 0000 - +6I1954195C 0000241983800?0000000000 j0007 00 0000 0000 - +6I1954195C 0000241984800?0000000000 j0008 00 0000 0000 - +6I1954195C 0000241950800?0000000000 p0000 00 0000 0000 - +6I1954195C 0000241951800?0000000000 p0001 00 0000 0000 - +6I1954195C 0000241952800?0000000000 p0002 00 0000 0000 - +6I1954195C 0000241954800?0000000000 p0004 00 0000 0000 - +6I1954195C 0000241955800?0000000000 p0005 00 0000 0000 - +6I1954195C 0000241957800?0000000000 p0007 00 0000 0000 - +6I1954195C 0000241958800?0000000000 p0008 00 0000 0000 - +6I1954195C 0000241959800?0000000000 p0009 00 0000 0000 - +6I1954195C 0000241960800?0000000000 p0010 00 0000 0000 - diff --git a/I650/sw/it_package_p3_listing.txt b/I650/sw/it_package_p3_listing.txt new file mode 100644 index 00000000..4d9600df --- /dev/null +++ b/I650/sw/it_package_p3_listing.txt @@ -0,0 +1,386 @@ + 5 PACKAGE 3 + 5 CONTAINS PACKAGE 1 + 5 PLUS THE FOLLOWING + 5 ROUTINES + 5 E00AC EXPONENTIAL SUBROUTINE + 5 E00A8 L0G SUBROUTINE + 1 E00AI STD ARTHX AI1 ADD 1833 24 1786 1789 + 2 AI1 STL ARTHG 1789 20 1794 1799 + 3 LDD ARTHB 1799 69 1802 1805 + 4 RAM 8002 STORE ACC 1802 67 8002 1767 + 5 STL ARTHF POWER 1767 20 1772 1894 + 6 SML ARTHE 1894 18 1902 1759 + 7 SLT 0001 1759 35 0001 1766 + 8 NZU AI12 FIND MAX 1766 44 1773 1771 + 9 LDD AI3A 1771 69 1774 1777 + 10 SRT 0005 POWER 1777 30 0005 1790 + 11 SDA AI3 SET EXPNNTS 1790 22 1793 1796 + 12 BMI AI2 AND THEN 1796 46 1899 1754 + 13 RAM ARTHE PERFORM 1899 67 1902 1817 + 14 STL ARTHF ADDITION 1817 20 1772 1776 + 15 RAL ARTHH 1776 65 1788 1943 + 16 LDD ARTHM AI3 1943 69 1824 1793 + 17 AI3 SRT 0000 AI3B 1793 30 0000 1811 + 18 AI3A SRT 0000 AI3B 1774 30 0000 1811 + 19 AI3B ALO 8001 AI5 1811 15 8001 1770 + 20 AI2 RAL ARTHM 1754 65 1824 1779 + 21 LDD ARTHH AI3 1779 69 1788 1793 + 22 AI5 RAU 8002 CLEAR ARTHE 1770 60 8002 1780 + 23 STL ARTHE ARTHS TO SCALE 1780 20 1902 1762 + 24 AI12 BMI AI13 1773 46 1778 1828 + 25 RAL ARTHG AI10 1778 65 1794 1904 + 26 AI13 RAL ACC ARTHX 1828 65 0000 1786 + 27 ARTHB STD ARTHY BREAK UP EXP 1805 24 1808 1826 + 28 SLT 0008 AND MANTISSA 1826 35 0008 1996 + 29 STL ARTHE STORE POWER 1996 20 1902 1755 + 30 RAU 8003 AND MANTISSA 1755 60 8003 1763 + 31 SLT 0001 OF LOWER 1763 35 0001 1769 + 32 STU ARTHM 1769 21 1824 1997 + 33 RAU ACC 1997 60 0000 1855 + 34 SRT 0002 STORE POWER 1855 30 0002 1761 + 35 SLO 8002 AND MANTISSA 1761 16 8002 1819 + 36 SLT 0001 OF ACC 1819 35 0001 1775 + 37 ALO 8001 1775 15 8001 1783 + 38 STU ARTHH ARTHY 1783 21 1788 1808 + 39 ARTHS SCT 0000 NORMALIZE 1762 36 0000 1782 + 40 BOV AI6 BRNCH IF ZRO 1782 47 1942 1787 + 41 STL ARTHG SHIFT COUNT 1787 20 1794 1797 + 42 RAL 8003 ROUND ON 1797 65 8003 1905 + 43 SRD 0002 NINTH DIGIT 1905 31 0002 1813 + 44 SLT 0002 CHECK FOR 1813 35 0002 1869 + 45 STL ARTHM ROUNDOFF 1869 20 1824 1877 + 46 NZU AI7 AI8 OVERFLOW 1877 44 1831 1834 + 47 AI8 RAM 8003 AND 1834 67 8003 1841 + 48 SML ARTHG CORRECT IF 1841 18 1794 1800 + 49 ALO AJ2 NECESSARY 1800 15 1903 1822 + 50 SLT 0008 1822 35 0008 1791 + 51 RAL 8002 1791 65 8002 1849 + 52 AML ARTHE 1849 17 1902 1757 + 53 ALO ARTHF 1757 15 1772 1827 + 54 BMI AI11A PWR TOO SMAL 1827 46 1752 1781 + 55 NZU AI11 PWR TOO LRGE 1781 44 1785 1836 + 56 SLT 0002 1836 35 0002 1893 + 57 STU ACC1 1893 21 1998 1901 + 58 RAL ARTHM 1901 65 1824 1829 + 59 BMI AI9 COMBINE 1829 46 1944 1995 + 60 SLO ACC1 AI10 1944 16 1998 1904 + 61 AI10 STL ACC ARTHX AND 1904 20 0000 1786 + 62 AI9 ALO ACC1 AI10 1995 15 1998 1904 + 63 AI7 SRT 0001 ADJUST 1831 30 0001 1792 + 64 STL ARTHM 1792 20 1824 1927 + 65 SLT 0001 AI8 1927 35 0001 1834 + 66 AI6 RAL 8003 AI10 1942 65 8003 1904 + 67 E00AJ STD ARTHX MULTIPLY 1832 24 1786 1839 + 68 LDD ARTHB 1839 69 1852 1805 + 69 RAM 8002 ACC POWER 1852 67 8002 1867 + 70 SLO AJ1 MINUS 48 1867 16 1820 1825 + 71 STL ARTHF 1825 20 1772 1875 + 72 RAU ARTHH 1875 60 1788 1756 + 73 MPY ARTHM ARTHS 1756 19 1824 1762 + 74 E00AG STD ARTHX AG1 DIVIDE 1830 24 1786 1889 + 75 AG1 LDD ARTHB IS DIVISOR 1889 69 1842 1805 + 76 NZU AG3 ZER0 1842 44 1812 1846 + 77 RSM 8002 DIVISOR 1812 68 8002 1821 + 78 ALO AG2 POWER MINUS 1821 15 1876 1895 + 79 STL ARTHF 49 1895 20 1772 1768 + 80 RAU ARTHM SH1FT 1768 60 1824 1879 + 81 SRT 0001 DIVIDEND 1879 30 0001 1885 + 82 DVR ARTHH DO DIVIDE 1885 64 1788 1803 + 83 RAU 8002 ARTHS 1803 60 8002 1762 + 84 E00AO STD ARTHX DIV REVERSE 1882 24 1786 1989 + 85 STL ACC2 1989 20 1843 1896 + 86 RAL ACC 1896 65 0000 1810 + 87 LDD ACC2 1810 69 1843 1897 + 88 STD ACC AG1 1897 24 0000 1889 + 89 E00AF STD ACC6 FL0AT TO LWR 1947 24 1858 1911 + 90 LDD AE4 E00AE AND ACC 1911 69 1925 1928 + 91 AE4 STL ACC ACC6 1925 20 0000 1858 + 92 E00AE STD ARTHX FLOAT TO LWR 1928 24 1786 1840 + 93 RAU 8002 ONLY 1840 60 8002 1753 + 94 SCT 0000 NORMALIZE 1753 36 0000 1975 + 95 STL ACC3 1975 20 1881 1784 + 96 BOV AD1 ZER0 CHECK 1784 47 1851 1890 + 97 RAL 8003 1890 65 8003 1798 + 98 SRD 0002 ROUND FOR 1798 31 0002 1807 + 99 SLT 0002 PLACING EXP 1807 35 0002 1764 + 100 NZU AE6 CHECK ROUND 1764 44 1818 1891 + 101 LDD 8003 OVERFLOW 1818 69 8003 1874 + 102 SRT 0001 1874 30 0001 1884 + 103 ALO 8001 AE6 1884 15 8001 1891 + 104 AE6 BMI AE2 INSERT 1891 46 1844 1845 + 105 ALO AJ3 AE5 EXP0NENT 1845 15 1848 1804 + 106 AE2 SLO AJ3 AE5 1844 16 1848 1804 + 107 AE5 SLO ACC3 ARTHX 1804 16 1881 1786 + 108 E00TH STD ARTHX FIX L0WER 1932 24 1786 1990 + 109 SLT 0008 TO LOWER 1990 35 0008 1859 + 110 STU ARTHM 1859 21 1824 1878 + 111 RAM 8002 TEST EXP 1878 67 8002 1887 + 112 SLO AJ5 STORE ZER0 1887 16 1940 1945 + 113 BMI AD1 IF LESS THAN 1945 46 1851 1850 + 114 SLO AJ4 50 ALARM 1850 16 1853 1758 + 115 BMI AD3 1F GRTR THAN 1758 46 1861 1862 + 116 SRT 0004 59 1861 30 0004 1921 + 117 ALO AR7 1921 15 1924 1929 + 118 LDD AD2A MODIFY 1929 69 1835 1838 + 119 SDA AD2 SHIFT 1838 22 1991 1971 + 120 RAL ARTHM 1971 65 1824 1930 + 121 SLT 0002 AD2 1930 35 0002 1991 + 122 AD1 RAL 8003 ARTHX STORE ZERO 1851 65 8003 1786 + 123 AD2 SRT 0000 ARTHX SHIFT C0NST 1991 30 0000 1786 + 124 AD2A SRT 0000 ARTHX 1835 30 0000 1786 + 125 AD3 LDD ARTHX 3031 FIX ALARM 1862 69 1786 3031 + 126 AG3 LDD ARTHX 3061 DIVIDE ALARM 1846 69 1786 3061 + 127 AI11 LDD ARTHX 3081 SCALE ALARM 1785 69 1786 3081 + 128 AI11A HLT 1081 AI6 1752 01 1081 1942 + 129 AG2 49 0000 0000 1876 49 0000 0000 + 130 AJ1 48 0000 0000 1820 48 0000 0000 + 131 AJ2 00 0000 0001 1903 00 0000 0001 + 132 AJ3 00 0000 0059 1848 00 0000 0059 + 133 AJ4 10 0000 0000 1853 10 0000 0000 + 134 AJ5 50 0000 0000 1940 50 0000 0000 + 135 E00AQ STD J0001 AQ1 READ 1974 24 1977 1880 + 136 AQ1 RD1 1976 AQ3 1880 70 1976 1898 + 137 AQ3 RAM P0001 AQ3A 1898 67 1951 1806 + 138 AQ3B RAM P0001 AQ3A CHECK FOR 1892 67 1951 1806 + 139 AQ3A NZE AQ8 LAST WORD 1806 45 1860 1837 + 140 LDD AQ5 AQ4 ON CARD 1860 69 1863 1816 + 141 AQ4 STD ACC4 1816 24 1870 1873 + 142 AUP 8003 READ IN 1873 10 8003 1931 + 143 SRT 0004 LABEL FOR 1931 30 0004 1941 + 144 SIA ACC5 PRESENT 1941 23 1795 1948 + 145 SLO 8001 VARIABLE 1948 16 8001 1856 + 146 ALO 8002 GET I Y 0R C 1856 15 1809 8002 + 147 RAU 0000 ADDRESS FROM 1809 60 0000 1987 was RAU A000 - 00 0000 0000 + 146 AUP ACC5 ABCON DICT 1987 10 1795 1949 + 149 SLT 0004 ACC4 GENERATE 1949 35 0004 1870 + 150 AQ5 AUP AQ7 1NSTRUCTION 1863 10 1866 1857 + 151 ALO P0010 1857 15 1960 1965 + 152 ALO 8002 GET AND 1965 15 1968 8002 + 153 LDD P0002 8003 STORE WORD 1968 69 1952 8003 + 154 AQ7 STD 0000 1866 24 0000 1907 + 155 RAL P0010 INCREMENT 1907 65 1960 1915 + 156 ALO AQ9 WORD COUNT 1915 15 1918 1854 + 157 STL P0010 1854 20 1960 1963 + 158 ALO AQ3B 8002 1963 15 1892 8002 + 159 AQ8 RAL P0001 CHECK FOR 1837 65 1951 1765 + 160 BMI J0001 AQ1 LAST CARD 1765 46 1977 1880 + 161 E00AR STD P0005 PUNCH 0UT 1801 24 1955 1908 + 162 STU J0003 1908 21 1979 1935 + 163 SIA P0008 STORE STMNT 1935 23 1958 1912 + 164 STU J0004 NUMBER 1912 21 1980 1886 + 165 SDA P0004 STORE WORD 1886 22 1954 1909 + 166 SLO 8001 COUNT 1909 16 8001 1917 + 167 NZE AR10 AR9 TEST ZERO 1917 45 1920 1872 + 168 AR10 STU J0005 STMT NUMBER 1920 21 1981 1814 + 169 STD J0006 SET PUNCH 1814 24 1982 1972 + 170 STD J0007 BAND TO 1972 24 1983 1864 + 171 STD J0008 ZEROES 1864 24 1984 1888 + 172 STD P0010 AR3 SET COUNTER 1888 24 1960 1913 + 173 AR3 RAL P0004 1913 65 1954 1910 + 174 SLO AR7 1910 16 1924 1936 + 175 BMI AR8 TEST WORD 1936 46 1994 1992 + 176 STL P0004 AR4 COUNT 1992 20 1954 1865 + 177 AR4 ALO 8002 GET WORD 1865 15 1868 8002 + 178 RAL P0000 LABEL FROM 1868 65 1950 1914 + 179 AUP 8003 PUNCH CONSTS 1914 10 8003 1922 + 180 SLT 0001 1922 35 0001 1938 + 181 SDA P0007 MODIFY LABEL 1938 22 1957 1961 + 182 SLO 8001 1961 16 8001 1919 + 183 SRT 0001 1919 30 0001 1926 + 184 ALO P0007 1926 15 1957 1962 + 185 SLT 0004 INSERT STMNT 1962 35 0004 1923 + 186 ALO P0008 NUMBER 1923 15 1958 1964 + 187 AUP P0010 1964 10 1960 1916 + 188 AUP 8003 1916 10 1969 8003 + 189 STL J0001 STORE LABEL 1969 20 1977 1988 + 190 RAL 8002 FOR PUNCHING 1988 65 8002 1900 + 191 LDD AQ4 MODIFY LABEL 1900 69 1906 1816 + 192 AUP AR6 INTO DRUM 1906 10 1966 1934 + 193 ALO P0010 LOC IN READ 1934 15 1960 1967 + 194 ALO 8003 GET WORD 1967 15 1970 8003 + 195 STD J0002 STORE IN 1970 24 1978 1993 + 196 RAL P0010 PUNCH BAND 1993 65 1960 1815 + 197 ALO AQ9 1815 15 1918 1973 + 196 STL P0010 AR3 1973 20 1960 1913 + 199 AR6 LDD 0000 8002 1966 69 0000 8002 + 200 AR7 00 0001 0000 1924 00 0001 0000 + 201 AR8 PCH J0001 P0005 PUNCH 1994 71 1977 1955 + 202 AR9 RAL 8000 IF STMT NMBR 1872 65 8000 1937 + 203 BMI AR10 P0005 ZRO PCH ONLY 1937 46 1920 1955 + 204 AQ9 00 0002 0000 IF 8000 NEG 1918 00 0002 0000 + 205 J0010 80 0000 8800 CONTROL CNST 1986 80 0000 8800 + 206 1976 RAM 1951 READ 1976 67 1951 1744 + 207 AUP 8003 UP TO 1744 10 8003 1741 + 208 SLT 0004 SEVEN 1741 35 0004 1748 + 209 SDA P0009 CONTIGUOUS 1748 22 1959 1737 + 210 SRT 0004 VARIABLES 1737 30 0004 1746 + 211 LDD AQ4 PER CARD 1746 69 1750 1816 + 212 RAL 8003 1750 65 8003 1749 + 213 AUP P0009 1749 10 1959 1740 + 214 ALO 8001 1740 15 8001 1751 + 215 AUP AQ9B 1751 10 1738 1742 + 216 ALO AQ10 AQ11 1742 15 1745 1735 + 217 AQ11 SUP AQ9B 1735 11 1738 1743 + 218 NZU AQ8 1743 44 1747 1837 + 219 AUP 8001 1747 10 8001 1736 + 220 SUP AR7 1736 11 1924 1739 + 221 SLO 8001 8003 1739 16 8001 8003 + 222 AQ9B LDD 1952 8002 1738 69 1952 8002 + 223 AQ10 STD 0000 AQ11 1745 24 0000 1735 + 224 E00AC STD ACC6 EXPONENTIAL 1705 24 1858 1711 + 225 NZE AC5 IS ARGUMENT 1711 45 1715 1710 + 226 SLT 0008 ZERO 1715 35 0008 1683 + 227 STU ARTHH IF NOT LET 1683 21 1788 1692 + 228 RSM 8002 N BE MANTSA 1692 68 8002 1701 + 229 ALO AC3 X BE POWER 1701 15 1704 1709 + 230 BMI AC4 1S X GRTR 1709 46 1663 1713 + 231 SLT 0001 THAN TWO 1713 35 0001 1719 + 232 NZU AC5 OR LESS THAN 1719 44 1710 1724 + 233 SRT 0005 MINUS EIGHT 1724 30 0005 1687 + 234 ALO AC6 IF X WITHIN 1687 15 1690 1695 + 235 STL ARTHD BOUNDS GEN 1695 20 1665 1718 + 236 RAU ARTHH INT AND 1718 60 1788 1693 + 237 SRT 0006 ARTHD FRACT PARTS 1693 30 0006 1665 + 238 AC3 51 0000 0000 OF ARGUMENT 1704 51 0000 0000 + 239 AC6 SRT 0000 IS ARG NEG 1690 30 0000 1684 + 240 BMI AC8 IF SO INT IS 1684 46 1689 1702 + 241 STU ARTHD AC1 INT MINUS 1 1702 21 1665 1685 + 242 AC8 SUP AJ2 AND FRACT IS 1689 11 1903 1707 + 243 STU ARTHD FRACT PLUS 1 1707 21 1665 1668 + 244 RAL 8002 1668 65 8002 1677 + 245 ALO AC2 AC1 1677 15 1680 1685 + 246 AC2 99 9999 9999 1680 99 9999 9999 + 247 AC1 STL ARTHH 1685 20 1788 1694 + 248 RAU 8002 1694 60 8002 1703 + 249 MPY AC18 GENERATE 1703 19 1706 1708 + 250 RAU 8003 1708 60 8003 1716 + 251 AUP AC17 POLYNOMIAL 1716 10 1720 1686 + 252 MPY ARTHH 1686 19 1788 1691 + 253 RAU 8003 APPROXIM 1691 60 8003 1661 + 254 AUP AC16 ATION 1661 10 1666 1682 + 255 MPY ARTHH 1682 19 1788 1696 + 256 RAU 8003 FOR 1696 60 8003 1712 + 257 AUP AC15 1712 10 1717 1678 + 258 MPY ARTHH EXPONENTIAL 1678 19 1788 1650 + 259 RAU 8003 1650 60 8003 1714 + 260 AUP AC14 1714 10 1667 1679 + 261 MPY ARTHH 1679 19 1788 1698 + 262 RAU 8003 1698 60 8003 1655 + 263 AUP AC13 1655 10 1660 1676 + 264 MPY ARTHH 1676 19 1788 1652 + 265 RAU 8003 1652 60 8003 1659 + 266 AUP AC12 1659 10 1664 1672 + 267 MPY ARTHH SQUARE 1672 19 1788 1673 + 268 RAU 8003 RESULT 1673 60 8003 1700 + 269 AUP AJ4 SCALE AND 1700 10 1853 1671 + 270 MPY 8003 FLOAT THEN 1671 19 8003 1657 + 271 SRT 0001 EXIT 1657 30 0001 1688 + 272 STU ACC2 1688 21 1843 1697 + 273 RAU AC19 1697 60 1651 1656 + 274 AUP ARTHD 1656 10 1665 1933 +A274 BMI ACC6 1933 46 1858 1669 + 275 SRT 0002 1669 30 0002 1675 + 276 NZU AC21 1675 44 1674 1681 + 277 AUP ACC2 1681 10 1843 1699 + 278 SRT 0008 ACC6 1699 30 0008 1858 + 279 AC4 RAL ARTHH 1663 65 1788 1653 + 280 BMI AC21 1653 46 1625 1674 + 281 RAL 8003 ACC6 1625 65 8003 1858 + 282 AC5 RAL AC20 ACC6 ARGMNT ZERO 1710 65 1627 1858 + 283 AC21 LDD ACC6 3021 ALARM STOP 1674 69 1858 3021 + 284 1 AC10 00 0000 0001 1903 00 0000 0001 AC10 same as AJ3 + 285 1 AC11 10 0000 0000 1853 10 0000 0000 + 286 AC12 11 5129 2776 1664 11 5129 2776 + 287 AC13 06 6273 0884 1660 06 6273 0884 + 288 AC14 02 5439 3575 1667 02 5439 3575 + 289 AC15 00 7295 1737 1717 00 7295 1737 + 290 AC16 00 1742 1120 1666 00 1742 1120 + 291 AC17 00 0255 4918 1720 00 0255 4918 + 292 AC18 00 0093 2643 1706 00 0093 2643 + 293 AC19 00 0000 0050 1651 00 0000 0050 + 294 AC20 10 0000 0050 1627 10 0000 0050 + 295 E00AB NZE AB10 IS ARG ZERO 1638 45 1662 1632 + 296 STD ARTHD 1662 24 1665 1670 + 297 BMI AB10 IS ARG NEG 1670 46 1632 1624 + 298 SLT 0008 1624 35 0008 1643 + 299 STL ARTHE STORE POWER 1643 20 1902 1658 + 300 RAU 8003 FORM Z 1658 60 8003 1615 + 301 AUP AB1 EQUAL ARG 1615 10 1618 1623 + 302 STU ACC3 MINUS ROOT 1623 21 1881 1635 + 303 SUP AB2 TEN OVER ARG 1635 11 1723 1728 + 304 DVR ACC3 PLUS ROOT 1728 64 1881 1731 + 305 STL ARTHX TEN 1731 20 1786 1639 + 306 RAU 8002 1639 60 8002 1647 + 307 MPY 8001 Z SQUARE 1647 19 8001 1721 + 308 STU ACC3 1721 21 1881 1636 + 309 RAU 8003 GENERATE 1636 60 8003 1644 + 310 MPY AB7 1644 19 1648 1654 + 311 RAU 8003 POLYNOMIAL 1654 60 8003 1614 + 312 AUP AB6 1614 10 1617 1726 + 313 MPY ACC3 APPROXIMATN 1726 19 1881 1730 + 314 RAU 8003 1730 60 8003 1640 + 315 AUP AB5 1640 10 1649 1727 + 316 MPY ACC3 1727 19 1881 1613 + 317 RAU 8003 1613 60 8003 1616 + 318 AUP AB4 1616 10 1619 1628 + 319 MPY ACC3 1628 19 1881 1633 + 320 RAU 8003 1633 60 8003 1641 + 321 AUP AB3 1641 10 1645 1733 + 322 MPY ARTHX 1733 19 1786 1722 + 323 RAL 8003 1722 65 8003 1729 + 324 ALO AB8 1729 15 1732 1637 + 325 SRT 0002 1637 30 0002 1646 + 326 ALO ARTHE ADD POWER 1646 15 1902 1725 + 327 SLO AB8 1725 16 1732 1642 + 328 SRD 0002 ROUND 1642 31 0002 1620 + 329 RAU 8002 1620 60 8002 1734 + 330 SCT 0000 NORMALIZE 1734 36 0000 1621 + 331 BOV AB12 1621 47 1631 1626 + 332 BMI AB13 1626 46 1629 1630 + 333 SUP AB9 AB11 ADJUST 1629 11 1634 1622 + 334 AB11 SUP 8002 AB12 POWER 1622 11 8002 1631 + 335 AB12 RAL 8003 ARTHD 1631 65 8003 1665 + 336 AB13 AUP AB9 AB11 1630 10 1634 1622 + 337 AB10 LDD ARTHD 3011 ALARM 1632 69 1665 3011 + 338 AB1 00 3162 2780 1618 00 3162 2780 + 339 AB2 00 6324 5560 1723 00 6324 5560 + 340 AB3 86 8591 7180 1645 86 8591 7180 + 341 AB4 28 9335 5240 1619 28 9335 5240 + 342 AB5 17 7522 0710 1649 17 7522 0710 + 343 AB6 09 4376 4760 1617 09 4376 4760 + 344 AB7 19 1337 7140 1648 19 1337 7140 + 345 AB8 50 0000 0000 1732 50 0000 0000 + 346 AB9 00 0000 0053 1634 00 0000 0053 + 1 VARS + ARTHD 00 0000 0000 1665 00 0000 0000 + ARTHX 00 0000 0000 1786 00 0000 0000 + ARTHG 00 0000 0000 1794 00 0000 0000 + ARTHF 00 0000 0000 1772 00 0000 0000 + ARTHE 00 0000 0000 1902 00 0000 0000 + ARTHH 00 0000 0000 1788 00 0000 0000 + ARTHM 00 0000 0000 1824 00 0000 0000 + ARTHY 00 0000 0000 1808 00 0000 0000 + ACC 00 0000 0000 0000 00 0000 0000 + ACC1 00 0000 0000 1998 00 0000 0000 + ACC2 00 0000 0000 1843 00 0000 0000 + ACC3 00 0000 0000 1881 00 0000 0000 + ACC4 00 0000 0000 1870 00 0000 0000 + ACC5 00 0000 0000 1795 00 0000 0000 + ACC6 00 0000 0000 1858 00 0000 0000 + J0001 00 0000 0000 1977 00 0000 0000 + J0002 00 0000 0000 1978 00 0000 0000 + J0003 00 0000 0000 1979 00 0000 0000 + J0004 00 0000 0000 1980 00 0000 0000 + J0005 00 0000 0000 1981 00 0000 0000 + J0006 00 0000 0000 1982 00 0000 0000 + J0007 00 0000 0000 1983 00 0000 0000 + J0008 00 0000 0000 1984 00 0000 0000 + P0000 00 0000 0000 1950 00 0000 0000 + P0001 00 0000 0000 1951 00 0000 0000 + P0002 00 0000 0000 1952 00 0000 0000 + P0004 00 0000 0000 1954 00 0000 0000 + P0005 00 0000 0000 1955 00 0000 0000 + P0007 00 0000 0000 1957 00 0000 0000 + P0008 00 0000 0000 1958 00 0000 0000 + P0009 00 0000 0000 1959 00 0000 0000 + P0010 00 0000 0000 1960 00 0000 0000 diff --git a/I650/sw/it_package_p4.dck b/I650/sw/it_package_p4.dck new file mode 100644 index 00000000..d013fa74 --- /dev/null +++ b/I650/sw/it_package_p4.dck @@ -0,0 +1,494 @@ +6I1954195C 0000241833800?2417861789 e00aistdarthxai1 6-add +6I1954195C 0000241789800?2017941799 ai1 stlarthg 7- +6I1954195C 0000241799800?6918021805 ldd arthb 8- +6I1954195C 0000241802800?6780021767 ram 8002 9-store acc +6I1954195C 0000241767800?2017721894 stlarthf 10-power +6I1954195C 0000241894800?1819021759 smlarthe 11- +6I1954195C 0000241759800?3500011766 slt 0001 12- +6I1954195C 0000241766800?4417731771 nzuai12 13-find max +6I1954195C 0000241771800?6917741777 lddai3a 14- +6I1954195C 0000241777800?3000051790 srt 0005 15-power +6I1954195C 0000241790800?2217931796 sdaai3 16-set expnnts +6I1954195C 0000241796800?4618991754 bmi ai2 17-and then +6I1954195C 0000241899800?6719021817 ramarthe 18-perform +6I1954195C 0000241817800?2017721776 stlarthf 19-addition +6I1954195C 0000241776800?6517881943 ralarthh 20- +6I1954195C 0000241943800?6918241793 lddarthmai3 21- +6I1954195C 0000241793800?3000001811 ai3 srt 0000ai3b 22- +6I1954195C 0000241774800?3000001811 ai3a srt 0000ai3b 23- +6I1954195C 0000241811800?1580011770 ai3b alo 8001ai5 24- +6I1954195C 0000241754800?6518241779 ai2 ralarthm 25- +6I1954195C 0000241779800?6917881793 lddarthhai3 26- +6I1954195C 0000241770800?6080021780 ai5 rau 8002 27-clear arthe +6I1954195C 0000241780800?2019021762 stlarthearths 28-to scale +6I1954195C 0000241773800?4617781828 ai12 bmi ai13 29- +6I1954195C 0000241778800?6517941904 ralarthgai10 30- +6I1954195C 0000241828800?6500001786 ai13 ralacc arthx 31- +6I1954195C 0000241805800?2418081826 arthbstdarthy 32-break up exp +6I1954195C 0000241826800?3500081996 slt 0008 33-and mantissa +6I1954195C 0000241996800?2019021755 stlarthe 34-store power +6I1954195C 0000241755800?6080031763 rau 8003 35-and mantissa +6I1954195C 0000241763800?3500011769 slt 0001 36-of lower +6I1954195C 0000241769800?2118241997 stuarthm 37- +6I1954195C 0000241997800?6000001855 rauacc 38- +6I1954195C 0000241855800?3000021761 srt 0002 39-store power +6I1954195C 0000241761800?1680021819 slo 8002 40-and mantissa +6I1954195C 0000241819800?3500011775 slt 0001 41-of acc +6I1954195C 0000241775800?1580011783 alo 8001 42- +6I1954195C 0000241783800?2117881808 stuarthharthy 43- +6I1954195C 0000241762800?3600001782 arthssct 0000 44-normalize +6I1954195C 0000241782800?4719421787 bovai6 45-brnch if zro +6I1954195C 0000241787800?2017941797 stlarthg 46-shift count +6I1954195C 0000241797800?6580031905 ral 8003 47-round on +6I1954195C 0000241905800?3100021813 srd 0002 48-ninth digit +6I1954195C 0000241813800?3500021869 slt 0002 49-check for +6I1954195C 0000241869800?2018241877 stlarthm 50-roundoff +6I1954195C 0000241877800?4418311834 nzuai7 ai8 51-overflow +6I1954195C 0000241834800?6780031841 ai8 ram 8003 52-and +6I1954195C 0000241841800?1817941800 smlarthg 53-correct if +6I1954195C 0000241800800?1519031822 aloaj2 54-necessary +6I1954195C 0000241822800?3500081791 slt 0008 55- +6I1954195C 0000241791800?6580021849 ral 8002 56- +6I1954195C 0000241849800?1719021757 amlarthe 57- +6I1954195C 0000241757800?1517721827 aloarthf 58- +6I1954195C 0000241827800?4617521781 bmiai11a 59-pwr too smal +6I1954195C 0000241781800?4417851836 nzuai11 60-pwr too lrge +6I1954195C 0000241836800?3500021893 slt 0002 61- +6I1954195C 0000241893800?2119981901 stuacc1 62- +6I1954195C 0000241901800?6518241829 ralarthm 63- +6I1954195C 0000241829800?4619441995 bmi ai9 64-combine +6I1954195C 0000241944800?1619981904 sloacc1 ai10 65- +6I1954195C 0000241904800?2000001786 ai10 stlacc arthx 66-and +6I1954195C 0000241995800?1519981904 ai9 aloacc1 ai10 67- +6I1954195C 0000241831800?3000011792 ai7 srt 0001 68-adjust +6I1954195C 0000241792800?2018241927 stlarthm 69- +6I1954195C 0000241927800?3500011834 slt 0001ai8 70- +6I1954195C 0000241942800?6580031904 ai6 ral 8003ai10 71- +6I1954195C 0000241832800?2417861839 e00ajstdarthx 72-multiply +6I1954195C 0000241839800?6918521805 ldd arthb 73- +6I1954195C 0000241852800?6780021867 ram 8002 74-acc power +6I1954195C 0000241867800?1618201825 sloaj1 75-minus 48 +6I1954195C 0000241825800?2017721875 stlarthf 76- +6I1954195C 0000241875800?6017881756 rauarthh 77- +6I1954195C 0000241756800?1918241762 mpyarthmarths 78- +6I1954195C 0000241830800?2417861889 e00agstdarthxag1 79-divide +6I1954195C 0000241889800?6918421805 ag1 ldd arthb 80-is divisor +6I1954195C 0000241842800?4418121846 nzu ag3 81-zer0 +6I1954195C 0000241812800?6880021821 rsm 8002 82-divisor +6I1954195C 0000241821800?1518761895 aloag2 83-power minus +6I1954195C 0000241895800?2017721768 stlarthf 84-49 +6I1954195C 0000241768800?6018241879 rauarthm 85-sh1ft +6I1954195C 0000241879800?3000011885 srt 0001 86-dividend +6I1954195C 0000241885800?6417881803 dvrarthh 87-do divide +6I1954195C 0000241803800?6080021762 rau 8002arths 88- +6I1954195C 0000241882800?2417861989 e00aostdarthx 89-div reverse +6I1954195C 0000241989800?2018431896 stlacc2 90- +6I1954195C 0000241896800?6500001810 ralacc 91- +6I1954195C 0000241810800?6918431897 lddacc2 92- +6I1954195C 0000241897800?2400001889 stdacc ag1 93- +6I1954195C 0000241947800?2418581911 e00afstdacc6 94-fl0at to lwr +6I1954195C 0000241911800?6919251928 lddae4 e00ae 95-and acc +6I1954195C 0000241925800?2000001858 ae4 stlacc acc6 96- +6I1954195C 0000241928800?2417861840 e00aestdarthx 97-float to lwr +6I1954195C 0000241840800?6080021753 rau 8002 98-only +6I1954195C 0000241753800?3600001975 sct 0000 99-normalize +6I1954195C 0000241975800?2018811784 stlacc3 100- +6I1954195C 0000241784800?4718511890 bovad1 101-zer0 check +6I1954195C 0000241890800?6580031798 ral 8003 102- +6I1954195C 0000241798800?3100021807 srd 0002 103-round for +6I1954195C 0000241807800?3500021764 slt 0002 104-placing exp +6I1954195C 0000241764800?4418181891 nzu ae6 105-check round +6I1954195C 0000241818800?6980031874 ldd 8003 106-overflow +6I1954195C 0000241874800?3000011884 srt 0001 107- +6I1954195C 0000241884800?1580011891 alo 8001ae6 108- +6I1954195C 0000241891800?4618441845 ae6 bmiae2 109-insert +6I1954195C 0000241845800?1518481804 aloaj3 ae5 110-exp0nent +6I1954195C 0000241844800?1618481804 ae2 sloaj3 ae5 111- +6I1954195C 0000241804800?1618811786 ae5 sloacc3 arthx 112- +6I1954195C 0000241932800?2417861990 e00thstdarthx 113-fix l0wer +6I1954195C 0000241990800?3500081859 slt 0008 114-to lower +6I1954195C 0000241859800?2118241878 stuarthm 115- +6I1954195C 0000241878800?6780021887 ram 8002 116-test exp +6I1954195C 0000241887800?1619401945 sloaj5 117-store zer0 +6I1954195C 0000241945800?4618511850 bmiad1 118-if less than +6I1954195C 0000241850800?1618531758 sloaj4 119-50 alarm +6I1954195C 0000241758800?4618611862 bmi ad3 120-1f grtr than +6I1954195C 0000241861800?3000041921 srt 0004 121-59 +6I1954195C 0000241921800?1519241929 aloar7 122- +6I1954195C 0000241929800?6918351838 lddad2a 123-modify +6I1954195C 0000241838800?2219911971 sdaad2 124-shift +6I1954195C 0000241971800?6518241930 ralarthm 125- +6I1954195C 0000241930800?3500021991 slt 0002ad2 126- +6I1954195C 0000241851800?6580031786 ad1 ral 8003arthx 127-store zero +6I1954195C 0000241991800?3000001786 ad2 srt 0000arthx 128-shift c0nst +6I1954195C 0000241835800?3000001786 ad2a srt 0000arthx 129- +6I1954195C 0000241862800?6917863031 ad3 lddarthx 3031 130-fix alarm +6I1954195C 0000241846800?6917863061 ag3 lddarthx 3061 131-divide alarm +6I1954195C 0000241785800?6917863081 ai11 lddarthx 3081 132-scale alarm +6I1954195C 0000241752800?0110811942 ai11ahlt 1081ai6 133- +6I1954195C 0000241876800?4900000000 ag2 49 0000 0000 134- +6I1954195C 0000241820800?4800000000 aj1 48 0000 0000 135- +6I1954195C 0000241903800?0000000001 aj2 00 0000 0001 136- +6I1954195C 0000241848800?0000000059 aj3 00 0000 0059 137- +6I1954195C 0000241853800?1000000000 aj4 10 0000 0000 138- +6I1954195C 0000241940800?5000000000 aj5 50 0000 0000 139- +6I1954195C 0000241974800?2419771880 e00aqstdj0001aq1 140-read +6I1954195C 0000241880800?7019761898 aq1 rd1 1976aq3 141- +6I1954195C 0000241898800?6719511806 aq3 ramp0001aq3a 142- +6I1954195C 0000241892800?6719511806 aq3b ramp0001aq3a 143-check for +6I1954195C 0000241806800?4518601837 aq3a nze aq8 144-last word +6I1954195C 0000241860800?6918631816 lddaq5 aq4 145-on card +6I1954195C 0000241816800?2418701873 aq4 stdacc4 146- +6I1954195C 0000241873800?1080031931 aup 8003 147-read in +6I1954195C 0000241931800?3000041941 srt 0004 148-label for +6I1954195C 0000241941800?2317951948 siaacc5 149-present +6I1954195C 0000241948800?1680011856 slo 8001 150-variable +6I1954195C 0000241856800?1518098002 alo 8002 151-get i y 0r c +6I1954195C 0000241809800?6000001987 rau 0000 152-address from +6I1954195C 0000241987800?1017951949 aupacc5 153-abcon dict +6I1954195C 0000241949800?3500041870 slt 0004acc4 154-generate +6I1954195C 0000241863800?1018661857 aq5 aupaq7 155-1nstruction +6I1954195C 0000241857800?1519601965 alop0010 156- +6I1954195C 0000241965800?1519688002 alo 8002 157-get and +6I1954195C 0000241968800?6919528003 lddp0002 8003 158-store word +6I1954195C 0000241866800?2400001907 aq7 std 0000 159- +6I1954195C 0000241907800?6519601915 ralp0010 160-increment +6I1954195C 0000241915800?1519181854 aloaq9 161-word count +6I1954195C 0000241854800?2019601963 stlp0010 162- +6I1954195C 0000241963800?1518928002 aloaq3b 8002 163- +6I1954195C 0000241837800?6519511765 aq8 ralp0001 164-check for +6I1954195C 0000241765800?4619771880 bmij0001aq1 165-last card +6I1954195C 0000241801800?2419551908 e00arstdp0005 166-punch 0ut +6I1954195C 0000241908800?2119791935 stuj0003 167- +6I1954195C 0000241935800?2319581912 siap0008 168-store stmnt +6I1954195C 0000241912800?2119801886 stuj0004 169-number +6I1954195C 0000241886800?2219541909 sdap0004 170-store word +6I1954195C 0000241909800?1680011917 slo 8001 171-count +6I1954195C 0000241917800?4519201872 nzear10 ar9 172-test zero +6I1954195C 0000241920800?2119811814 ar10 stuj0005 173-stmt number +6I1954195C 0000241814800?2419821972 stdj0006 174-set punch +6I1954195C 0000241972800?2419831864 stdj0007 175-band to +6I1954195C 0000241864800?2419841888 stdj0008 176-zeroes +6I1954195C 0000241888800?2419601913 stdp0010ar3 177-set counter +6I1954195C 0000241913800?6519541910 ar3 ralp0004 178- +6I1954195C 0000241910800?1619241936 sloar7 179- +6I1954195C 0000241936800?4619941992 bmiar8 180-test word +6I1954195C 0000241992800?2019541865 stlp0004ar4 181-count +6I1954195C 0000241865800?1518688002 ar4 alo 8002 182-get word +6I1954195C 0000241868800?6519501914 ralp0000 183-label from +6I1954195C 0000241914800?1080031922 aup 8003 184-punch consts +6I1954195C 0000241922800?3500011938 slt 0001 185- +6I1954195C 0000241938800?2219571961 sdap0007 186-modify label +6I1954195C 0000241961800?1680011919 slo 8001 187- +6I1954195C 0000241919800?3000011926 srt 0001 188- +6I1954195C 0000241926800?1519571962 alop0007 189- +6I1954195C 0000241962800?3500041923 slt 0004 190-insert stmnt +6I1954195C 0000241923800?1519581964 alop0008 191-number +6I1954195C 0000241964800?1019601916 aupp0010 192- +6I1954195C 0000241916800?1019698003 aup 8003 193- +6I1954195C 0000241969800?2019771988 stlj0001 194-store label +6I1954195C 0000241988800?6580021900 ral 8002 195-for punching +6I1954195C 0000241900800?6919061816 ldd aq4 196-modify label +6I1954195C 0000241906800?1019661934 aupar6 197-into drum +6I1954195C 0000241934800?1519601967 alop0010 198-loc in read +6I1954195C 0000241967800?1519708003 alo 8003 199-get word +6I1954195C 0000241970800?2419781993 stdj0002 200-store in +6I1954195C 0000241993800?6519601815 ralp0010 201-punch band +6I1954195C 0000241815800?1519181973 aloaq9 202- +6I1954195C 0000241973800?2019601913 stlp0010ar3 203- +6I1954195C 0000241966800?6900008002 ar6 ldd 0000 8002 204- +6I1954195C 0000241924800?0000010000 ar7 00 0001 0000 205- +6I1954195C 0000241994800?7119771955 ar8 pchj0001p0005 206-punch +6I1954195C 0000241872800?6580001937 ar9 ral 8000 207-if stmt nmbr +6I1954195C 0000241937800?4619201955 bmiar10 p0005 208-zro pch only +6I1954195C 0000241918800?0000020000 aq9 00 0002 0000 209-if 8000 neg +6I1954195C 0000241986800?8000008800 j0010 80 0000 8800 210-control cnst +6I1954195C 0000241654800?2418081732 e00alstdarthy 211- +6I1954195C 0000241732800?2017881694 stlarthh 212- +6I1954195C 0000241694800?6500001709 ralacc al17a 213-is power +6I1954195C 0000241709800?2418701723 al17astdacc4 214-two +6I1954195C 0000241723800?2417861739 stdarthx 215-if so +6I1954195C 0000241739800?1616861692 sloal16 216-multiply +6I1954195C 0000241692800?4517311751 nzeal18 217- +6I1954195C 0000241751800?6517881645 ralarthh 218- +6I1954195C 0000241645800?2400001655 stdacc 219- +6I1954195C 0000241655800?6918081832 lddarthye00aj 220- +6I1954195C 0000241731800?6517881693 al18 ralarthhal17 221- +6I1954195C 0000241693800?3500081661 al17 slt 0008 222- +6I1954195C 0000241661800?1680021720 slo 8002 223- +6I1954195C 0000241720800?3500021677 slt 0002 224-q equals +6I1954195C 0000241677800?1580011690 alo 8001 225-mantissa +6I1954195C 0000241690800?2117721675 stuarthf 226-of argument +6I1954195C 0000241675800?6780021683 ram 8002 227- +6I1954195C 0000241683800?1617361691 sloal1 228-store expnnt +6I1954195C 0000241691800?3500021698 slt 0002 229-of argmnt +6I1954195C 0000241698800?2119021706 stuarthe 230- +6I1954195C 0000241706800?6516601666 ralal2 231-mantissa of +6I1954195C 0000241666800?2018241678 stlarthm 232-z is one +6I1954195C 0000241678800?6517361695 ralal1 233- +6I1954195C 0000241695800?3500021702 slt 0002 234-exp of z is +6I1954195C 0000241702800?2117941747 stuarthgal3 235-50 +6I1954195C 0000241747800?6000001708 al3 rauacc 236-k is grtst +6I1954195C 0000241708800?1917361738 mpyal1 237-integer in +6I1954195C 0000241738800?2100001658 stuacc 238-k over two +6I1954195C 0000241658800?6580021667 ral 8002 239-is remainder +6I1954195C 0000241667800?4516701646 nze al4 240-zer0 +6I1954195C 0000241670800?6018241729 rauarthm 241-if not set z +6I1954195C 0000241729800?6916821737 ldd al5 242-equals to +6I1954195C 0000241682800?1517941715 aloarthg 243-z times q +6I1954195C 0000241715800?2017941699 stlarthg 244-via +6I1954195C 0000241699800?6516651669 ralarthd 245-subroutine +6I1954195C 0000241669800?2018241638 stlarthm 246- +6I1954195C 0000241638800?4516461741 nzeal4 al20 247- +6I1954195C 0000241646800?6000001712 al4 rauacc 248-if k nonzero +6I1954195C 0000241712800?4416681721 nzu al7 249-q equals +6I1954195C 0000241668800?6017721679 rauarthf 250- +6I1954195C 0000241679800?6916841737 ldd al5 251-via subrtne +6I1954195C 0000241684800?1519021714 aloarthe 252- +6I1954195C 0000241714800?2019021662 stlarthe 253- +6I1954195C 0000241662800?6516651719 ralarthd 254- +6I1954195C 0000241719800?2017721747 stlarthfal3 255- +6I1954195C 0000241721800?6017941700 al7 rauarthg 256-set exponnts +6I1954195C 0000241700800?3000021663 srt 0002 257-arths +6I1954195C 0000241663800?4417851722 nzuai11 258-exp overscal +6I1954195C 0000241722800?2019021664 stlarthe 259- +6I1954195C 0000241664800?2117721671 stuarthf 260- +6I1954195C 0000241671800?6018241680 rauarthm 261- +6I1954195C 0000241680800?3000011741 srt 0001al20 262- +6I1954195C 0000241741800?6917161724 al20 lddal8 263- +6I1954195C 0000241724800?2417861762 stdarthxarths 264- +6I1954195C 0000241716800?6518701648 al8 ralacc4 265- +6I1954195C 0000241648800?4617011743 bmial10 266- +6I1954195C 0000241743800?6500001808 ralacc arthy 267- +6I1954195C 0000241701800?6500001672 al10 ralacc 268-z equals one +6I1954195C 0000241672800?4516761681 nze al12 269-over z if +6I1954195C 0000241676800?6516851649 ralal11 270-k neg and z +6I1954195C 0000241649800?6918081830 lddarthye00ag 271-non zero +6I1954195C 0000241681800?6918083111 al12 lddarthy 3111 272-alarm if zro +6I1954195C 0000241737800?2417861652 al5 stdarthx 273- +6I1954195C 0000241652800?1917721673 mpyarthf 274- +6I1954195C 0000241673800?3000091644 srt 0009 275- +6I1954195C 0000241644800?4416501639 nzual14 276- +6I1954195C 0000241639800?2016651640 stlarthd 277- +6I1954195C 0000241640800?6580031641 ral 8003al15 278- +6I1954195C 0000241641800?1519021786 al15 aloarthearthx 279- +6I1954195C 0000241650800?3000011643 al14 srt 0001 280- +6I1954195C 0000241643800?2016651642 stlarthd 281- +6I1954195C 0000241642800?6519031641 ralaj2 al15 282- +6I1954195C 0000241736800?5000000000 al1 50 0000 0000 283- +6I1954195C 0000241660800?1000000000 al2 10 0000 0000 284- +6I1954195C 0000241685800?1000000050 al11 10 0000 0050 285- +6I1954195C 0000241686800?0000000002 al16 00 0000 0002 286- +6I1954195C 0000241903800?0000000001 aj2 00 0000 0001 287- +6I1954195C 0000241651800?2418081687 e00anstdarthy 288-power +6I1954195C 0000241687800?6900001674 lddacc 289-float fix +6I1954195C 0000241674800?2417881745 stdarthh 290-reverse +6I1954195C 0000241745800?2000001709 stlacc al17a 291- +6I1954195C 0000241704800?2418081711 e00akstdarthy 292-power fixfix +6I1954195C 0000241711800?2017941647 stlarthgak1 293-q is argmnt +6I1954195C 0000241647800?6700001705 ak1 ramacc 294-k equals +6I1954195C 0000241705800?2017721725 stlarthf 295-abval power +6I1954195C 0000241725800?6519031707 ralaj2 296-z equals +6I1954195C 0000241707800?2017881718 stlarthhak3 297-one +6I1954195C 0000241718800?6017721727 ak3 rauarthf 298-k is gtst +6I1954195C 0000241727800?1917301717 mpyak4 299-intgr in +6I1954195C 0000241717800?2117721726 stuarthf 300-k over two +6I1954195C 0000241726800?6580021735 ral 8002 301-is remainder +6I1954195C 0000241735800?4517341742 nze ak5 302-zero +6I1954195C 0000241734800?6017881688 rauarthh 303-if not z is +6I1954195C 0000241688800?1917941733 mpyarthg 304-z times q +6I1954195C 0000241733800?2017881742 stlarthhak5 305- +6I1954195C 0000241742800?6017721728 ak5 rauarthf 306- +6I1954195C 0000241728800?4417401746 nzu ak6 307-1s k zero +6I1954195C 0000241740800?6017941749 rauarthg 308-if not +6I1954195C 0000241749800?1980011689 mpy 8001 309-q equals +6I1954195C 0000241689800?2017941718 stlarthgak3 310-q squared +6I1954195C 0000241746800?6000001656 ak6 rauacc 311-is power neg +6I1954195C 0000241656800?4616591713 bmi ak7 312-if so is z +6I1954195C 0000241659800?6717881744 ramarthh 313-zero +6I1954195C 0000241744800?4517481750 nze ak8 314-if not is z +6I1954195C 0000241748800?1619031657 sloaj2 315-one +6I1954195C 0000241657800?4517101713 nzeak10 ak7 316- +6I1954195C 0000241713800?6517881808 ak7 ralarthharthy 317-exhibit z +6I1954195C 0000241710800?6580031808 ak10 ral 8003arthy 318- +6I1954195C 0000241750800?6918083101 ak8 lddarthy 3101 319-alarm +6I1954195C 0000241730800?5000000000 ak4 50 0000 0000 320- +6I1954195C 0000241903800?0000000001 aj2 00 0000 0001 321- +6I1954195C 0000241653800?2418081696 e00amstdarthy 322-interchge +6I1954195C 0000241696800?6900001703 lddacc 323-acc and +6I1954195C 0000241703800?2417941697 stdarthg 324-lower +6I1954195C 0000241697800?2000001647 stlacc ak1 325-then e00ak +6I1954195C 0000241976800?6719511623 1976ram 1951 326- +6I1954195C 0000241623800?1080031632 aup 8003 327- +6I1954195C 0000241632800?3500041624 slt 0004 328- +6I1954195C 0000241624800?2219591626 sdap0009 329- +6I1954195C 0000241626800?3000041637 srt 0004 330- +6I1954195C 0000241637800?6916271816 ldd aq4 331- +6I1954195C 0000241627800?6580031636 ral 8003 332- +6I1954195C 0000241636800?1019591633 aupp0009 333- +6I1954195C 0000241633800?1580011631 alo 8001 334- +6I1954195C 0000241631800?1016251628 aupaq9b 335- +6I1954195C 0000241628800?1516341622 aloaq10 aq11 336- +6I1954195C 0000241622800?1116251630 aq11 supaq9b 337- +6I1954195C 0000241630800?4416351837 nzu aq8 338- +6I1954195C 0000241635800?1080011621 aup 8001 339- +6I1954195C 0000241621800?1119241629 supar7 340- +6I1954195C 0000241629800?1680018003 slo 8001 8003 341- +6I1954195C 0000241625800?6919528002 aq9b ldd 1952 8002 342- +6I1954195C 0000241634800?2400001622 aq10 std 0000aq11 343- +6I1954195C 0000241605800?2418581611 e00acstdacc6 344-exponential +6I1954195C 0000241611800?4516151504 nze ac5 345-is argument +6I1954195C 0000241615800?3500081583 slt 0008 346-zero +6I1954195C 0000241583800?2117881592 stuarthh 347-if not let +6I1954195C 0000241592800?6880021601 rsm 8002 348-n be mantsa +6I1954195C 0000241601800?1516041609 aloac3 349-x be power +6I1954195C 0000241609800?4615131613 bmiac4 350-is x grtr +6I1954195C 0000241613800?3500011619 slt 0001 351-than two +6I1954195C 0000241619800?4415041574 nzuac5 352-or less than +6I1954195C 0000241574800?3000051587 srt 0005 353-minus eight +6I1954195C 0000241587800?1515901595 aloac6 354-if x within +6I1954195C 0000241595800?2016651618 stlarthd 355-bounds gen +6I1954195C 0000241618800?6017881593 rauarthh 356-int and +6I1954195C 0000241593800?3000061665 srt 0006arthd 357-fract parts +6I1954195C 0000241604800?5100000000 ac3 51 0000 0000 358-of argument +6I1954195C 0000241590800?3000001584 ac6 srt 0000 359-is arg neg +6I1954195C 0000241584800?4615891602 bmiac8 360-1f so int is +6I1954195C 0000241602800?2116651585 stuarthdac1 361-int minus 1 +6I1954195C 0000241589800?1119031607 ac8 supaj2 362-and fract is +6I1954195C 0000241607800?2116651568 stuarthd 363-fract plus 1 +6I1954195C 0000241568800?6580021577 ral 8002 364- +6I1954195C 0000241577800?1515801585 aloac2 ac1 365- +6I1954195C 0000241580800?9999999999 ac2 99 9999 9999 366- +6I1954195C 0000241585800?2017881594 ac1 stlarthh 367- +6I1954195C 0000241594800?6080021603 rau 8002 368- +6I1954195C 0000241603800?1916061608 mpyac18 369-generate +6I1954195C 0000241608800?6080031616 rau 8003 370- +6I1954195C 0000241616800?1016201586 aupac17 371-polynomial +6I1954195C 0000241586800?1917881591 mpyarthh 372- +6I1954195C 0000241591800?6080031561 rau 8003 373-approxim +6I1954195C 0000241561800?1015661582 aupac16 374-ation +6I1954195C 0000241582800?1917881596 mpyarthh 375- +6I1954195C 0000241596800?6080031612 rau 8003 376-for +6I1954195C 0000241612800?1016171578 aupac15 377- +6I1954195C 0000241578800?1917881550 mpyarthh 378-exponential +6I1954195C 0000241550800?6080031614 rau 8003 379- +6I1954195C 0000241614800?1015671579 aupac14 380- +6I1954195C 0000241579800?1917881598 mpyarthh 381- +6I1954195C 0000241598800?6080031555 rau 8003 382- +6I1954195C 0000241555800?1015601576 aupac13 383- +6I1954195C 0000241576800?1917881552 mpyarthh 384- +6I1954195C 0000241552800?6080031559 rau 8003 385- +6I1954195C 0000241559800?1015641572 aupac12 386- +6I1954195C 0000241572800?1917881573 mpyarthh 387-square +6I1954195C 0000241573800?6080031600 rau 8003 388-result +6I1954195C 0000241600800?1018531571 aupaj4 389-scale and +6I1954195C 0000241571800?1980031557 mpy 8003 390-float then +6I1954195C 0000241557800?3000011588 srt 0001 391-exit +6I1954195C 0000241588800?2118431597 stuacc2 392- +6I1954195C 0000241597800?6015511556 rauac19 393- +6I1954195C 0000241556800?1016651933 auparthd 394- +6I1954195C 0000241933800?4618581569 bmiacc6 a394- +6I1954195C 0000241569800?3000021575 srt 0002 395- +6I1954195C 0000241575800?4415141581 nzuac21 396- +6I1954195C 0000241581800?1018431599 aupacc2 397- +6I1954195C 0000241599800?3000081858 srt 0008acc6 398- +6I1954195C 0000241513800?6517881503 ac4 ralarthh 399- +6I1954195C 0000241503800?4615101514 bmi ac21 400- +6I1954195C 0000241510800?6580031858 ral 8003acc6 401- +6I1954195C 0000241504800?6515651858 ac5 ralac20 acc6 402-argmnt zero +6I1954195C 0000241514800?6918583021 ac21 lddacc6 3021 403-alarm stop +6I1954195C 0000241903800?0000000001 aj2 00 0000 0001 404- +6I1954195C 0000241853800?1000000000 aj4 10 0000 0000 405- +6I1954195C 0000241564800?1151292776 ac12 11 5129 2776 406- +6I1954195C 0000241560800?0662730884 ac13 06 6273 0884 407- +6I1954195C 0000241567800?0254393575 ac14 02 5439 3575 408- +6I1954195C 0000241617800?0072951737 ac15 00 7295 1737 409- +6I1954195C 0000241566800?0017421120 ac16 00 1742 1120 410- +6I1954195C 0000241620800?0002554918 ac17 00 0255 4918 411- +6I1954195C 0000241606800?0000932643 ac18 00 0093 2643 412- +6I1954195C 0000241551800?0000000050 ac19 00 0000 0050 413- +6I1954195C 0000241565800?1000000050 ac20 10 0000 0050 414- +6I1954195C 0000241507800?4515621505 e00a8nze ab10 415-is arg zero +6I1954195C 0000241562800?2416651570 stdarthd 416- +6I1954195C 0000241570800?4615051524 bmiab10 417-is arg neg +6I1954195C 0000241524800?3500081543 slt 0008 418- +6I1954195C 0000241543800?2019021558 stlarthe 419-store power +6I1954195C 0000241558800?6080031515 rau 8003 420-form z +6I1954195C 0000241515800?1015181523 aupab1 421-equal arg +6I1954195C 0000241523800?2118811535 stuacc3 422-minus root +6I1954195C 0000241535800?1115531563 supab2 423-ten over arg +6I1954195C 0000241563800?6418811500 dvracc3 424-plus root +6I1954195C 0000241500800?2018081511 stlarthy 425-ten +6I1954195C 0000241511800?6080021519 rau 8002 426- +6I1954195C 0000241519800?1980011521 mpy 8001 427-z square +6I1954195C 0000241521800?2118811536 stuacc3 428- +6I1954195C 0000241536800?6080031544 rau 8003 429-generate +6I1954195C 0000241544800?1915481554 mpyab7 430- +6I1954195C 0000241554800?6080031512 rau 8003 431-polynomial +6I1954195C 0000241512800?1015161526 aupab6 432- +6I1954195C 0000241526800?1918811531 mpyacc3 433-approximatn +6I1954195C 0000241531800?6080031540 rau 8003 434- +6I1954195C 0000241540800?1015491527 aupab5 435- +6I1954195C 0000241527800?1918811538 mpyacc3 436- +6I1954195C 0000241538800?6080031502 rau 8003 437- +6I1954195C 0000241502800?1016101528 aupab4 438- +6I1954195C 0000241528800?1918811533 mpyacc3 439- +6I1954195C 0000241533800?6080031541 rau 8003 440- +6I1954195C 0000241541800?1015451501 aupab3 441- +6I1954195C 0000241501800?1918081508 mpyarthy 442- +6I1954195C 0000241508800?6580031517 ral 8003 443- +6I1954195C 0000241517800?1515201525 aloab8 444- +6I1954195C 0000241525800?3000021532 srt 0002 445- +6I1954195C 0000241532800?1519021509 aloarthe 446-add power +6I1954195C 0000241509800?1615201529 sloab8 447- +6I1954195C 0000241529800?3100021537 srd 0002 448-round +6I1954195C 0000241537800?6080021546 rau 8002 449- +6I1954195C 0000241546800?3600001522 sct 0000 450-normalize +6I1954195C 0000241522800?4715061530 bovab12 451- +6I1954195C 0000241530800?4615341539 bmi ab13 452- +6I1954195C 0000241534800?1115421547 supab9 ab11 453-adjust +6I1954195C 0000241547800?1180021506 ab11 sup 8002ab12 454-power +6I1954195C 0000241506800?6580031665 ab12 ral 8003arthd 455- +6I1954195C 0000241539800?1015421547 ab13 aupab9 ab11 456- +6I1954195C 0000241505800?6916653011 ab10 lddarthd 3011 457-alarm +6I1954195C 0000241518800?0031622780 ab1 00 3162 2780 458- +6I1954195C 0000241553800?0063245560 ab2 00 6324 5560 459- +6I1954195C 0000241545800?8685917180 ab3 86 8591 7180 460- +6I1954195C 0000241610800?2893355240 ab4 28 9335 5240 461- +6I1954195C 0000241549800?1775220710 ab5 17 7522 0710 462- +6I1954195C 0000241516800?0943764760 ab6 09 4376 4760 463- +6I1954195C 0000241548800?1913377140 ab7 19 1337 7140 464- +6I1954195C 0000241520800?5000000000 ab8 50 0000 0000 465- +6I1954195C 0000241542800?0000000053 ab9 00 0000 0053 466- +6I1954195C 0000241786800?0000000000 arthx 00 0000 0000 - +6I1954195C 0000241665800?0000000000 arthd 00 0000 0000 - +6I1954195C 0000241794800?0000000000 arthg 00 0000 0000 - +6I1954195C 0000241772800?0000000000 arthf 00 0000 0000 - +6I1954195C 0000241902800?0000000000 arthe 00 0000 0000 - +6I1954195C 0000241788800?0000000000 arthh 00 0000 0000 - +6I1954195C 0000241824800?0000000000 arthm 00 0000 0000 - +6I1954195C 0000241808800?0000000000 arthy 00 0000 0000 - +6I1954195C 0000240000800?0000000000 acc 00 0000 0000 - +6I1954195C 0000241998800?0000000000 acc1 00 0000 0000 - +6I1954195C 0000241843800?0000000000 acc2 00 0000 0000 - +6I1954195C 0000241881800?0000000000 acc3 00 0000 0000 - +6I1954195C 0000241870800?0000000000 acc4 00 0000 0000 - +6I1954195C 0000241795800?0000000000 acc5 00 0000 0000 - +6I1954195C 0000241858800?0000000000 acc6 00 0000 0000 - +6I1954195C 0000241977800?0000000000 j0001 00 0000 0000 - +6I1954195C 0000241978800?0000000000 j0002 00 0000 0000 - +6I1954195C 0000241979800?0000000000 j0003 00 0000 0000 - +6I1954195C 0000241980800?0000000000 j0004 00 0000 0000 - +6I1954195C 0000241981800?0000000000 j0005 00 0000 0000 - +6I1954195C 0000241982800?0000000000 j0006 00 0000 0000 - +6I1954195C 0000241983800?0000000000 j0007 00 0000 0000 - +6I1954195C 0000241984800?0000000000 j0008 00 0000 0000 - +6I1954195C 0000241950800?0000000000 p0000 00 0000 0000 - +6I1954195C 0000241951800?0000000000 p0001 00 0000 0000 - +6I1954195C 0000241952800?0000000000 p0002 00 0000 0000 - +6I1954195C 0000241954800?0000000000 p0004 00 0000 0000 - +6I1954195C 0000241955800?0000000000 p0005 00 0000 0000 - +6I1954195C 0000241957800?0000000000 p0007 00 0000 0000 - +6I1954195C 0000241958800?0000000000 p0008 00 0000 0000 - +6I1954195C 0000241959800?0000000000 p0009 00 0000 0000 - +6I1954195C 0000241960800?0000000000 p0010 00 0000 0000 - diff --git a/I650/sw/it_package_p4_listing.txt b/I650/sw/it_package_p4_listing.txt new file mode 100644 index 00000000..f354dba9 --- /dev/null +++ b/I650/sw/it_package_p4_listing.txt @@ -0,0 +1,500 @@ + 5 PACKAGE 4 IS + 5 PACKAGE 2 + 5 PLUS + 5 LOG AND EXPONENTIAL + 5 SUBROUTINES + 6 E00AI STD ARTHX AI1 ADD 1833 24 1786 1789 + 7 AI1 STL ARTHG 1789 20 1794 1799 + 8 LDD ARTHB 1799 69 1802 1805 + 9 RAM 8002 STORE ACC 1802 67 8002 1767 + 10 STL ARTHF POWER 1767 20 1772 1894 + 11 SML ARTHE 1894 18 1902 1759 + 12 SLT 0001 1759 35 0001 1766 + 13 NZU AI12 FIND MAX 1766 44 1773 1771 + 14 LDD AI3A 1771 69 1774 1777 + 15 SRT 0005 POWER 1777 30 0005 1790 + 16 SDA AI3 SET EXPNNTS 1790 22 1793 1796 + 17 BMI AI2 AND THEN 1796 46 1899 1754 + 18 RAM ARTHE PERFORM 1899 67 1902 1817 + 19 STL ARTHF ADDITION 1817 20 1772 1776 + 20 RAL ARTHH 1776 65 1788 1943 + 21 LDD ARTHM AI3 1943 69 1824 1793 + 22 AI3 SRT 0000 AI3B 1793 30 0000 1811 + 23 AI3A SRT 0000 AI3B 1774 30 0000 1811 + 24 AI3B ALO 8001 AI5 1811 15 8001 1770 + 25 AI2 RAL ARTHM 1754 65 1824 1779 + 26 LDD ARTHH AI3 1779 69 1788 1793 + 27 AI5 RAU 8002 CLEAR ARTHE 1770 60 8002 1780 + 28 STL ARTHE ARTHS TO SCALE 1780 20 1902 1762 + 29 AI12 BMI AI13 1773 46 1778 1828 + 30 RAL ARTHG AI10 1778 65 1794 1904 + 31 AI13 RAL ACC ARTHX 1828 65 0000 1786 + 32 ARTHB STD ARTHY BREAK UP EXP 1805 24 1808 1826 + 33 SLT 0008 AND MANTISSA 1826 35 0008 1996 + 34 STL ARTHE STORE POWER 1996 20 1902 1755 + 35 RAU 8003 AND MANTISSA 1755 60 8003 1763 + 36 SLT 0001 OF LOWER 1763 35 0001 1769 + 37 STU ARTHM 1769 21 1824 1997 + 38 RAU ACC 1997 60 0000 1855 + 39 SRT 0002 STORE POWER 1855 30 0002 1761 + 40 SLO 8002 AND MANTISSA 1761 16 8002 1819 + 41 SLT 0001 OF ACC 1819 35 0001 1775 + 42 ALO 8001 1775 15 8001 1783 + 43 STU ARTHH ARTHY 1783 21 1788 1808 + 44 ARTHS SCT 0000 NORMALIZE 1762 36 0000 1782 + 45 BOV AI6 BRNCH IF ZRO 1782 47 1942 1787 + 46 STL ARTHG SHIFT COUNT 1787 20 1794 1797 + 47 RAL 8003 ROUND ON 1797 65 8003 1905 + 48 SRD 0002 NINTH DIGIT 1905 31 0002 1813 + 49 SLT 0002 CHECK FOR 1813 35 0002 1869 + 50 STL ARTHM ROUNDOFF 1869 20 1824 1877 + 51 NZU AI7 AI8 OVERFLOW 1877 44 1831 1834 + 52 AI8 RAM 8003 AND 1834 67 8003 1841 + 53 SML ARTHG CORRECT IF 1841 18 1794 1800 + 54 ALO AJ2 NECESSARY 1800 15 1903 1822 + 55 SLT 0008 1822 35 0008 1791 + 56 RAL 8002 1791 65 8002 1849 + 57 AML ARTHE 1849 17 1902 1757 + 58 ALO ARTHF 1757 15 1772 1827 + 59 BMI AI11A PWR TOO SMAL 1827 46 1752 1781 + 60 NZU AI11 PWR TOO LRGE 1781 44 1785 1836 + 61 SLT 0002 1836 35 0002 1893 + 62 STU ACC1 1893 21 1998 1901 + 63 RAL ARTHM 1901 65 1824 1829 + 64 BMI AI9 COMBINE 1829 46 1944 1995 + 65 SLO ACC1 AI10 1944 16 1998 1904 + 66 AI10 STL ACC ARTHX AND 1904 20 0000 1786 + 67 AI9 ALO ACC1 AI10 1995 15 1998 1904 + 68 AI7 SRT 0001 ADJUST 1831 30 0001 1792 + 69 STL ARTHM 1792 20 1824 1927 + 70 SLT 0001 AI8 1927 35 0001 1834 + 71 AI6 RAL 8003 AI10 1942 65 8003 1904 + 72 E00AJ STD ARTHX MULTIPLY 1832 24 1786 1839 + 73 LDD ARTHB 1839 69 1852 1805 + 74 RAM 8002 ACC POWER 1852 67 8002 1867 + 75 SLO AJ1 MINUS 48 1867 16 1820 1825 + 76 STL ARTHF 1825 20 1772 1875 + 77 RAU ARTHH 1875 60 1788 1756 + 78 MPY ARTHM ARTHS 1756 19 1824 1762 + 79 E00AG STD ARTHX AG1 DIVIDE 1830 24 1786 1889 + 80 AG1 LDD ARTHB IS DIVISOR 1889 69 1842 1805 + 81 NZU AG3 ZER0 1842 44 1812 1846 + 82 RSM 8002 DIVISOR 1812 68 8002 1821 + 83 ALO AG2 POWER MINUS 1821 15 1876 1895 + 84 STL ARTHF 49 1895 20 1772 1768 + 85 RAU ARTHM SH1FT 1768 60 1824 1879 + 86 SRT 0001 DIVIDEND 1879 30 0001 1885 + 87 DVR ARTHH DO DIVIDE 1885 64 1788 1803 + 88 RAU 8002 ARTHS 1803 60 8002 1762 + 89 E00AO STD ARTHX DIV REVERSE 1882 24 1786 1989 + 90 STL ACC2 1989 20 1843 1896 + 91 RAL ACC 1896 65 0000 1810 + 92 LDD ACC2 1810 69 1843 1897 + 93 STD ACC AG1 1897 24 0000 1889 + 94 E00AF STD ACC6 FL0AT TO LWR 1947 24 1858 1911 + 95 LDD AE4 E00AE AND ACC 1911 69 1925 1928 + 96 AE4 STL ACC ACC6 1925 20 0000 1858 + 97 E00AE STD ARTHX FLOAT TO LWR 1928 24 1786 1840 + 98 RAU 8002 ONLY 1840 60 8002 1753 + 99 SCT 0000 NORMALIZE 1753 36 0000 1975 + 100 STL ACC3 1975 20 1881 1784 + 101 BOV AD1 ZER0 CHECK 1784 47 1851 1890 + 102 RAL 8003 1890 65 8003 1798 + 103 SRD 0002 ROUND FOR 1798 31 0002 1807 + 104 SLT 0002 PLACING EXP 1807 35 0002 1764 + 105 NZU AE6 CHECK ROUND 1764 44 1818 1891 + 106 LDD 8003 OVERFLOW 1818 69 8003 1874 + 107 SRT 0001 1874 30 0001 1884 + 108 ALO 8001 AE6 1884 15 8001 1891 + 109 AE6 BMI AE2 INSERT 1891 46 1844 1845 + 110 ALO AJ3 AE5 EXP0NENT 1845 15 1848 1804 + 111 AE2 SLO AJ3 AE5 1844 16 1848 1804 + 112 AE5 SLO ACC3 ARTHX 1804 16 1881 1786 + 113 E00TH STD ARTHX FIX L0WER 1932 24 1786 1990 + 114 SLT 0008 TO LOWER 1990 35 0008 1859 + 115 STU ARTHM 1859 21 1824 1878 + 116 RAM 8002 TEST EXP 1878 67 8002 1887 + 117 SLO AJ5 STORE ZER0 1887 16 1940 1945 + 118 BMI AD1 IF LESS THAN 1945 46 1851 1850 + 119 SLO AJ4 50 ALARM 1850 16 1853 1758 + 120 BMI AD3 1F GRTR THAN 1758 46 1861 1862 + 121 SRT 0004 59 1861 30 0004 1921 + 122 ALO AR7 1921 15 1924 1929 + 123 LDD AD2A MODIFY 1929 69 1835 1838 + 124 SDA AD2 SHIFT 1838 22 1991 1971 + 125 RAL ARTHM 1971 65 1824 1930 + 126 SLT 0002 AD2 1930 35 0002 1991 + 127 AD1 RAL 8003 ARTHX STORE ZERO 1851 65 8003 1786 + 128 AD2 SRT 0000 ARTHX SHIFT C0NST 1991 30 0000 1786 + 129 AD2A SRT 0000 ARTHX 1835 30 0000 1786 + 130 AD3 LDD ARTHX 3031 FIX ALARM 1862 69 1786 3031 + 131 AG3 LDD ARTHX 3061 DIVIDE ALARM 1846 69 1786 3061 + 132 AI11 LDD ARTHX 3081 SCALE ALARM 1785 69 1786 3081 + 133 AI11A HLT 1081 AI6 1752 01 1081 1942 + 134 AG2 49 0000 0000 1876 49 0000 0000 + 135 AJ1 48 0000 0000 1820 48 0000 0000 + 136 AJ2 00 0000 0001 1903 00 0000 0001 + 137 AJ3 00 0000 0059 1848 00 0000 0059 + 138 AJ4 10 0000 0000 1853 10 0000 0000 + 139 AJ5 50 0000 0000 1940 50 0000 0000 + 140 E00AQ STD J0001 AQ1 READ 1974 24 1977 1880 + 141 AQ1 RD1 1976 AQ3 1880 70 1976 1898 + 142 AQ3 RAM P0001 AQ3A 1898 67 1951 1806 + 143 AQ3B RAM P0001 AQ3A CHECK FOR 1892 67 1951 1806 + 144 AQ3A NZE AQ8 LAST WORD 1806 45 1860 1837 + 145 LDD AQ5 AQ4 ON CARD 1860 69 1863 1816 + 146 AQ4 STD ACC4 1816 24 1870 1873 + 147 AUP 8003 READ IN 1873 10 8003 1931 + 148 SRT 0004 LABEL FOR 1931 30 0004 1941 + 149 SIA ACC5 PRESENT 1941 23 1795 1948 + 150 SLO 8001 VARIABLE 1948 16 8001 1856 + 151 ALO 8002 GET I Y 0R C 1856 15 1809 8002 + 152 RAU 0000 ADDRESS FROM 1809 60 0000 1987 was RAU A000 - 00 0000 0000 + 153 AUP ACC5 ABCON DICT 1987 10 1795 1949 + 154 SLT 0004 ACC4 GENERATE 1949 35 0004 1870 + 155 AQ5 AUP AQ7 1NSTRUCTION 1863 10 1866 1857 + 156 ALO P0010 1857 15 1960 1965 + 157 ALO 8002 GET AND 1965 15 1968 8002 + 158 LDD P0002 8003 STORE WORD 1968 69 1952 8003 + 159 AQ7 STD 0000 1866 24 0000 1907 + 160 RAL P0010 INCREMENT 1907 65 1960 1915 + 161 ALO AQ9 WORD COUNT 1915 15 1918 1854 + 162 STL P0010 1854 20 1960 1963 + 163 ALO AQ3B 8002 1963 15 1892 8002 + 164 AQ8 RAL P0001 CHECK FOR 1837 65 1951 1765 + 165 BMI J0001 AQ1 LAST CARD 1765 46 1977 1880 + 166 E00AR STD P0005 PUNCH 0UT 1801 24 1955 1908 + 167 STU J0003 1908 21 1979 1935 + 168 SIA P0008 STORE STMNT 1935 23 1958 1912 + 169 STU J0004 NUMBER 1912 21 1980 1886 + 170 SDA P0004 STORE WORD 1886 22 1954 1909 + 171 SLO 8001 COUNT 1909 16 8001 1917 + 172 NZE AR10 AR9 TEST ZERO 1917 45 1920 1872 + 173 AR10 STU J0005 STMT NUMBER 1920 21 1981 1814 + 174 STD J0006 SET PUNCH 1814 24 1982 1972 + 175 STD J0007 BAND TO 1972 24 1983 1864 + 176 STD J0008 ZEROES 1864 24 1984 1888 + 177 STD P0010 AR3 SET COUNTER 1888 24 1960 1913 + 178 AR3 RAL P0004 1913 65 1954 1910 + 179 SLO AR7 1910 16 1924 1936 + 180 BMI AR8 TEST WORD 1936 46 1994 1992 + 181 STL P0004 AR4 COUNT 1992 20 1954 1865 + 182 AR4 ALO 8002 GET WORD 1865 15 1868 8002 + 183 RAL P0000 LABEL FROM 1868 65 1950 1914 + 184 AUP 8003 PUNCH CONSTS 1914 10 8003 1922 + 185 SLT 0001 1922 35 0001 1938 + 186 SDA P0007 MODIFY LABEL 1938 22 1957 1961 + 187 SLO 8001 1961 16 8001 1919 + 188 SRT 0001 1919 30 0001 1926 + 189 ALO P0007 1926 15 1957 1962 + 190 SLT 0004 INSERT STMNT 1962 35 0004 1923 + 191 ALO P0008 NUMBER 1923 15 1958 1964 + 192 AUP P0010 1964 10 1960 1916 + 193 AUP 8003 1916 10 1969 8003 + 194 STL J0001 STORE LABEL 1969 20 1977 1988 + 195 RAL 8002 FOR PUNCHING 1988 65 8002 1900 + 196 LDD AQ4 MODIFY LABEL 1900 69 1906 1816 + 197 AUP AR6 INTO DRUM 1906 10 1966 1934 + 198 ALO P0010 LOC IN READ 1934 15 1960 1967 + 199 ALO 8003 GET WORD 1967 15 1970 8003 + 200 STD J0002 STORE IN 1970 24 1978 1993 + 201 RAL P0010 PUNCH BAND 1993 65 1960 1815 + 202 ALO AQ9 1815 15 1918 1973 + 203 STL P0010 AR3 1973 20 1960 1913 + 204 AR6 LDD 0000 8002 1966 69 0000 8002 + 205 AR7 00 0001 0000 1924 00 0001 0000 + 206 AR8 PCH J0001 P0005 PUNCH 1994 71 1977 1955 + 207 AR9 RAL 8000 IF STMT NMBR 1872 65 8000 1937 + 208 BMI AR10 P0005 ZRO PCH ONLY 1937 46 1920 1955 + 209 AQ9 00 0002 0000 IF 8000 NEG 1918 00 0002 0000 + 210 J0010 80 0000 8800 CONTROL CNST 1986 80 0000 8800 + 211 E00AL STD ARTHY 1654 24 1808 1732 + 212 STL ARTHH 1732 20 1788 1694 + 213 RAL ACC AL17A IS POWER 1694 65 0000 1709 + 214 AL17A STD ACC4 TWO 1709 24 1870 1723 + 215 STD ARTHX IF SO 1723 24 1786 1739 + 216 SLO AL16 MULTIPLY 1739 16 1686 1692 + 217 NZE AL18 1692 45 1731 1751 + 218 RAL ARTHH 1751 65 1788 1645 + 219 STD ACC 1645 24 0000 1655 + 220 LDD ARTHY E00AJ 1655 69 1808 1832 + 221 AL18 RAL ARTHH AL17 1731 65 1788 1693 + 222 AL17 SLT 0008 1693 35 0008 1661 + 223 SLO 8002 1661 16 8002 1720 + 224 SLT 0002 Q EQUALS 1720 35 0002 1677 + 225 ALO 8001 MANTISSA 1677 15 8001 1690 + 226 STU ARTHF OF ARGUMENT 1690 21 1772 1675 + 227 RAM 8002 1675 67 8002 1683 + 228 SLO AL1 STORE EXPNNT 1683 16 1736 1691 + 229 SLT 0002 OF ARGMNT 1691 35 0002 1698 + 230 STU ARTHE 1698 21 1902 1706 + 231 RAL AL2 MANTISSA OF 1706 65 1660 1666 + 232 STL ARTHM Z IS ONE 1666 20 1824 1678 + 233 RAL AL1 1678 65 1736 1695 + 234 SLT 0002 EXP OF Z IS 1695 35 0002 1702 + 235 STU ARTHG AL3 50 1702 21 1794 1747 + 236 AL3 RAU ACC K IS GRTST 1747 60 0000 1708 + 237 MPY AL1 INTEGER IN 1708 19 1736 1738 + 238 STU ACC K OVER TWO 1738 21 0000 1658 + 239 RAL 8002 IS REMAINDER 1658 65 8002 1667 + 240 NZE AL4 ZER0 1667 45 1670 1646 + 241 RAU ARTHM IF NOT SET Z 1670 60 1824 1729 + 242 LDD AL5 EQUALS TO 1729 69 1682 1737 + 243 ALO ARTHG Z TIMES Q 1682 15 1794 1715 + 244 STL ARTHG VIA 1715 20 1794 1699 + 245 RAL ARTHD SUBROUTINE 1699 65 1665 1669 + 246 STL ARTHM 1669 20 1824 1638 + 247 NZE AL4 AL20 1638 45 1646 1741 + 248 AL4 RAU ACC IF K NONZERO 1646 60 0000 1712 + 249 NZU AL7 Q EQUALS 1712 44 1668 1721 + 250 RAU ARTHF 1668 60 1772 1679 + 251 LDD AL5 VIA SUBRTNE 1679 69 1684 1737 + 252 ALO ARTHE 1684 15 1902 1714 + 253 STL ARTHE 1714 20 1902 1662 + 254 RAL ARTHD 1662 65 1665 1719 + 255 STL ARTHF AL3 1719 20 1772 1747 + 256 AL7 RAU ARTHG SET EXPONNTS 1721 60 1794 1700 + 257 SRT 0002 ARTHS 1700 30 0002 1663 + 258 NZU AI11 EXP OVERSCAL 1663 44 1785 1722 + 259 STL ARTHE 1722 20 1902 1664 + 260 STU ARTHF 1664 21 1772 1671 + 261 RAU ARTHM 1671 60 1824 1680 + 262 SRT 0001 AL20 1680 30 0001 1741 + 263 AL20 LDD AL8 1741 69 1716 1724 + 264 STD ARTHX ARTHS 1724 24 1786 1762 + 265 AL8 RAL ACC4 1716 65 1870 1648 + 266 BMI AL10 1648 46 1701 1743 + 267 RAL ACC ARTHY 1743 65 0000 1808 + 268 AL10 RAL ACC Z EQUALS ONE 1701 65 0000 1672 + 269 NZE AL12 OVER Z IF 1672 45 1676 1681 + 270 RAL AL11 K NEG AND Z 1676 65 1685 1649 + 271 LDD ARTHY E00AG NON ZERO 1649 69 1808 1830 + 272 AL12 LDD ARTHY 3111 ALARM IF ZRO 1681 69 1808 3111 + 273 AL5 STD ARTHX 1737 24 1786 1652 + 274 MPY ARTHF 1652 19 1772 1673 + 275 SRT 0009 1673 30 0009 1644 + 276 NZU AL14 1644 44 1650 1639 + 277 STL ARTHD 1639 20 1665 1640 + 278 RAL 8003 AL15 1640 65 8003 1641 + 279 AL15 ALO ARTHE ARTHX 1641 15 1902 1786 + 280 AL14 SRT 0001 1650 30 0001 1643 + 281 STL ARTHD 1643 20 1665 1642 + 282 RAL AJ2 AL15 1642 65 1903 1641 + 283 AL1 50 0000 0000 1736 50 0000 0000 + 284 AL2 10 0000 0000 1660 10 0000 0000 + 285 AL11 10 0000 0050 1685 10 0000 0050 + 286 AL16 00 0000 0002 1686 00 0000 0002 + 287 AJ2 00 0000 0001 1903 00 0000 0001 + 288 E00AN STD ARTHY POWER 1651 24 1808 1687 + 289 LDD ACC FLOAT FIX 1687 69 0000 1674 + 290 STD ARTHH REVERSE 1674 24 1788 1745 + 291 STL ACC AL17A 1745 20 0000 1709 + 292 E00AK STD ARTHY POWER FIXFIX 1704 24 1808 1711 + 293 STL ARTHG AK1 Q IS ARGMNT 1711 20 1794 1647 + 294 AK1 RAM ACC K EQUALS 1647 67 0000 1705 + 295 STL ARTHF ABVAL POWER 1705 20 1772 1725 + 296 RAL AJ2 Z EQUALS 1725 65 1903 1707 + 297 STL ARTHH AK3 ONE 1707 20 1788 1718 + 298 AK3 RAU ARTHF K IS GTST 1718 60 1772 1727 + 299 MPY AK4 INTGR IN 1727 19 1730 1717 + 300 STU ARTHF K OVER TWO 1717 21 1772 1726 + 301 RAL 8002 IS REMAINDER 1726 65 8002 1735 + 302 NZE AK5 ZERO 1735 45 1734 1742 + 303 RAU ARTHH IF NOT Z IS 1734 60 1788 1688 + 304 MPY ARTHG Z TIMES Q 1688 19 1794 1733 + 305 STL ARTHH AK5 1733 20 1788 1742 + 306 AK5 RAU ARTHF 1742 60 1772 1728 + 307 NZU AK6 1S K ZERO 1728 44 1740 1746 + 308 RAU ARTHG IF NOT 1740 60 1794 1749 + 309 MPY 8001 Q EQUALS 1749 19 8001 1689 + 310 STL ARTHG AK3 Q SQUARED 1689 20 1794 1718 + 311 AK6 RAU ACC IS POWER NEG 1746 60 0000 1656 + 312 BMI AK7 IF SO IS Z 1656 46 1659 1713 + 313 RAM ARTHH ZERO 1659 67 1788 1744 + 314 NZE AK8 IF NOT IS Z 1744 45 1748 1750 + 315 SLO AJ2 ONE 1748 16 1903 1657 + 316 NZE AK10 AK7 1657 45 1710 1713 + 317 AK7 RAL ARTHH ARTHY EXHIBIT Z 1713 65 1788 1808 + 318 AK10 RAL 8003 ARTHY 1710 65 8003 1808 + 319 AK8 LDD ARTHY 3101 ALARM 1750 69 1808 3101 + 320 AK4 50 0000 0000 1730 50 0000 0000 + 321 AJ2 00 0000 0001 1903 00 0000 0001 + 322 E00AM STD ARTHY INTERCHGE 1653 24 1808 1696 + 323 LDD ACC ACC AND 1696 69 0000 1703 + 324 STD ARTHG LOWER 1703 24 1794 1697 + 325 STL ACC AK1 THEN E00AK 1697 20 0000 1647 + 326 1976 RAM 1951 1976 67 1951 1623 + 327 AUP 8003 1623 10 8003 1632 + 328 SLT 0004 1632 35 0004 1624 + 329 SDA P0009 1624 22 1959 1626 + 330 SRT 0004 1626 30 0004 1637 + 331 LDD AQ4 1637 69 1627 1816 + 332 RAL 8003 1627 65 8003 1636 + 333 AUP P0009 1636 10 1959 1633 + 334 ALO 8001 1633 15 8001 1631 + 335 AUP AQ9B 1631 10 1625 1628 + 336 ALO AQ10 AQ11 1628 15 1634 1622 + 337 AQ11 SUP AQ9B 1622 11 1625 1630 + 338 NZU AQ8 1630 44 1635 1837 + 339 AUP 8001 1635 10 8001 1621 + 340 SUP AR7 1621 11 1924 1629 + 341 SLO 8001 8003 1629 16 8001 8003 + 342 AQ9B LDD 1952 8002 1625 69 1952 8002 + 343 AQ10 STD 0000 AQ11 1634 24 0000 1622 + 344 E00AC STD ACC6 EXPONENTIAL 1605 24 1858 1611 + 345 NZE AC5 IS ARGUMENT 1611 45 1615 1504 + 346 SLT 0008 ZERO 1615 35 0008 1583 + 347 STU ARTHH IF NOT LET 1583 21 1788 1592 + 348 RSM 8002 N BE MANTSA 1592 68 8002 1601 + 349 ALO AC3 X BE POWER 1601 15 1604 1609 + 350 BMI AC4 IS X GRTR 1609 46 1513 1613 + 351 SLT 0001 THAN TWO 1613 35 0001 1619 + 352 NZU AC5 OR LESS THAN 1619 44 1504 1574 + 353 SRT 0005 MINUS EIGHT 1574 30 0005 1587 + 354 ALO AC6 IF X WITHIN 1587 15 1590 1595 + 355 STL ARTHD BOUNDS GEN 1595 20 1665 1618 + 356 RAU ARTHH INT AND 1618 60 1788 1593 + 357 SRT 0006 ARTHD FRACT PARTS 1593 30 0006 1665 + 358 AC3 51 0000 0000 OF ARGUMENT 1604 51 0000 0000 + 359 AC6 SRT 0000 IS ARG NEG 1590 30 0000 1584 + 360 BMI AC8 1F SO INT IS 1584 46 1589 1602 + 361 STU ARTHD AC1 INT MINUS 1 1602 21 1665 1585 + 362 AC8 SUP AJ2 AND FRACT IS 1589 11 1903 1607 + 363 STU ARTHD FRACT PLUS 1 1607 21 1665 1568 + 364 RAL 8002 1568 65 8002 1577 + 365 ALO AC2 AC1 1577 15 1580 1585 + 366 AC2 99 9999 9999 1580 99 9999 9999 + 367 AC1 STL ARTHH 1585 20 1788 1594 + 368 RAU 8002 1594 60 8002 1603 + 369 MPY AC18 GENERATE 1603 19 1606 1608 + 370 RAU 8003 1608 60 8003 1616 + 371 AUP AC17 POLYNOMIAL 1616 10 1620 1586 + 372 MPY ARTHH 1586 19 1788 1591 + 373 RAU 8003 APPROXIM 1591 60 8003 1561 + 374 AUP AC16 ATION 1561 10 1566 1582 + 375 MPY ARTHH 1582 19 1788 1596 + 376 RAU 8003 FOR 1596 60 8003 1612 + 377 AUP AC15 1612 10 1617 1578 + 378 MPY ARTHH EXPONENTIAL 1578 19 1788 1550 + 379 RAU 8003 1550 60 8003 1614 + 380 AUP AC14 1614 10 1567 1579 + 381 MPY ARTHH 1579 19 1788 1598 + 382 RAU 8003 1598 60 8003 1555 + 383 AUP AC13 1555 10 1560 1576 + 384 MPY ARTHH 1576 19 1788 1552 + 385 RAU 8003 1552 60 8003 1559 + 386 AUP AC12 1559 10 1564 1572 + 387 MPY ARTHH SQUARE 1572 19 1788 1573 + 388 RAU 8003 RESULT 1573 60 8003 1600 + 389 AUP AJ4 SCALE AND 1600 10 1853 1571 + 390 MPY 8003 FLOAT THEN 1571 19 8003 1557 + 391 SRT 0001 EXIT 1557 30 0001 1588 + 392 STU ACC2 1588 21 1843 1597 + 393 RAU AC19 1597 60 1551 1556 + 394 AUP ARTHD 1556 10 1665 1933 +A394 BMI ACC6 1933 46 1858 1569 + 395 SRT 0002 1569 30 0002 1575 + 396 NZU AC21 1575 44 1514 1581 + 397 AUP ACC2 1581 10 1843 1599 + 398 SRT 0008 ACC6 1599 30 0008 1858 + 399 AC4 RAL ARTHH 1513 65 1788 1503 + 400 BMI AC21 1503 46 1510 1514 + 401 RAL 8003 ACC6 1510 65 8003 1858 + 402 AC5 RAL AC20 ACC6 ARGMNT ZERO 1504 65 1565 1858 + 403 AC21 LDD ACC6 3021 ALARM STOP 1514 69 1858 3021 + 404 AJ2 00 0000 0001 1903 00 0000 0001 + 405 AJ4 10 0000 0000 1853 10 0000 0000 + 406 AC12 11 5129 2776 1564 11 5129 2776 + 407 AC13 06 6273 0884 1560 06 6273 0884 + 408 AC14 02 5439 3575 1567 02 5439 3575 + 409 AC15 00 7295 1737 1617 00 7295 1737 + 410 AC16 00 1742 1120 1566 00 1742 1120 + 411 AC17 00 0255 4918 1620 00 0255 4918 + 412 AC18 00 0093 2643 1606 00 0093 2643 + 413 AC19 00 0000 0050 1551 00 0000 0050 + 414 AC20 10 0000 0050 1565 10 0000 0050 + 415 E00A8 NZE AB10 IS ARG ZERO 1507 45 1562 1505 + 416 STD ARTHD 1562 24 1665 1570 + 417 BMI AB10 IS ARG NEG 1570 46 1505 1524 + 418 SLT 0008 1524 35 0008 1543 + 419 STL ARTHE STORE POWER 1543 20 1902 1558 + 420 RAU 8003 FORM Z 1558 60 8003 1515 + 421 AUP AB1 EQUAL ARG 1515 10 1518 1523 + 422 STU ACC3 MINUS ROOT 1523 21 1881 1535 + 423 SUP AB2 TEN OVER ARG 1535 11 1553 1563 + 424 DVR ACC3 PLUS ROOT 1563 64 1881 1500 + 425 STL ARTHY TEN 1500 20 1808 1511 + 426 RAU 8002 1511 60 8002 1519 + 427 MPY 8001 Z SQUARE 1519 19 8001 1521 + 428 STU ACC3 1521 21 1881 1536 + 429 RAU 8003 GENERATE 1536 60 8003 1544 + 430 MPY AB7 1544 19 1548 1554 + 431 RAU 8003 POLYNOMIAL 1554 60 8003 1512 + 432 AUP AB6 1512 10 1516 1526 + 433 MPY ACC3 APPROXIMATN 1526 19 1881 1531 + 434 RAU 8003 1531 60 8003 1540 + 435 AUP AB5 1540 10 1549 1527 + 436 MPY ACC3 1527 19 1881 1538 + 437 RAU 8003 1538 60 8003 1502 + 438 AUP AB4 1502 10 1610 1528 + 439 MPY ACC3 1528 19 1881 1533 + 440 RAU 8003 1533 60 8003 1541 + 441 AUP AB3 1541 10 1545 1501 + 442 MPY ARTHY 1501 19 1808 1508 + 443 RAL 8003 1508 65 8003 1517 + 444 ALO AB8 1517 15 1520 1525 + 445 SRT 0002 1525 30 0002 1532 + 446 ALO ARTHE ADD POWER 1532 15 1902 1509 + 447 SLO AB8 1509 16 1520 1529 + 448 SRD 0002 ROUND 1529 31 0002 1537 + 449 RAU 8002 1537 60 8002 1546 + 450 SCT 0000 NORMALIZE 1546 36 0000 1522 + 451 BOV AB12 1522 47 1506 1530 + 452 BMI AB13 1530 46 1534 1539 + 453 SUP AB9 AB11 ADJUST 1534 11 1542 1547 + 454 AB11 SUP 8002 AB12 POWER 1547 11 8002 1506 + 455 AB12 RAL 8003 ARTHD 1506 65 8003 1665 + 456 AB13 AUP AB9 AB11 1539 10 1542 1547 + 457 AB10 LDD ARTHD 3011 ALARM 1505 69 1665 3011 + 458 AB1 00 3162 2780 1518 00 3162 2780 + 459 AB2 00 6324 5560 1553 00 6324 5560 + 460 AB3 86 8591 7180 1545 86 8591 7180 + 461 AB4 28 9335 5240 1610 28 9335 5240 + 462 AB5 17 7522 0710 1549 17 7522 0710 + 463 AB6 09 4376 4760 1516 09 4376 4760 + 464 AB7 19 1337 7140 1548 19 1337 7140 + 465 AB8 50 0000 0000 1520 50 0000 0000 + 466 AB9 00 0000 0053 1542 00 0000 0053 + 1 VARS + ARTHX 00 0000 0000 1786 00 0000 0000 + ARTHD 00 0000 0000 1665 00 0000 0000 + ARTHG 00 0000 0000 1794 00 0000 0000 + ARTHF 00 0000 0000 1772 00 0000 0000 + ARTHE 00 0000 0000 1902 00 0000 0000 + ARTHH 00 0000 0000 1788 00 0000 0000 + ARTHM 00 0000 0000 1824 00 0000 0000 + ARTHY 00 0000 0000 1808 00 0000 0000 + ACC 00 0000 0000 0000 00 0000 0000 + ACC1 00 0000 0000 1998 00 0000 0000 + ACC2 00 0000 0000 1843 00 0000 0000 + ACC3 00 0000 0000 1881 00 0000 0000 + ACC4 00 0000 0000 1870 00 0000 0000 + ACC5 00 0000 0000 1795 00 0000 0000 + ACC6 00 0000 0000 1858 00 0000 0000 + J0001 00 0000 0000 1977 00 0000 0000 + J0002 00 0000 0000 1978 00 0000 0000 + J0003 00 0000 0000 1979 00 0000 0000 + J0004 00 0000 0000 1980 00 0000 0000 + J0005 00 0000 0000 1981 00 0000 0000 + J0006 00 0000 0000 1982 00 0000 0000 + J0007 00 0000 0000 1983 00 0000 0000 + J0008 00 0000 0000 1984 00 0000 0000 + P0000 00 0000 0000 1950 00 0000 0000 + P0001 00 0000 0000 1951 00 0000 0000 + P0002 00 0000 0000 1952 00 0000 0000 + P0004 00 0000 0000 1954 00 0000 0000 + P0005 00 0000 0000 1955 00 0000 0000 + P0007 00 0000 0000 1957 00 0000 0000 + P0008 00 0000 0000 1958 00 0000 0000 + P0009 00 0000 0000 1959 00 0000 0000 + P0010 00 0000 0000 1960 00 0000 0000 diff --git a/I650/sw/it_reservation_p1.dck b/I650/sw/it_reservation_p1.dck new file mode 100644 index 00000000..0694b3fc --- /dev/null +++ b/I650/sw/it_reservation_p1.dck @@ -0,0 +1,23 @@ + 5 reservation package r1 + 5 reservation package r1 + 4 laaaa u1999 initial locn + 4 acc u0000 reserve acc + 4 p 1950 reserve for + 3 p1951 1960 punch consts + 4 w 1977 reserve w + 3 w1978 1986 storage band + 3 j1977 1986 punch band + 1 1735 1950 reserve + 1 1961 1976 for + 1 1987 1998 subroutines + 4 e00th 1932 fix entry + 4 e00ae 1928 float to lwr + 4 e00af 1947 float to acc + 4 e00ag 1830 divide entry + 4 e00ai 1833 add entry + 4 e00aj 1832 multiply + 4 e00ao 1882 rev divide + 4 e00aq 1974 read entry + 4 e00ar 1801 punch entry + 1809raua0000 1987 get a0000 + 5 last card of r1 diff --git a/I650/sw/it_reservation_p1_listing.txt b/I650/sw/it_reservation_p1_listing.txt new file mode 100644 index 00000000..5ba2b2be --- /dev/null +++ b/I650/sw/it_reservation_p1_listing.txt @@ -0,0 +1,23 @@ + 5 RESERVATION PACKAGE R1 + 5 RESERVATION PACKAGE R1 + 4 LAAAA U1999 INITIAL LOCN + 4 ACC U0000 RESERVE ACC + 4 P 1950 RESERVE FOR + 3 P1951 1960 PUNCH CONSTS + 4 W 1977 RESERVE W + 3 W1978 1986 STORAGE BAND + 3 J1977 1986 PUNCH BAND + 1 1735 1950 RESERVE + 1 1961 1976 FOR + 1 1987 1998 SUBROUTINES + 4 E00TH 1932 FIX ENTRY + 4 E00AE 1928 FLOAT TO LWR + 4 E00AF 1947 FLOAT TO ACC + 4 E00AG 1830 DIVIDE ENTRY + 4 E00AI 1833 ADD ENTRY + 4 E00AJ 1832 MULTIPLY + 4 E00AO 1882 REV DIVIDE + 4 E00AQ 1974 READ ENTRY + 4 E00AR 1801 PUNCH ENTRY + 1809 RAU A0000 1987 GET A0000 + 5 LAST CARD OF R1 diff --git a/I650/sw/it_reservation_p2.dck b/I650/sw/it_reservation_p2.dck new file mode 100644 index 00000000..7b09d52a --- /dev/null +++ b/I650/sw/it_reservation_p2.dck @@ -0,0 +1,27 @@ + 5 reservation package r2 + 5 reservation package r2 + 4 laaaa u1999 initial locn + 4 acc u0000 reserve acc + 4 p 1950 reserve for + 3 p1951 1960 punch consts + 4 w 1977 reserve w + 3 w1978 1986 storage band + 3 j1977 1986 punch band + 1 1621 1950 reserve + 1 1961 1976 for + 1 1987 1998 subroutines + 4 e00th 1932 fix entry + 4 e00ae 1928 float to lwr + 4 e00af 1947 float to acc + 4 e00ag 1830 divide entry + 4 e00ai 1833 add entry + 4 e00ak 1704 fix fix powr + 4 e00al 1654 flt fix powr + 4 e00am 1653 rv fx fx pwr + 4 e00an 1651 rv fl fx pwr + 4 e00aj 1832 multiply + 4 e00ao 1882 rev divide + 4 e00aq 1974 read entry + 4 e00ar 1801 punch entry + 1809raua0000 1987 get a0000 + 5 last card of r2 diff --git a/I650/sw/it_reservation_p2_listing.txt b/I650/sw/it_reservation_p2_listing.txt new file mode 100644 index 00000000..3bbf766c --- /dev/null +++ b/I650/sw/it_reservation_p2_listing.txt @@ -0,0 +1,27 @@ + 5 RESERVATION PACKAGE R2 + 5 RESERVATION PACKAGE R2 + 4 LAAAA U1999 INITIAL LOCN + 4 ACC U0000 RESERVE ACC + 4 P 1950 RESERVE FOR + 3 P1951 1960 PUNCH CONSTS + 4 W 1977 RESERVE W + 3 W1978 1986 STORAGE BAND + 3 J1977 1986 PUNCH BAND + 1 1621 1950 RESERVE + 1 1961 1976 FOR + 1 1987 1998 SUBROUTINES + 4 E00TH 1932 FIX ENTRY + 4 E00AE 1928 FLOAT TO LWR + 4 E00AF 1947 FLOAT TO ACC + 4 E00AG 1830 DIVIDE ENTRY + 4 E00AI 1833 ADD ENTRY + 4 E00AK 1704 FIX FIX POWR + 4 E00AL 1654 FLT FIX POWR + 4 E00AM 1653 RV FX FX PWR + 4 E00AN 1651 RV FL FX PWR + 4 E00AJ 1832 MULTIPLY + 4 E00AO 1882 REV DIVIDE + 4 E00AQ 1974 READ ENTRY + 4 E00AR 1801 PUNCH ENTRY + 1809 RAU A0000 1987 GET A0000 + 5 LAST CARD OF R2 diff --git a/I650/sw/it_reservation_p3.dck b/I650/sw/it_reservation_p3.dck new file mode 100644 index 00000000..32243190 --- /dev/null +++ b/I650/sw/it_reservation_p3.dck @@ -0,0 +1,25 @@ + 5 reservation package r3 + 5 reservation package r3 + 4 laaaa u1999 initial locn + 4 acc u0000 reserve acc + 4 p 1950 reserve for + 3 p1951 1960 punch consts + 4 w 1977 reserve w + 3 w1978 1986 storage band + 3 j1977 1986 punch band + 1 1613 1950 reserve + 1 1961 1976 for + 1 1987 1998 subroutines + 4 e00ab 1638 logarithm + 4 e00ac 1705 exponential + 4 e00th 1932 fix entry + 4 e00ae 1928 float to lwr + 4 e00af 1947 float to acc + 4 e00ag 1830 divide entry + 4 e00ai 1833 add entry + 4 e00aj 1832 multiply + 4 e00ao 1882 rev divide + 4 e00aq 1974 read entry + 4 e00ar 1801 punch entry + 1809raua0000 1987 get a0000 + 5 last card of r3 diff --git a/I650/sw/it_reservation_p3_listing.txt b/I650/sw/it_reservation_p3_listing.txt new file mode 100644 index 00000000..5edb51de --- /dev/null +++ b/I650/sw/it_reservation_p3_listing.txt @@ -0,0 +1,25 @@ + 5 RESERVATION PACKAGE R3 + 5 RESERVATION PACKAGE R3 + 4 LAAAA U1999 INITIAL LOCN + 4 ACC U0000 RESERVE ACC + 4 P 1950 RESERVE FOR + 3 P1951 1960 PUNCH CONSTS + 4 W 1977 RESERVE W + 3 W1978 1986 STORAGE BAND + 3 J1977 1986 PUNCH BAND + 1 1613 1950 RESERVE + 1 1961 1976 FOR + 1 1987 1998 SUBROUTINES + 4 E00AB 1638 LOGARITHM + 4 E00AC 1705 EXPONENTIAL + 4 E00TH 1932 FIX ENTRY + 4 E00AE 1928 FLOAT TO LWR + 4 E00AF 1947 FLOAT TO ACC + 4 E00AG 1830 DIVIDE ENTRY + 4 E00AI 1833 ADD ENTRY + 4 E00AJ 1832 MULTIPLY + 4 E00AO 1882 REV DIVIDE + 4 E00AQ 1974 READ ENTRY + 4 E00AR 1801 PUNCH ENTRY + 1809 RAU A0000 1987 GET A0000 + 5 LAST CARD OF R3 diff --git a/I650/sw/it_reservation_p4.dck b/I650/sw/it_reservation_p4.dck new file mode 100644 index 00000000..eee2568b --- /dev/null +++ b/I650/sw/it_reservation_p4.dck @@ -0,0 +1,29 @@ + 5 reservation package r4 + 5 reservation package r4 + 4 laaaa u1999 initial locn + 4 acc u0000 reserve acc + 4 p 1950 reserve for + 3 p1951 1960 punch consts + 4 w 1977 reserve w + 3 w1978 1986 storage band + 3 j1977 1986 punch band + 1 1500 1950 reserve + 1 1961 1976 for + 1 1987 1998 subroutines + 4 e00ab 1507 logarithm + 4 e00ac 1605 exponential + 4 e00th 1932 fix entry + 4 e00ae 1928 float to lwr + 4 e00af 1947 float to acc + 4 e00ag 1830 divide entry + 4 e00ai 1833 add entry + 4 e00aj 1832 multiply + 4 e00ak 1704 fix fix powr + 4 e00al 1654 flt fix powr + 4 e00am 1653 rv fx fx pwr + 4 e00an 1651 rv fl fx pwr + 4 e00ao 1882 rev divide + 4 e00aq 1974 read entry + 4 e00ar 1801 punch entry + 1809raua0000 1987 get a0000 + 5 last card of r4 diff --git a/I650/sw/it_reservation_p4_listing.txt b/I650/sw/it_reservation_p4_listing.txt new file mode 100644 index 00000000..a8f57795 --- /dev/null +++ b/I650/sw/it_reservation_p4_listing.txt @@ -0,0 +1,29 @@ + 5 RESERVATION PACKAGE R4 + 5 RESERVATION PACKAGE R4 + 4 LAAAA U1999 INITIAL LOCN + 4 ACC U0000 RESERVE ACC + 4 P 1950 RESERVE FOR + 3 P1951 1960 PUNCH CONSTS + 4 W 1977 RESERVE W + 3 W1978 1986 STORAGE BAND + 3 J1977 1986 PUNCH BAND + 1 1500 1950 RESERVE + 1 1961 1976 FOR + 1 1987 1998 SUBROUTINES + 4 E00AB 1507 LOGARITHM + 4 E00AC 1605 EXPONENTIAL + 4 E00TH 1932 FIX ENTRY + 4 E00AE 1928 FLOAT TO LWR + 4 E00AF 1947 FLOAT TO ACC + 4 E00AG 1830 DIVIDE ENTRY + 4 E00AI 1833 ADD ENTRY + 4 E00AJ 1832 MULTIPLY + 4 E00AK 1704 FIX FIX POWR + 4 E00AL 1654 FLT FIX POWR + 4 E00AM 1653 RV FX FX PWR + 4 E00AN 1651 RV FL FX PWR + 4 E00AO 1882 REV DIVIDE + 4 E00AQ 1974 READ ENTRY + 4 E00AR 1801 PUNCH ENTRY + 1809 RAU A0000 1987 GET A0000 + 5 LAST CARD OF R4 diff --git a/I650/sw/it_run.ini b/I650/sw/it_run.ini new file mode 100644 index 00000000..18ec092c --- /dev/null +++ b/I650/sw/it_run.ini @@ -0,0 +1,175 @@ + +; set console -n log=log.txt +; set debug -n debug.txt +; set debug stdout +; set cpu debug=cmd;data;detail + + +; params: %1 source progrma card deck to compile with it +; %2 input program data card deck (if empty, do not attach input card) +; %3 output program data card deck (if empty, do not attach input card) + +set cpu 2k +att cdp0 -n -q print.txt + +; print IT source program + +echo +carddeck -q print %1 + +; load IT compiler but do not execute it + +echo *** +echo *** Load IT compiler deck into drum +echo *** + +att cdr1 -q -l it_compiler.dck + +d csw 70 1951 3000 +d ar 8000 +go + +echo *** +echo *** Run IT compiler +echo *** + +; Now put source cards in reader and start compiler + +att cdr1 -q %1 +set cdr1 wiring=it + +att cdp1 -n -q deck_out.dck +set cdp1 echo, print, wiring=it + +d csw 70 1999 3000 +d ar 8000 +go + +; check if compilation ok + +if accup=0 goto compile_ok + +echo +echo *** (compilation error code in Upper ACC) +echo + +ex accup +goto end + +:compile_ok + +; Prepare PIT deck (as compiled IT program) +; separate last 10 cards from compilation output deck (called reservation cards) + +carddeck -q split -10 cdp1 deck_soap.dck deck_res.dck +det cdr1 + +; create the pit program deck with +; 1) reservation cards from compilation step +; 2) package used reservation deck +; 3) rest of compilation output + +carddeck -q join deck_res.dck it_reservation_p1.dck deck_soap.dck as deck_pit.dck + +; Load soap deck into drum (1 word per card format), but does not execute it + + +echo *** +echo *** Load soap deck into drum +echo *** + +att cdr1 -q -l soapII.dck + +d csw 7019519999 +d ar 8000 +go + +echo *** +echo *** Apply IT modifications to soap deck +echo *** + +att cdr1 -q -l it_soapII_patch.dck + +d csw 7019519999 +d ar 8000 +go + + +; Now put source cards in reader and start soap assembler + +echo *** +echo *** Assemble PIT deck +echo *** + +att cdr1 deck_pit.dck +set cdr1 wiring=soap + +att cdp1 -n -q deck_out.dck +set cdp1 echo, print, wiring=soap + +d ar 1000 +go + +; Prepare SPIT deck (as assembled PIT program) + +; create the spit program deck with +; 1) package cards +; 2) assembly output + +det cdr1 +det cdp1 + +carddeck -q join it_package_p1.dck deck_out.dck as deck_spit.dck + +; Load deck into drum (1 word per card format), but does not execute it + +echo *** +echo *** Read SPIT deck to run into drum +echo *** + +; Load assembled deck into drum +; -l switch allows to load the symbolic info so debug cmd info will show +; soap source code read from card. + +set cdr1 wiring=8WORD +att cdr1 -l deck_spit.dck + + +d csw 7019519999 +d ar 8000 +go + +; attach input and output data deck + +det cdr1 + +if "%2" == "" goto run1 +att cdr1 -q %2 +set cdr1 wiring=it +:run1 + +if "%3" == "" goto run2 +att cdp1 -n -q %3 +set cdp1 echo, print, wiring=it +:run2 + +; Now execute the loaded deck + +echo *** +echo *** Run program +echo *** + +; set csw to -1 to activate conditional type statement +d csw 0 +d ar 1999 +go + +; clean up + +del deck_pit.dck +del deck_spit.dck +del deck_soap.dck +del deck_res.dck + + +:end diff --git a/I650/sw/it_soapIIA_patch_listing.txt b/I650/sw/it_soapIIA_patch_listing.txt new file mode 100644 index 00000000..9fd108ca --- /dev/null +++ b/I650/sw/it_soapIIA_patch_listing.txt @@ -0,0 +1,164 @@ + + MODIFIED + INSTRUCTIONS + IN IT + SOAP DECK + + AVAILABIKITY 0959 69 1956 8002 LD 1956 8002 + READ CHANGES 1052 69 1952 8002 LD 1952 8002 + WORDS 0992 65 1697 0970 RAL 1697 0970 + CHANGES IN 0970 21 1977 0981 STU 1977 0981 + AVAILABILITY 0981 24 1984 1560 STD 1984 1560 + TABLE PUNCH 1042 24 1983 0990 STD 1983 0990 + OUT ROUTINE 0990 22 1982 1138 STDA 1982 1138 + FOR COMPILER 1138 10 1141 8002 AU 1141 8002 + SOAP DECK 1124 00 0000 8808 NOOP 0000 8808 + 1039 24 ?982 1947 NOOP 0000 0024 + 1141 24 1978 1947 STD 1978 1947 + 1252 10 1983 1152 AU 1983 1152 + CHANGES IN 1990 65 1986 0940 RAL 1986 0940 + PUNCH OUT 0940 92 1950 0900 BRD2 1950 0900 + ROUTINE 0900 35 0004 0918 SLT 0004 0918 + FOR FIVE 0918 65 6002 1526 RAL 6002 1526 + PER CARD 1526 35 0002 1180 SLT 0002 1180 + PUNCH OUT 1180 44 1950 0985 BRNZU 1950 0985 + 0985 95 1242 0950 BRD5 1242 0950 + 1242 66 1983 0908 RSL 1983 0908 + 0950 65 1903 0908 RAL 1903 0908 + 0908 20 0928 1930 STL 0928 1930 + 1930 65 1978 1933 RAL 1978 1933 + 1933 10 1979 1383 AU 1979 1383 + 1303 45 1536 0917 BRNZ 1536 0917 + BLANK CARD 1536 65 1984 0943 RAL 1984 0943 + I E BLANK 0943 35 0002 0901 SLT 0002 0901 + OP AND DATA 0901 21 0934 0926 STU 0934 0926 + CODE CAUSES 0926 20 0933 0938 STL 0933 0938 + TRANSFER 0944 30 0002 0925 SRT 0002 0925 + INSTRUCTION 0925 15 0933 0926 AL 0933 0926 + TO BE 0945 35 0004 0923 SLT 0004 0923 + INSERTED 0923 10 0933 0912 AU 0933 0912 + AND CAUSES 0912 21 0933 0911 STU 0933 0911 + LAST CARD 0911 20 0934 0938 STL 0934 0938 + TO BE 0946 15 0934 0911 AL 0934 0911 + PUNCHED OUT 0947 30 0004 0919 SRT 0004 0919 + 0919 15 0934 0949 AL 0934 0949 + TRANSFER 0949 20 0934 0902 STL 0934 0902 + INSTRUCTION 0902 69 0909 1382 LD 0909 1382 + TRANSFERS 1382 24 0938 0915 STD 0938 0915 + FROM 5 PER 0915 65 0927 1183 RAL 0927 1183 + CARD 0937 24 0908 0902 STD 0908 0902 + LOADING 0906 69 0920 0937 LD 0920 0937 + ROUTINE 1183 15 1522 0910 AL 1522 0910 + INTO 0910 20 0927 1532 STL 0927 1532 + COMPILED 0982 69 0914 0924 LD 0914 0924 + PROGRAM 0924 24 1536 1950 STD 1536 1950 + I E 1999 1532 71 0927 0906 PCH 0927 0906 + 0920 20 0928 1930 STL 0928 1930 + 0914 65 1964 0943 RAL 1964 0943 + 0938 65 1536 0907 RAL 1536 0907 + 0907 15 1522 1428 AL 1522 1428 + 1428 20 1536 0941 STL 1536 0941 + 0941 65 0908 0913 RAL 0908 0913 + + + + 0913 15 1290 0922 AL 1290 0922 + 0922 20 0908 1950 STL 0908 1950 + TYPE 6 CARD 1906 65 1953 1464 RAL 1953 1464 + WITH WORD 1464 16 1167 1225 SL 1167 1225 + ONE 1225 45 1332 1156 BRNZ 1332 1156 + IN DATA 1156 69 1414 1524 LD 1414 1524 + CAUSES ONE 1524 24 1990 8001 STD 1990 8001 + PER CARD 1332 69 1485 1516 LD 1485 1516 + NORNAL SOAP 1516 24 1990 1950 STD 1990 1950 + OUTPUT 1167 76 7565 0000 76 Unknown opcode + ANY OTHER 1414 71 1977 0906 PCH 1977 0906 + TYPE 6 CARD 1405 65 1986 0940 RAL 1986 0940 + RESTORES 0917 69 0921 1429 LD 0921 1429 + FIVE PER 1429 24 1904 1250 STD 1904 1250 + CARD OUTPUT 1250 69 0902 0916 LD 0902 0916 + 0916 24 0938 1992 STD 0938 1992 + 1992 69 1648 1358 LD 1648 1358 + 1358 24 1532 0905 STD 1532 0905 + 0905 65 1568 0935 RAL 1568 0935 + 0935 24 1978 0908 STD 1978 0908 + 1648 69 1913 1267 LD 1913 1267 + 1267 24 1532 1914 STD 1532 1914 + 1914 71 0927 5678 PCH 0927 5678 + 1913 71 0927 1950 PCH 0927 1950 + 0921 00 1998 0000 NOOP 1998 0000 + 1568 00 0000 1999 NOOP 0000 1999 + 0909 65 1536 0907 RAL 1536 0907 + 0936 00 0800 8800 NOOP 0800 8800 + 0927 88 8888 0000 88 Unknown opcode + CHANGED 1948 65 1911 1916 RAL 1911 1916 + STORAGE 1916 10 1931 8002 AU 1931 8002 + TRANSFER 1934 15 1290 1949 AL 1290 1949 + ROUTINE 1949 10 6001 1912 AU 6001 1912 + WITH SOAP 1912 11 1915 1932 SU 1915 1932 + 1932 44 1998 1935 BRNZU 1998 1935 + 1911 69 1951 8003 LD 1951 8003 + 1931 24 1977 1934 STD 1977 1934 + 1915 24 1983 1934 STD 1983 1934 + CHANGED 1186 15 1522 1344 AL 1522 1344 + CONSTANT 1187 15 1522 1006 AL 1522 1006 + LOCATIONS 1292 10 1522 1165 AU 1522 1165 + WITHIN 1344 15 1522 1187 AL 1522 1187 + SOAP 1105 14 1468 1224 DIV 1468 1224 + 1455 14 1468 1410 DIV 1468 1410 + 1088 10 1290 0998 AU 1290 0998 + 1939 15 1290 1647 LD 1984 1772 + 0953 15 1290 1221 AL 1290 1221 + 1056 15 1290 1127 AL 1290 1127 + 1243 10 1290 1322 AU 1290 1322 + 1364 15 1290 1371 AL 1290 1371 + 1947 15 1290 1075 AL 1290 1075 + CHG INIT RTN 1273 24 1586 0906 STD 1586 0906 + 7 PER CARD 1984 70 1985 9999 STD 0000 1998 + LOADING 1985 65 1951 0055 LD 1953 1983 + ROUTINE FOR 0055 69 0008 0054 LD 0008 0054 + IT 0054 22 0008 0058 STDA 0008 0058 + 0058 35 0004 0006 SLT 0004 0006 + 0006 15 8001 0056 AL 8001 0056 + USES 2 0056 22 0009 0052 STDA 0009 0052 + LOCATIONS 0052 65 0057 0053 RAL 0057 0053 + + + 1 TO 9 0053 10 0008 8002 AU 0008 8002 + 51 TO 58 0002 10 0005 0011 AU 0005 0011 + 11 1 84 0011 15 8001 0004 AL 8001 0004 + AND 1985 0004 11 0009 0003 SU 0009 0003 + 0003 44 0007 1984 BRNZU 0007 1984 + 1984 10 8001 8002 STD 0000 1998 + 0008 24 0000 0002 STD 0000 0002 + 0057 69 1952 8003 LD 1952 8003 + 0005 00 0001 0000 NOOP 0001 0000 + 0007 10 6001 8002 AU 6001 8002 + 5 PER CARD 1998 70 1977 3000 RD 1977 3000 + LOADING 1977 65 1958 1786 RAL 1958 1786 + ROUTINE FOR 1786 35 0004 1794 SLT 0004 1794 + IT 1794 69 1980 1795 LD 1980 1795 + SUBROUTINE 1795 22 1980 1824 STDA 1980 1824 + PACKAGES 1824 69 1956 1980 LD 1956 1980 + 1980 24 0000 1808 STD 0000 1808 + 1808 30 0004 1843 SRT 0004 1843 + 1043 10 1957 1870 AU 1957 1870 + USES 28 1870 69 1981 1858 LD 1981 1858 + LOCATIONS 1858 22 1981 1902 STDA 1981 1902 + 1977 TO 1985 1902 69 1955 1981 LD 1955 1981 + 1772 1786 1981 24 0000 1881 STD 0000 1881 + 1788 1794 1881 30 0004 1760 SRT 0004 1760 + 1795 18 8 1760 69 1982 1847 LD 1982 1847 + 1824 1843 1847 22 1982 1978 STDA 1982 1978 + 1858 187 1978 69 1954 1982 LD 1954 1982 + 1881 19 2 1982 24 0000 1946 STD 0000 1946 + 1998 176 1946 30 0004 1823 SRT 0004 1823 + 1823 1847 1623 69 1983 1979 LD 1983 1979 + 1883 1939 1979 22 1983 1985 STDA 1983 1985 + AND 1946 1985 69 1953 1983 LD 1953 1983 + ALL ARE 1983 24 0000 1883 STD 0000 1883 + TEMPORARY 1883 30 0004 1939 SRT 0004 1939 + STORAGE 1939 69 1984 1772 LD 1984 1772 + LOCATIONS 1772 22 1954 1788 STDA 1954 1788 + IN PACKAGES 1788 69 1952 1984 LD 1952 1984 + P1 THRU P4 1984 24 0000 1998 STD 0000 1998 diff --git a/I650/sw/it_soapII_patch.dck b/I650/sw/it_soapII_patch.dck new file mode 100644 index 00000000..07ae452e --- /dev/null +++ b/I650/sw/it_soapII_patch.dck @@ -0,0 +1,16 @@ +6I1954195C 0000240954800?6519861945 +6I1954195C 0000241945800?1515961732 +6I1954195C 0000240961800?6519861945 +6I1954195C 0000240964800?6519861945 +6I1954195C 0000240959800?6519861945 +6I1954195C 0000241991800?0000001002 +6I1954195C 0000241993800?0000001004 +6I1954195C 0000241994800?0000001006 +6I1954195C 0000241995800?6019501405 +6I1954195C 0000241994800?0000001746 +6I1954195C 0000241738800?9000000001 +6I1954195C 0000241744800?0000001006 +6I1954195C 0000241746800?6917381748 +6I1954195C 0000241748800?2410441790 +6I1954195C 0000241790800?6917441794 +6I1954195C 0000241794800?2419941994 diff --git a/I650/sw/it_soapII_patch.txt b/I650/sw/it_soapII_patch.txt new file mode 100644 index 00000000..6b570c61 --- /dev/null +++ b/I650/sw/it_soapII_patch.txt @@ -0,0 +1,44 @@ + +; These are the patches needed to make +; SOAP II to run with IT + +; free address 1993, using 1945 instead +dep 0954 65 1986 1945 +dep 1945 15 1596 1732 +dep 0961 65 1986 1945 +dep 0964 65 1986 1945 +dep 0959 65 1986 1945 + +; set jump address for new redefined card types 1,3,4 and 5 +; that IT needs + +; card type 1 was comment now is blr (reserve block) +; card type 3 was undef now is reg (reserve regional block) +; card type 4 was undef now is syn (reserve symbol) +; card type 5 was undef now is comment + +dep 1991 00 0000 1002 +dep 1993 00 0000 1004 +dep 1994 00 0000 1006 +dep 1995 60 1950 1405 + +; make first card type 4 to define region u0001 9999 (but not reserved) +; use free addresses at 1738, 1744, 1746, 1748, 1790, 1794, 1795, 1796, 1798 + +; set card type 4 to jump to 1738 to store 90 0000 0001 in 1044 and reset +; 1994 to value 00 0000 1006 +dep 1994 00 0000 1746 + +; consts: regu, card4 +dep 1738 90 0000 0001 +dep 1744 00 0000 1006 + +; ldd regu +; std 1044 +; ldd card4 +; std 1994 1994 +dep 1746 69 1738 1748 +dep 1748 24 1044 1790 +dep 1790 69 1744 1794 +dep 1794 24 1994 1994 + diff --git a/I650/sw/it_subr_cos_listing.txt b/I650/sw/it_subr_cos_listing.txt new file mode 100644 index 00000000..eb473489 --- /dev/null +++ b/I650/sw/it_subr_cos_listing.txt @@ -0,0 +1,80 @@ + 5 SUBROUTINE 21 COSINE + E00AV STO ARTHX BEGIN CISINE + SLT 0008 ARGUMENT + STU ARTHF ALARM IF PWR + RSM 8002 OVERSCALE + ALO AV1 COSX EQUALS + BMI AV2 ONE IF PWR + SLO AV3 UNDERSCALE + BMI AV4 + SRT 0004 + ALO AV5 + STL AV6 + RAU ARTHF FORM + MPY AV7 AV6 FRACTIONAL + AV6 HLT AV6 AV23 AND INTGRL + AV23 STL ARTHG PARTS + RAU 8003 + MPY AV8 FORM S AS + STL ARTHE ONE MINUS + RSM ARTHG TWICE ABVAL + SML 8001 OF FRACTNL + ALO AV9 PART + RAU 8002 + STU ARTHF + MPY 8001 FORM SINE + STU ARTHG + RAU AV16 POLYNOMIAL + MPY ARTHG APPROXIMATOR + RAU 8003 + AUP AV15 + MPY AR7HG + RAU 8003 + AUP AV14 + MPY ARTHG + RAU 8003 + AUP AV13 + MPY ARTHG + SRT 0001 + RAU 8003 + AUP AV12 EQUALS ONE + MPY ARTHF + SCT 0000 + BOV AV19 + STL AR7HF + RAL 8003 ROUND + SRT 0002 AND + STL ARTHG ADJUST + RSU ARTHF POWER + SRT 0002 + BMI AV25 + SUP 8003 + ALO AV8 AV24 + AV24 AUP ARTHG + SLT 0002 AV22 + AV22 STU ARTHF DETERMINE + RAU ARTHE SIGN OF + NZU AV20 RESULT + AV20 RSL ARTHF ARTHX + AV25 RAL ARTHF ARTHX + SUP 8003 + SLO AV8 AV24 + AV2 RAL ARTHE OVERSCALE + LDD ARTHX 3211 DISPLAY + AV4 RAL AV21 ARTHX COSX IS ONE + AV19 RAL 8002 COSX IS ZERO + SLO 8001 ARTHX + AV17 RAU AV21 AV22 COSX IS PLUS + AV1 57 0000 0000 OR MINUS 1 + AV3 11 0000 0000 + AV5 SRD 0011 AV23 + AV7 31 8309 8862 + AV8 50 0000 0000 + AV9 99 9999 9999 + AV12 15 7079 6318 + AV13 - 64 5963 7111 + AV14 07 9689 6793 + AV15 - 00 4673 7656 + AV16 00 0151 4842 + AV21 10 0000 0050 + 5 LAST CARD SUBROUTINE 21 diff --git a/I650/sw/it_subr_sin_listing.txt b/I650/sw/it_subr_sin_listing.txt new file mode 100644 index 00000000..00b09cde --- /dev/null +++ b/I650/sw/it_subr_sin_listing.txt @@ -0,0 +1,87 @@ + 5 SUBROUTINE 22 SINE + E00AW STD ARTHX BEGIN SINE + STL ARTHE SUBROUTINE + SLT 0008 STORE + STU ARTHF ARGUMENT + RSM 8002 IS POWER + ALO AW1 OVERSCALE + BMI AW2 IF SO ALARM + SLO AW3 IS P0WER + BMI AW4 UNDERSCALE + SRT 0004 IF SO SINX + ALO AW5 EQUALS X + STL AW6 + RAU ARTHF F0RM FRACTL + MPY AW7 AW6 PART + AW6 HLT AW6 AW23 + AW23 STL ARTHG + RAU 8003 IS INTGRAL + MPY AW8 PAR7 0DD + RAL 8002 + NZE AW9 IF SO FLIP + RSL ARTHE SGN OF X + STL ARTHE AW9 + AW9 RSM ARTHG FORM S AS 2 + SML 8001 MINUS 2 ALPH + NZU AW10 IF 2 ALPH + AUP AW11 GRTG 1 OR 2 + NZU AW17 AW10 ALPH OTHER + AU10 RAM 8002 WISE + STL ARTHF FORM SINE + RAU 8002 POLYNOMIAL + MPY 8001 + STU ARTHG APPROXIMATOR + RAU AW16 + MPY ARTHG + RAU 8003 + AUP AW15 + MPY ARTHG + RAU 8003 + AUP AW14 + MPY ARTHG + RAU 8003 + AUP AW13 + MPY ARTHG + SRT 0001 + RAU 8003 + AUP AW12 + MPY ARTHF + SCT 0000 + BOV AW19 + STL ARTHF SINE TO 0 + RAL 8003 + SRT 0002 ROUND + STL ARTHG + RSU ARTHF + SRT 0002 ADJUST POWER + BMI AW25 + SUP 8003 + ALO AW8 AW24 + AW24 AUP ARTHG + SLT 0002 AW22 + AW25 SUP 8003 + SLO AW8 AW24 + AW22 STU ARTHF DETERMINE + RAL ARTHE PROPER SIGN + BMI AW20 OF RESULT + RSL ARTHF ARTHX EXIT + AW20 RAL ARTHF ARTHX EXIT + AW4 RAL ARTHE ARTHX SINX IS X + AW17 RAU AW21 AW22 SINX IS ONE + AW19 RAL 8002 SINX IS ZERO + SLO 8001 ARTHX + AW1 57 0000 0000 CONSTANTS + AW3 09 0000 0000 + AW5 SRT 0009 AW23 + AW7 31 8309 8862 + AW8 50 0000 0000 + AW11 00 0000 0002 + AW12 15 7079 6318 + AW13 - 64 5963 7111 + AW14 07 9689 6793 + AW15 - 00 4673 7656 + AW16 00 0151 4842 + AW21 10 0000 0050 + AW2 RAL ARTHE ALARM FOR + LDD ARTHX 3221 SINE + 5 LAST CARD SUBROUTINE 22 diff --git a/I650/sw/it_subr_sqrt_listing.txt b/I650/sw/it_subr_sqrt_listing.txt new file mode 100644 index 00000000..94095b13 --- /dev/null +++ b/I650/sw/it_subr_sqrt_listing.txt @@ -0,0 +1,62 @@ + 5 SUBROUTINE 20 SQUARE RT + E00AU STD ARTHX SQUARE ROOT + BMI AU1 ALARM IF NEG + SLT 0008 + NZU AU2 TEST FOR ZRO + STL ARTHF BREAK UP EXP + RAL 8003 AND MANTISSA + SLT 0002 CALCULATE + STL ARTHE INITIAL X + AUP AU8 AU3 + AU4 RAU ARTHE CALCULATE + DVR ARTHG NEXT X + SLO 8001 VALUE + NZE AU5 + BMI AU5 TEST FOR END + ALO 8001 + ALO 8001 AU3 + AU3 DVR AU9 RECYCLE + STL ARTHG AU4 + AU5 RAL ARTHF MODIFY + ALO AU10 EXPONENT + SRT 0008 + DIV AU9 + ALO 8003 + STL ARTHF TEST EVEN OR + NZU AU6 ODD EXP + RAU ARTHG EXP ODD + SRT 0001 + MPY AU11 MPY BY SQRT + SRD 0010 AU7 OF 10 + AU7 SLT 0002 + ALO ARTHF ARTHX GO TO EXIT + AU6 RAL ARTHG EXP EVEN + SRD 0002 AU7 + AU2 RAL 8003 ARTHX STORE ZERO + AU1 LDD ARTHX 3201 SQRT ALARM + AU8 00 0000 0001 CONSTANTS + AU9 00 0000 0002 + AU10 49 0000 0000 + AU11 03 1622 7766 + 5 LAST CARD SUBROUTINE 20 + + + + + + + + + + + + + + + + + + + ? + +? ? ???? diff --git a/I650/sw/soap_and_run.ini b/I650/sw/soap_and_run.ini index ea845757..fbdca49b 100644 --- a/I650/sw/soap_and_run.ini +++ b/I650/sw/soap_and_run.ini @@ -11,19 +11,19 @@ set cpu 2k -; Load SOAP deck into core (1 word per card format), but does not execute it +; Load soap deck into drum (1 word per card format), but does not execute it -att cdr1 -q soapII.dck +att cdr1 -q -l soapII.dck echo *** -echo *** load soap deck into drum +echo *** Load soap deck into drum echo *** d csw 7019519999 d ar 8000 go -; now put source cards in reader and start SOAP assembler +; Now put source cards in reader and start soap assembler att cdr1 %1 set cdr1 wiring=soap @@ -33,7 +33,7 @@ set cdp1 echo, print, wiring=soap att cdp0 -n -q print.txt echo *** -echo *** run soap +echo *** Assemble source deck echo *** d ar 1000 @@ -41,18 +41,20 @@ go if "%2" == "" goto end -; load assembled deck into core +; Load assembled deck into drum +; -l switch allows to load the symbolic info so debug cmd info will show +; soap source code read from card. det cdp1 set cdr1 wiring=8WORD -att cdr1 deck_out.dck +att cdr1 -l deck_out.dck att cdp1 -n -q deck_out_run.dck set cdp1 echo, print, wiring=8WORD echo *** -echo *** load assembled program +echo *** Read assembled program deck echo *** d csw 7019519999 @@ -64,11 +66,11 @@ if "%3" == "" goto run att cdr1 %3 -; now execute the loaded deck +; Now execute the loaded deck :run echo *** -echo *** run assembled program +echo *** Run assembled program echo *** d ar %2 diff --git a/doc/i650_doc.doc b/doc/i650_doc.doc index fe8c095220fbd3142db8b4ac85444cfbd8c44d26..f5ce12ad49a1bf9eb04fce9bbd267228b30daeaf 100644 GIT binary patch delta 154827 zcmce<2Ygh;`nbOvN(i#_1PJZW6A0-E5NZf5NKa5uDNC{>fi$uS#kQg%7F6V*>$PIR zf`TZDqJp5{RjvXmDu}3b6lsE#i28rtIp=In0(kZQzn@>0XZMtuIWzD3&dfVyms=LQ zZuuc>VN~~;4u|8jAl~G!zQeJdV<(4y{Q2jfa_K*ue*&Mv7T5~g;8piy&P72j;#Vwn zIO;m4Oq(+8r<|X1Bu3@G+I7MliDQBsce*-G5q^D4A6+xd`IbH-sI@*jsE)ocsID)* znGs1o*L5_GtEW7{*xr^;x#8SYY_rzz2~NQYx%b%(>ce`~J8v5bPe7VYpk zhSqR6E+iPKUheayo({)E#1+yXDUsmrG>7A7qBu#2bR5KQT#+|C4@|+b;M}pGHcEVT*S^2ZhMFjT0v@!b0;N&DLpBLXY0?YIEau_+q z;aExe7NNpSeb0h4-V=S=VO`awr|{%rZ)3-9L&&im{9# zgRy*y(&g_s;WqO*xlo-tHeAU)BqHZgsL-({n|usPmwZTkE1VJ9;jjeoDfhK%7i+|l zq$L5R$WCnorwCU5taD3&opO;|#~>xXjw#mNs-IRNs$Q=+*INWX5ohJO;&SDOUUXfI zt#6x)E}MCkx;dtf!*TnnD{KAYtP$6}YijYT{lKyIg1nW+c z&Yf^Go#eKp5+5BOl95+XmhUbtD$(=~4ck~@ll4~{22$y!mo-eZ?sT)?>8|gn2-aPH zvQZ#T54~ff_Ewx8wmXTj`kY3sf{kn>>Z2QJJ^(k5jVWhGf54Iy+FAv7?r#apqH^{tIMm`_fO*KY~a8k#{8tRUS&^uB#s=~p(c zZ-q;caDhzS)i}wzkyz=*&y6i*?#?{&@R^XZuaZd!`jw2Gu7QF zOI(5!CXj>7u=ZAf9+wD^q(2{)Vg^WxwFgKul1);=Oo)z;jtj|{Q!u3{KQBv5FPvIb zQs6GlD=O566}hu7E#0Iz{n4hHDb^$=6imtYXl^ZIWa=nwR7p`ziM!x3X_-b~q}AU{tA~+Rd`Rj{cV50*60-_- znPf~;iI0;knO2`1YbHac^!3-a)h-=3*|Z`fZa*Un$;yh7MEfDC6jrH9E|W-{DHD}} z3^NgBLXt>ANP1zZr=-xGuVt3F3%y3O6Oo>&r4alIQZUoRla;|G zk?NST!os}59Ie#jE!DhPC3(e{(R#AkdK&4NT2EG{m>hDIr^G8YV@RHt)^N^ca$?$O ze8Q@rX74zAm*$ofmF47WaXpgbqctrv*P~6%DRkN#832g36Tit{}M9)y~$O__tKWtWr{L}_ySmR4<@Mf#FflY;WR zdX3ge8dYB_DlW|{$h)4OZ=R?nMc>kP#yF|p z*&b2#6hpA-{fBGh92w>mdP-^QL=sxIyVTvaxTGk{WABfV?;51sw>)9r_M3}nES<}NAp<{V zK5f`Q1d&&YK1++VF=Iz)H)`ru@PL7%MrL5^a;DGfG_d-ZfvH!nTHi@`x+V_PFubgy zLT^#NN1q(ICyuxx?h=nXTgxpfCYO?1xg;e`N=U%iqFt_v&U;mU=gv-Nl>Shc$6IHV zmPl!dP*yCtn3^}!qh;l~OWavxUeiZK&C)-KdRUoJR@ZLT<+A>-uI<|@4d=}+&DBIv zQ;YKRi)Kkmfw*3MTi0k6@As~g&ChUsX7rQlxN%Ger&sS0)1f1_T80EL|1ksXnaKB) zk^}3mJ}>5~1aBneNS~?|dh&RDi6uO2v&`$sR>rIqO1G7-#l?12)jw9R@DhrcW4O-eK`Eru9Vc8QNVRiMfeElnN54?Hv*F`_5rt)6asI5E4&#v(`ZJH<1n zNLiNBh-L9nB6DnZN*OggN(B_jm8c_naXHG$Dk~@pRy~F{TAv@ERoz7n^lAwm>Y4RM zBYG)SNbi)8qGu(vnJjuW8Zc?rXXVj^(G-`E#Zpx+Q$Cuv7~xONGc+m%P8~zV%OOji z5|qbdRHc*VB~VH+B7IvzKWbe4#KvvOv=?i{OB*O*S4OB z$=;UOrky-%RK>Hz)@kLbjbcwE$bEfv;*?66HCq8`*^Jgf9QT`&+v}5(8iZ+{k`ig= z5f+s!yG%6$ZvBp=*cS3ErGE@FuMiu}GwW8`sImH%q^6A}fUV%jt29^dm#Ec>)>4hE zge9jq-TKJnnfk(RO(&T)Wy`;oh+tF1WP; z##y8~B@1{NqI=R9St$0NPxD=pE&hEJcRa<#QdJOTwmhz=5HaxRER|rcJAbA$0hzgC z^5Q*NY7o;-!5l(-R$Hoi=s5Zz(HLQ~=vbmODXGzJsFXd1Gep(`nMR(0Jk#D|&V_gr zGd=lpr0H=N;6sr=5vAcCV9Qp^A_@Cwk#dV>A(K3s4kO#Doti>rHA;k$%*Lsus3}^U zsw)+bSIu_3anX_-lETVMJf&qNl%>e(I;WP=`q^}4Jj|yVWfJq}pCwR4>oJ;0qc0;F z=_i%QDoHHXg%k%E%}hmPDQry42;*l1oxU7&os3E60Uf}Lbv42ywUQaPrg{4;2rZlyI={HT~fr9i>eXBA@Nl5eE zsI(WWsY{ZHxWG|720AKWvRHT^a)?d{z)u z9E88-Kr?Ig;lR=+q(4#czvT=*E5Smx> z+42&|3dz!LPsjI`TwUe~m(S9ri$IQgDUk;xE?M*$wMBHOS_Wwg(*}%+i<0+vF$g{r z%%;)S2w1IRse3xrQ@LvH(o+0ZY(<$8Wssto#uDK+t`^8Zin3W@qkO7=HoO=&Ub{>x zW+^X3>Vza0DaI_rIvEm}>6vxhmg|5(<)M;+Lghk|e_PWfBCt#>WRRL&@l{ovifo39 z?-LS|acTXU!3L?B2Wc{km|mDg3s{Oc^5}5#WyC#)ZV~U_i{ny6vtvD+T&ctOKAJC! zURVtzRmY=pjl*usv=(8jvPNsDBFFZzs;ebTL&OL^E4$bfRHPc&i`(pGJSVc5mCMXP zMfyIoXOW>yQK3<--B_J+K=K(0Nkgecloa8M(=;)Rz0#-vk;*0*4N0qSByAU^h?#1a zp{xM$U{;0r%q2xkJ{CxSQKsfmygsES0&7)@E?%51K~yJh5VKU$)kzgpjg-+lb!BiZ zg^tsRk~KXpI-63d!+1HQ6=4KywPZ&1B?l^~PXa`tCK>4}0p+_fQ4%!5mF6NCtFDuu zEHlL_Ify3%wnrD1<=f9)t}%>t@gdO=Q+i&F;70OOeKN?Yh-q)Or5km*hDsmmWk{jA zds_`u5|;MiQeCMs1!Pvy0847p{#y2LTA)u_+j-UvZ3L&O8D_AHnqMofS$FJ4Dz`4K zH5Z4NX9nU)AtR^~zKesXEK>6ZRB2MpDu)+P(bURg#kT%S?Mp43W0|~)QBmoX{aL1G zvp1y^1jxLYReNZalz~*uv2@#kfeQMdLjV2xUXjkr2xzOFRZ_L5MVp>Rqg3jn zzfkeilge;Wq+e8%L{gJg%b%595^FkYqHA&Tv9MHUzu z=I8quG)aqDR7ef0?B_-(UCuF|94Wyv2ae0MIabPFrFBuxs(LWZiZzKO4H%~tgGKS5 z5@Wkb5!~3LVY-=|SpBBtqc}U(UTf78tlBA6)vP|MdQecJC|B8K_c~qrwnmLt)$hH_ zSw~uY@mpkEwCYr!k=3emp;YhRf3g}a$(#gzv`hh!RS9h7UVo?mznFo|Oq=X(8hW8^=O)@NEvOQ9-H6*v%JmSn4 zlH}7y6k#r^m6jD0mPd$#AryK%ba>t(9$}>*;$^mKig>GHHEK>vjTKZ*WaOy4n!xCs z(E)t{-5>LM%)ZL(6?NM-IFG`8!vi#@1EiC!m{l+$G2mmKP+6wYyBNNi6-E5&z${;s z%u_4zSk6NryE27dLbr)KYYZ0Y17-Y?nKNX}$jr=P1GS{2m?W8D#JE%;iq*(Bw}`%s zD8($jlxRs>0kSY=7n71yz72^7)FD1QEuIWLWh9>=GbY9i&6*)=^vBX$)uz1WQYjl;y&x>cM&uq0v^EDy+5OVp?A0s%x*j!`V2R z^$~eeo@7KdeqN9M`>-7RMPu$eI9Mh^g5!b*7%Ms{8ZMu#Y(~UIYB5Zv87Hxkmm2Xa zUxF1fBB`kuQIIu#B=O0gIb_!&;v<8DUDntqOb=28RF}jz!CC;?mH4Be#NIdd|CnJR%#BGn^@J4Bd z*Dr#Re$D9ON@X@rX_l@qYr43xkD;Z*0XfB#I71SIX;owi4r+k0(K+8R3a0cwcs*wi6p7n^3H4p zY4|Qqq?;rni~F&CFPETUFW zJjZQD=ffw>f0mk7yHr9wRDlvCFL6mELaCA|kot4y7fmq_E@D| zT7HSrnCo`S3Mf@yS(b`}Lspifb(PT#2hpXoONpH&o))ujg`Qc4$pmgHGn^NAn!4UQ zt023l_yj$TX{nHqd1_kKNLp;zMMJ`Pt0Yc)hMwwoEA}B-nBl zUo}?)EFt@t@*mF1nf8xG9Y}%{WLa!LdIr<h|A8Q|( z6`Oh_>1e%ZRBKmHW0a9qlwVd*s6R5QLue-LqOk*m@fjlk)l%x8j7q33cl19;#To}O zqg#xXD;3SG@_E?8Ci}Wr<1`*@WLXx^N@!b)nSz&sP>I#viAxkaMNc2yx0y`*;EooE zf5rwf1XRd;mpJf`kA7LdbIi3ZQtiDEPFXgqMAn`TJt!mEIYLj)=v*CX$LQB(+^+A* zXqF*u{tR~gs6kVKyMzgdzLBoLPCG543quN-84zi(_$t%c#F1Su)?O-nQGDOPMx{A= zVP?}2#u|mWW;H${EMi5FS#XeO%JS?HHA}tGm5=|^V!bsP)p3z7fGJe#+F~ibF zT&cCqEiElhiHVtFZ6u5i`0~@E*`e7LZ?&{E2lpa6+Y?iqJvAn8N2Uof^?O~wbzF6*0zcWERQMeQDv zTA~bI)5EWNLJeZyxyl;E9=Yn&Uk_rhZr|DvqmtrOW<|_Bg@K{1K4@GgqaqiK8?BVS zcATddYd&gQ3Ar%mBE(Rre$+*?@ws@wkAcY)jXrXGE4^@hbOR;?lxj`$UF6kY8lR@0 z7#G^g3~5vhvz8enA8F_G_SZxNi(!ZXBmx=zXqBQ9GiHc^yw)PA;2u z8K*KStSXFt=XH^xvIB$GTg?+vBBOQH-@h))nWlG~(6;U%5hS@Qz(HmMPv(Ssl;pmf z&@7nop6pT4&rOIAHKu>mT+Sjxp-gz`sT0$xu|}uQpV&$5>ycKQX~t;ThH4EVQIFx9 z>mN?cuEw&O-g#1DN84UMb85g?M6o=2_Cl~`p+7ZAYaxlUS5#C+KCMB7G3?Yonlv-< zVhvZ)t}#C(^MNwB%_IpPt`|-2uD>?9V{Dx7_!w^cChcPW9{!5si-iZQEu(`?XLPGf^>!Q@dK#H42y^JCuz% zh7_hG)KXf6ISnNHCsq9q4Ai`l2v)X+NZ3g-(>%#rk|o1VrpcMAB=_uJP+CDT?tEr} zwCRP+xr={-6;u^}ptY9JjHA5lmz5satW8Q(j2yKLnUPH^GUvYNYYJ#TSmR?GEZXy` zZ%RZl{cElIkeo4z;`TAtW=U2OH0r5gr&1y+Ap>0ITXTWt5_y^v zK$GIE=R`&a2dl47q^DbUij8)2RW{PVcPlPsgPy8J_|I%G5gUw+?HW5tvXP$te{6k{ zsNMd&MebrABFnjdWrLz=2{?%c1Z!bO(j+lcBVIRC&&qh&0hL|h;MuHK60oFfH{Ic~ zR3qOUpi1M2Nw+}%lU$V#@t$*g=cT{2-2ZX&C4k>zH~q(Gt)|?@n@73Ast@gbYrKkInnBk z)YvDPt!284X@BLrMCm+P^^9^Q5Q^_%SnL0pf$t``Dt)`gZhcjZFF(h_5(_OI^{e1 zCP@=SeGfF0%3%2!J}d9}f1jLF(E5XvfTBz-bM;5!S_*&rORrnk+yL%$|_O3OeYjio@hnm;v? zi+1Vbrrtg*IGEK1nT#Z_aV|Mln?qyOA(x9-hzzD+jMJ36N`}l;XRqi1-?fMx;4;o} z1?%5WUC}v^plx)HogHQgC%3u zlBPtSZLLw}l}7XI`*O;Hv~S-qUWy5{Mu`dHJ!Rz0`$x-8+SkstZb z(LJ7_1nryKx^G41)#OI3Oh8u6e1@7pRhDI62qI*#o}D|nsic7y#7-PyssklJP5<1} zBgDu#Mbzs|jp}NA=|GL;Xo1-F;)Z$2apNsNZ>e|%C zKCCV^Fuh^9cbc-qKvzx2V19{HmP!nhq>s#`E9GVD{MeRV6_bks;ckRitVeCaC#54uEFRcFthJ&D@Purbg4x|^W{ z!xf-l%B2$3O8qytm{6%%BvP?A;K9NDRl0Z|QnX3R{gEdGvo1Wu%DVVW>JjM~#`XdUW{Anmx-p73 zJDK2MlJm~-;t093tzI@b!)NSfk`Bnqp^<6?VR7k{OmN91x-_)G!(}If6;wUa@(Psn z3_DW6E4iYT;~5#0G<}mQIdPW?rutqLN;3*k*_*p$6c*<2L1>zcD5ln{%8wlTXb3K; zaE2$B^8SJ|)CRbK1dNhI^F0{G9vDZ7Y^bp2jCyHFvDAX+=uMgh_&@2u6 zs;JnQh@{z(gM1v;Kn!wY8Ltt@{(h;f(kM&!V|5-SENEVAX+9$(%JovlW)|qO)~3=_ zHLjAC1-!mMkD>-CVj#i6Ds@|TYf~9}zpNf`jv5ruBbyP-L5wXhVJ*usoXvk^kw%m% z{;Aq~Sosl#QFk*|a4QeD0@kfcgyC2!scKnPr+#_kQYm<5Q-1bSR*Wtz`--b#VOj*E zHEN!@|K=~PN+n%InE^AZl5<}kOCaKRUo_6q)bf|ib+ZBNVqa9N;)`CwwroC{-Pz)6 z#fIZ1iuZ}{6VSZW)(Q{pA8D6(svN~`Htbh=+$gz1ze8i7jMp?oCD9_EO{8WLjA2wF z;ur>J2A23$r){}X^a7O=O;1-@mn;P0OLJ*GoYq=BylP|Vqt}(zvUC!&v3xsJ%`;3Y zR@-NT$5dQWjo=vB2SNKX%Jf9>PObXzKPC{*f~@KRF3y75d-&h8kYFZYsIF2W5|sk~ zx)44}lX&?g;wowKuahDr_Cy-qbikr6QLai!`u=O0@qZ)Dgi2}t*CZ1vlJo`K_o^C9 z{AXz3?=aB_{zes8vimj5r|&J9;!yaoc;sx ztLVOJ{LARtTQ;SH?hO~OVq{BW%O-zDG~8p*D2J7*h)?ymNL@uHXr;&*e-*WI%o!!j zvDu!RF{4ZdY#;h8G#H`7Br3Xoml}BgwLwB|c4#E3#+$ zPgSm3la7qU9yus8js~RHX6^uW#Z6Zh%3^}dpjmTxERI+!Hp&&YFDghddU8b8$=aVP%N2nE zbl~SN3>Ti6W@D^qWhXvGOD(=!c81u#T^ra(Os?5=B6}}Tw6(W5!uY8YC0A2cvX)?u z)~!qgelEplEWK3z#UIxQ+0e$`wlY-WGJmE?c`N3Z>BTOT>m&Or)Gt@rHkK*1U$loy zP4o?r;VgqH<0pn_3JTQ3DcV+FIEs;P6~w5G_vZS5EX}Ez3s?WL9CKF!zlFl84+Eds zOd%*W7(ETMOoiF9Nj+M#WE#hP*}920DymZ7GmvuNpqXl%eQe6y<}>H++;kvj7`I=)m*3Qg%RE`|BB%8<{npL z`3DEL#LX`pnX4YxmAI&UQm-&ivLN3TH}^XGN=-oq0@HXE@RhAGm;DlgY-*6NPL-+! zI`hj3vU!(5#W0zLOEotFUUJ(ti@@@u8xiTo2K@q=?O}0H4SdaOY68eU68;Cr8J0n& zSL_K^->;Fz#ihsO73$7uzJ!r=`5DM_r_Y@}^xdH^4xQd|db7OV-~9e7Pd)t9t*<$@aZTR;;3E-Wwo4+E}^;Fpmh!-z{=u|4JAg+ zTF%hi1CG(=<>H$fw`!n5*rPVL2N`iwvye&=^qZ%*y(Tm)*VX$AN7_)$9tkyYRyz5c!9K7j@OMtC6X64XPPJKWXKQ|kv=y|}A1D~wp?ZuXCtKyePK=}8?OBZ) z-2V8_6ZxFXXHK@r#u27hFPxqK>%Q&3Zr||I6AwP{;M^x3%zrRvLe8iOITN19mn*jX zG!3dXx7xH>{O~3^vJ~q;P>zO`m94IY1VTjE)x2<4t3^fiMhEoeh#lHg!XsQU4+jdW ze6K=5m9G=0lKo6BimYq}2~|u`o?^4UcB(WtQ9fH~#7yf~G1HcdiWmPk(~YV8=zngp zqh>UWm*@U-X%6@&5^JprecDi=P15?A8E^lO&tK&If1*u&;{2NW%icQGkdkPrbrmf+ zs%U%Fac^Cx?;?{iY$&lDZ+9Z}}16$}Lb;12s~ZWP}UY_@(vM)akfYLPQ$No2F}7cI1lCU8(e^F&>v!$d#wRC-0!{Ll>Q#&X7nNf+-m785UU3>T%H1RgP18ZR&ya%G84e&mE2j9aF zum|?T0dS(ZAgBf{p%t`-HjN_C5(n)-)Z76&LVrku0Wc5-HPUasy?eu#T~#ec|DPPR zQ8Q{@6Jw-R$>xn_=rw*~x^gpTHDG_)4E^t|&`nLOCbab+3Og9GAR9d3gIi!O+y=M9 zJdipuAMS)_VJSQZ&%-i!3EqbfU?Y47-@^~^p@K=4xqN19UpTj%a7Q#Qy>Zt_<3aZ9+Wf03{jv1f z-K+N5b~j$B*cQKvbEo+n%|vc{VIS;=18@)yK{eW=>QDn}!WB>lT0l!^1>KK8Eb>F5fo61j=KYPNuve>*bKX7H%K54v+%CMM*SkyV7ieHS!Ve}nMi~x2um{A|$ z|8l5o3HtiE;Ug-03rh^6vpIwRys}-~G5)pLI-*4)tKm&p4;$cp_!f4p$u(HQ&L%FmNtx-R~YxJDBC9kv-@c0FCEotH7{Swjl>%mDO5`QuN7$y?P?f9 zc*b@Ydm*tRsg>|5d#Pzq%*6BdCEi{U|d82$xI;khvV?VD446714)HKcZ)JafO2 z)C^_bXxzC()iPrKi7{7=d6B%EF}|*Fpf4Uv*Yw?LBy)+!Sc?BAuAw9PISTwdY=HOS z1K0!~!oNYhypLfs91P=sPC3NEVfYb#hNJK+oPo2@09UXfG=fkFgC-!ZVlxPbWatLn zp$DYEnUnj^oILaO`(LklW6jd9*Sx>xFbsx6 z4&*`}Oox0Z0P)6)ptuR`Lm9lvThPJbfFgB|fZMVO8 zuJA8Bm_vre*sHGXIsf+_Oly(c9@q=}U_Ts!!|*3K$dD77LknmLtwDn}AOos)&>s3h zD)fgm7zBf1JX{0ULK)12Sun@P+x2h*$f)clxEUUSN8vGe9G-?}U=w@@|Aswq;ncpb zPHi~#?rZNZeeK=XzS{8BsSBqbG_TwlxH8+kVkqBe2*m6VA9Jv|86&)Kef!J^-v`VhSCy$Dl0n9u%WC6e2CSEk zIn20oiI^8PpP}NQ%Czv`(9~bHlBTz{Rasx94mx@>CH@b50$X7l?1TMq0R9B&S)5P} z7^OREg!A7*$@E1q)PnZV0Xjk_h=54w4n4y4DaG;sZQi(J!xT+P%qExrxzp;imT7{j z(!WIK@fYsI#qQf*wAF@5^fMl6D}Yr&9Zh>6h!n_#v2YcPgYj?;$UM+>Aag-74>Z}w z+fsM|UWAw7Fr0@av;;4}r?3S+hh0z$_11?*&>UJrTNnk>@D##*@HD&#Z^Bz};=mUt z4xCuO?8!$L&YSxvuN&t+8e2AZ##~{>+=3Z-GdwfgGceCB%@!cou-xY+r>M`z-HgvT ze_@bYkGQL}PL-i*m30UiE7yC|P_xz3$Y@wiIoP_Jsx#PC)+-zxm4pyP0X$|3VKfDi zLOuh}f)wmqXhL-x2!mie%z)cq5xfBBS~{+9oadk+HM(Cbz4-1HdcpNBz2GO8zWlpH zz4r~S=HD1ixba^3M6Y*GGYO-AlYcSI?{PUd=v(re=@V+!(r>w^hW`9L!}afuw9((W zp|&qfvbf94<`F)R!LLw*+=PK-y%;3R>)qM_@-O9D0jogDch+J3k&xqDp7Z_4*H-2(?u53xR$IQO$HcW)XoGEe}d) zyK48McFs^sVJ_}Ag)UI2$1En);#EO0?eyIbXXwcfZVr_jqR_6;9YnDe0Xwu01e6;S zVG>M(XTW^!!^?x3cUZOi;dV}+6-w?t3rpcucn$sopTMW!Y|kVJ)PZnl2T>3UeP9e^ zKqeHyEO-XqhIe5t?1uyJ2mA@n4h-hPJK%^w6vRMpmk9~eJmPghJ%`J(zn)P^j z$7<_HqpHl6MppmhzDVEu?S4_`ZM5#{Q!Q!Z<@Y8!{D4FJZykwcj{0A?FhSX;oxp?dWF9cyyq;rQ?MA@{cl>ta`oC`A-v>idyZ zK}|Xa^lfQs3jw}0HD>91QA^2GNKZ#tduRGoC(q8w<_V6)m_)X#6Qv<1fCYc8$nUDxGD;r~slq_=)xjWDt>Q>r(k?{!xvc&HN9?I$i$j z8naB%^AY2~c@-NCn(HT))zP1QtbTKGigL1*e$OTl6iZ~XfyU;Glg_Mhr*RG3`W6d$b)Gx z9g3hB=EI$E7u*L=!V>r%4#AIb0vdM0>wxB+d<@q(m<(>12J_)Gt1H#`KW7_4b7%)c zARUIo)i4gm!z7pj`A`72z+AW$?tuGXAv_4@j~?Ft-Hz=aAKrd+7=Z`+^e_Ds_{_Py!{a#;e60@UBqmH-u_chd2xM{s0MKe&r*%3MO1RL-f9_X zE&Dp?z9^58b>U8z^AP{T>{$ORz1UB*Wo7N4p)nYAPd)V2pPB_~l%u9) z1<#Sl+mU+R)h+avt6lyl`&Xl5TX4UMe#M*P`Z?xGwQn7(yAE{Md%m&BC#JF#R=}&U z2Hu8u;1ryObMOcJ35_~4%L*|N3rWxy`avoThpXUPm;gDD3wbaNyif}F!hN0TOCIIm zF?bv{!G~}N4nv(TO!Y!5Xbl}90=h#Fm=5`{7#@U`@G5)+U&2@LHHZ^+?(qH{+b?Xt z@X`JY8~0yW!`8Iz5OJF8Z|r|#+5RWhODe~c+ZU_X!tFG*sz3SHgiZRORa5F>!K&*C z3(G~8{*~SF0qz?)PUf4X#;6N5IKc6I`N^go3I1BXtw-WqRM6d$?+?iH)a8^V$tY$0 z8BkVTOCdFoO{30w-SsW>&KuY1dsl}C-z<9lK2GU1b z0@byYHi-aUGrhNW2k8lc5SF@76GjP|ks1w9J zW87`o%ew0mTRQ`1A%Tg29xxF+kOR4p2h*VxZii*C8s37BVJmzM2jLKO>B>SRWWh9O z5KYqojbI_X1TVuY^8b^s;b0?dg>CQ!9DpP6GaQ98a1PExL<~+GbcZo87OsXI$b%BN z5gvlIupV~99=HHa_|LLiKpW^3+n;}NPmu|h25@i*&ZIOs_1illnM0wdQ%Te%Ew6jI9!F4 zM50~ksiNV=cqUcBmBX-8M;6eNRE=A8{7+v;W1baufkXGHC%w- z;SZ=r&cov|wB{VNfcDS_Qeg^Ag?yL+vtbTMac_a=;1C>v6L1P@Ct%4C0a0)>+y@WB zLr@*j)BzFIH82$}oa;q%&eq~{M}Iv1Wdf;>Scb{m4sXD2_#TeK z35ZTc#!~X0&=0(DBissi!$Pnm@(#!U0g;RdQm-52e_Lihppz|~kaPK;w2yaeySyWmTumcuu&3(6g~KYht}*Fvg( zf%(Jb3jzivM)u$EnPyeHLCj?gPRU7`o|0~J(brN~2Oq$j6lD$EN%rpoDV7vzF+2=X z6e-4L*aA|7qY#(IE`l^4M#MoO6v2GB6Bfb)pu>ak5cuH{SPCz|DtH~rcn98x z&td8StQqp)5qKPy!Ao!geu2|I-hP7%P<=T(iX@Q8}|)eRBT&cr&57qFeTd@NU?%G>_IbAH640cVGRY`c%s1 zyhBMNb*@x?QB_M86Fg$-@fe>k;hek-@rYg2DXJ_6OP!W#zTjGYBs~OjfUklWdN{?2 z3-L!n(Lnuy??&mqyXmDDgiDL*JnSFY(%FngG+h4_n_f=?y8GKsYVKREG0R;`StxSz zzt_gu+9v{(S<42uZwi_Wd=W#0qXMb2sv~J0F5SwCcpOc{AnHH_B*9fs0EJKlcfg(S z3T%K6;Zyj`$J=f=3_n85AbJakhXlxgt6&D)47b2ta5t=EJkF7JTpV_A%^-18@|M!4>IZ;>Qmk-+z4nxBHKu;db!4C$+&0Vl|*x zm0WQ!(b1vr)e@O5UXB9i+%e-|w3Y6N(es#!Yi6Q6#Z1fg6t2*!khoMbqpI;R9cduw4-oEmB{A8@|8MT{U)vJ5fTbYgVEK2QoZslj&Qwg)n-liV zck~ShTl+QzO;q+RauAEJcl+HnCPGfOl6D=rvMEUFfrK;ag1Vz>K*f>7uT>q7qnhDy zTwH^c_*ATlqxfrOiZoQpBeuE~$}qE;unxow#rzIJ9Zb&!NstUH;1wtvN_e;h=E6#N z6`WW4A87BCuXq{Wl8D9kjkL7Z-~aoQ20Xg*Q!UMy+OT9Fr4>|Zf8>e_vqTBq+B>?p zcMNIoFf^yaR%k=%a0A-fK&y2btyXH;R2UV%gHMbgR4TbhyBlPKNV+Bxtp#J@8pwxI z5Q*#XAp8rSgI6HvN(RFa1J}Zfuob?6?_ob2fYa~?R3Ap;GK_lHn1fJg39X zok&w=ivo72#4Slh;~F7VIacqF4{=}(ZYBTEtKm|Eoi2<+O38k z((pLH(l_LHyyVLArB<7bYvC&Vgqrn??^CEkDx(y6*c%olpDO15|F7C8L54|D#F)lf z*7PzbVoe9&AgsoE-h>VCKAePKpvedp7@-gJg)GR1U*QbY7#V1+k6$0I+c5nS2JLEmvHZY&9yxSaGC;9wxQq3J8O6Xzt^! zA54L4D1?XLQ4m4=2e!gCH~}J*FbXb0X#*XgBg8@ibc62D8$@7JKm_&(tb@~F39m82 z^EKz~YM23Dm;-miLr{AZ{VRlxMibB!+QCe?1=QlaEYF|2@Wa+0wi+Mnw(`30_Jy}s zy?x=8w@<(Q+}qDBdFn_mS?NFdFs9BLDhR|u^ij# zwN)2!737ZTIB-?zj;f8s{p$xiTUSHiwmQyb&RR?)gIQX*(wzZQA~x9KFM96TG?n%?n4Le*9bg#ve6(*^jYNSVZeui9o{9{bkRcT}sa z2)*w9--CLlGPiju&QeQXRC5fq9EbKuT2wO=iHelxAi?Wl0TR1SZ}37hz2*9F#mxur z4Qk$BcO5#_Rc^ir8=$HbA3|y($tOUhdDidl%+Rgir|?yie_G;fU`be{`wiTv7M5>5 zDE9e`zJ6g{{qWCWLBI8X`l!<xNMxYs6}`Qr`F3f)82Rn z3(S)nj3k`A2NsycSR;ucrY2c9n0`QgN}$f7DZBK|1>R#{2W?9;=FN|9YEV@z6-&h{ z2N;1)Zfa0fUloBC4zvQrS&AHjghXkHkOXJp91KP7cHOA?{RjK7Q{tX&uB!NZ1~H(L z8_W~B|JLgjbmUvCVQk&1r!PA@sFpQTtgk%V*r!ZPl}Xu6 zs8xW+$nX-7f=D5x0Kb70U=T)t-}(Yiw)eem|`w_iH6`p~lv>-Ss#GS8>9 zq;kkFbA;vYn=-JXa!?=Ss=oC6pmEuaUQ`vs6?|NMT2)h3947BX=w?k0)Nb1~l9IFT zmS{vQB9a@`;@JIcY1no;m~90w$!@&hTg47X4PNwH@1XH5^}fG_1n@ybI$ko>*{<||Ie!-W*ocBYfrk&ZU!m6sslCBZOQ$q z9zS8tL;BHY>UNeNFsWu~s}7P6gWEtfb{E_SqB*O2t_-!T)A(T&^?(Bv5AgSOI@J^0 zheqhWS6%vBpY@a{h0Bv_*=^t%QWZPM^T!0Sl_NUHxh!bYP%sF@JPT!hJjJ&D}L6oMl@_xPJ`(G{RZw z?HF!^^NIaQ7`gA5jCddnnm{;ofR4}^`aoY82p*UU`A`Tq!92Jd?tukxFFXLt;SJaa z2Ot<%GXxsDsc>N&w17xRgbc`oX;1*S!rgEWEPw~#X?Px1!t3xWoPo1&4jN72TVfCn z@lbx|r^^2h?mc+sr|-Tw_)W)y-yHnv^DQ!E{=u8CZT@_-di#9yOG~!wee65kVgC7l zNN_gxFKObe)t2fuy4`82o4g15B0TTFRsV`6&VdP5C6jL^NbiKBq&}_QszipK8 zOObe3?$I_$YQsoJ4%D2Zd{QeN-R-KWf%rr{Hq+QX!c@6kZ7m4Xp>nuwBh7Gf-BM{+ zjzz7u^gbD7glk||_h7;bywX%=pUTS%;LhvyvdP1p=Lw>6OEl|LF+U8)P%nNwxQ15VYTd* zQbaOhC2AY5zh?@udM+%GSY3i2q=?xYGp+hoBfe?PX(8iV-ZChndL3syheb_ieWpRj zRFiW#wmxqebi5Ib*fsw9n>oj;-;r@tw;QC+V?P2hLbEnDl*cb}`Fl2Wj_@xT>8x7~ zi|{`#nOQ8E`E0C|qx&T?62yaL=cAPoIj*>Nypex!4d<#DWmh%qRxj562CRm0Svb0I z7i<7SyiT_s^GGw&7)QJ3Q36TzzlB5h7J_8cc^7a5F4`PvA>92j`&& z8BT#KVFXA)CW9Lazzd}?2W|!_G_xTIs$*RDpo7gpxbU525b3F7V(S@ z-Iy?FV+6Ec3eA-U$hb}*|9~dWsG7_&h>=I%OB-`W zd?Tw68=2dddsXHj{CiqDTlt!ZUI$U;!SEJrfRAAtoB>NFzj6ErR7V~)pe6)^C9B~a zUj_M42s2?8+z2#aP%bKzW1G5ZMGPxw9TK=BHqn=~0|vwKl5Xn)NsIBQXGYiQOp0<#ej0H%Kcv_Y z@2Q5|)JN@V+}qLC_|=$-=(gY9^A4$9r;Hyp;9GMN_u>?m>}rx_>8qpYL-b(jU=7D_ zgXrNa5V4Dh2S6#TguU=HxTeu4!6+CFW8f`V1A7aZ$(*JJzy6!jovD6TOJ^sw4C?$` zf9kuAdifa_BilB{dV-YPp&Akqmg|yJ;u7Z4cO*{b?EvbEN>2)k49Kk)ZUP_N3HQJw zd05xe9J~VSVIypYA7Bq0gJ0nc)S*~m&>WJX2lR!JU>89K=Xb%~@BlmlPr_<=6GS}a z2fsYHv3yVn}#h}sr!%QrFiD?F`G0@&1 z8nLbR+zhlacH1JLVT5MDrdXGVGfcfJlfz!ko2`f`Hx26#%U$SeXB-4BT&BA z)1M3++ppV29*{@8Rq;d#X+!H;)sinb)sQcgPUOS-ev_>t9&a0A3Oj9R9mmL;6?M6} zQP=GO0*OjpZzlElvUh!n*3U;7LHwoCx*+iH z7LNSKS~-U{!1iyeZ}!&wUdL*mzjtfr5TCsxdMWjrKsB&e344PQs2-&8J*xwux%aZ; zAS_p|U)%%5A3_9&!78>CSBkkGq=Ql#F{2l~RDa2I?Jy}Ya>!F0F-N=w;H0$s~k zX@U>o-|%r69ZjTkG@aD88VD?e9qd>u%h?uM1{I=ly4;0yQ;T9Cgk5CuI!@;(AaLIz}llx4h^?k1OmJeUSj zxH6atvtTwzVdsMm55u#t6h4H1!(KQE=iv{ihfw;%AQ%r5L4@Ul+u%;P3!Z|f<>E82 z0ye;Z;1l>7WTbV3SNQ=MZhgz^i;Z7wEI-0~`MNh=d}G~_FL*t3l zQhwy|a!l;hxZHpV^=td6am;K@dEeKpcGCZ0J7=SMa>43eIQGBX&Y3J*es>PL7i+Rx zqS%)eGGK|~ZFQ6Jm_4L*+((MC6OO`3sDqKz2g`6aacmjSM;w0)yUM8H-*Rvm5@*uC zLpQh$Zijo}K6n70hgV@WtcBh19sB~P;5^iv#YSr?#EzOAUV(GA>NL>Uf!h8WbBb+Yq3498_LlR3>Iq*E}gZwB70yFDtfDJ;p@sJHS!d$om z=EKWA-j;)9VkluAZqX{|7VfTXn#=?R@B|6ZiCNeU-2UoTZZ zwKF-9qDW4M!)TBkd!ZDTz*DdcR^Ld^on~xyVT)`*XDZ~1&dyN(sH>d6s&C!;zv<%a z;JZSKmj}~f23U#B;rIra3r~QR_=_B`hBx6|SPLJ*X4nPa!fyBh_P|eY1Wv(eI1lAe z^Crf)H_>G`;-E2vLUU*V9ibESfee@c6JZie1`p)HGw>WNhgI+{tcSyJ_Q>8NJGbrJ zymRCFHLpGQ)W(N5KD^%ekV8)Hak{Q)Obh+cCs)9L~Xcm~=DZgxlav2u2;U;MkF`i5tuQ=2yn$_Z0G~Et_K{9Oqo? z6B+*uRTKUHhw2AK&hpH8=9y>a%$YN13c|2(GDQHL+z>bo zTmUS9O8^ph9qNCc9AWZ)5y0icMz1DXIfh~P$m2M1LOURV$TWB_GA6R-fR zfGdD2;0D|P+yM_D2nYk-0v~`HpcWVeMu8u|G(hGA9tWTS=m4lzv^V`2Y8t8qVA@p6 ziRSPtN2^2SKoL+o^pX%-3scy&_E}RbYT3n`31Ii&^98V*C?G?lu|5d78wU^Tz!0FE zN1hjDeAIJ#ATv$5JyRbE_^3IyfEsyh)Tfx2w)6c0-}I;AOT3b3bkus2bdcV z@C8fFhg%JOZ8rIY2&80#pK3 zKs7K7i~*Ct6tEmFj1CY1L;*=?ur-Srb9+K*)g5X$S^{mlwcll0(}O>`rJT!U&>hngM|T z9tZ`}fDC|;=rBiVUId_Y$3mKu%%wd8%ozbK;3#km@CR-K)j$jI85ja4foXvDI_Mst z2iD_YvIkHA6aiDf3^)f|0vrIe&rQG!80{JDfZykjwPm#*YF|IEO-rnO0KZT_n7G#_ z*19{n!;)pKA7;tln$>4aR$T&Jlr}(>JIlhtIu>Wq|WVuUXuB_Ka}Y3G=8t~p3Uv#iU7`?+HV0{LRwXk4Fkl!rh3-@7Zs0k4Q^DsT>VTXz)eva%Z%4$9g zN#KkI<(JJ)iq9#D4_$vgnhs>a%PC-0Ni^7@3yKs@3?o=gj=@rqnqhWVlVV7)FkB8) zm#s|q4uP|iz>sgjE*L_HAaNzK3O^tdcnuT+r9eB-4KTYvEddY#B!EcZA@B-#3p4<2 zK%Wbg5X)R4I|D2LE5HVD13LjefFIZkXaVj(FmMY<1d@SVARl-E6a$06FfanJy21H? zbpSWO1MmYPcFz>-dPK6EZi&E*X% za+=?5A?A&xxdG)S`4M>+IV?=Fbk|1L;lm6mqB*|)Zqd{ z9>_wp>}7aOGVE?rQi5Hx4lzDl17$+yESwklyU10HZwvGfZXIVH@7V;&F zLkQ|vfea8C9Wtn0z+E5>cnmze0fi#)8mJ_LN!5)7mrZz9{d2NJ3oQ5?H5kb1S5-({ znNMK|ll84;%mv0cLn|G`JhIx1xU3mw3Gf%uOuLO`TyK^md-xd0$_4*)wr zg{lBjD^aDc9{-$SerBEdB^afP8hZgAZLzIc*wK03jW9S6@($NO<{hHzKyC!(9lVwt zb}#ck#W_Q0xJGtEEPKxFrNU>4VwdA-#jsaM4~vlDy~VH=_)P*> zW@%!bX|{GWTS1NJk0bM=1;&dP%AYOT^2eeOe5t<{hii8*8mt$_BVxSw+ufI|V zze);A#veoOz^DyX8UYHFYD5S<@W^Yai782(J1N%UWfia)_!bfDGEzPBZ}=oh7%s4> zn@xP(eyFF;K50kybCgKo697@kM7<)NLKW!eUngEh9=jI155Gwmi~6K<68h=k^E9x_ z@TKBdGSWUr5`2>+R%F+&aYg;xmd15HOcBQEk(0naT?_I2O`QvBnfNei>>4I=Vlt!T zMM;X1bFTlOBsPh30Jm5^xc~){fpju23v@+XCeA@u)Oa-+Y%Kn}6qcHm5Q$|(OYsE} zDL^(r7!(rED~)v~MR7`##`2Q3I1%!gMBQwkzl$?-*Z!xnAwEcU5^h#3GEO%DiMdjSo=1UL&=0XBdwa2bdMqJW;px~jUex>xy6 z9_1%c-%AKf2u|>@K4pDM>lE@S_>Ft8p@a)f-GkkNdKMtdA>8_buSQk>+4}@S2-rGo z#Xk_mu3LsS;qyhY0{9Cm*v;%1mW2@~MjAy@6F`w9^tRkec#Q*pP!@ZBGkWp?!+=B8 z`}E15<~k^J4FjfYdb059tj^p1S?BZlU_p8>3=1%9SHXKqU{~QE$YJ+yBPgGOs4$|U zydiE#QJKI8z!)zf3|;-C<*|Y!vKYLt26jEE7$-B{PaZ2rn&V8k10ivr##1U_2XKV` z`xL~(^WgA&plI$?#V~IInt>Le6`=5fNRnj-75~L2K1~mYw!2>|5DD%Sm z?ZtATL9+1|)SyEFH2P3uivsxV*J59yDGHsdSN3_P&N{1d4J^}ILS%lqwL>XcrH19e zp*SzD`x5lDlBoA45Z(zO-Lrze*#L3i2yo`7yM&g@f3b21vv$EzDhrk|DyS0+;ZA`M zMQCvpe;;W)$}UCM2-!s*-AzEZOFO!3(lbg0S19# zV1*BqLjXOn8ejor08(ElvH&uG24Do%0BZqRKn~aqnBib@0T>0wfN@{~K#qe7SOKgB zSb&WH2e1R!2?PUp-~kW^Ob$=>e1R8{<8$ICW9NQ7U;K0Ya~ugFXj=~2Xa^g=X@>@mEB8aQwi zKr?HDpb+SVe|^@JP>ph-DUlCQA#+)3N<r`hRov zaNqh*iH$t>uh+UbWH$MiHrzEI_zZptT{Fu1LcmGD0SE$!Sw8}n;4&I1<#Z@?dj2JQhdIG8*Eo&t?PD?k?jUKL;gxB)dl3pfBA z1;T+Cpay6FJ_6W4Xc`6>f!XmW(U_FPUuWB=`cLJbia)*kRQxoiIHuUo>l1o_4xOTg zDYlA&Uqr*1FKHY6r5T$r|ed$Ss6dgkg^MK+Oo~ zPIguXv`2!U{Y`T?>`kbl{@zo=Rzj;h%n8W>bL9FtQL6BO;&_2M&C+6GUyC zig;m8ir1NDp9GYkCjnZxrkTrD1pWO|#-PyOcRD4cJr%NHZeTXfkcnXV3g7_50I|S* zAPGnYs(@;s4fqQD048uSSrG(vXn-5o0Z0QffIeUVm;h&iU;qy!0Es{&&|One__!vu zqA>hss?%dc_)pAq4*yghSRvu*20W5O^V##) z22_J|iu8$eNgRGY9-l0UrC*O^E%trrv~UArdQ!y$8NbkP%;4wUKQaRecpy~5j`!ig zs%|7a0-84lQexr}6YlEl0Quii|4BHC4xt&J`{p9y;e4 zO#tyqbzu1vfUfp3UeUHg+Sy5Z}0f$X=k@J-pg2Vg|?o;yj zzW0~95~0omZ<@^4mEh%;Rmgc$am;=SXl`{ccx^%o5xw{P`De?L*)9cJ&w+-B8YF6O z=w}fGouFo$k-vL}&KB64{QkEEHvhc!{?5 z&!wjZ%u4?oZ%#CNWbnw?mqb>06YLMuoK_|BmpTvAGizz19%`5$N@@$GN1$K1eU?w2^qi$ ztOg_jDWFHG>ubZC9+-T6nR+|*_RC=Zn@(mrU7Co6c@HhmXIqpE^HnnNFtASWDJVM= z*VyFecSp6G`Q5>bp!J^}htL{o?A)QA zj>h4H?Z{0rVAxP9BRwM>BmFM1xBrmWq=Wxuii^(sAkw8NY5*}HrsOSH4gqchC{?p> z{Zf*`7a<9yDSg0`#+BkokAGfHqAMfhn>F~^>+txeTF^h0lUvYr5Hz|X8{&tot^gof z-mKLTzOICNX%o8L5}wy!kHGhp4iHNH4e0R2`I&G+!tK}qL~QnU%$NqN<+YgS)aXv87Z8VRu@ z{~5cVeg?(vr=Q=u9&UW+bw*0efrr5)9f2h=kUG$~L^CLa5QE5&C6-5w0g{aLvnU1& zZWRc=hM*r(l=lw-MCmwK_6Guh93U4c2P%LuU>u;i4Ye>p3=juY01ZGBumkJ?Prw)O z1G0c@pcp6zDsV8F24(=ZP-s*Fw1EA<3BVk<0Nev&fDGUT@DdmW#(?E_z<~iwfHI&0 z=mL6x3*ZU_0C?aQkO$-g#Q?4xCKbR0FbOOVgHj%#0fYe&KoigcE&<*3)$bQlk5+z8 z7OxS)Gtmx`#1*7USupNxrj-%#BlzD z>Du4^mxe>Q$DB1BqHz!n8R+p27H0Xz@JN(yZ0fb)PkU<23zu7Dfx0Eh$fffqm*4kq2e z2*42zFDe4!fCOL!oB(Wr%Rmqi48#KoKq2rJXat%7x(Miv0jvi$02_g=z;J76Yte$q z6IgrFIy>DC8;XX}_Jur74Rb?7nfy-;Ol)v(N4$;v?X4lYXC&0C;GS{*CUw!Xylua& zj|rjVM~WvZ{Lf8+^})Y1g$0!@ViFUR_Rpmc{}-eajfrSTe=fZw?(eUiXu3pm{d4JY z@qaI!m_Z1c1MnD_r&x=7OBODB38qNn+D>2%3| zFP-Syh<@$QrFZ`qq!T?U(To1M^j9hW^4fRIx0#R<{Wim#-#!oX1Rxh+jfDIDNN9oL z!kQCa_?D=ora6RJ@TUx24HYr|7X&}&G{Td@0#1DM-5em>7z+Ai|5C98q)mnS}i+gnOhPHh7O z06}0MpbQuQ#{r}hbHEy~0i1zrz%3vIhzF3)asZ^aLZA|00sSEzZUQy~qJS762WaA8 zavU%PE&^8pXCMd&2JQmisu%x0ynXRD`E7i#OK|ertFYu?ecspzGy4aH9ia;ebVuP| zB@K-S;#A70!F7Hez2Lc^dkPz22h;|O-djQQQTB2|LutjZv{qBq>o zL-^T`3&0d@5S{PuLP%2BjWCC<--`-x=&P_K1RcEOnb83Z2htBx2T}!6!+jtRs0Dff zk|=2C19$*AU_WpM@B^ZOJm3Ss7!BKi+0RbEr{2+r15wvsLBdPli~EC=;IXh3iw4nO z%b7W+P{J%_;mVsuE6|689Y-{ATKI6lXZ@^MlLr$=>o29=&S!x|>vP-Z_lFM;pzUMA z!HbTcU!U8K5|Aiw8SD@1xJB=)qZB9Z0M8~*5_+pMAVWf0%mo%|aun9b04!*Ws8JDE zmIaVzl>wyP1ArcI8bF#h0nPyz0GuyOkm{oVr1~nL4rl?s05bpvl3^vl0H9=H19$-m zKn~CXP*Q0FhX5ns1YiPK0S4@Eh;Q1Djmuzg7FRrzpT8hCs}!qiylv=K2A-X{XI^cOdJ9x z!DA8rz{YP0HK9C%JL9wkUWtJK(KUU9`7sR43NY?-)UeCuol<>@BkjbO&|aW1a1L$fzdfl;LmKw(i2+x=WBo#49xnY@@tnRS9G->e= zMoivtSiT3u0|`JPkOU+H(A&NL`icp zR49Rh1QiQtcv^TpZY3HY3>hb(sDM3Y2eAER4|xCcmoPYrm{$my5Q-n9K_LNMVAo+EWL!Oh4uht-_O5AD~ooU3Xn~8$b|8RsIZ)illy0C&l(BAkiaM~>4lDNubi9{5zNTMM0p7|yA z#K1-8x@x-QT)zZNFWmzLEQ+-tzW3;oSkDG6l4O2>hIb zcPp$e8T$C((EKJR6sUpMw8T;@*|G*cuwh|?mBKe)z;4GkTVpk-;CZ_)$z?0J`M|I8 zgzu{G*Knm|`;{6_ytfTx)%5IH?uQ1`uoUu9! zck2np9{7XZ_^)6$;eEZZyZ&I`yqoaG4K4^vO@>|VbiTpU-Nvq4dL&%X z0m6}Mem!z$^$HA@6#p;`hTyBd4daNQlgvb7*R5SFUi{Ds3`wvVbk&!`YlUJp|LIiZ z=u}+z*HKt;3e*{>W*Y{-J_fs%@+Q|f`9{(Wq|m~!5pNKKwZpC624yO_eTRCH&gQLW zKk`UD4;_BuJ%j1r3O6xeOYBEbK`ujsIlsQI6T*Jk(_K?tiJFRq3ihJjw^x2Y)O%mS zvJJFLz-vB&@oQj)wcM|?8;$H5*kY;np%Iai!dp)tIMmOIJv>oAl}p7g-W#)GW8ciY7r z_ivwi)rW;Q=HMR(T*WM#-X?pLk!&^yP1P}WB!ie`va|miIj?FI*(&WCH!c04xqdG6 z>|NRI!!fCJtOk7#>G>M%Hiww~_$DCA_)BT=4;)nVu~qo*K^>7`QOfjE!qa>?5}g_-F`yG>_PjOUBXIIpZKL_U`6b zu=45F7##Vr`&Xn79c|~(yIym7d&nSTXcyxLp^v?RL0#rocs>Q++#GfwxqgTvF;YUn zXH+SvbN5y@_4MzwCv1w|Rgomf1mH@H44K`%?)I-sGv08hh&k%&$2Y1JNy5_cQNb~; z+4MhlRtoK68Wd4tRre{;srJ-+eE5>Rgs8(Hh2gf`lelK%WBNVz`bm2GUcNdVf1|8m z^u)8M4d?G3QVVUC*yQDq(rwoF@#_WaObv+wES>6{Ifz(yh{Yud%26NtX)0 zs67$)1W1c`&sf)03eqf(ii>}0WXfXb9%=UAxH$Xmig<nTm^vKB+dnmbJa@QK`Y*^08Kb_U`^jUdzoaoQeVa#Jr1a=F`*6axt;Zo zZi*aP6Q(oxO6!Yg%a3AqhWKw~E!_{I^Hu zx%`3H)tk#MI26+sPmYO1Cz>Dn#^pEi)cL{nf`Z|g(!_M?42v$o;;JLgv=p zmUf<}2fEa3UWNo~{yM#Rc9Vu%_P?48?_xXtGDf;Y>=AcpRj8cw(UVd?N|;@qIqC#Hj(PDZ zBx;~7cAKZ(7P@fnEc~>$Jnmz;tlPf2TWo7?#xj|&RH7|7C%32Gh5Etp?F_2y2w!WH zHMZNtl`!|eP(;1lPadTFX}8;vsqEGJr#z1LezrPLxGAXq^KQqosJMa+Tu=8}$o{Z+ z@PeUCv%<=qmSY1+0`ok26(i z9F&a#J0CfI(MV(DscTgh%Gqa=bMmGBsl47JkqT;e<@F+cYhKyPKi%?fO_06dftnK^ z13L^E&gxkHxX2)NDMU_!#2s>Y4KvI{U5A$#P0EIIB_sTRc}WI@8z!> zd{STEvN-)@#w_arS%L!xK1*@x;x5l5njfz3j?`%CR-2dcJ=54_bjxduEp04WSNDQf zY`CRS{uQQYXKH9~_+8%-s`)VEWAyGXzPF-IcO~Jzhiv6parBsEZtD8r9xN}{X7*~W zP~j~Xhq*4PlQHy9J69@p7GKG??K!in_IX^Jg`mp0p^YlolY2K<*qo0%Qu8iz-}|)k z{<9n#Z?5CwHDlm%EVGX?0NQMNU^h%?8mFo?fX2;8)R61M38*h zxxw_4^}CYVF}IwCH^OT?j@v~gW!~?L-j-Vwa9XpPRCfx;_E5bj>29O`596?eO_$Gb zmA2qqSKZg|7toV2vdc<}IV2W5rFVP$v+CHbmmc!hnND$O>T0a8d6{((Z}fGfBvY0< z;_i(CPs@x~3I$59H294+H0m?nO8?eHoAm9JO>@ScPoM1@4s70jg-clc&0E*$;-gH; zhuv0PcuMwVODp6k?vykA{!I1K{#{CyJ0413?3$K+*l8$as>XdTid~Y)7x$Qnl}ds- zA}O2K@d5O~D&@7pSG28jKVcYtLU26uiK5k!&v>!?^o>vP z2TR>vaUarZyOH+M-&#GIlYax zeOyZU#Z=C@(1c5vR5pQp<8o^}lj-d~^>aF>GmW>Xu|DOt4|rQ#>9%Iv_elv?>pqRT zW0nm^Ja!iDH_m0{4BwsU#dBUo`+aoDC2x|;6L^_Pvr7A(0lyfFkd<=c5pDF%#SStb zwhh-!=yuEXO3`dke2;5aZPOV$X)>9bT2Mq4mL8P-?o!dt`oY6j`r7#);8Jc0A2Ffp<+PC>`5@flZSnklP*{@4d&Y@1 zTU{qT)A#j=^QgKOcXxeyDIz3#AZ0S|na!53FH+*EUt1o|`uKI7+eMMblM_)tlqq*T z?S7IaDqXx>OWnm$`ATfvQ{2XL*+(;@y51dX#T}; znVJ1mZF^<+zM0!6&JSv`^Y}=vVmcCf9(Vs+-FdeICfGQ$L*}_$Rh1ou;kbxOiVV9F z^|!56n#<%}B^_;dUGDRLe?s%}o)gXC8>Gha26+2QbU(3fpZ|IPPJZFfx1SL(2>as&J(mpwAI9#3o<_mD7Xk2)oZElz$y!e&*UY&E`-KYx%{ zM3PO@+WFHHVQUMz(3FnjejQ?WaNN}mN+%ujhUHIw%%?G3Cz<$i15JvPDd+vI7rTn% z@{1(CUyr!)=u+{>gl22hKDLMwd9zVRjx={+Np_RU?GHZ{2VPk3chmZ=M+m*4z4CUG z+;{dnc743W$onLWinS_m&DlGhwr@|;J53bJkI0J-p4jhJ#lo)oUdbX;Wh09iCvLl9 zkAX*=ZFrc|u63uyvpCL<;*$1c3CBr4J|}W+PdP^H8CBqO0ijKk`U87jr%2KBduQwk zwAi)j+KSJQ3JW`RbPp~US?v{CT3Xe*>c}_)X)kAGt>1XZyYST8t@Wo|v(7N~7G{so z%4(mir)ezEcIl)3rm!{kmWp>GrH9UUP26Fd)Ostq_1U^cXDC8HzK-Adv4n1@$J*$ zw&eY_uR5z9K+?Q9rnrK!Jo31kawjK+pcBs7`O(_DR7%VJ{Wh~E?>N*>*}vU<#`q-< z&fv4JQMK-kajKZ`b9ciu-DM-m4u(5DWiGZlHF!@wySY@XB*``_pN8oiwM2<^kDe~i z$JXMYN3N%>x<2mf?|OIpV!#vMdlUxlNjEF3pQ&;R9_T45*fU+sOl6f`d~kU#T?;RR zU&#}_4f_Mcf5=9MGiC$PB|$0-!aD-e}+#i-(&B&=o`}b|qKNGL0syVgmYGCVaKke;yCNgpv7aQNFIuE@b ze=d-OJ3wW#^?OKs>D|8ICsj%PNeiQD)q?Fn|Y>7dXkN!CAm($aW4XYQWt&My0^ps!r&eWm+k=f-7%_aTXET!x^G4+$s}DkGUkuF{i$ipjj#F06I~4qP8`Jk)x6W)(Gl(g$ ztzl5HrpbsuDd_UaHheo%MoaEHXIGwL`yn&EQy_Q@Yovh_sOe|eb{0u?Z88EZ+J`a<$~?H!6eOFKOOEWTlukxX?sh+ z8|n)ys=jH`t=Kr2c*ojwq_yt3?VC^$T+`D*9cZB7dz;>0mVCu=pfGV*nJoL#<=)ns zciMRdx6C+GDJ0!-{<&RmHy@g2pGvvW9{qmc+={d(*QCsJA0&h!;8P)jS))P zmS~Zfz?YL{U*s7aU(S#`v(3;vA@**I_tn8%Hs;<#W>2OX6d&vCE~x*aH&dL?v}||u zkx>!1>reU}ue+w^+GI(eHK9r-{g&XGvFhv|kH}rGpOcm5YABnKNIl$U$>fFFTk@KH zWP?(!^kO5th6~oOd5jAW6*MF-46iMrJT5`$g!WKh6~P#AyQr(yJtscm;)rMZHwXV0j>TdAQm`~v(DeRGTLN;o2B?KQko(aw za=*Ih# z>MUhQH{&%UCF=9RQ4-2?mETJ9_~x#&Rs^&^@)NBTiFKLh9V~`A?l;t~iAP_6#)AH@)^FjA%3#!oM#F=3712QiWOOOz(7;Qh8OI9I?#}wo?4NtuO-l zzd!iDa4g85jrhO0rsFk~t^W5F1IG1CX{e`a==a(fZT?=_QrygTPE<ybjvv2RiB^yaTpLUV>jcWbn62&Y#JxBI4dtRif>xjkUyxUEWzfN-5^ zeF}cI5l`nLG~xw@c0GP;{Z4sUrwj2( z)kV1Yb@m19UuPJ5vx7Q4n|D8)u(nVped-fJW7HPCeZ;*oLcg+0R>JM^)86j=ovxE1 z)DO$rnTIoGMp!KqplR&ouvjh^zs&Rp&hF6F!}9g*R8jQw3^n-OX@{oL95y7It{c4a zNGHS8vG>8Vqf7_CPFam|JCYt=S)!z~xod(V5m#Dz+{6DhMZD6`&7Mk^`y->Y^&vfD z8u(&u;Sblk-Q$Y8MhfGKz0(~Ht!9q7JskE>v)NM4IDGqVu~m_vx=u{&iG+2EH+8u^ zD{rdA7z(%C7Zx|}LM?ldwxKVwZ(YoITcyaqi>F;v*bwh^x0E5lYBP)Uy$teQC$?a1MxTveC40G9k zif&hB*QVP`bX*5}$MKwB?ujQ;$xi<`2tXQfm)L zVXv?d^P=xJJan++^yc@Yy{{@aX?Q(emG_eF~zTOb@eMIVlxgJyv-?~ryKPD zXh%`~g_hlKd(oXmEqPce+C-(9@hHt2^PBz|2Sp_h98AU!U4M9U%jXKe(eh@$8#*i< zd|a#nq$kQMKYM-ZxcY?WjB*TvnQT(cW9<$ym&YnE^CZf|NJQ7ktXh{5W5uQ0u__@q z6Sq6wfbN^#o%2*;_x9`P7VfOK4;*9XVCJIPD?_7gyP4(eZQlOK);-6EcT=TgG%2Vw zb@HzHm`L}H;gM>iubR~D$ z?pvKWWBB+Ji#_M*#=3*7Re5j3>vyhCJ`+E~m*y6<=L=b<@Wj(Er1!#CNL3UTe^78r zd2s16dlW9ouq!LLQ(H3qxrOPFvgZfMfgihUqR&0|svQwxUcPIA%R8XmFxjh8t)_cLaKlsGNR7NImb%o$^c%Qmw!_vBE*A$%ueQqgp<}J1 zk;R!9s(9Bu)!Co?RMLIzlHiS31UQN9a77kRh|O^C6Hg9IYxxg#Q(d?0DO1(+iA-jY zGTVL5bbNFN)1l;>@)~-^rQS}h8w}oOmD`l_3Oro@oIb{0_~`v_!}athpD7v5aPLXR zaZ5CcM&Aw=IoF|a(ax&k+T+f%mBBQ9ZbzpIxOJSpU$u5x*n7Tf(r3Pzq;hxs4SOQL z@yE42GORn#=ASiq%aNj$duQc|gljpGyQ+m4@xwZTo;?AcYmC{Y{dVPWGc)Tx_x=yf zZ$}MrL2O%mjE@wSe;#)kzL4O{sk>iZvBwfC&r1LFN1*uqo9?zaxwFw$r*n==+6b;S z%MC+KaN{;F_shiMwWoV*gG=P!seN@a%eZgb5Tt0#wmRc}dDq!a7LO$T!H`S$D(sn` zzE0n>Nia}-oq?W&gq_WgOT2bwxuV;GmBPDKU2xF+{(gg_aLb+NS5Cf_t_z?!^YmUe z3Gej}+gPha+Kincp>^j5Un}-k>t@@G7==6q#!o>{4E}X_@Z% ze9`6OD}&bCXs7gyrAp4DQjf*ZX># zTkVa-3kI7CX{}0$hexl`dmms>aNrHJ+2ZXoF8%$7FYczP{F_Y25C+{9{`ULG9FAle zt=9J5d)VjVSj-9mI-SaL!4?kNHxn_F@i#jnoC6uD9UnQ}k@fQ{D^_1$JZK+?yFQWa znUmrue&NHhwC5YcIo)1xC-{sAMhCC*D;!k&wE5E-qt-p2rSJP%+>3K$v(8xdwoX&t zJXxaQNK5^?afZMjd53!IxI(hddpH&PzM<9FN~>Rh=dW>wNoQbo5is zp&Gd@eY;IAU6r)`IMtJ8>waXpjU4N{7KKmIAGfj&gap};ww2@R?IvE@d9}oB-DSON znSp9HUBzT{RVv-Lme~G^&`p|m?kbwxb$Jlfl_^ur#Ob{C@!;C^G}B&ddm{>6E;+9p z!qKf(E_wQVE3tX4^oxE@L|Vv)U9Y5F-8adcIOqRdUAZixtm>tk`PmDx`r}tGrJ=^P z$r8&p!>{Cl{+4X-8aW1fZ+3BSD!e`>(70xjd_((n&ilJ%V(4w?3w3=nni6%iE}asw z!SqoDMXQWuKhEF6{kETJ#kP*?*}gc-r^}yK9{Kbsk}N!I*KNDnBPR`Wm2MR*>;ELp z+J0lqKWR%7-5JLj2deJjd$~u}N;kB5_OXYp4eOd3RHFgJv9T!dZ($g*Y z$}O(IVMo*MF+4&Svf+Xh-CCQ}Yr>u`pAFYdU$7<94ZD52FiwK&#+bUqCi14XM9Yk3 zx6RCIpD_+wjh>HkuO+GP`&iaNZ4-MPH+Vz$@!-LtK+1*#`}a*~H=XeNlpK8_|NFt( z2eAd3UsT_yYz@GCwAuP-+l!D50pf|(YYcnXV+n0%BH#8r#c{=YAGIcVXLYBuFF5tp zOgc@y!3Q?Q`i#)T2lA=3|Im7-l_-#XU};*ZnG4)D?1?-s=K~{uU2k3L(kdo%47ET+MBIQM(XNrd!i4wdf0m?xFP#ud%|-Wg?g^@`+2o3Et$L}pnwtGo%OCEH>7NU zgXXe4PJr3Sv7<~$`)AwNO-LR~cv9U)|@a9wx!1uXmKYU0IDb zhhB#{Cis?0qb#hn;}Qm(rT0W|<6h5I<)yz^JM2~K>LB%UEdE$kr1*})-9hbP ztNOT?*M5esUF>IZ312CC)`rBrONd@BYfk(2;I&73t79IMtcuBsTub+gPpQDqxBJ0N z7-{cKA$-OA8m7D6(XW_BuZW)DF5~vAGQH3C_C@Pd)VLVCfMa3UAn*MOPx-vvtuDT& zAI>&@9Z@x_Sy>-scTc3a*K0L>$0m(h)5D(SUS~9F9p1Gk;r7W~A5sXijLS%`PFjX9 ze(tF!Jo@c!9&sBbQwW)A8WX zI?q)@*mJWRLK0K<8)bF7b4XC=Xz#kc>;1ykuGZ)Dk1nOXVt5#WxAyt=qjN0b%R6J8 zNo`8Q$m9y%lLou!OuPr;NmE!OOf@AHM9T%v%DUkEn)-Kn)x0#!Xd~mz5tCHy#Wd_p zy>(!txN2`!Azk31wL(hKJMaSSw-h$&x<(q_jm~XyH?&sM8}9V0VoUqFdi7e##~lF- zvZIVg%%s@E$?P=BZ@KZh@~T+fRF!7m%CfMr>o;v(IMmp6FqNh9GY@@^k5WLX-igzu z$5*rm+^;IypTgzMB>VNK7&U8Wr(@%Rke9aG>_%p9)q|BCxVGDzyVA-hDs%Z{wVgsm zz5BYYn&K`u~g?Q2RW^dF!0r zxun#~;{3~b_JmHQY@gP!+m$R*@BG;Pk&qn5E^4bQRuMI>h+_|DTucgmetN|3ThqbQ zI&Z~Sa}@R-6)C+i3@r-rr(Nl1+eBchPEyKni*9~ZZn><+GL9Pqga90BhJnqbzu)}- z`BvQjiQw=+WgHjP+t!q~r%zU#4wpN5+z2)OVJIhU=*PbJ%-q|bvOjL8!f0wg*;-?U zSRIXJam=UYT6>Ngtl}Fk$l-eu?8V5p&MqqWgUh*j#Vm5x(E`ECnX$@Bf(&tj4%{^6J4kaUyWkqwinWVSHm~@KVox|keb2N zKsf5ccL%-}PVB;00%5=G`D+(G(t~hl5}^y@>*5U;{o*%)`-pg^iMI_N1Y09h|r5{G?(=hRBkEc{8XqBztyD*HnJ9`B;?#1`{T!U=vJPik?T3`e`=n?l#m zFth|GU3BOUngu7tE!re`baax3V>ZT5_$a0ua1-V;!@1Kn_8V8JPPflYh94)9p6QgC z+9us#;L~KDJ2lc-v912W)u{s9)xMXsGHm7kdv=vhPY!BOTT!OkU&H;lkE5dGH`+Aw zerIlLuguJ#%$tI*zSZ7IO0=rd6W;`I%bm+)W+p958`yT=+NL-vf7vdZ(enzqf-K+F z$hCnpyTrp|)?67Oo%$j(&CWCKO51{&{;tYLSzgYInRzoawqa&mW~N>6LALNJ%1a7o zZs>*Ty>rgRO=RLGMssCm`eF#UOA`hD)?ikT_enNKp56w~idi^kxD zXWDWn@iWuSGtblAj5{f^Vnb%)Xf_NRY5MIP8e4I)#31KW4QB8I-3b!vM2FN*W8@bj zw0z4HZVXV41z(x2!A;f7jBS{S)^wN{`99cQlFcgB>SR%JjJ(zvbB9@4_;Jo-3k4U^ zl${)O(Yy1gcU^NF{2+3+$Y7Jt+G~=nYj9hyM$nqPHNza?Gt~UFlEzV!R-V$#qa@%& z_y+?O-Ye!*q^qcvS-G}9OUiwib$n;@%L@m@Ec7WW!gw9eYuYOgZH*`?-+T$buI|Z| zXzwc~qRZ+zo-?f0uk*a*A7&R)dV+Q3t#3gm2e+Mwn4%Jk(js{@Lls!dt<%?9P+lq0 zbOLAlh3eq$L}7~?hj%TL@rYQf)wMdcQ0KaIuH7)z_3<4nY7L~y701>!>^)vqZrx8^ z=)ZML<@qi(WBD|>YAKScWvZ7`r6~M;iiDo{X_!ZGB<7WxJv*!ts_cBEw8eG<#|gm| zRjNFP&Ci!!NwMh_u9+C=uT1GIkvQU_$|Uk8Egsh=qO>Wj-ykFH{LcJL)=9b7@9{g` z1y5L2)XIv{Ju|u>1=b-T@MEU8*C(exeAvKLRms`mR*Y|M*Z`TKMFca&kxP-m1JcuJ zZYh^5aqQ>XKiRJp3y*1EgJ&7c7V*ftvFv~`ed0u$=@@q|yQ#KK5*=B%d1YC{ZHFe^ zGgLabXKNH3^Qop+8aCg<-*daEx2JsYgIyg3E5{mda=yVD16-p{&z?BSepNo#?rqdO z>c`HU|2T49^UglYog0@81-|wz{eIXl)>p5iOx07{|K)`dj7w0A_}IRc{d>Q*Zub-~ zS8-R}hl#gR#7MPpYkwJBrQFLEePYFOzmV{8(sQ41(FZ?A#w1AX-zX-(lOz24wP!lP z?*}xbgJKM>eNwe1iMbbsWmI0dWu3q&MOuaK&RdtF^o35?kEFyj3<@V0A z=hVQJvwV#Mnw$yw8)-JOS0;*%vFlcpSNLDK>TPHBg(HsE)}c6WhaA;ulTBp9(jR0e zS)aE!DS3RxU3QA5J?6~teno`F{@varXJ1XYPb$Z55wzp0I6cy6mVw__e=S7zxOw)P z>of|r&P}7uxZKPDnXfs&W^Orh5 z72Qa~Iku;5EP?Zag|WqPK?>&dI+MPC$}{|AIfeKks>WqALLEY)7gkM% zS;mjDBAcf;`q4 z!WOeqlyw?&ke9yqCaJY$-LcP2_~YwWhpwKKif`?8KYwcako4EPCoi7TtzOM~IJhUf z+&I6vekA)aogPC!BaRY6DCKGaRy$)A8E>P`b_*7Y z5&hCk=iCbURPy>Zr*jj$>v?GI+Z%Y!GQDIBk+&(^s8+YA_hLpm7Y)%ZKu7GsB(8_B7@Ct7P2G3?nfJPY&Hj)Mn}FP z_sDE#N>Q7R>iNocBs2S??lPZic};EPrVXPORxOTPRVU53@+K6l46T>boOzhvJRFsz zQfMi?d3vfDx=`Q4F~6?)oEMNg_1!#_(E(hu>RbC<{hQE8Lj5t8YV4&Ot?FJ?6_KYj zPTYJ}tNcY(FWE}=Cmr0ObB;e>|9hy2`58s}w(-Gscu07HOC((KGRZ@5Sc72FeeN4% z9Cx@J|LzihIxOcZ@5UJ@Agg>+>dOi!uHI<5vWw1_>sA~t+ks0f{%WL~ph31B*;ht& z!(BV|vp9oxVEWA;JUf`_a$%1&-`bGyu8{^6l4Y3Tv(gF>h{;&~xm4Ur8Tpp<&DQb!JForl6Soz}bn99%-j;*X~KtiYZ}! zBgU@$vQ6Z|#`a#^St@Mky_2R*qzy&g! zsf%nLIliU3+;ykR<%{+lq#HMEA7YMD&&$8*)-9{ChJOu-@;L#L7sCm9s$FFPE56jJ z-sw9sL8O z2d-RH+xtMw<1gFp9%xsHeI-^la*TD|}E z>dQkb&)xK~kWe^tt9qZM$B+1aeQniAQ?kB_Xa5h3Ky$xru82xaxB^>0?m2V1M>3F| z&2*c~Esx&b)Rw~m4Z0Uj?5bd?TYubJGRl6mOsQ7-96Eco*(8KWydo|sLJ9cFL)7_& zqOsz}q8bEHJ02D&-l0IgvNAl#(OALv{MVqdoU%wRA0Hq5l}-k-XWgD^=$W;E1B95@ z&PVCwmL~Tgo+#x;9oo0zkExu{HkIQudW8_Bih9f_l$rL%C^$vlTnr}xP=D&>gsSx1 zR1RpSazewVnL3G_(@RwF$hu7l`F=D4@JGY(cl1~Re0ea_7W?4eFbP)X?yS4St^d+X z+$+N0f#UVokf`9xB8Jp8mdPXTy6$zoBo~`ry|WTN zsFV3RxjqdPW2-nS6MyN<-hZmTPw*!v!b*t27)jYOTU;8y)U1wur}Yy49#w=P?K~kh zauXIIIL6&vAH;qNCa9(4>-D%UjF3kIpmI6+g0>uOjJfxT0K5rTiwH3!#ZO3+P>L9m zKVr~Q##`OJqNDU`k2>@r@l)(WO66 z#`wSl3EEN{9$MOS2IHoe8L0ywn>jG)mVaKqel4%}>#x63d_y%Df9cEBg0{Gfd)@6f z@zEHn(5PkuVG8oPqkkRTZ{l;jln9(~8W9B0HdbAGS3w3O!ymPj-|@GV@{{nddwFGP z_5HWse#=-ar((=~5g2t3H1o>5i5_3VaLRFL9|%Q10R(Z3cr%z(PMp+VzIpfVo!q_g z-_QmA@mv9DuiZ0>n0t^+fmSQ4F@$B7m6f>uz3yKFdGcg@AMUswr6Yxs7DMz8o1R<@9 zEz4**=b9&}y$+TY>ABQ3m>P;Sr$uV;90YI$@!W*#i>GPJ|0M>EeMk$2?S193_o@*B z_}(Z)NQ{7#(|?|J467la`N;0O@4nmPd9WjlOeJXf;Xvs6Z=X7{8}) z>og8=ZhvVI%-^2pB0(NL$p6_6!)96~#|5dQ49yHSpAb3W%=S_|+d2poFZKgoEhQ8g zU8Z-<#42bOXa4k!u$7pMvG$GR;(hpDeeGsI?A4gh);C{*b;Jf*XBOn~vHem%#HP0? z+Sxai+r&JT`Lj7D#@@bBS|x~P67BhkVEpORr+;#Y!4SmAhyNcO_19nL<6PZRbuc`P4&iXTjVOoCU)pn; zn12t-8wFeyQQ`pYJ^8lq63OGVE=U?-S#Vz11{rkDw;ECWN{*2K(ij1OB%cLJnNc3d zL8eyAMN400C<5URYW&$}pDD>*WYKk62a-1NK&D^ILIRkWWg$5Ene>yNb<1zLIbvpa zR0Yi8DjbHrCJw>GMaTo-m&FPj%Tk->Kz}}c`gBBn>+hD9(C8`z^gx4e?7wmgs*|I= zo#aIou`(-QqDm+4c# zvlq;24Rjdl7A+AB4~v%g#;-giiC~@NaiD?Lj-~ZshlKbB3M`aX0UxP|Eun&VTwXg^ zxYNe+nxa}>KF(JKvAG(nZ@dO7qJJW@u`JCNyD>Rhl-SDE&=abSt6{n;4z?v-CfXH> zXPRan(8fwDo>40CWnx&`OrzKeNB=dP1A6seLq<|F+cC`v7MC6+pWdLaPu>f1kpCzp zC(&N+SVGq$gg3hwrL+QL&*zE?LEC>h<}G86_xbI zsa(9)3ex-m+LA?}Ii_{C9upy2M+MBWZ*1PR#+#DusCBW&2t2v;P$SAK%BxE`V_J$_ z5OB=Z2R{Fh#v;ya+OiGdy@XUNuo@d{sIQBc0Wo4e{K!!}8M1^G5T$T-(}ZIkI21=w z15q01m^a-{kmKCMEq0y>e1FoKcJ?LDG9fnjRTn4+Cl@1`#s0{C)dyukNPZM8h5{hz z|4Q%qOZpA=5xg@fRX&>|>PzKI{9`-!o+3f^6={49EJ5XWfaN*lMiE_`je~Wq>h}B{ zq$=VR+EOMIH_iM~(Nw=^%PUWs6>!q9(#&eBNfu$!NxoDKR={>!iGLy&oi-i!=%Po7 zo|R(2NkdH78e*GuA%>(DyL+J2%%}RQ#gWODc%3cWHkZ6mDtuteURi2sI@SONglFQP zsdcc_&Gc)~1Z{~bNUS`Bv~ke@3vdv zMH5W4LM+gnU>*v#mNFF;uo`z<2q?(;PR;W{)%vl-k#D|3@T@4Bi8VyU?j#)p^e{11 zcYt|Jk;iJZ%74k1!esO(_69Ml6Ga-O*F+cXeipfuxN#h%C5YuG$qVlR|M?7Qfd$Fe z{&94>_t|4qc{g4ldFp;0oUK|~YcUZtPTJcml5YMeK{^CH6a!N*NUl)f~MdCQ* zzi%KO2EHyaTo4Xf)SRgFmyVoQ>*$YjN<)1b>W*vlJj5MajZuC~$8t#?iXm z=g&56Pl_vw(!BB}mtWadq>*uBkFyQRmjSB3{q~#sf}{!=eMbwkiX5WX@1l-syvIyX z6+Ti?AC-zgb0xIYfh=t_@KZ1u=ZB~VDcat_X4Xut_F)DsT@Ny^PzI_ zQuZEHZqG{?_cq06{6u5nMqr+(sMk^phKdY7UtYdtI!~d)$krYtB{D5CD#Yv~wY?2v2KJloiG5|OMi1JfTauP9eDQ5W zn?VjrD8vF~L43(V=Jkd}8}mWqbTNm}w(C7rJI|K}M5}!Juflx&H`vtI%Z2#W?ziMK z?SDPJe3L1NI+BHe4txMXB2y~fNHd;mPBMJVpVFA_qBOtsN(dYGN-6ceLkPoOMh87% zV)q71mjbRDQMQ8T8<8(=*nWh_9Ibd-%q8qmj8fse;jH$-_1Y#=elnueT?VDGwAm*S zSXGK~)!({Yr&@_#Rtlq0K+M!$!h%3Kkbi(u8Vh;dm|AzQxO!QUNfC8s!pd7%npR2z zWE$9w!Gf&+(%uS>%)>~U^n!f8lvlCar$?)ta84MkWMMR#+IVkfzDqJyl1vR`hT7c| zxA{irElh}NDNH zisFwBh?slv)3GTY&CE7SX*p~!K1*8|#hj0!s`*rtmnU3bN+SGZM_cmafwZQjCY$^* ze8G^8V)&IVH0T6_SRgK20~^I3y?+iCzT$#L32G+~SzpmW1MQLTNfSlF%G0Rs!H$wJ z+3b#JeT5L+O)~^PUl!H$iV7Y(+T!sy5qsA_gFsR+p%ejgH+5w0q>asv`aTeMCOMhSysEpSn41%aInThe ziHClA;=e|Mxj1V;dk=qT{C{V&hO}#wUYqs6%9Jp6P_gm|n%722S%IKeyjX{eq*>HB zz{k(#v55tG70A8FI?|f<#H)yBjdorFe)$H$XR7p6tFG@^RIxwHeiPd??7Qg&!}>{K zESDfCqPN@wKN%3(&>nz#6%5-VY<2TN?agZ^@TvYuZ{0R3sKJUsiGLiBVb=y!X-_XL z2RUO;u`qQNsuZE6QDLC?66WwdoFSa&GapF*>J94}j`e|F=PZ`;x%55aMI4|=f>b#O zkWcmlfq?J_8q|p>4_O^$&xpGs9Zdm>RDuuk1x1+CSZ`!EB>iC^1fe=42tgIWU*D)b zLe!?P)eb5FKpR-0_J8_GR0p(|;fS9_N{$L=cJf^^WFca2m z#WjjVX@rX|eMuKSuq}mH6Q!@YK2hXBz#kX2OPM? zy@DKHZwd}Zf)Pan;F}7W?=l)O7WoanL420*^VDsUUx97hMSq5%q27&BYnO(>i1vto8Ly`G9xXNeDM`h<^V0=b5jI=&My-pb3AjV$zgfbeO9P0*?m72Y;A) zh00xqW7O`TcuVC*3sln&vko7qABtbsF&cpd{{cB*Gk>wJwX0ilJRsi|$<-W42Y;yp zAA7qSX;cW9=8gQcAka-K!TIoN0j!RP9I(vO-qyw;gljag>w&I8&Ye@C>K~%*JI8aO zcQFnyvDVG47vsYs=e8V31%HVXOq(hAlIeTRe^JYam^>@!-kkr3Pnmz+V<~=D2ID zN9MrZZD_6c{5>*H7wug*zz)d0-QC!Qt_9?7IiNdW75uIB#@&kPdWdzooA-KbSriTB zz+M(_1%E@?zJMQdKxbEJ=g%}9cUvtM2WmN>#easwLX#p1)_ zz~aE-z$G~#|F+f}mlW=FM5Thim4=y4oKqvrn|9WEV`>S`h5TA+%q6c2V7n>}E+E9q zkdO-g*4_7)5%WD0q8Baj@L^RN+_R)EhJTxm8Lc$T#l(8gz^|Dsh8(L9YPdFF)B|eo_Oq_n9qYWAGC| z1YdvouRg22z7%{L+Dl~fOHEsehkst)68X%-m!im%W1wEYer?nRg0zXez+6OI0ud2e*5jqFTae(g6V|M_EX#}Xi$MIZ(k-! zYkEv1gycT|{Bs+W23{QT+nVW4dyeS{RgmPow!RDwZu6x@T8zklJv44wwtx1FC><3= z{8vUI2z)?E_*wTXrO-L1K;zjs!)_Nf&ZqWR-GbGM*}{n znfmfU)}${PSDI!Izgi|n&1}$sMf%ml2NSv%i6hqAI#KTR(#4su1uBe7pe-Kq@Zsgl zmtYRs5;uP(IJAq;>PSm|0-8AN*((zeD*zH_Pw65w5TbO0_6)jti+{Tq=z-9TA^bOz zk-rmklYF)5%g;<`-fd=f>DcUsgmIo?6a9bjF?mut(G0hBUR`Cg41kbmyeq7 z;(I?qNW|u>WDEMQ>~v2D!0Ojue~n2<1%HslyU*E@12pwm+MDAcz~nQ3*{6#qKO$4T zu)(*qzWLGxvWDc2w6Lnty24>=!aYpL#yKnxm~BM7kqn0#(` zaKL2sY22%zv8apQXzrz1)O|HRhXW^T#W_R;qh!Y1Xzcx~t9cj`93K)#O1*RTZqri= zO!J&D0WT4F8_fkaEs38tLGa(VZ{N~DDGEUG0heW1iLo|`*niYu4qQJS>V^J=Z}ym_M!ijU*j&EqTx-v4J};+uJZ zq7k8J-L7CloZpK_#!9%1N$M@ob77`R30iLFd@iHw~l z7H%f8V0M=x$^QLP$0!mG-l40#>A5f$Iluq@dv$_GX|sGzYM_L$VnK@u#;%~RZ!ZFE z7POg6(|@yCDv<_rWMUrwLmkT}vtvs%4TCZ(=0iu|w*o~X7H*?>EeM=o@-683zR;VP z*m{l95f0gIW*G!zA36fRAtmcKbnIdYO0)MZeauVWYJa(o| zYBPEwkD(2Bs1xRyWZr)>SreO{_m65jhI3h&sy_CpUI#wvLh9A4CkM1cyJ*8*0SPJ*?+UjV8D9*3=cwkO zhrSh6?B&3`^ESl0?I)0KMdOvOve&Vy2Y-2FWpgE*%rnnxFR^xsmiYFG3+v%5xs^xH z{5@J429ul1v#^S~(mI$!4_6{5$AjzSO-{?ZYBM9wX$A(j$K4gTyCb6sn9G~GLp}lE z^>lC26zmDIzS|*EnZH@W+cb0MiiGY~QHCNW83k8j4jpkQ@Q0d%;Uo#C8S`ga7Jpu8 z8h)shvr+SWU>q$hn@q_#1F9M%_a#JZABDmGAbA@AkZyvR<2nNLlU`OKIy7&f{E$l*9asMHPo6PikBji_vGvMjWbBW`h}{jem*Ua;6k$ zCdJ!JFXh8oEl=ja^{;x-Og!T<@nluF;c!|zUSnDOfLFat8tf|gyG*w18s?Mlh336m z1eLqqb=;pmeae^J>@BY$zEtpcjXk(o?qi(Y9$N6%G(2ex5fHAIrnhioy1tW|7EyH>4g@MX$6WfZ|K-;x$ItZkh=Q5K+4qtCGF+sAfg_`Sfs7pGBYwUp@8kcV{m*3dKb~pHA zC+-4!a77ZmOk;{Q=h^_$+HtKQFQb7|5OT4XN>9P_j!5bPi@DAjTq)saqLkmhQU%4K zmd-`&UR~^N@W&$ZvwzP%JLJM@aEBaVH9Xff7FrPVcdm8(9g6-YC`~%0T`UcQ6dr21 zuDAMr{`u!O(fO7^uW^#nI3PQk)Cp9`@iLRtZtzC|)-{N{MkQI1j^bP<+CTMIRIK$z zk)ZFS@uVqRJOh|tX41lrCbIf=)m7$i?*iL)_~Rg~la%9ldw&9Crq@|KUfQ|s27i~? z$iECBC#dyJhVTNK@$BAdOiNsB*2p)yE00q5oS#DLa>pCnzT8jS$hta?jpzkAa|N=f z++4L&?NSrHbBU>)>Iw+G6l0K%&2pi-oZFta+ztNdcFsETn{U49CFxBiyJ3+2_U+qw zrxt_){z&Kb>wnjY`(tU)WhSn05Y=5kc<7C|-GQUSPoF*w&ZRQSlmGJ|g)hGNg1;3! zfg6bU<;#~9eMfY`WWYz1@gW}K*|TR|j_9gzXT(;i44(%Xo#p``r@P|8YNW6yW%Moa zYg#v?a_v*h-rSMN3P_L#LrgLR32t-Npk<>prE-lxihqm_qUzj2(I|ZzgEIy$4}jmp zn(E*qO?EHabu1n|Q@avqLzj7PJ|t+=EL_KdgI<5zdFX}!_I~a4y`1>afqwq^XNKT! zFPt;sSYbzI`;N`fcovr}0A(=Di-<V6&wempQbUMt??;&QxoQly=WXcAW(UF{Ke};AuL-HHLI-dOY z>6U&+HP9sy^5)GOLC}AZRQ}LDd~7lHUh%G$90^SPepx=5aZC9GF|CF0Jse*B{b2|+ zp?`gz$fQ)v$!vTW`B|xS%pYu@2}unqRNV`)abj+aY$PKr2sC)0l+Q6y{sNsAge^L6 z_s^M9mY&Ovk9)+QE_yBx5I8z?tjMiFsW0>gy^geZu`+pe=@RJKA|$}msHl!2(hI`W zY2SD~)bSf>jDn0AU(u6bh0h6(*i`B$g?~*@>`I`W=#8rJsBif3#~=CNcPsb|X%b(r z5|$ILN7kN>5FWJo(zhH0Xn2Ip6a`f9{rBI0FCl6sE4t|oy92l!M9bv`T}ni-8fjF* z8;E2Di0xL;zIU^S1NLIJ)56#y8he=`gCdCEfB$_CAX}mkrC%$wT{D@*jzu)ajelE8 zhRlMr{zUOaPHb*U68G|Tuy>s9c^0u_2-@dVy?1e^+TRTL4+(k`W4@|jfTm*=Dw-as zeNIOrrct0L)rx(Z)+G5<$1T&&XE*q3r!b9lFm<(1cyE0XEw1z4u*%10&&<4e6LXla z>@~f0x6+v8zy9^FaxSR%xKhQAgnxKY!DOr%%V;bL`(n`>B$D~gbds$t^k zBp^9orGu8zaB=Kn_ij}4#COD^QM|oFshYZ~Lkek&E+Xw{DHVi6LZG??AM7&*SlRSk zF~nvUMKisiCE&1zZ;T#tknDJ^*k*m6#8DJnO03l?nx?u-5usPSufF<9Yk!Ym+*m(z z#NpedJ@anx*M-7ET#F=n2<@&KD0=P{7@bL)a7F>nIV)p}V3eUtMrV0%;Y4B7MN z&(G2Dj)F^M3y_pdNz@fR;=`R>nZZN?K2U)swAa_~@xeq7ORsdhP~U5vV!+ zz1z21b_X3bsZ@(?6j~W@!I{Wao4;yalyc7);s0sk*Jnf1FdsgAU|@Td9G_e6H`yZ- zUJYVbB3tnO{d?pE_q0J@^vJ)AU_}KQFJ8PLR{<5QgEzCYU1kU^%zv~aHhPPrhzX62 z`=&Y+B44Z~XOF{Ld8W;$JzXbd_SE za39pOt00o?%GICM(r|{XQ*Rrk=(ULI%jU}Wkf~TYEWXM zv?AT}(oQAUdQdHv?!An{R3$y1rh>n7-tf_}VxY)8MmO$~qJJ2TOw)B&zP z{`g~P2?aQ4iH4yL-D%Pqi%`k#zJkEUrB%#8c-4JbpFk2?pyHQbeu=X_RM9cbu!YJ8 zo07ZJ3kSNGuz+~hb!VdqOT1zx?t=NI5#4##p_gL`VlTAImKopv{o%ixr3k$iNL}14 zMuc-<_D!o?dw*h8E(og}VTN9&z>kX;dkH;&)9a3RWB%bT1StukCI0G&7$5eQwY}B` zBUtBglWHkF(eX)JM=JPhNe1K-(8~+tkGNW9a=_|xSQhKHp}1rFYS>_+3FEeXiTQMU z5k#q+Q47uPtMKltH;~*+fI$LYPepPjDMq(>g-KT@B!Bb}0`hl+x!KvzOugD{R&@Vu zmx?ifbb-@Cb;rKwLtoviNV_VS#Ho`ZY05~7cckS%8?6+oe1}Q%o=mD1!0uy<3B&%uN-w&ZPvN(0*q)PAKdAJjbzh4z5e)zz^4+9`Mj~l0%#iHqqqoU>c;^ z7MnjLK>?G9)dTtb^-R{Lu!hsCT3lBw(zv-UOdpkjmyE%RqA3Y7%v9zvNFWr;L zYZbxYU|-Kp7sW_|0DA>8F8z(Kt56c!`Zg+0dw*(2DyPHdi3h6Nv$@8}j%(%^XR&m~ zg^i@CngP+Jm#+k|op)=f8Jkpr=KD2pohc3N1x5a?9=3TMC^OCEoy-{Pu-f&Od-oqQ zOvkGcV^Gj(Nf$mK&OyUzjvogq{sSfvp)28R1Yz&mompUHHcR{d(&P%4`WwS_r8Q)BunvRGWzW060;(o(m)(y z9bfjsJQlaGHDUGAhXfqB(QCN0V#JDZb~SUl7}}u@cwfioYS*es!EV;9ruwks z2uGS2RH}Z6Rb~Sp73g!RnaA5lr4SORnt$uaBxkdk-);h+d|hBfanW7HBxNeMiN+I6 zy75C~y7yCE_!;!lOCed=t73qa5Vd7pAO}DQpUG;#xb`(-CVFI0w2p)*?R~`aRwk&r zX7Cnbs|U605%^Pd&#fqNMu9f0S0If=2@-4(pIz+9p?AjWvVCBDll1l907;)DYk$E% zkP%?vNw13@#a=%ICZp^f8H>2uhF|lK_$focWQLYXh;^wW*>V?m!IIr_Ff8{yKK>^$ zM9YQ>8-aBI2VqoB??0#jlI|kKYca!8lsYP2P(dX>;7bdT5ntN7e~K<7lh&cwY;sBQ zsy!8o*XY>w8rd`u{5i!~=Ig3u%70kw#xl)Of&$^aTtuKJ((OjJ6zQH+y`vE^vnXnj zudA?eDX>&jF-EnH#qJ$?0o%AwrR=8Vk};?NAWTq6x~-SuHiu$5Q186}R^I#qPv3RP z6b#Y4I0dS58CugQ8Qd3bW&Q*wnPfiH3@eXun$Bd3V6T}}ZqG(; zU-Neuy>@BP>o|HBWEK$5fua-srL1GUPAXB^#CQeC_cS;x^e!EAC`F~noX~z~0n-Tl z$vOFwhK@t9nkOBFw;{*F5PyBs*d6h_45;?Yp(+wf?c8gubW9+?YWC!#9ztduMeW?~ z4q+A#uWbF^1b6-5Pi4!!j-z*1qXm$3w;fO&ciQ(%J~!?NoQZ0evFbL9y9`|igxwZx zrgXn?L;EeQnYG0=@n$o?Oyj?%|(^`C-v5l78<>6aWw*4lB zJK@!InXq=gjmu=T&(95@b>|N{S~`dD=bDC9Ac4wVX(vh|=$=GB z6#Wew%vI>JmkHhu{tmC$z9HXBht{-onZTly{3+Vc8#+wE-qA?T`-a@PLWi^*uS83} z#?IwBl$ss-9;1BL^=Nm^sey`YFqTdew+N)^$DpotRxqo~_JG~P@xR_`jGsoOL ze>PNsFDavo+0jr1xD{}j$@QjJh?;c&{Z^WA&baBM>~`>XlZw$n?0CSW^dL@-1AC<{ zgU8%@n`_IQJ z*DJMI(wSPClYh=+%Ku$54KuYmWg*b!W6f+!Z;4I?P?HPM6Zaet9-U{-e zELo`x@2$->ZZkEm z&UN&)i!#ho7njC!JNTO`dPs|NmV-H6lu|(EaxNrbv<|*Z-r@nv{^nX-NkF;*V6Lz= z?Iq?)NObggvw)I|yVCS(b~K9!y5Kp>9(Q_WyB++^TTZbj+Kc6u(i%Kh8IxTRtoQJC zG0y7&A%8~MOepdtKh;GrxG0KQJR)~) z#$G316WIvY1WJ8V?0ZO>a~`#owE0S4t>YVCDu0~l&U=wxy?Vtm2>*-f41G=V$*-Me zI4DvkoWJ~+1j9H^ZbF8!?Jo`|4zt-Y5RhoJL>-?=-Br`bC~w}pp*tLFM>{|R<^xj? zDko**X+bzmsia@cjkqJmDEA8f{?~Z71(D^C8;3rULd7EoUC}Y_f?S}&NHcwiR|PGq zVt+nC19idN13^+imeye=`bmR|?IS!MgZ8CGJl|6)w53$;u@DFC3RMv9)<4D`%10yzS zyi{CFlLA4G4Ht{AWjOkZMIAkep_CRRbS(jXu)iV>w~$z%kjAPK7aQX_huEW%uN3LFt$)HkQG<*_xci0A;O(kM%`NnjzNY$mKFdz5^q*{pb7{=a1qT&WNHJTAgF)UseOJyVG+lxr{ zgK9Xw5%($(&gmkYB{g{uBPXYOU7L=sTZ(6fpAKJQY~>jOuh^m_!4SQy%&Qqg2&|~K z30G8@CFc8f!#T~pZ51>%ty6_`FMnB)(hNlOT7CtQZ^v=Z%=~FAEejB&`HKp%wQ!&@ z{t(*U=_^4Zy1e-KFJDSKt6dD(DyP-ag9O}DmO@@zD`Wd_3!gXpGD^o~y-)AO!Jm&` z2g8r9GEhr_2aeSIc^$$wtM;;&JxlR+0nUx- z)k9)6gLhfd*z&*+T9lsGZku(N$cnTyO>Y<32`lfb#Y3NMG2hNl6}BcSYJxwy4f2UH zxnQ;T_h7w`_H4Q;KhGVia(_#Mc)NTkX?v(Ps(ZXJ^tXg3(Cn^0n9f(~( zOXzUu9jb$p7_vCy6S1D{zP)8BG8H&pkW>q?i$j#{?73-lEXdSWW9#|Z1@ldY2P&sr zTE`5;rm9ri;9eN92@pX*NU6Rt1id;6al|AQWIdFm^vr3|I%RQyHh(np*MecD>j;{4 zEE3yv%QB@*+v(`mHo4KoW5n~3z7g_J8cgM~D@((ctkX3ze zar_bU`u}c2gUPdJ&wrjgdE)D!A=YzM*jB5YVb2glosSHM!fobzNSNy&oj4O8%Rmqi zBGU5pjmGryLX>=$kQ(&q_1POg0fNvNa7VX70M3&42KA=(g|Xx&ajHmK}$^ zx`gV7qa@fkjmicQb07}RxSZQhH-DRI59yHi0s?(gH zmnO(W@jxuHqH)Ea>V#z%6B7^##cJj@Wz@c1Xqi;i<`(fPv$0pXL6wC8CK@ply_{yU z>%Eqn+2|awYJVdkR;!$Vbf-7%6C}s#Jw%&TEd`j*uKbqftH-&xO&^|*;ayO`K3{+RHTYfc#&gyj@87@IoGmwc+S9n0 zM!#7;qBkrbb(@1Obl6;ZkfaffU9uWOFR5YS&K(n^lz$)%S|)lExxCok%8%tE=8e>T z{q@%h9iuyJL1%vY>8FbBbZO6s07NOA=g*(>mjx@*f!_GM4yuU9fLJ?iT7k3G&;Wn$ z#g`Re<1Y9&c&qhy>8&VT5NHH)m~1#~u!#UFhY(S@b{p)K`NP+N>WddIHW9{|BS-cM zFtiqbE`P-X=W#nx+L_TnU<=x#w^n+IKs@P%Eh3YSRlBu>?X)Awba}Y-#3)z_Q3Ntg zoLo%c`RUWAlm|$ptlDGwGz3%=9i{AX(78*E-YZnk=LS{7D!yiZ8cNz8N(^1SJQYkk z0U%H!Cpb)C5lKF0Hd|VWuDn$vw9W4F*E)xx%zvD&5*RVo2*@(vIP-@HH2ZE|J)o;? z_(>%5z+T@{-SLmrm%La41{@lhDH=Txu=2I)c85hG1Dc70^cjGo4}91;wzyI@6V?1? zBQk#p85G5In zK7a550`2B6DmHaE$oz>egu(}V0=K5vw~LMi?A=uRQYBQX%bzRazxZLVV2a@Rk`L92 zmrk1A;IywerDW!y$=(a&{NPWCx9V-sQca56w+DX#ObN?Ry5eg4G%Uwq+rESJA$IQL z)UP}9#iH1~9&T!=SMZp~+BZ*4NxGO=ynip@*9?+4fuWze)CTx%-(Jzup}1xKqjM0w$Wb+9KvWRHNb%yw zdht_79or248YjNkb^;ouDvd=E7G;$k_}FA_$1iQ8%BTH%WshS#_td2$MF#5W(|@N} z8bQ5ngX*^N5o7JaY~1#Z!IF6frm<1iulsM#r?G;c{@99k;;fva0@}^HeEaRU;NUl^ z*y;Gnv1%_F-huf}ll8CnyFtJ@lcCRoikoWcA*jkHa)lph4 z_g{YbWvI&aC8us3 zG3y(23XswQ?O)p?7gx7wn8{lyUW+B#Km>pBOJyJmc3G&P7emC4fT*}4I9%0T$Lgvb z4*6+f`taccjpZ@yQ5Du95Z^%hwp&cKxpX+^l4n13_dN@rmKc;zidnarO@A4eUD#Xp zA@6wobht*`BuCe=21^jBmtRk`h!0TbWd8heO+K;9fhBNBtARzTAfD;yigsn2_3Km3?J6&gA2-*;X1wFLP^kbj7{8%;o~(iSj#9cCJ~Y)69H( z#dabC?Kzz7ZQqu;{E*AG#)1Vz&SehHc*1A9-=y(k1v~MBvy_3@G(=QJch8PdVnnySVaAUMV-AsvT=!Cc}s7h-XhUIssE8xXs3~ zZUjYRmcBBfWDdF~#D8j5nCr+yV6$1mTgH@%ggS(ogT+bB^es5=^~JeK<>b1hgmu^! zq1TZd)L3RBZ@}mLi|ge>Hr1@UY%bt~;5WYBO?Qd=6s9N@l2VWOsi@sl^uHJUJz=nT z7;VdL{?BKYsie0AX*@<}gtTby{H6o!tXlPz4kps)6iLx~FXNiF=-+j&JHE-L7VS ztWoxAc6K~J|NL{akpeXZ}L3O7wT|B4?A$Bw|LU=7*?WjGP3$ zT{3@%{Or}h?`(MzVSc&!#`B_9o&SL0 zzDt*+9e+o!0Htjgo|Da_0@eI3WD%}+TWUV}Q?xXF8+72~CQQ(Q4@=nJ1c#Fcz32HZ zpA|O?{_;^=Eh{*%rhy8ktuA#OnAa6r6j(?2>UDDt^m?n9{er(ZaCr{wolv`T!g-_Aq?pHyy;3qMUv1`EE?e8X9q>`MeXms9lc}Jq*{wM6fXX)49Bhig>orU7O}&*; zt$%ShIWSkALODPFUMWp0cQ^F4?DwYp*AU;M1b>fK;6Im7yf@o!#ODE(ZLSc?QZKCF zuQX{*8iKc&+gyq#N=cH04NF9k+iWayHaVYEV z3ive)Z9Dk8SVihx>CHLFJX-SU9Iob!0_Pua+jp+I`y4q=*XByequ#@)|%)3``B}+RdO{MA#`-8U{B z`fwmqEzq;Z(2GMiY#R$Jhx!D$HD-u2JwW#}1R($9$&-YzkVU#d-1qhC*MD^3Ve6B> z&z?OyREBX4WCF4s9#bu}&in&H6q%q3@?B!qab-DR2=X8)V=+78gZ?`rYN5~t8Fh>q zK=q3+zL1_gefqS>SDTkW!LV^4boWkOrdR0|)Jf|QoY!-NDDw4GlWj*CHlv~4}T!X*>6${r;Vki)H` zdaqZ&*p8e@1ST8(@{G-6|^?DpDAjloloyg|NOGnw|%u>j9rRwlYUjXnx8CYUp<6P#3HukW_Z zMhAbuXPv5Pl7b=d<8LqRiKSJ?xH^1{G_+8py?XVk4peoo#^BE)KSpkL zMyX>(FNdhhZ;_5D1uGsyN$x`5NP^XNJv8_OJ$NhWbku}H(J&U=J8X8?05kV-_GWu; zL5Bc+10b6ko1ZCy;2Sr_9EeHEW{-TGHzNOE1s2szwpn$MVt)v}S+v-zH4-vS#{tzM zpkv42PoTWj=$m}ECRZje0o9F;B4&$B!~3NQ*2QWjGR-ug*O;L5G<9p;I}QHKaa*Wf z!Ni;{FtK`)$blcUAyl{Fy!lmts_xRbvWzuGCS8piZ%XFUR)us)!&pn%i z_Vw%v>GTA_AAjG(i^cqCLwQgmp=G_tpk0#pTITMFG9WD=zsOj8@HfIapjsNDC@WS( z!sfJ;Fa5+=HUUfPHd|`pmuQelOCtojwY%BxWAL}B56nJAiXFSP79|O|ExXRoL~aTzc7F~*@E7!|_H{MEpXS9P&8}{& zz_xlhbvW)IjXxY$4InLl)shMGuvugL5nG^EDrSMGhh+iV#bDx$9sEIyGU77^ zf8yk!I)B-fbw!-_joatZ_G#GTqr`J!F(5ZsEz{A#AG8D+sle|cvc{-oQ`UWhzc|jT z-dIrPuiC98;qRJTb-9YsfNBrhC@<>0Ha8qtxE07XLOumYX!;4==*Ul6OqZTy7R zsYb3lCO3PxFOxllVFS>nZOZPn8Ni_@`(m_pN{&JKz^VT8ul#L1b+6@uXWEAkANa=4 zX9^lnN>vE8-!41IE1iFt>IiWkQh_z8O@HYkN=F^l7b*Yt+iw+S*zrx5&!0d4`0*nP zUz8B6-oJnE@%iejuW%QdB#I`31W|*W!%&B|M^5(@)FE>!v>lbRh>i6|>3LzJT?){P z&uH3Spa7COHp_6RWjmAMs!qrbeR>%HO+m80NG6hXt|JHdp%QLR!N^M!79OK7ZjIBc zumyjJCQa2|T`*!x*%R4E26QPZ!#{`zDZi-zkpLlg~qT4Q7c|FwxwG$fY%*&TAF)kq~M@O9Ck>q=9hIF+a5IB0HRJK<;%q5aUD_LI9Scr#5NkZ}VHH0z8#5u#M!pnL zMq@RT8AbB}AF6@uvBmbIbNJS!jr>#>PzFSHo~S|DtV7!L4to_#c12MI=3Puo*!r3z zd7(YqQTw_AEUO|Kp>krNhNwfYLIi&rv7_S2a1!>oSroWg{*hpUxKxeyo>7!CFkxQ- zD7CC}Q}j}4Z2oYig!uO9daoA9zAxt4tLAT0qs)|S&^QWA&vz}3Vl$j**E*5leVxA9 z(<>vnRBAOff1A_Bpf6dinwK9m#I3+Wn#6YUt8dzeGk46&gU?C;_|!CCe))gpmwajB zJFQN%NSbCgCvSojAz9a$Wuk6C)!MNRi1k96rS*c=x9AquJv^0c_8Af7v7~14(@t{7 zWI!YH@3#A4IY&^tCKb{FAl-Sylc;Y~`?>-+S#G645Ycz=jkmROrX@A#+z;X*71G1UgIuvKaCZ*S3DyD zx|McOLJ|Aij$WWIX}0=lpC|ev)(DNgTILe=N&SSxjA&u5){*@6k9jT}kS~SdbM+a8 z>W-cRsvh$)0z)GW^n%re{@db+4=X7f1r&RH>f7d0!b27X4R8^t9EX3XDBS%0_usXv zWp#lFG2nnguDIYShx0m_(e7YXfV7E&s<#83q;Z$3uN)fhzfIpt13Z=L+l+AeC94ME zd&-(E0jBz39y?X3LlUu-HAd}T5bZOayjH>$u&Vb=P|G?qNvY6gB5~-puciviEseN| z(G%5WPbxFrYA4{--ZpyjxG?LPdSv1 zEMI4)f=g;zFy9=v?aJr0HCFyT_0|$WjKWoTTHg-q1Ijw>cata83i|*m7E?+o*p6-CrSYQZToMAS`Le zxS6&uO}6X((_39Rgh+^uPr_Ro!ZO3g3+-)I)!g5RcDlRy4TV#q$LdIqv;rkG5_GIE zlLTq6uIw?l-_gd+b!6hR*-S{vaCkt^uH099IcJ|Zuk+05ZQmQz{8^qrTLU(SwQw`h zR~#G!JOCRnl=FW*V@C`V?kr~%X`Y_=f=!D>BtA9EH_jLVx@+EQ^g| z(P+eK4(IT;m!s3k2LA-XpI#TC#fDZL`E=1zkYSPH_#A)I_S&?^9GV>y_^W{)MI_Y- z%LUogUJWOwqxT!#uQJ`7^>VPvY-1}uz38G;Nu*-Aq=)!+wr0MLTwz{ ziEP9~%%uX_qi-3Ev!d#bP97biyXS>c_R?Z{B?irL?dF2-6e=dAhUFz%gWN3 zzwLhmA1sC{ZtrXfQHS-<6CxRDyriU~yn^01j}$NBfN%i<653MI2}>H7**f zS7Rmo2>u=_N85{gcLHawWOIUP+rb}p)%`}nJCWRjpfRIod=SxGlFW7U*(Jq#&qU35 zZM*HKT_$^U&l<9DOLJgd@_bDVxydAxr+ z6pBzvTgP_r$0knQE4}ZQ3k$I+IBk{85p*!ufw{j<1dt9FQx#fJ3~@MF9CiTnoi~UagjWIWSk& zS+7SYx6*!5d0#fRKwI_YE!-R0SJts-BfAGat|Za99K=v!d2ZTk|(5J)3A>DUiLATs$q3(K+u~8p?me3nVXx z@@D~G9C%C)5c4VXM-+Ian!m@C<^`zUeZ$9PE_v2s>v5h*>AlRh?@EKsWor+Zshvwe zm%-M`6IU|gGBQ1Z5F)Wbxz*hRAE(v)G3yV#u}O=qTRlTb+a&7zHDwnX)71%$;+s7i z2mW7u^;PTwcr86&!hc>j-r|2CfS{Mn-^nAQc=m{b8<5-u+Y!0}OksX#8l$~mBa5Cs zeVTyKE`>DwM&u8>i}|K(SQFpymoGQ9LM;!$?lrKB&?)#ER~g*m2dYWy+flZUN8&-p zsx1^&0HH->ed+Shq-ORcr1t*(dwksxDmGuJjB0W&>6~{h>i`t7=AeJ!SY~m4Wf1T* z*jKM!LE6bfEBIsRmT}*_d1LO0Yn&3$L}QEi=+3Lbl`!l6nsx};Ghi_9J{&w3IW5c& z`huivBmf&7xhJF0v!`QTeAS%y z9s9m=9?lE@J;{p3I+cF|Z9IlVTupoWrS&;ry_fo|~h zaoehVTJUFjSxwtv$6Ez|mfJtXuzQ0>3s*FN4xpppmM|gno@#$t_Xt}J+AD@IOhC-u zqzSeRq{pV-?ygX7tBw_MFL1UfJU~^x!^@~b?mod^jdL%-1=BgC#d>8kT#MjF2Y+zY z&$uyTjS8CeT7mQm{@}UamyFT#K?e9&s0}d904utyOMCFAdDnabANIl{U&~RAun9=P zSv8!!jv#4*xF%?9S*ULgEq&-hjzIZYK;KlX^vvyd^v2NGCHNCj9^$cf%Cc;BE~;(xblDdr9)e<7WdsnaGB9Rtf-^Z zOV)BuT`*6Wp%gEUQ|&VImJl`=w^#5dK_u3$7><%y)qY0s#e`~$>k|A0wlAz=l)%&W zYO4`8dWTN0n<}Ruz;c1rB#aLJHaR2C7vXIAiwc*R9;l1#q`KbrC7@u2lJmEfY7qz2 zIBg@l_xyj2zPOc5Zh4UFy&Q%LO-S?WFlo#=PkZs4H0H}Mzchqjym-N9e+GzSB`;sT zWWC~(1T6&mP_hM1qHj>zFQRzfy?fVp#E!P}@#Du|fBjXj+X?XBtjaAKnmQ8Xcq>H> zcur{x-#{q}tS3IYM2Q$o@BwR`;2?Qi(N&C6aCm@QKG5jBoU|_X2C6Ro<(FR?-+G16i_EiHf_okB{60?Edpx0_kVU8Hs1f}3 z+i#i0e){Pr0QLY`puC=sHn1)X^2Z;4Y?K{!uO7nC`5-79M)4Hp zb}y0ce&%M=YX=r8>MWu?lnd=4pD7JRZQ(#5!NYO)8hrThfuGn$)ZrEWqGP@>9s`y0 zIrZwXv?*5IJ*T6@A!7_`%b*b|646x-{7HY?z!oISls0;Pso)QYA+Nx1>!20UFz%u~ zcoKvzI$S~E2~%waR@No$HuFzBkd~_FKVe<^vhhkFTX}zL z(4mrw=X(=VOY{@)d_?eln4DwYQec$1Jx zOuF>7%~Q?vW=*=d!7uT<4A&hq+?{x`^{2E#} z1ev(nFTk)7VXt-LraX-jc!T(aK_k0@?p?^)LsH%;a}p0)mO92mwxITzn503el3V^( zA~Ue2CvwO#v^vk6c5&O8KfizdEL1u^GFo}*g<2^Gv_@p5YX=n#g7(*VP(^)UbHT1vlMr>27GFv^RbPKxx3sP6l}WG4 z0kszl!m7c71pAx`$C{zfXJ%it?JHw}7Qf2xm~t*G9 zast6432Oe8XE4R{PNRPvG1R`@b$}NtHYF1W zZrQ5m<>KtIf**a;uI>L1v75Z!)G!UsODx}KV)hSs~)b`ae*8G z2~~*(gtbS&ittPva`3b^pvq>GErqp#t6%w2l6wu{ zDqBuEYOND&0iU%?tJEN3k~r+qPL}>F4U7ju&D0A)0AIyFbx->dF&*PLJV+$dGxe*( z)_RTGTT{A=>H=@e;&ydZ0pn{l+R7R(Q^>skhT=k05_`^o$T$~q{a zH6rsDd!@vh*ehZ+jQ|;!`9lzi>tm{MPN#c2+D@G3x1l$^Kl%3RdGE1#d3D_oK`%`iT|fZ@Xm+i=jzrW!_HMr; z?JapYPe?E;ZBnYlIgjL6VJ7L!-xJeCZ_>n@+H>g{W=60S_OcvNnHq>5F25@9ffj!t zS669Nj7S$2L%#N|V&PIZF1=tWs{~|MJ*X~J0~8C9^i6(N!=xozh4^%Z2fX3{kQBYI zq@-iUOn9RIqIIe|>i(c_WE0zOKonvu`|NdFVD3{C`pM&;lfa1SB}2e+mI4$2a`2@> zh#gH#M4@;?>yymCb;R5=mUX<$-&=nWJ^?<9z3|*tS%{T_v-YY}Y*6uEUzIlX2*8>h zwPRj~uv|xrqccI|GYxKFBPPcp%ymUM2%~lQpWlD~y{LPBW1R!@&S9Lpvl(YIkjTe* zvnAeOs2`|6kL?k?bF!kZ?_wSR7lB6cjIblw$nLDVmo2LZGwUMs(Y@e!T|R$fG-89` zk0^8)gsNY@XD-3VVbTjS`gR%H$>hm&CT0jvhj~IGy)u89Lce*lbXMc$=*0+_XW&Cc zy7Uey5=xqJ?iRhii1o_+^~GurTG~c#T=Ul$KCkW<)j@$XQ3?)%rzNXdCH`& zJkYv(t5aD<5p#e-@)1Qgw`FzTyUK4%%i-w3sgc9>ch%rZnZGVK%ie#LbS{HT;;XkS^jD9hXcO~f@(lUQt%6ZQ@UqARel;y=5r~+fI4Irx;xxo9KVgAKR7}Ex#E3(_~ z+CAS4C8oJ@mgjS6jkq{)$bknu;&#ZB`)RP}oFC%A$BZ*mwd$w>W0ra*6&O$fbEQgy zM@u$W>*{SgD*G~5&hoY#Tca-yY;s_h>84$LSK2Xnh~V#%^*w*>dVCKMK7ING8tj8e zMt;Ne4&Qv0$+3r82hUYtAPM@{yFJv(FjIk7vq2oNOXe?D<@`8%9ak!=eTZ$}KmYu5 zkTEZ?jT}(4XRoI4dvL5KCoP_PoOLj=n{nGzIlonR)o8po?>>=#&>G2BN*CK4Sf+Gy zTc|+bA%edvZ7F{q%6P6dr4Gj0#RoH{kq#xY8r&NPRAZ{YGX}5s#?OV%AqSK(GG%+H z&4EMatOi3lu(w8fh~RH1XYUR8Txloi<;Cv#8=(?=*T-CY!(|Y4s*6?dx7Hhb>I!Fg zN%7vVs>&$6;8*Y3wx?0PjolCJw3NC-fYx9xFP%?UuaBD6pMUO~`5AkuHSd^@Ptwz>yt%K(9JFiX0AkThF>Y7fEx zq&BfL$scidb7S+Bz(h+!Urrw%nPIbX(5sH&5#)ai0>1h7?m#L-IT<4$cl_qfn--Fl zkV6F}DNn+tyRW8EyCJ+9e9+s$_hy%&`UWj6%=dkn-YjYF!EUZ+iu61#52zEO1Xncl z9&=Cz$qP&X%U_gDjYTio=mlEMWM~JVFz+ZV|DJm}fq4xu0{Ni8tOp;`xxGSxb^ z1ij?zWScw)qEyP8Tbx~RGnHufb(%wQWg?SD9!W#knUcUoS5P6hxz};~hta{G{J2Je zaz60i3fgkI^qQG+#*)8)7U-hT(Eeuj?b3g&-MOellD~d33;qjf5?>>Yrky%;*@Xih z2!>=8pM1|K(zg*~b@UEKf}egoUHTq!M3lvX`3#f<&E2$^d@mD|q(oHk#OSqn3^^ZJ z%I0wSY}{*U;ZXozp1mD@453%>=hqdRllq=c9ugH#_;QQk~+(-;Ld|8cf4vii66A{Gb zS{5`&?&^YN{vrz@R#fa_z04SMsM~DQer$sBGIYR*I>hAT$B&0?_8JIVS;{!Y)99$5 z->+|HR5jI^9l;QzMi9oLprcmonb6YBT7(GXmJ%0?lmv{K0MHN<=7Y!fID3D2@tJ6# zh45ZQGJ7~kYH|GrboCP1=FmlMXAgNXC-BVTf6LqO8g;Bi-1&W}E;T=|5AyALF}mqYsH>J{$`tYRWY#DZbvRI=uXUp`2^8Ca{E0L>!b3O@jpL4tZL*@vEtCPya)^GNZO4(iPhP?2w&3aE2GUppFe-D>D7M4n(BmgNK{|llZ`amrgli>)^HSj=%`~Y znP$&S3;xh9Fyt>wU!Uruu|Keaf6kXhe#_n9uW|P(%uqU za1+qQ&~p9lFi(SkUh0$|_$$JL7LlMenT*qpBSB+J1m74m6tM+!(#pF_d|WhiOXEZR zp@DXXi*|N!H=2srP|%cIH@6AMA(Ckh*vej+PW~bz>7F`TWwa86L1JzdD@5^_jnRxN`MLC1O#-jZn!aIlF_p3_^CJh?s4 zg7}79#jsgNIkX}^7}4_KnH8O-%`{b%_Ns1gV<}g`=zV_+P7e{Y%HqS8i3Xe76TU#z z`l@9$hwYrlIF+-|UyDMpZQ;yeUqvd1&GH)<{+nIw;AH$OXy`16e>Q~)s+t^iM9Li@$2I9O4`UG^M^iSL zTjD&8He`RQT}MJaN;#RM{3gUY>z0Pw3az80Vq(2@3_3{X2URFv%JaCrTv^QCK+vXR z7C!}k!$WS=u}$7qYpg*N<~qeC$nVfw`6FKsA<|*q@|<$nS38+ri)Hx>T>VqYq?MY)`a1 z6hW}U|2vMwcp~VUoECPcDn{M#4&px{$2@EZ) za@>MH@m7bk9gG-Sc%af9w(qqrB^?y&4O(UyS@iS^;JO{f-Y3fTNB^N;_9}NY^P6{j8Zg0hZ~~rPd`8XuV_p|&25wC{Hk#WN{0SC9W<-#nh&C`lTt|iC0WBr{&8>P3 z+`fyS0B#%DCYW)|J-?YW!Gq1D|g0;Q;RX40#u z$m$MNB_^sxY+y%1z7AUfG)^|c+0zYGL76MCW){bnDpgK<&Gb1f({19J(ia;AxxIXC z4=NK70U~bkja^Jwy0m9{QV)Oc2@~aIX|9@EZuHNY@-=QJYA!QD9X9J#^QT!L&Q#^s zx=A@z>tb%R#ZknxckviDX-c*H4CS{AGz&9gwV9-6)$IsR$Q??(u7RCAf;I)S3}^3g zs)L#6)kRu4SZ(gpNox`HI&FFvNFOkh^d;{Jd zz35vn$U((|4v$;-vKjwnDjUsAj=-cUDBr_wI>gMNGp!`xU|4y@3vMYx@fxEX`2=mI z^qm_tfqBscB&z_c&R7n^i$=BxzUFfOc%|~cLaEAvGs#hSss}-5_DUF9JG}{O_1dUF zv)apvs{+#KpYxf9U5|fziKRyach@cm11MwHab0`QUOv_IQj$z+*4?_hcnlqQx7kx# zVKkz65bh1ITJh2g!rj-q4f0T;5b~f0%+Q;B-;u8YzGW9_<-33Cd$NhO({2cl#(Y!F z2I*eM1WY@JPk^9U>V$#1455YGnZX}u57M-NA&OMGaOwVmjP@9PIgk$iZu5o@_Mvs8 zfVUK&H=8+(Nx#&~k@WPcgguiL;H=1XuU3EtdTj~fqgj_4SSdqGS?eB){QAj%?t=E2 za=G)dW~^#G;b?#JrkX9?yK`k8f!+w`c8KRWns&}8hs3T1n;b}Zx!VMPC(Eh(8R?Vp zzx;6H?!UM^>+XcW69TF3l+IEJ-<|LU@O%!moTfS-+cn~4IFNWN$wLHxH@`~iGMdz# z5Y@V(pfg4fF*kJ8%Qa{zlJzpNB6h9DkH!H@kDYmq+M|Clc{IHS!UyZ7zYZ@;j!G{R` z8bv;1_gN|_wU)X}-bgoAuIJ75U?MN4 zyexn14R0-k-&@}q@3pu$9-fcS+V(x4=WE3O%K?8~5ptOc_yI+$s?8Z66&qZpa|GXp-S)P+VJ&Cuf3`(Wy@9q<}RGt zJ`!a99?Ch~xi}siz3t53Iv)GrYH=F*pMU=OX=9x*kRqYP)k-Jeu!hLwz{NtPi>;$F zg*bm*GdYJVEjcchK0nl`%M>ZC;O|h@tHD4H=vDWcw=Po({ZKnQn#N|F%yeAfGQzrv z`Al@=VxSi*0WE#IjMjwst)d-?KZN40=bQML&aJdN;{K~;YtH)GhkN%aWxdHVEeg2PXqJmDSREh3QO zwLn;XFUbK6{5}<<&PgU@bZ7$O9MpF3*PX%y@o(S0Mbi8oN93){Ev!$?%gOoo4M+1UPimYM3trM=^iIaF2hclwmJ2HM`?OX2;W-nMTP3aBJ}dDw%%$ z_17Y#Ba{C(nSa}Q^xNi79lwNTpDyOV9f2Dt2tkuZKu*9^`p2kabMrI=e*XDqhURa} zh*ALXM<~$36GIEUb{&nXE(KeCXu)~2Z=!k?>begHz;@<)teAa`&t9fR7ovZ$&!rZm zJ$D(1o;rpAp-%e2aKZ;FpqkGJ$dhb`>VK`E zMPAW_SZ(#~lhoc!AFxpf^H(@mGg&~oy9fzLxQQZfjGAOkh}NcYg78|Q8K=&51ij?z zOsNEUbM{FOM;Abuj&<=)8nJ(i$B+~x7n}P6?`^CwDsX_MOx8eqy|#a7x2r=e&7wE} zMPv3XDrh?#rI)mF2C_EVe=!Xffu}v~!5@}G{g8=6J3E^WQ67Yr)ig>w;aFNt8@VTa z_DFKlv)YNLkzt^Yjuj*&jsR>h(@W?9jcGikrC!k0OzuLmNJt3f)vJG3T?X<#p^Gcu zI|eUS(ngFnU!L=byUi{O8SSfj`+=JJO=(C<#Rr%HG^R_!4;7loMi;W2E(3$S}^XFh|MR-g(p2bzOqJFSI#@82qM#mG)1O2B$R5KJ7q8gXXQr_7o8>D&Cd@<>SW$kig|Qd0oMa|4Lz^i)3Jx!epD5vX z-+jkVxIsv0^yecEgc)a0X%x?DdBI#8^rjemc=3PY#ZXR;0G@xNkSN7fA}Kivx&4k< zS>0qcOq`fJ7@(Lvk=HN3{9-QD#3x^;qCjG#?uUeSYyQUV$r|r0&nYIBmaAtbY=PXq zNuN2Ee5J9@Os-?W=^-YK+rGfp62!z|dk12p(I}!CX*_e=*KBo=rr9ob$8BGUTbS>O zUMhcARO1qF>X}s@Dp=egfm!j=~Pd$S0mQ9P-h8BOS=d@B+hYGD3N<|7wvABr4B z&d|NKefO$~ig+IDSlW5!5a`=<+4e;Q!Et{{@7ZEsS6yc%9o`E+wlja|_qclyq>C&^ zY+FR%fMR}tF9zM`W31zYasNJ1-NfqMyLV_C;s{RKdzIj`Rw{guYS!KKroR2xG+Ttp ziIaG+rB!#KjI)|eRCQ$r*2=;$7@8a&IThWULau_A{0*)=@TDCXW6LeUUDnpYl3ITm zGXMCERMA^KF5QQEn?uBgj^16d_W%Ym@;58l%_9M&fg5QNViz)TKAMU5ve%aW)Q9fr z)h<*R5M};!pN_sXO9AsiGka{R9f^V>uQT#y{%W2$dF8swNO|C{EHE z@%P_<7pT2GAg%oBOhTf!7i|sNgY&HT>8GFC^Y(kZ%_)|umP^o4w_#yNA3uJK-&Cf} z4#j`$SkW@Rk2k=!qKeBp`R?0c@G5`N2Qre@ z1cQGXuXcqZ|6WmlaX|iH=v2|HeV4;H?RL3_Z28xHtd;Nj)@@BD`r8(AXx1BPl zKmYu*S~}`Tz(-&prpbXz10ibD39Dtb9qpwgc7wlhISeHjf@F`~fY8X++jft0Ct6L` z1xB}}h0%R-#Wv>pF7g6XAEAGB@em_w{D%rF<~ad`7J?=hMH@z}HUW9?l}vB?Y%`ny z@?UR;)hkO=m1-uK+&w;CaGJEpNmmaMbi^97-7CAI=u7XuZ}sUb^3tf zL9Bt2`n9N8FX?+Y!YB3#mJ5%C*zQ2a?R97lg4G0n<~R5N739oDI9Pv%%Umj?#iuAd z;EYUOKgrKPppHSvq3MI^n8=Uu=|y}Q?M!B z4$o|F0c@{YiuAa$giPETo9P54Lb9{j?G<>XD7B9WgaChkaz4HvPCmVk$?6M@_Mw#C z!}b>O6xAmkf=yK5^%{RjcUD<=#|Nv|F`~2%R(J;|^Y1v2Kb4s?P>T?O(_Tmv&B5bRDln@?w)e9^&awI`L4BGLcyFddq1y<{=b%f{O>2LS+SDf&ZpKC>3 z=AaUy&L7alO6cltve0~%IrLsLOF3^g5EJZ#ivC-DpN?rPAM$^hRzaXRu)hRH-A zJ*(~>_^6x9GjXz_E7~`n7&siUIxabcyxBmcNk2@L>p<1@Y7G8-CMk9zLdo95pee1z z3kShp_meR`=Zb$&y2FoU)X}qVCX6-WUO7S0q!O<_>r@Vs+Zh`Z8@M2gcNG`5xM2AN zsqQ#OX9&wc^r*h4j?d{{y@J0@v~B44*P@vfp2GpXeWAr~fKOw0KlLOSYc>Mf!n|5` zib5LwbI$0S3%R~AkVgZGige&mjm=nO={Y3(Hl|vVSBrn6h=&HH799{kZ$y^!^DZ=S zhSembgTE(cMczYE817RJ{-<7_Rgh#3kxh{AzyH1$@RMl?&^FQt=P41O7{6ml#373` zx(xELaom8d0V@vU!``J|aG6R`|fIu4#p%f__JVAEAM|`Dy4O`p=LhQm=(JRO?4?Wc_ z95#eIV!o*rUj5WSHq}?j1r5uEb@Ae@bSzXNc*%#t&b@SrhV?u-v>6YnnZC2&O;h=w+By2X*O}adOuQR^Iuw@9}7yfX^ znU#jOgEfy`?UBGoI*ga72C_+rE=FzlbzZ43+t@95Usp}S!K}I&R*P$;5qDktqFhDA z5YRGcsa=8030)djmhJm@MKq4i{1qY7-dH)&(JI}JXI}`@nV2Cw9p(wa^~(J9)s1n` zG&g^bgWnyp&8io35z6LvXV-lK#L6ZLC(@a}?E@cZXaDNLofSdL3ch`ju^TbL1B(Oq&w;yrYe;w2jXSB+9o0jCyTM=ex#GhiSA)fY zt8$?6#*=y3(!LKeFYOES#esYdbU7HCKiq#gEvxtL&q1%_C_zO;N66=c+715BM`exJ zkprhCZad<Ual_8ug8J4(>1kB``&bRTUM;#@3#COHTp{2j^b<*?!zX) zX1vV&CK|E^eQ*w3GV}L1J09dX$GsrxWYbu|-^mPL!)Y2W&SQEsb25TI8zYSV_nAA-TuHwwG39rD{(-VwqJ>&Ma$yA$sBl` z(yNmh+kLo;1%D5<(R7*I?QZZ_cWqmDBUu1TIWTYX=>i_4{k4y!;=YsimvM-9!q0`q zwK?!O$78Q2$IV;NXC!lN`_3q}6wZIkt=v$em)Q|0<>8EF>=(n)4#gW(H{D|2AR80gCKNYZw(;O`normm!oA3lG4c=zs| zrwEnP&Wxo1uSD-7(1PGDv%=pE{#F9%5mb56*p~w{?tV6MKsWpa8IDGn=X75M66f&w zaYhMJeY~wcc-1oRGS)4@OZO(#3eG}YW|g(JeJ54Ih4uq+fHXYI%^(@if0=Bw5{-X7 zPp-^Sgj?ss3=i_eV^k#B#??)I&Tm8MNAiL`64&8AKs0`w{;rL9oiL*347z|hbr z9L$b9)oP%hXvT-MnV?bW7gUn@Q(fjz-3tUKQxc__oVj5$ko@NVJg;BBE={w&ef!o+ zlcnjQ)QX7h$U~?Tp&;qON?w~!5vs?HH(#Gjw{b70XXyiQJ+J=$@Zo>Wn>T~rmkcd~ zAjhnO5XK_?15x((I%p~ z7nW<_30*i}KJXXJ`LZ3dhoD6v8r~7Ca1LY|WEA)nqVflgyPK!T2cnh&)yu^21Kwvz zjT5g_s$;bfR)t(I%sqeKP%T8}EvUOz#A1>emWpq$y=h3?0KTE;deuP@|MzC2I%g$l z)%03@Wcu5YD_}la2bvUQR)Yo=A=6+nUonH~RW!>`0v8f#h zTCNzt3MFj!h8k3_2>~Ak9+XH_Jm8|PukBRyI8NlIgnSo?&;`j-)FOg9OQk?I7Q7qM_7u$`}gl}uBh_VsMC|b zKh!~EKAVJqE#E(X{=AgT^V`R_E??k|58HoREaj*75(w9CQQ-u+9+x4 z6oI+g)9x*@VyTV{Q9zl7{Oz~jR@)J`wBU@Y6}3yeYx+h=hdMEJ@uIxF+Gnt3o^F5t zWa9zn91)x07?;}7&KdXq+h}60jw3~2V|ULbwhJ*aE@#4klB_E>@CS{C9tR>M#iqKqB(zgnj50^VILZ|GueOMDQw;?MTAC z1b<9gSY7&f{0Oo~!{p>PYIhUTbZER@W(5?nxK+WcB=zjsvpB3&c6{6x$8P4YyB~>J zfJL#m4=#78R+_u&C}+{`-70^G(mJm?mZCcwyE<(I6$FCjVS|}K(V-4}v_B)9R3giw zSy@jz@&SYqv}_`Y2oMT0ipqq28(awv1?u?A?hh@smm0@X$`EvCLIprif<6Z+XX#ra zJySI331Y&U7{x088uLbn)b-*F1IgG+lSaCnOc$7a@x>RiuV5EoR`BIOt=lX}WZ-cpFf^h?&@F|NIekx{B|t-@ zwUh?u(6!fQuWYs&<{p1JL49-`{Lu$KWJR$u+r-md&lxV~)IvVH_Rg&6`@Lg>d;1;1 zxQ#XJR*{`g&SuNaqfs$+N`E$vr7DGU4t(_0gf!tk%4}!Rp&OB9#p)E#pn-}WLe4~f z6M@XWzM1ezNb0ab=Aeus8R|0esXzAExY2p!}asrqEIm$?H z9;B#4zI$F3Lpk}N+=kyRC5y(>tBk3A zA6BVK@YzfIsR2}s&f4avQ%)Q2nGuI-curP~96aMTnz>YKq+j*&6?5bI(!V4^ItGDW z6}5>!XhLaMxg4JW)w<-NOMT0(IBu2s6GEA5iAP%4f?oDUl?V!JdMMf*_VHXq^}Pt-u>Q>yA>OBaU>oc8>g zsMyP|^xc1+GIQ&K`KCU^yEO4F{fCNF+MrkFk8%B#)aKJl-OC`yF1AR4OIZ}Ok6l?{ zO})${o%!2+!$;<|igjENZSAI;GkPyylQWhn$IweP)0ilky0;s6NQJuFOWQU+vlci^=oNx6tuz_^q$T^tcq;H2t*QJ3Hz3rgle4YmzB#%q|0G8P6(%tqs-o&)WG&#eL z2;+7JZTsqtVdm&e>nu!1h~wt;_ISudplq>(TVbAJ?>I`kyxz_G2ay@vcHXYr;%7Se z+dY5qG4x6T<#J;`Vj`dPgKp&k`Ee(74mnd=qa6U$cE9RRc{cCj(oD=L(L-c%8tla} zIRHFC!@hlU+OS{4O;^e!Asv+oYww`?ev`d%wKtS_#bge`)&?7t6W3qM0@8p(IhON7 zMv7>QE>07Y?bXEEqlqJiB1&nD-a_LafBbcaX3!eSPJ$g?X8-{?_u2p zlZrv5S5hY>`7D5tpsj&)(*Jrm9D80P%J2`z-E3g5c-iYNU)pghY;?{EGV$BEWhe?P z(M$$a98_f0>!^pQv-Ogcu(T{kvq?vh1w8Lk4hMS3Mfr7E5HnN|@)ns@o&N7;{@POl zi8UyHgpG^MgK^=Dck+sm3aHFV(IocI=3+7h)&CQKjRc z%-;$4?+u|m)(sIjbLcMHzNaBvnfdE=h06H@=I*LzYO;M7ZDTwZ8ZZgL$ZPrCmmF&Ed_)6Irw>R^_nr1mD&`xy@1Q^ojpmIjJ z&o(EV1G`Vc7gqPlfsJinWpR6LUEL?ym&dA0cKRGHDQ>uuXM8BzQ3Tm{>*pNByWS{& z52bk1iEqT~f9`<^{MkJ$nIKlPyW&9OyM6D9mPwJh z;aTtVIX24)+?X?0TEw3(_cdZE2XqkidO?zc+R|gWrQBQXt2wZjjM&ZmRgbhf-j)Me znoN{@8hzEv`Qo@t3NxQ|GuAWBSQ?Qpk=63vIB=!1=9sq+vI8*VY_)ghY$N!83*N(h zZzi|XUet>J)2B~!$%y@piELyp-kyf-T!yB&q5b_}r?Iza zpwB-0tf>8@jj!Z1HiEzFO~#YzSsmKboxQqJ6@`|+50&}Tn>0WF{PQ|>y;U#0`}kI) zuW`F@U@k+GzFo=Pc_FSVjk>6R^qD|5g1;rjGX>CnEG2HQy1wkruD$^E9`3mk5{(>~ zH1kKyx@!I!MZdZiao~E@ensS8qw$q|`$q7$baZMp)oS>v>&rVAjnZIqB_z7AbfOwl zi_T>uYpvTw0Tz%$4qQ9aEZ2AWXS$8GghbYXk87&ywH?hhWwxj~ivy~EY+2V+pT+Mr z&i~@TyyxQ6@|*Dt#L`GOuo3*7me?f4$j;045{(eW!%FD&>(}QinKpdexk@ev{DHH1 z07!z{`}KUPH%Bxig{t4?(>HoLVyivS?iK{*Po6ya=9_N}RY~XR)2DpT^X%EPQbMGn zzyt_?dFr-7HEzfJnXux2`QnQ&JW+;l3$|k5IaS-p2>gXDGLjt)Jx7|Ic+2_(<|@WAyW5Uf6!6Es^n@Und_wFx&rSIGaA*k*MMG!0g+TE{DPIaD79!EedQcP zmnoH~)}v8mCOmR_6@%LJy4iPw43)x^T6I2Vs)%Bd3Wbb+^5)H(5yoKnwD^~NqSVrg zy`bv^(l*f(KdZ$D38)&<5d_p!if90>no!^HU)r;rE#;Nkqn+wILI-S-4LJ-1X@=yh zSFhwF_)yKOZHsDPehkp?1XUz!4P?~{Bf#H;k}n03Z#+r6i3C`6Z0DgA2}x~^W!_M~ zLbx1AKE1wwC5j<^80Q?Mdx%U(Ds)ijvqxhcE!L}7@aM~gH&OLEStR#(T`Dfs5iSL; z>ubJR`12QK;IBx70|qu81)h|KBj)Qg<&E%lfJLQ+KcmFHj$ey}mCslyOkH#mj1pT% zF#8;0B@TE>TXZZQu1oNzIohk4kd)Mj$gwb2C~Wh0yU21|YQ8moKo z2SAd45Q!K?dLoGwWiewBHwv*)e6d@IH91ziYHc?cH^|p%jS<^5OddDA+Mw+oU~lFs zVpkk2w&>WP;7=%d+wn-o9@Q`Pi~L46Q`BDZ^ZxyNfmI=9Q0pTv_U_#~wNW{pzN~wQ%%sC3%J9JrW}4tUhQIvs zi}KK=l}vSH*7f@J*I&JQ1VC)-hVP3mg_T`Ul%@hE{$lct#|2vM77px`QZuLyUQ?!j zHZNbkl)O+&rJO4mORo_ncODbWP$3kBV&0m5`st?%gfqLe+rFX7hfTMfZ!Ce{O2@>L zE{`zD$7gd;A^GjM-+CFDH$zY4A~Yc~7QPWPspj*p*2RIOI8_v27B#lLQHUh-so_X$ z76Hj`4Dj|vN#=0o7PUjyn1st5bTjLJP@TBlT=9#CN>iKoP)9yD?lRlbL~}qL$%$Tx zT>}|j_Yp_HJY2k1)J~`ik9-Xu{8mvuTe`Rl^UlOf+P(yzpq4;L@>fA>wT3Heh2o9d z_65G*qYs!_x|5YDi(cEl8qUmoZ}d9zF+s=sKbd4&vpNL!Mu~Ugd`eZ?s1f~tZe0=1 zsNA>`7mtaYs;1W#g!8HEGRaCMV)n}FGm$}WgV4NhXt9T6CVJLPGGf*fzyL`z6IH?_ zoJo4zbjomJ^6TQwb8wO^br^y7(BV2f6VG4{-K;<`|6EGG;UK?%x_91X_nyDe z32Hy_pgoOwR1YowT%9jXgWddbhQl)Kv+o{E_-U@vx^|(1J%oYOvfEehhzyLGRVK_eXWhp1s z{xnMMP>xkf)FGVHtJn0Jfa8A(+?q;63{SR7kq$bB>wpQ!i(l`5?E-3WW_r~EK!%`e zhD3#~s^Lo|L78NsrOr7E;AZ{F|N0>gRNGTW>EPEVDxgY1Qgv*57-$2$daZT{JZRw8 zKz1L>IMO!JllY1Xv12%N*HL+~4uH0T6nrD9ar*}N0yQ-Ax0#=iVU&vaustwK(;-N|0uKa$r67h#3A?M26lDAAm@;i zscp2-n5dg%{sJ^MwJyj*_%71AI(zA5zy98hfSf(Gtn(Y@;sRx^P~bz8v{lnNb6*!b z5`SWZ19o|bW}i)kumYd#v;h_s%Tx6_=MXxAx(?R#sf6Sh13hR&pf&$^Skf96Uj;j zh%`BFlu~Q`3XU17Kp1fXBcaCQG`x-vrM*}kivL!k&XUnm3x2JvJT!lUwY6Un+Pb9_ z4YgM?xbfM4%QIQPv56v1-+oi_JTM`n5n4D3*G>`eN4z#M!3`aco#L_6k%ldD5oum7 z2*S2|w7I5)-0#2t&ZaPbt#KS?HM+CUKmWXilR}K(z;<#W(5SNtig<{+*C;cJA$+*A zSwRy`@UB$1eOokpS%Vc?3Y${(?o(kaX&C7q9#AKLrCO>F;{jD%hbmx{&a7|$4zV)k_j3K%{;xCetzv zqf1)2?y0?kc#za95aEf;q}s>YhRo37KfeP|VI8Gix@esSWh&7vCvt1Lum;bNKe>=T zwDM(XvaS=V7TG2@8ly3g5t1?l^TR@a5+-;vfeP&?_9fwe(Y06eS9kA2PWgf?O}8cS zSlYIG5sZ*wtaIuf7)uqwk`rW#wCcBCX3pyWvL1Sbje96cHP6WARDNE!2&I+{g`$CcV+*|e>lvz{)pfK0w6r^d&~%j+ zio{1H*$rttBuxrtn&#UJc{MnMQ`%tYo=zz;quVR^JE62lgmiHfHxUrqH>YuFw9xMd z{#-0QXFkGp>m1nTDVFYkva@)oJLJ0s*m0-(1RD2BTy9YFcLKFG#E3HlXX0Ny)?7Xj zGB0!J2U^Azbye%bxQ-HBOX<}(-1Z>*<4PxtuGtZ-u;QK*27Qnr8c!OX%q2UYG@XAw zWYlE}_tTV`Egv%E{u^98`0HNIfBzDl6hmT&%LuFP6vCu}Yd`9LaX#T)UeH;DHv2?6 zpIDueFB;`{x?P{lg1=gib=uVVxp>fX~7=3}r9nwCd)4xoPInalPa&$^HO|2=&QZ8bd|H}asV?M@4-?J4 z*Upn&#(WM{P7So`m~rhfSIn9zjt6Nrue*x{bn)Qt8u`l#yP9Pt@b92(sre(`x`&WU zZ$7wET}XxQtu8m=0Li4QZf9@uQ?6su$@m_eRWB{Q5-o>3nQ^hPXCoI6{tjh%)dnqr z)R{c7n;IH_--Ab#|FD7nnevLqdZ;?H+p_v_^jWO_kdT}Peit>T{mt9>g5WDTtB0yz zoKEXd`@MtM7Z3hsjME#Pl-6Oh5N-~!G5Bj_TCeVt<{^5KKMNe?#g!*p!Rsti3-Fx9 z#TnXHy2{kc;-M@^g=BNx)bpU1JWuM^TF}1InzDs|4>##M-GtPOOLI+ZD!13)xo!#W zC9ey>SqrT@5#mD~oKi{8H41w!p82~I^H^vca)5gfE)Y2lszV~1%gZ75c-X=>`tr2b ziuJwY27F?yV1lsK(^6@qg}b7MzL+2C`M3rnvJvn(F}2r8!Q@DRY`fyM@KczyC{p$4 zw(gE!;C_< zfE{#Z{k<0tx8rb=cTTf|smcI8j3aH2IbGf&?>AvL-ww`~5?>>Y_Of%Oj@l)Da|k1- zkUH5rqeY{yKH+ol>meWftz!aJ_qK8cPrY7$ArBQk8uMU-!hn_$h447%0A!hlJrGqY zphF1;4RncgX|F_kndBayH4By!<+YCPaH-lun(L@0IiASPrUIBC$xoYRm_NE9EW-0U z=C_o-$usj80`)l`LS4&_9w4s&DYf)q7oxO#nghL}BMTA~)deyN%!CFIRUsNNbB_am z8`Ets@)EcTCkVFHYN->+WQ2Bh`ieh2bnH+_5ocoCrCEFMXXa<`BzW`YjmOPgB;Qj$ z#eb`5G>6CsKy~4O2NHluSlXTQ5F_o>esPu5!o9{9+9nwVuIejzip``8M(-{1TV-RBEkh+^{>c7^& zsvqja=Yziy4pH_ahsftTBy&V>Z5XJieWG#T&4ZcG$7j*Tz-AG-8FLAvy+sK7fcd%Ew7Xv!Ha$&n&hA$<$ll zOh{IA^rjj(1mWXh>Kkij(Mg5k`OM!4H2{9#LglL~f`(GA_L^iBg$JVpJP5}V=*1G0 zx)v#F0=}mBMrc6@#Be_276+`7W5uc?9sKRq{EfRcKzE_pxdf%A`KJ4S_B=38zT{a# z@|iPvD8EDJ9qYKyaRM@PEKOQS-wFl3|NeWqKM6?Do;Bcu=zaO}W#$lj%|;XsgS@eV z&)v&Y8c9xf*SgRr`Fwj%PMx^DT7LZa(Mvg>uDYRP_|mRTVgr>^Upc7v@89R6YAwe( zHya`@373DL;?)k?q~2qH?2kYG$aGb~c12E}`BI(_A3jt-+p~*&P|z4S1e7qS0p%Oa z#G2_H%@ER9@;_o?;`Kt_7?Ag<&PfgSO%`5?>CmVP^ zpX1{f9eJLQMqSGuHvlkBV!7;l6Q@>e$q{uIc+efw4hpi|lBE7^z< z718UMI@IxhSN^Vx#*9EXhG|QAY)1JQ$Wb$SJy{oD>ZXQX$LV|R9-hOcyBY;Spk{3G zq!TtCXO$S^fbf!Z#~AI1+-+YBXqA6ZWR(VB{_fp75Tmq!q#!txq!Bq4nWr;lN74vv zg|JGpe);8>GZAPUD{YnNPZ9s6bvO;eU%Xe+qTzE{A+FC|{;xGZ@=zUi2fN=1sA(5TE9^iU^l;Vs0_2O|(St}lrT zp+X){06Wi;ac!foJuEH!%xRA>_UtF8dr_NS)#&+yZr*l#+KCe@9c`&d-Af=D6E?+H zN25P~@KJHvAX6@~oXo~8&BVGE2yx#;(XMWw(A2frk?;M3a++fB!E_ZM_PG@KbWL$4 zv`ssevoi?z4cp1GnzK4RH;(PGE)(r^GijZ#pX&m44+yLX>it`WOPs$E*iD;KiK-s? zd42Fgw3V=KAqk|Mk8?+(mJaV-I~w5M`rM?%T; z%6m4iV>W*wI6f<2s&f=E6B^G`3ZSRd!XbZ|i;t01`CX^&Y3F>Kt6rd=yfjqlFs7`l zmw3Fu&JX^KH2BV*$T-pxa{$b&IE>~2(jEPSdwKvEL}rktpDdkTCqB3&H)@`-$mwK% zHmulKQP?NDNJOodCFLQ~r({HAn+dhND93Bs-qqxNe2biqgb+ zQW}^iG&xq>hH*~trw!ly!27eXGU5c5Hf=3*E2mZ-dy#yRMTs_xuEZwV%cKRWh01~cb&tfx4GlzJk z;4hQ*%w~HAtclaxDYEd_Iv_ZE0K%_|cq(T41gc$vKiMfh+Q-d%{!USEOQ3UqLh!d~ z`&tTS%DuFiWL?^8ul=F#+6?{>jj5c1QJ%fEkQBQb=U&V#3P4*{9VY~Tn@e$wtM76& z)|p<5s5qb(!+qStXE=$YGX>+ndjz6g6*r_LjHt_1FR|JO*9Us9F5j52qXf2r1a)itRF|Qe`p_u1upvQPchy7T$a54`jjPj0Cj@`WE(g|s0m7qQUoSf{ zaY(5^yYvkuK%fhM-+h$Q ze{$we8D^!*^miO-=_Px$c4}p#%f~m@#8x@0MOEXv${eB$wN$=2?GZtoB+Kbo(MD5# zMaRu9g61EajLl014Kgo(bQQPtps|^~Hj(TV{MmaW%xl|nKj1_AW! zL3%Xk=zY9i!5=&f)UVV#c^!kv)$`z>=~ZBDyUfG{+UDB>hu`jhocDr|8`S)H+NxJk zhnD8KTo*NG4&j?wX)qreU0cQIp5$t!_ff?r3BLT9Q5vIL3;ygwHQ}2beUxL%slG#a zXnhZS*p8|evOYg&sh5DjOwt6c%et#?HcM-LhzfL15g~u86+5s~!S6U}dH5Es#<>Tx zuf3#NrUc_=nn^qHTMe;G(`jP1+qL9SsalHGyh z`bRUiFV3Sge}=6NPI=_{Mql1-=C3cS$3YtuLIuM5dwoP7r{ObyCj?~UI3Gjq8~mM# zdFfbPYW_+Gt!}UBbuZA`z2`6UTAd)1pYvaCIMn+IdR>{5Gw3;OAWgB?pqr3Spn@AU zgJe=LD5TMUpgVy+q1cg3z21$#s2s1QN|V+;?l`My$88V<-J$w`gy--RYYMy^-{?zw zzhw@boHo6#vCSFlLE6X}_Hr5>K|Kin?~u&uE52_?%U+41C^mgt+JlT7R#%}P}Yq>Ls zo=mVa#_5@)t!8)2f$mA2yQOp?c2^vDsQjyfKQj7vC4vMpesiPy&dDrHm>tg<^Xq%D z+znpucBc4O@OLJ+*I0`KQ*hv_d6(-I(j?SLQ`$tY2KAe16QMnYMW2SGc6F|i8oPM# zcbZOrtbwXIaMhW(njtfGe5kNvMgd(9XC=}mN_I|!>h-jx7e(6DnJacL-uCUqtlPp_ z8*sPff6nMLCerul(pxnj(96$7@+CLju91z%@fee~Spu3=aI>TR`RAW+lCYck`?r7l zx7lf4_%9Be%z-bz{E`tLu-IU(%-_HK%fCo}F|Kqp$A~&v=WjdQL^XeNrHgJW)-`%Z z4(we3xf}e=c&eo%zZR&)focvsRK9t}WTz#Y^$Le;JXgw~=SXC_)4rd5_L=R{jtbL~*yx&7V{J;hHGDV`7hF6Q@t zZm0%p=xPpZ1b+{ex2R^^>ez(?7h3^8Y+&){pMQ4IhZBGVJJgAnVx54@8lsv5ik~K0 zZcT)0g;2Buu%3xHuul6 zV4{SjSbbPgx)xD)Ye#!F@`TsM1xT}hK>6mIZ{qLombNrvPo6xXI%J}{;6^@6e7t3D z3je|d{YVF817|R2H9wa(4}>Kuc$M(;=g+B{<>ZIR!FAea{g(=@_@Xkt(N6@#B;c)? zx+~Se{Nby+^b-$#8BuKr{nb5jtX04b8Vd9J^=sPOpa2m-VFkdTLQXRoKp>fa3~pdz zeslvxds+gMzv7Hgef##UUZn*n4QH5$!`5E^CBsU0{(@oA(OuxvOI(7ihL@XJV@-xtFBSc`~u&ls;G_%FINpl1N-NVZC**iK$L=c&qR{${8 zH~wqnNPO?#zuz=8k*TDnUTu2#2%o?%7zM-vo_GeDlr@%l33&_~)ZChXyrOA>I3tqb zjMWi)<9idmrwA{>_i#JVmP4w82B0mGm3EZ)61|MQP%1Orn^i9!{3#M@4E_R_ zz3IXElASN|A1ID{|``X1cqsPu#Ma#OAz2;C_k*=(twWHVp_a14@@ z-sxo-qpJa3q%ox$nP?w>5XFCuUV1Su4|uA48%z?J7;EN-GvgNo5w19r|MI1V&`+A@ zKp$FCvREW;-;qBHR2L4I4yU1QO5e}W>JBu7o>`b>%40g?KNvpoDD8xsMesp7 z&j*>9_XB>1R4u_7m%`F3lg4&bJs-?MO&sXzOfv;jtn;o< z0b-)|MvQ_+@t?5(rBNg)?~~)v3gpvHr2M!}bBc zw5a0C0FKmA@w=quGbma-X~`Aj267N+!8r&1)NTBFNSxQ2&lX9_lo$^!ma^o8R;#p+ zSGNIYZ24l#IFqbe2J4&je?4$RPfNq1Bal+9z_zuTkC~uV@9=PwAsc85vsJYmRhlxNm_Tm+V;svTeHGpl1Z8p)Y!}u9Z(iT79A|m z_w->?`uZ}R$Sg8F+YR7D!Z{YfJZxNzzmgMi$}nIlt6YZoN;6>;WIhG~(KvQC<__`HYhZt$mg7Vg`U$ijbpqaZq7I4YXX z5u4(D-!fRD#Yv!G8RXa8dm~z0uLe?3dmVV3Fc3_CTrCMREtOQy#DDpqFXPF~J7U{O z(TF}%_}g#4K{Yr?fpWN1+D03xo6co(0#?paXExJMe#;|B|Mz#W1*?xAKid9pe&0K6 zc?~K`89QBNg&~X?;;gPw69O#=Zje_gRf!YYpBcD!Ax8*X+V3)wVqU+}>U#~$+4i%b2iKTKH-$NTAti6bfNoqO|P^}Ns zO|OYyVB@r}cC0E&5zh>1i^j^#L>9qZjk|MyplFM>`{)bc19IR>mpnh9_#klKl-HvAd=Bgt@n8R{7du^lKGWBTivySEKu{t%9lhtDco@W@iEeiq#DO~p>orY9 zw^w?uQ9E%Zi5$|h5&Y>)`+BD4z(g~__4Ms}6eVoI4uwo)FNQNK!@g(RZ^(oz?bY0W zkd5PpW|?FwrHTCWIEF09x8=a@w(o7x>NxsiZYEB&pLIO}U2j>Rut&}?b+p!VKv}?t z?)jH)oiq9xWpSYBHh?MEHKQMxg0byL?%kfY5&X@*j}tTNdK4Wh#6%HM)qB^8Q zMLKNI>oTgtfjTzOHMTrt{#NkUk+BPZ)WdRMMn6y?tQmK8_D*46zvd4CU#6@lUs)&G z%$g`kdC33uuCPNE-9rOQ&GKQL2D=A|RO2vL!s)`w_8_kBN-5jj;O|Q3B>a8r)m~<< zj+WcFf3%gPyheboG}1#A^h}gvHd`?3&?_6#rL_EgD1Dnq)4aV%QhFt5 zqphv(ivy(`xL%=iDF-HPui5H<8sggs{-#SBrPYXa$u+hVGp%K!YClml(GGQ{2p+1L zy_$V4s&y@yy{vsM_`BW~{zF-s=Cg@^mL?O$sfS+d zp)^h0nB5y*Nn}?tr9)d&gSl${Y*~IiNj=CLK4x?mdp7bASG~+WKV|wsHB%yOqVp41 zT5L==6&0!0X5;C~3`B)emFV7;oWqr>(GN9K5}YgLjDWN(fByXWA%U|rkOz1`*EfrR z_VB#^fsffGREocL9%tNtf4ta9qf)_5+J4d%|EEu%VE9tGNwp5Nb!2C{ZC{-gc>n(W zyqpg(pLfQ&j0n<%?78UOZQn^3^qX9mYjxN~BPYuI8NHXh2ce5J7m)58`26$Ffk~SD z0i8p4W-fr49H5?F+1V=ECS_D^G)?eFpW=xP@TO!w{4t={`U8d%m2g&@+Nao(=#%|5ujHg;Q z9mh59W4y3WRH$@+rNzcW-76{0)VhB<&-j3ny09m?f6^w}kSS&6gJk|@By+DWcDLs5 zGJ9~B$tRUs<1FnZAdG75md+xw7*BB zQCjzA6xm*4Wp~^6N-@&|zPo**{VaJ65T0nO`l^%D@+KgB z9Y>BXoCv(6_#kRV6Wfc+cZ0u`hM8J@R}SWe;yd4V_TE&%norLSxsg9K>BHBrU+-l^ z^pbA=viNS_U%uoykMk8TAzTS7U;1?|8#RIMs1vB7c$*05r;bKsGGa4sgqIdMCvd(_ zUhTa^;H^A=Ti+@&)NfN#@^yL!<{JMNJwN~aGZNx&{8RNehB9KvV5@l^XVDVkLeB$$W>Abe1EmZAG{SlIT3nSdrL8hKKRtp*Kx zNr=AGH;`lLD2euro^OwvaO89R<82nqf6Kb^M|3 zVwzTeIbQQ{jzM;T|7HqePnuGgw3=44y^$NG zrlG-~s8IM~6d^kes&Du&S`BGZ%QtV{)G>`-7BooJtKr;L$J2s8L|`)7^fTr|s=ZJS zW7~s2%~05d*E+*lwygCnhGRtK;I`Su2Y)Sp+PjB<5XL$n2l$$l2bsLbK|7(q{P*NgN+Oe8?OkZlXv#h<5-11DHPOydCkwM z^g_Gv_It%o_yojv0$2b1^Up@kDgrYgL5&382Q-SP>Nm5|eVikbu`qnWw=)!vZ4=8;-}6j6FY<8#i-fB*gW@PF^JVtzuJ9nJX!zA=Q35vVkOg8#}(1T@Om zRWteg8=i%Ki*r7Q`I)1L^P7q{kri()04!?qH5JB|%wQ~&jn-^8_$viu?Kh9F2jz`V z{{CPLOvXGfU%s^Ne1;J`gsV@VK2;n3CIUEG3eKLEx5Pu$e7IG|7BkrNYvLYE-uzX1 z*)pgY)lo*Mkn{m95@INShW(dnm|KbF%yB(Gu^px~RWF^1L)}7la*+ z=umb!CO_se|fyqc=AKpw$-_7Z^eGVR{b(@ff@;}g!z4X$dBIP&ORJk*0%ttlR zlHgT1o5=8Zes0~ftQ?Em9Jk;NA9WP!JUo9@s2Eu0XPTdep4D{wFT30ra{uBchaq1R zB+u>>bDRSn03AagMqGq(pH%n4s(N~;Mj#!54V7Rok0ArGTrwF4Jj3SxKs$RaGtzzk zcas}K`5)*^uUNc)R29#pu@twx_S(7j$uF;3dz`H1aKRfsgmI~&Gtshy(sUbR>BDnA z6VmmSzK$t6r}|gbHMMv|IUAv0N6{mv)~}FBW_;rwTTtl*0>VdqJh24R;(#NX~1wp z&AIu|OiYSuRMN&I6$D6qF)Xh6D-APs_7f8#%fjO6?c29|1mM;Q>G+%g zH4Vf|CD`|W?AbH^(mrRZ=*!T%g(gl`=jZlH;!GccC8p%k!hfOKG5EV%(VUE!0x2ay z$EE#x#Wb>I9Ecq!61${$!6=$(Nb$C_wA9h%j0k!}doUl0c!cd`>h5zm&?_yM7^_!R zfGGerVkaavC!O{eas(yvIh@RFv#G|Hsc-hKAczEiY$Gv~QH{-dxeJs{r*~O+@L8%w zhD%qc1vECwac_3+S@Wl}pDd*Otw@`^W=*WBEGyLWH zmvu={)*o?(72fha!VM}FG@_QUEo)-wy)O)Cw9nNY4t(|1SK31Lb$%=Xd&O$T}5!%Xvx<(MkUrz`cE~{NYBo3=}}lyjPT*Mt*WHWQ%b+i$<+gTET)PNd+`U@qi; z(Xw7o7e=KiJx9-#hcF%6L`ec2T2|Y>SHP@+j@c#^bEK|uvCHlG%&J54k&I|_M$1&c z?xyF*wXH)l6WNj0?U@+fc{8iav>A#IaFy>*qp>jwCl1TM0Sc8P|Ai*Au25y3+?q~M zsIg)j6t#lJgD&ySfx*?6hgS;CgCvcup=gu1WaO7it3K(u$vXJw)2 zrJwA8h+yiqB5FVcsfzy1H!C#0g5r?;dut$eRbQ{F`2)GALQbMI;hHqnz`SHN69ka% z${kk2+3Sc(z>w}>_W&9>CyW>$TV`~Pn>f{LqU?yFd{Ya+y}(E??Gk*HMEco(C{sgN zzN-cE`{@f$%8g{i-H10dH5}O_nls z$~quQo>>Q{2Jzp(p819k$gymZ1rnnP^zcP&iyBA)?1^P$a#R~X|CUm!`Do8Zc3SF{MJ~|pp>*k`*sskxxIhl;q)suUai{( z(-4;5=*Ws2f|3V50RaY*;>no@;f2J6D%yuZC`opW{s%m5wY&++2X|u%qhKR9OQ!~BHn*5)RBjutQYaP2jT_X?jRb~<>c;-nLlAGJ|{3gY>-K{ zMN6RVle?MS@2y!;@ORpOD}YCHX*v^I!QW_=I01f_;O_)HZ3wN<_;1d{KM1kLsAUhU z_IPLzz1_ho_c4f#-LV}Q{B_551iNR!n*O;)pD?uony*HG`;d7bbum6D$+2nd|%Yk!$O20eONPTOUTH1~% zRe-9f$*maW4!b-o;ddyDh0=X;Kr2H%Ll1x4C;8XF>H?FL31S6**U-t3is~0o-ijS0 zET_Xc=2iELRBk1X{Bd;`#sds{0*rY^i9^}+M(@a!uUVv zN+^4xS;60=V!ayLc*YBqQ%pA@T}_Q1o1V<;@vp(8=@wdltZz488GH?KEGnksz((+Q zfjKx3!viKKraSPl`DVH4%;^CUo_)nX-R@yR$4+>I+yiQOFOpf`URXd6RdUcvC2k96 zBlx?(?pwgq2P{XJu`cztmas;z5U6x^ zd?WaKsJ(-KK}^3n*x9G#n=`Nuf#m_~_;#yadM)IwM(;Z=TZ#|0tGI4U>8n4D(AL7E zk%1$+r^}Ewg1>+N_kSOO$4y{9tVTX8;Wtq;8+5V#w)`(0-QF5p+VKwCv!$pPk3Pur z=bwK*2&Geyxz@c?h{+?l5&T_AidUkgNVjHO7Ef1yrx;7*haY|@64PqDIIuWS$ARe% zd_d;x1+trx()(Ti>7V|oPL8YBtvK)yr+x3uO>i&nN)g2xf4ySUe5+2VglrVY&G5{QPoF-`Z0VbwuRj$?stc%o^UXJ#-9<%v z=ysWZ8UxRzihMJitX7P`4^((3b8DbcDpL+7Rx4Ow7YzO6?++ww#skKsQY3RRj9-DL zR~L_aHQvdPp{4I@n9+46j90H-VacVhXrznQNj!Y+i_x8~~V0FKNSv_N56BF0kzznDpU)(HuCrnQ!1rs<;$kYZBemw1obk zqBs#A`8$HkLwu|OW4(R*7Crytk3WEa0I1imU*~tPXo<$M2;M_dc^9Eoe`}9CXp2G`8l@EvNZ4H9am9E(9o^JvP1pE{d=S5<> zqfOmvShT2b3^t!d_tvr^IhR9!f;30!SCqO7RH*xgQiVnA(d+Ai0^jb{-U_MljXA6f z+AxX~J2tKgX!p}aY{@Z3=|EuJr8dZLp8rMNW1X=HD3hOEGJlNa*(Dr2QMhj3Kpd`^ z(~C2IU6Mu;i9JNzESPu*{I$>RpZ+23|2z7fl;M-VdH3#Juv889<^sNdRsXjUEINRz z+5{5c>O{+jx?`eRC~-&aB5f|6wWS_(@xkID8mt=C25I71N)xNz4;-#^^H=|SXsdp} zwta(UTAf>l0DpoWcFFn_vGkDV7i$2M(Hz^QDq=YL7N}4~isb};lHP+x?Qf)Q1oCa3 zu0ZUn$CL997uv>`=bmPNnL`g_U68_;Uw*0o;t;eYS|kpS@P`i{O1l@0wb$6kB--^d zqUa(`GoHME{~p^Zb>N41ZfyHj)NdXRgWdy{Csq_~Y#l;qY0y$KAB?LtqD?}4Kq{HR zB{_fdp3GiI7s3Z^1T+c}ZG%#Bf%G`Nad5df;_+Hbu76|3Kv4 zzF}q-w6R%H4SU^KnltM9ZuU|DZZT_VGFCMQl5}?qWzsG2IGO1r^e$1P>L;m)0f+$&6AN`SQD<9y#EDZ3W4D($S!sHWlPSTjXm# zp}TWv!K$$@X1IAas}8JgKs33R?v80tzjaXRClAq1Z)qKNr-2N_b|L*|b(f>#FUZpv z<Jw|d0Y+c<3IlEoYSU#j}|1dBq{9_iPENhqfJPQk``;6BBX^> zIwfQ&Nn}f^Bm zQ|FT9J2(GNst4WiZL1#|@ZU9=?iTdit$my+yidMF-#xwI(ZH^{<7W(A=V(|3)f^C> zyMgP2_3|x?+IM>@cW$uf4+&x&872H^i)(hY#S~4^y8QC`y14<;nEH-P*^Wmg7OwVRy*AkAO%lsrZx-|B#_SP#S}|fy-F93}v-7|3 ztBv!fA2D&!s=MR*#z&=f@zaL8=bCbBm=j~C&pG=b_r}@mvrR^77Zy#uxpIGim(Pfn zs3kfcgM2!s$#WJSntd>Ji^m4P*N*$VP1+u&^q)_$R9}=}Q>)zFm|u7A?&9mqblrMR zNX=iRb8V6$cd)HT&&{cycew5JJMreVlXKH zTo}&GP<(NuxQN3+^W0k5V8h+ZU-!Scv2t>Diq-O<4bk=asg=$%xZZNQZ|N(NnZDNc zL+{h+{ny^f=304h)0F2; zhAQ!UWINrKzJDmalDDb7q_HBiblID_9Ot6!Qfa*uX2Sf1uJh&_*VyykIdQh7)0@Za zoOEV@Uh?k6i)cMhyuZ9Zf7*vH|Fnj@{~I%j&E6qt>D9UZF2$>k^CZrDcCF2l&-IkY z1<3?0u9YR+6V<_r|^;)zy{x^N~wk)e2WwCm3!{#+yfV5H@A8j~lzDC*|OTioJZvR6my z-Lxuqz4=!AbF;W7pQZHH@^!DAuH$2QBa=tI`)jt;GwdtN?Tt+|Cw_Q2QGAJ#%1i(5 zz;@3=Z4TnMEsMCN-mjAq2`*E29Oo&t$Nbi~GlDs@L>l#)v+GKqwymnm?>c2S!&W7@ zF0pOvy4fk>V!k3T3z!|n1vjfJR-BJBnrxx}R)G8X*#3;9@Exsco%`ea&u1>XzHQN5 z-T8_qPHwF^`PkCun1SA1E+dKl$*X#k3vPXMZgRBWXPl&1yQJH%Sc`+Fp0+~y(WqUw z^JN_~Bl!E76MYA3^Im5h5E>LU+2$)#VsgDEzLZb#*b%o0_3;`tX~9g}7o_!hmXn}r z*T{j0gUbi&xMvvl>pG{`cc)6`?Hm|Uk#0XPB;7&u>5bN2&L|z#;7#*gE_7SBaMqZL z2!?L&HMPshoURh2aBf?XM%Lkpc{K&xSy6d!{VLR#raI0VKi%6(cHlzwi_9Ab>PAm{ z&{8!DkDX1dINq*4rp$iml>_s+&4pXf?U%OSHlpp4e^X=FZ7sUmen|P;7|SS5=2kVP zqS}-FRh7wJ^DENZ8Ny;?!rZ@UZC3lXFl?9n3ZH<;>n&oBZfQkuELAqrO86F~s()`v zmbd*Q;g^fAY?{64aOSp&8zVXP-(KN3wXV$Me$Cx=2ehldJbzz(rR39v$W51TGF={N zyDwYvg~y`tng8Z?OW`eyahc=zK2C9$*D_XFZpUi7ePukSp(_1!0I!d9RKBBk8}Hz2 zu}^95)8+2iKlI$JZ?a-uM)AP>WVr_w+fTF=7~U`9eS4>hoIYU0dD2SHHuT8*$m;Y_ zHeQW(uVcf$*1w5qjNx_OaQoICm41^)4$St`lQ!F%l(ji(3r-FfUT`Ki>A7C-P2H0R z`OieyWYgxoc$waN?OfY!{XCv;3%}f4Xgv1lGxs^udZwsrO4!`YR|$}t!Q2?NGtw<3 z=Zmf1Zi57Rq2{}u6`5-eCvh=jkIx*pZpuJ{aPGm?E4}5dc(Yi=ViF^IwzHSXXXiflVAg~!2S_wT>P@|m%xZ0AcB|6ty%!dM$Q(V)5AYoiRU z88Q9axtL9zuO!a23m+FTn-QoJ-*qN#OZkk4&6gwd;#QVCS-Ps+=W*8u71}`5BEWg= zmV?=ikJ`2Ot>PQxp`OgDNFIo?w%p!t6=1DVZrEyj*E;N|d*>sOd$LyZ`?j@{{h4v4 z-GP#k+g=`GDb-$$%szYIRz#k=;C@L-uNw{*N>9C$t=gsdT6W6lz@)ggF3+kIW3dzW z!-OQd9y51Go&H!9WuEKXdtlOw_4hV~U%Y(C{B4oVd9j3~lBEaas_@8Kk7?NAJpQMb z3|D?#xG(v**!ru@L9e-9*LQC4X`i;zdCs-fW1XZ-GM& z&NwH&&$826mZag6ICL$?Tz*)hdd1onG|L8Od`2?6*`#a?k5D0x4*YPHg14~vImIbfI5bjLx_D|w(*HMlg)YUbEOddyd+3T4M}1%2wQG}Ab< zE4q}ml&d4pcS@vv$Ja^U`u)~~_BmM__l#EO+G`pwH=^m|)9uUxl@NhYK{AH7^*sKp zqO`fMdqSI6TBgIH-q6!wdvzZsIy4!zj*iXbSTkqphF50NZ6m^>NQ`T3Q z1bIw*|4@)8NA|_kull@$AIoli4ZEQfhVKVylYDb`_NFg(vsB%)y)uQmTg#c2r^ofG z<)qa;&~v<)Z24MsS`=hzkr2IMW0CWA62&ay z*t>gnbfeOh68Z2;qpdqm8VN3C?9HFv@`dZOx~^DFA1M&hSs-~q^`U*2sJOt2xIXI3 zUHJKvqKEE}I=8+yOfDw0efp4GeBJU50-BBzm!&0C6Y@G@fn$2sR-SR9x;r)nqfGN-$9%PJ;s z5zZ3U{IIO_^}8i>^_$88qMhY;S3I)&b$-nP%-in?^-Nt>IdaxcP!Ia>KY<@7t7 zJDn0}yfG=QI1lvr3#xTVrly`QMn zsb$U`IsU`m!@E|6mR>2iBo{GdjrHsFsyO?N^HucAFW4B{%~x5>IDXp2yY1ru)4gP! z!B!hdxpBR?6*lvoxt!X^c7c%HuckV#N{Rk(IN+GhvciF}T&*qZ1b67KBmwyUjL(kU z2#gx+*~J?%_jLYkj;u*xb~k!(QM;4FQ|g6>XEbwzYaW-_)K#ks)BS>*%LhBlN2{$r zACbFZNo&@Iaji0rU-!mes?DBv=#1seDWQ$+A9a`QqxBDd?aCBNTPtWLTwf4vw)4)Y z`!j@dtfNP7<22$q6&D z-xTS3ZGDpL=AKNJPoIJP!_=V+y^_4MA(DsmbQzAF_nUbK<9Sxk&^Q+E8SvP)t*qeT zV!_7Ft>TtD&Gq8+Z|2M^%TQbFyD#T_U$y+Z!>Olyltt23Ipi%{PM5G7wC**16Sd{V zTCJYq=acIKKf1in31V*CkkP0=UQRt24|_`Zm2Iqx-B$VP>hiUM>46vG`3D1Z#NJHf zlvR9MVbP|r8J}Sfw8*;1D7t8I-=bA9ULA~iH`kKEzh7u*xv64R)&e_A1=IZ3-ur8p zs)x+jReRn0mZ-pkh`mPpV^Y>=JM7X)s-?$g`)=@A=ri?lpky&mDU*Zl>%2!~w~k@s z`1PvCwMI=)c|ZDCsHkVlp^sApjtOmhB{ONIUc~{)C83Rlug2~ZG;G|yYTNrMUEU9` z+XzVMgqF@ydOl(7yyqVt*w`HrtmhHPT(_@$-HC7g$HYf_HuqT#Ic#0LnnmpT$*^@Us`{3xl>4l-Ne@<1$EAfNx zlaoVMoKJ{KJSh?J;Nb4jat$dDwvHQphpzQ;Q|Q6Ucl|kOH^fYjzqSuz*+CREpU`atUW<@tg;eB7HIZ0{ZPEnwc&)}KADbgG_XP{G^76Nc35T5R_0c49qS z&|j&Mf481{Yz6JO(V5k2M=e=D8pWx}0?i%44%yOCaC~g191qn^fOZpbQw2ro1zj5U!znIVQdje~dVtCD8 zoSrgT%qlx0=-Rou*@?-rDgFM3CcO+hE4$AnUeDD2>5`8%ZcZoNYnFF7C0x1AT@({& zmazV%m+4%y4?*hr8vgnXTo$K;YBzdEP3&JFy$b&yk?B>Y#;o8k9NajC+o{s$!YTT| zr;*%F87GcE%=+TbS<*4?)WEKL8Ea4bnoCHV&2e`T4QyWcWOC}u&P91c7cOqGTN3oC zsC@3zB0=HuRsH3>V_&O{TfDvGjqq;cSe5H9Ha>qE^Vw>x1D8Q%*wFNeCSRfy?&~f( z5|<#p|Blbdp%fct72`8cy;q+_QB#h{4GYn8jiZkkS=W09&wHWP7wsOC(pvhyMoTM5 zaPx?&Iq#QkZ4X=Ny2D0Z+E!wOgpTyflV2OQM#~CtTqf$< z!*yCamrWa!XDZlee7T_c{cNIBFoLdbWj+>NfzESXOUT{V4iuE!kHUm6BRDEb+U^MB5W+v?(@U)oXK z%Js~ln|1rq%#{!4&$K)m!x`5qDy^PtSG0jOeM}DTisw?ngXbDb=ey~v`7%2k6H^8E zxp_L4ym>6E*ZOHvI#^vexLRMZa78Zp-@Yd0ZE63k}lsxd)O2zfN@bk5%u? zHD97wbL}ow-R%TE1OsOVn2K5OKS-Bl(8qO~t*VMFwb^dJQY059KPFuj(dAlko(`$NH|0@mu#a>F|&l}4uu)8E}RUgRr(oTE;F zDJ>eg?%-+7&1%UGN9+67#?IKk&~bX6pi}s@$0LkOEl++qCch`!`2OLERaMC0EA4_DbFjIO=dJuv??WNy z%+1#?FE7)m;V8gu&kL8o1O+w<7Hu;&D{+>(!4!IJFWn?G_nG<`*JQ=4B{?=+i}MAg z3yz;G=Hxz=H*M+6)RQT-SNNZFOt)Mx@BFG`H*)W+oc4b56ekmt3}ZTMt%l z*eTi8@>O!hV8$HAvzkYRd4|P@`=*3m>Uv@zJP_x0!lukZ-DrSyQPZDQrLi*WfKVU5 z!Ocsp(K*b^?~-$OH09~M+;#ZfxzV~4vZtT@CRzQ?&YizaV-5d(pVpY{7t5X>-ybGh z|0pi^o~4V8WWAsV)<-FWss+^Q~>$Y46bEv3VJHPDR>wFS8ln z^*lCEp${Kd_9}dg(++*JIY&liWN}t}vRM+XbA3kxQwWfI2*Lu-8&70z`)LF0M2n)%s*I9PT zzcu)C*yBlw3$JZWX39?8cDuD(@1;}g`YC&5ed61UY*(HVO&Sxrpjx^qX zXpElj=-t7LN0an795UWMJI}5|{aOGAljY2te(g%Jw0BXJll^PQ`Xb}zaKo^MZC1(0 z3vDts&-Luc4Qp|^aYog&Tgy9U=`@F_D{nuUv*;m;L}`6xuv3W<)8|R}&7N8n8=nfD zmbKm%ecE}QV>>fDKIq1ET)rQf;;=LLfMELlPU%rc8yZ6k7&W35S+-MTD$;El9B*EE zbV@MJaAmUDm}%KwLiQUn7q9tt>f^J#B8BJ9kJcI|NF7fL_V8(`nP0~l;cWA!!~arT zn`KU-^N}6X&XtUgcMc-Qm3Wqc8@u7HR5W-9ofc~-UAah zjI24t$(+PJ^+O*%Ocs>$rj5B7(c!sP?sK6{ioWZBo}Ii@_tl8ivf5AD7D_#T@uD~2 z$wNF4@0h!}s`P4JQ1#q%HBOF2ioVGf5z_{j*EhUa)3&teOsJ)A!-0>?*GD!xPI>s| zay;jX->muvEjpNP5 zvph=Qggl)Qsd8SeB;k5(pQ9Mle~o+4VZYpsM<&g3FV1ZVQuv&>tM**ZCja-d=%I_u zT&rg2+qGMM&1yI`xNZ6(E$ff*y<9?>q1U2!4qUrXd2}bod!F;Yf^o&E<@RQKD$DL2 z+r!A02=c$(cq4P;yWF-_y6-1{C|LOQ@p)fY{(_u)V!5qji zJ>;`4Ij21^YHn!J-8;uN%xX(8+2x6c-*?OGDX% zlvv~GA8VKR%J?NeTX5(^r)KVZx9$#6kGD5ZGQ=800-DR-$`+2{aV)ynzPYf8PprMI zqdG(CEnlsLw$;D}t>r4Y)*t%9&6bP^U>-4#T^15&s3Vl3lD;T#_xc4-6+hHTi@yw9 zGBo{8Y(sAJgKn8({KuRmUDF#qp3S;Cif*HU`Y=32@VuG%`N;8%^+L9_^;@ z&xAEI$nDer^>0x@WWOx|;*T*oQ9~4*B zlvmL>baW(V1plU2WAFCh>lL?;9=uv85b!kic;cHY9A)ATVLZZ&74cG*;X)EcFXzjC z&>dSP&D>v~GWL#Jw8*QJlxG`FmW?HfvuyYmpKchPxI_MFMwe2RX&{$yy=PE~zLS|P z|7reu6UL;gVk2VT?RoU^{IO(wkG6^1mN|^Cr>BqTX61i)!0#~EZtaMDLTajs`yRSZ z-~T{(wPLc=rsdwf5y?;UFGX+E-0xhlsd4L63#C(90`r*WYgbDcr3QD~MMYe8c1ieD zrO;nBSKlCyXUmm6=c~m8-Cilu#X`2&IH#{v7LMR}{eDmA#?*HsYG*DMOSfAv$K0^` z`31(&UGO)L!A2|jUW-=RNsT&cp5n!Ivx#9PQ>Mv5Iuce{ z_@1_YHQ`3DqanlnsEp8yeI@s9MSglvbSv)4=2))YL~f-GdQO{Pm<6_dtvThtq;p%$ zt;?(ZtV;ZAH|TMRdfz&{mFa0^ly@;wNci}jnrAW&^xD3XK9hN=vJ*^|Nrud|xSB1i zD`zFzRAi`{C)Q;uUrxVsHP>*%{4JAZS`1R$Z0=qXjuqNxd^fx|_SVu7yY%=z&H5;~4{5&WANc)4M+7Q*_m$yRlF1_MK*a>!iLyQ)^TIGm%8YnM)YD6>)As#(|zm zYKQ6rM=kVd5k0GVKk)qB4!3qch0j~JwyP^kdG<>jRlc#q*~mEiXbR_h`qlgQlieRK za~bFHz_RJEgG1HCh+evJT>YeS=2#z=N|17l^X*dR(4dvYw^(mOj*wCJ^!YqZv`>v6 zIO#P?a8=P4{$;nGKlH60$aWv+xBOy3y{P))n#RkHom0{m+&|)6#kg&lzV|&}wuijm zv1xf)!5*9S>t5D)9TSq2cH!HqM}#yLt6TTg|)lfAv|G4-F{fBeb?d6czv38ofW zEs}Nm={IE?Lndp}3WH5gF5+pbpMR}xMo0|o4O)4@{iongcCslc_-?N>r*(XvsB`X* zUmL-bZKso#=6w6HQ)=#tEWXO@%H_q!RsKjRJH1IkZ9_s~&f9g$=D)mHaP|y6f}!?+ zNRFpTji;G-(Fh^5WJ2WE5V|)_VGW@b^C+yL(UYWg9ry@6c_racr*S8hvJPLQ>&aOv zjO=9)GW9-#&}ka?ISGwX%!5}NoslHX>fTJ#o~M4Fi_kb3I%Mu}p!Fes3qF$j|H1ya zlXkPLX43Se{@B?+cJnTorf>A{;X}fK#Q(Xw^&y*-F8+r*n)L5GQVpZYb8!yuiFGM~ zCeCWzPUF-6zq!XtF|=_%?{Lf>8lUjrcF16P6w+mQW^kjL7>xp~CuiuUthz!vzbNC6 zDw)AeRSAPynVw4XVtEwPd02BU(773|tKP6Y^67Hie{9XF+d^CL+l^mcpoel{6Y_?z zmK4&Z|5sZj7t-y-Q1^5OZAmZV@zDAZDu#A;3}W9?{k?H7Kief$KYweN9|fu7 zYqR+8kFOsE*~eFe`SbW{Zg}Q;IPDkCXF%+Y9Z#{q1iTn*Z$||Lq@z^gpjh{@XwP+dqbH zJYhIQjjOn+%T1g&5}(9I<(JU;xf!^^W39eI7h{d9q^t1Gp^+oBg@k{kD9imaU8*3c zl5Rq$sjy0}(p~W)eT{A@sM0eeLNh1)gh8l{*IuJ9ppk-0*XTPLg4mu;^oaluA@jty z7dYOeb93;UlId7pPd6p}Jgl->`e;^EEnQehfG87QMZ#yqAYvJLq~LTdT}GTKh+A#r zK^t(#jikc~D1h7pxDAI__RkQ0xH#DJe_hJ|%cVTOTq^$8r2>eLidcAfG3)MA`htH= zQqdoY`JOQP@Ov~m{IFx@9G>SIo(>HSzhFXTMVb&BDm=A6f)cYt-noPb2?hyaLKq^1 z+z=s5a#55JBQZkS;H)?yrzHqECP|2{6d_mP$w)$Ojv_<{F&4@a;;KMM=LACbPA24m z5+M_(6XK;#$PqmxYCa)+CWP=>5E5=pNVXFpyIcr)KZOT=XTx zbJbGZ$_zq8A%rNdB_wt|Axp!s!6rgP!U-|kLP%UBA$mIq*%nR6_89CamJp#`h?Nd(g)pgvgd*pPhX^@%80#}o5}Ab9vMjV1GAzM%`c$SjN@Nv;0(LVI2gp`cKHo%8kPy(tpjzTri#v`-vWdb1!6j6BK z3sH~`B9obfM4;M=-~)(FL8K52`{63Q1b$SjHuymjoPqn$3#@5`+=e&cf@)u>h1?mS zROh3FjFAX4LKc}5!fAQOf=N3 zXrPgV?A(reibA`JCgeF-#Gsu)Dfpmq)WDrMLY#IHV!fLXgLqUC8VuF;7NXI3qx~I& zd+-I6(1_e18K`#YkE2Wr2%ur9uu%V=m^lSqFf9c;0*+KdX2E7CgU_IYR=5F5U=Xa+ z2+4pxFx`(t!X@|$ng`eoKM$`TKp#xq+C%l1o(8Vg%VJNVk>o7(p>oUYyBXt>bST4GZ zsl4N9IAp*iS^>vPx*(1Da0DTrpbtL77m(&fF@p`*g9A9hIyeYLPzq&m3EF_pN62W9 zhjB0-=D{)uhpi9^+u;~gLMtD2jKIt@cmbUJgvfyo%mO`_4ek&C(GUl_ARf*@1++jL zJb`Dx5I}DLBQOC|Fo%^82ib5EP6;s4^)PcAdO%PR?FB?Z9Mr)E0$?=+K?o$lF}Ms@ z;Tqh4SI`ThLOAb$B#Z=YFb8k&gOv~fyO@|9hEli$6;KJ!fCv*J3u9m`jDxwb2-d)Q z*Z^U$AFjbucmeJ33V1|NEuaf}pbvAv19k#46O-eR4LNWNo&ym@F#-p0fge^S@HF!0DaxZ;8_7ayx<_Iv#ep`5S3XwDYx-1aO)jdqc)D={A!tZM603y> zquYg(rO-*&l%I!XTR3@#*K=YWL6a3DeBIa#X+W8>@;m7h-GvB8cP!ra(AhzU2So^a z9zo|~c{tEWG@+Io(?VC`)I;0*c4)|i=8eONDJ@nJCn8!W@^4OSeKj;>LCar*V<+w1 z*P$UMgNL=?4SfddWhY(KXLtzpx0o4-nObg4OAeu8t_`4K?s5JRv+hzVX5)QS%w9fJ z%#NpqW5yU#jEs9vWoI_$@cESpcT*W-uxdN$qnHeo21oY^Ecl+a;gKB@P>HN9!18dQ zBLUQMW7^);R08Z&(0^$Aoqi<1*X&0EWURg?UQesBN?_x#%RRFP6iW+;UVSH z!!JX_)7eNQRZZ;l(b?&v52x?vq8}bM{;hyGkv?j#-wt%>i6vC?S zq)Q;JR3Xj7`|nLf6g&GzQ~6CvQ)Q2KKV0f4kAK7^_CLkN93GLgiv=b1kH~(mz2UL; z-)fHor9&+@rs02rpmfZ7sL~m*|51B$CQ!Ba?I6{BMogq?Pv9Iz%zxD044&Ur-*0P= zW4QKc94xy|`UDymYeOg9md3+g$i;d^E#zhizQMu~?1kK{us3uwCX;Y>2M%XZYPd^M z<;A`LVZWz(Hv1xj{hopM>`M{$d#Wgh8wg>)r;3Yx`N4iq)rABV=#TYOB~yolwH`QW zc;Kv)hnWJn=!w%A6vI<5@W$Z`sEZ2fIN>LbFxWVAEH*|e(J%2sCG{rcVBQzCpn>#; z4A&l&$OjVG8P=$b!DwK38!CHLcDT^)7hs+_7KgL?KUYyH-;MKbF`^nX4#!QL!r0MK zZRP~x%EVd*)+|K`b`q$T`3Or-z)QsD{pT90T&`0)gcT@=gg^H~m53(#=4=+nTe>ns z7wulSi!Q}7drKGPQzfdnQk+h7hz84}i!Q_3ilst7EhRIE8asUP-^15Y;XnK{ygEC) z(!0OKKc^evmtyJP;@4z{PkTq7_O~@!>@{8g+(w&PGuimB3DqG2#2ur&Rb(mAK*s*e z8c|0Uf4@$ZicE&Z?4k?)B?0Q}tjn+p{<&rbdz-F*t{Kk03~OTdKVs8hoq3P_xMPjL zUsA`~&`n?Zw?(hJ>CC^SMtgXB8I9j(g_ZlBuEhK~ZjFD*IaNl#D-{i*_Al#Z{L4CZ z=D)1`ecCmM=D%#G^)KtR|F#bK|D#Ex75u(UX#PvdX#PvdX#PvdXrjAdbouK>sEKCi zfx#1HzZlyyjA|&!a%?Yf^q{niXRF1r`#aTXgiu=l5Tk|bpqbdtnC&4BG8E=GQw$p+ z){-q7uatJXzv{(%f|JJ2_#JV~h0hp&Q0}?lLIa1$T^QZCV0h3KiqYQ&LUwGyaRf4> zk{sL6v9n{QZc|j!1|)Wc+Fgi+)`?gV@eNlOF51lQ^;7h&&V<56>|KY zCUQ#Y_``1GSQj}yfgDr%kXwpAGD|s*Oj0iW0U2fzDwp4JBe#Dif!tEW77;QE-XX`F zD=^Xz!0{D1?n92Nk>h0KHWvzz<00gD`7V?Ma$J^zI}XDcMn>>+Oct33QBtJUaM%{tC~z4GzXrFV5xCtkya3t~BoJhfNCk)q z!wnv2g=e6!3D@1A$Hb@rCtczN)a$nh><~F%Y{xYZe1d*BwG*d1c#51ohq=g|8HnQw zR~A0)#}y*b4q#j01AdT#F)#(xKo6+9Q=4Ej>;$10OcLNEoIXHU9-naTS@j9eiv40j zlN(+yCWl5O`&U0UWKwIWu>p#UhSo_(J)nVI2UT%21h_1PmJTCEAs4Vz8dq^JRSwrP za2n^sGB`XIJp(SH(Om;F5jlf2I19I-8B`}BcaRNvOicJE;}Q?%f;n8Af-yBz!y^b* zLNUMrI04h9Vq^g8m2ve3FQ=neVTUTZ7EDz`%LZ$(2WfR&t-}s26eApl+`t34{BTnY?7<0Y;5JmR#I}&*Psjy08Gt)@&<|XzQ1qYySx^A2 zs}VoU3Bs5jm=&1R!ay*JD+DbZ6u<&3;RTLZZ(!OQ6eDP@Me#z=dNe?=-Gt(VYLw(d zXxNH+hpkb##{mP;=;JZCPylBrgiG*(h4#e4g%EW>NI!s93G9Adu=+E78I2Y9neN2o z#!2vd2c^z+{xD7)w^Sel3c*MM`GbBCl| zC*gjamZ+0(2gEDl=mB-`4qT?K$vCq=4@k*Vg<+}ecZi-U|>Qx#6a0>-mB507a164c86E={I+HQrBuV<?%-oGr6>NfBD2Hy~j%N?9B=#UqNQ81|fPN54 zK*qodHZn2U1EtUaW=Z%61-3&9R6qj^fZ$%NPsS%3umiH86M8|Bg#^J;=mU)GNIA%) z;v5RekOh~Z5t@Lu51FB3;thMC25iz039Q(U`i9+b9H^tn_aOx}lo$m{pbXT|;rqxT z3G)YlI^vvw?<0xu0s3Or?g6?i?mc{;AB*|A0eT0u+?>H6Jgky$ba@Uhp1ZqPPrlJd za@f=aUT1y#MmOhin-i{m$+#?@Wj#n2FEAOTYw=8?p=C)4WAew3H?;siqp(aUvW_ki znKI~xSJoaLhN8kR0#YA43Pm2`WCuLN$y&(4kQbDSXGcR#y=kn`+zf5;zbs;}mSCxJ zGQ?P$xEZ4b{<4~NoSQN0Z;RglHj>r6h{THLACYY2`9~yIco;JZ!nqi+95fM@03YL- zCRHjw5{rtUK3o0iCtY>&A7#Q`NPYI|A9(ciyfLy}sA}O@75VT1@4l+uJlQ?Q|k~lXmBBCWgLbwFU zXC6VaV1+Q55F|!!Y!V|(x;Uwj7AMaFC5g@?DU#zghP(+FLwuCR5>6#~BCuSZEbtmf z;+YDh+I~FI6rD)A#!X_9t6Y=GR^iEn&v-J?u$V&V5>pAUhzfBvold5Ts1hA7RWdX7h&}}uzB1l62J zvq>fX(Vvdi9Kx`iLkgVc5H}M8a$)>j^2~ESu^!1ZCf*Yk5M5qV5@&BpA`BLiGfNiY zw!9@tVcL=l(styvxgD9OZ%?{MIFRzi4&({1BMF-1NG8m7B)cq~$QC(gg0BG~!6Ggs z+`xsb4{{+-=ed!KvzL(LMoS2NvL`vsyOcCIE+rqFyh)F~FPS>lpB$R$Pt=(v0c54} zYT{_Tn)nC@k++;7BxykikyBhl?48$=^_$j_OvNz5G7ckK{Wg)Wj0o~UV=MJ20(qnm zMV2#mlJN1-q;^y+d1xL-K%qH2PIV8&H6xk({OJ0ecA-)o42=(ONZO(J#%j|Q+c~$}S90hsmRzePGm65SV zWh6YfjHHgQBt{dil5Ul&B-QmQ8RL1)iB#%U5j);nM8%?poSc7~bgjKZzDm@SK81Qh z{n5sD|GR|xGmLpWO(e&l2@S9X1I-qaqVbrdsI`(-+oy!f?io3-92-Bu>ZSX833L$&R{$@j{F$ z8ZVuXi$SN;8FY?F|)jx9-6WZV^{ z@=L`+<)3=Z+|O!PWH`_>1X%hL8FM9E1lXUhQtJdU9->|!v%XDaNYNBorzSEqBmz;E zUPOiX5KrQdS54e%n$BvS$dDNEeS_xzbc4qK?FQ4y=;0*Y8{U9vfz)~925|@pB)Uk8 z3ex0*cfn){SwoiN^X*_V4NC%$;#GL(kL4kF?}w$KSn7l4h=Q>s6hg=ftPR5JG~{qO z;`(Jyv0M$e)|9CmtD`Z|!YwZ&Vo7X>9T<>>*qpr~VLh415E~&%<_;&hemKdjlM@*W zMyL{z;bpg|WvXL-zH3R{Dq~m8_dr*F6==ra0+s(NklNn@UHnxb)xQNg|EoaL{|qEL zobXfs3`E^<{GM=jpsZg7qE4|?qf#a8K!<-7Nb7Hb(uM<#`njB_o2Gxp#Oj;K(E3X; zYM@pAxq5hqyMMK#A7#x>&CXv1`cc;GKwEzm=to(z18w?MpdV$;4z%`Hfqs;=*l@yE z|1*&KPi4&xH9cbpS0{tj)@!=BJ_-CLQKb1H;kjk$D{U~vEpvk`q z^rOVtffRlf=tqgO1Ihg=(2o*l2a@_#pdTg94kYrcKtD>H9f1og)XGumFz&eWq~?Vz|sYuFJT=;fiw*D`Y0)3`aCIH)$3_mV^4x zja0br8IXDk_Z~^k6 z01DwE4cE{`m??%5D1|a8hf7cam!T4_z*V>g*Wm_K!A-aY)ldVqa2x924p5(iHo#rD z2lwFtG{Qp~uA!SS(+rQG1s+2yw80a23eVsU}1{shAIT#INU@XYPI8cD`FaZ={B20qGFa?xgDk#G=P=V>73TiL| z)PedeTNAWEn~wU|!Hh1jfC0<}LzoBi!3d0D0hoX(n1MN1z(TMDE3gI| zumwA?2M2HjCpzli88eGuF}Q#$xPd!(z!LC;rLYW^gBPp-Z}0(M@Pn1$4*{?W0%0`- zK`?|sD6E0Cu#Snzde{IPAq+ObW}w!ELj-IAs!K=WbsKDl9S{XOAsS*J7UEzR?1p&Q z0|}4_Nw61^fd$MIOj2PVq``hT00$u*4#8nK0!JYOGT|6x!Ewlj6OaQZ;S}V;X*dIC z;T)WYJh%Y)P(amxA!aT@5l}fS!D}g$K{;H43b+i^`YU+73fJH|+<+>$3Do*;zfq6% z4S$58!rdR9-{W~KS)Z|z*P}<}33Ul@kIq`7&)Cd81^sXRSvu>hK4U%CRs@X=U~QPq zVA5@{Y&K&(y%+)KFgDXG>8##4i~!^KR@vbQJR+2bU(tR4{JBNUNG+}bj4?`TB8x}` znU9B^?a3A5h|%pLVuIhhxR-53tXVk*3?0G0Mpn>cz{ubnud1VMWH8sjP+3REXuh(# gj<&k8j=GMjvZj`*j@oqXd8+ef%qu7|W*E``4|^V1Pyhe` delta 32703 zcmcJY2YeLO_V{Nu*)#|cQb?#v@97B%J@nptUy?uqX{1m@2q5|dL4g4W6cH>ah!lB< zhzLkiEPw^nM@M~tBB6+=DF5%7$t0T)eDD1}pZ{*YQ_tLc?z!jInc2)aA2esV?~-QW z?uw$UQCY~RlA^3*TXz4tfB(K5dXAmvVKuw}J0mvQUs0FYsz>&is3;Yb@sq|++Bjh2 z0Ff>E@hKmqL=RGx598{M7sAJC`#plx5N(RBmNwm1URz?Tkl!-IyhzrE8<^YHx@E({ zb1v%umpIVSP_a+p`LfpKQF%loMcHIi6zlwyfr_$`eUGL}zVg1Cq8to0Lw(pfEJ9Jn z+ZAPLtfDL;z#4Ii@*$TLkZQtFZWgBgzggEqzS*BKY^5DL`5=PKFg7Ng>~QI#;)>x8$~&Z z56C`#;-mtfUf#j%{l{OkB$5fbzKh_MTohReNMi^WM(w z9ei%sy~5*L#74(PMry4p)$uIc(N0%#SSO;iMU}c2@0_Vr%i4+7-2EC>EW9MzF)GEO z21IL1{emrl7;S`KqoOc>^eYN8R@>$mWl6CcLLX|>eG)F*vOC-`&B+3$r)n*5TSt3zdfq$(+&7-u_0WsEz=n^N|2Sybd zF)GG1V!Rl!=)#u*!>#kNWt~@pnp)>uly!b&P#x=hTv_Kg1r=E&Uh5s;D2zB-yC2lD zP~+%uIZ??pNOXjxHYzmATf3T7E!f-N(J!HE=K-C&IK~djOpLLFT(2-p7!?}rtvx+G z*zu4nB2DEYA|&;N8b=$Jjl%RRgKJpIL}@bv9hN|}sSHjO9AXJXi$GMNA~7Nm?L9ch zIWhSmF&COW!f@WMh1bOz*M&xSC*39UOm!ya<)u4v^TsDT(w&JZsTs*Rp^o0>mSbpUc9J7C$B~$so|TzHkeL%45#f%c z)QPFNIgYHfyc|bP>costM`tcD4?7Z_8IBwZlZ2g?m+T04MC8nl3 z(;V6#jt*Kv?Irf4?7Z}5+K;vCXqD=W_K?fRCu^B?VuBG*&2VHpGbSdR5%-j!A|kdQ ztmEyb4QkN0-h}K-bWcgnNp@r>qhTuXrY7gK^zDFtPOOmQ(6vfWG}JCO=pnHuCFdk& zr;aBf1l%_(Iop|=nwddzGxD5i+Wdwes-9ZcMjxx=HUGxFy~kUDY=5G0yiL2?G~PWs z**ST8OfyaO?UR{H+Kq}MIZ6Af`2~Mb1T~yVj+D$S!X^&wSZEcs`SyQ@Hc_?8;V;xk zaO7o48YYlKj>Hsawlgso!JORe)QpMRXW`S_r={kmXq_TfX%`}5wd#>|{c}>M=cYKE z8A*-_nQ3X6(?rl28LDZKW3@Yx?`UsD)zeNz)obn8~=mh8luR#J#9)RAChvXQZPNltPu88ksM z7;l)Ahs!x95P{Y-W?-#HlCv|>0h>w)X~`4BNJ+_|j-e^Z84joB7ZK2I{0#A@bduBz zcPMhFX6WO{$#NzpH*@4>J5$q$+l-jF(w&C)6lu*4No%t%PCe#P9jMONlDqs zIXM_A+mW7}o|!$vk%BdxazFw=-RQ!^nvvnUvY`!#{aTBNbA}8;=S&pOM!}4nOv)kQ zCFka})Siv2uYDXBuN`VpQS*xr=!M5mPfpA;yk}Z!S{hmC%q9lXSg1r!7Jfb<6;~s@ z2?GdeVrmX%64Q6+?TC#DHeo_}*HbPL;JuEqyBY8-TS^D2I5G7|fZY=`F`cSXz+eBxkPEaLcf1*{OI!h9fCY z+|AK%z_OeowY2wI25aqFRSZgUBxh%1z!WDwoI#N>gteqr;lWZ+r4*%RVEI&XPx3f1 zD^J_nDp>oZRrP?3rM{{r8QfuEj&yx}-0ccCxgygf`uh=Bw4mgbzW~@VN z+zqwTD94UQnd7IXX6EIj&1fvP?Ppepj*gjm8RF99QetveE^b8eFb$ZAD`q&vPvn9^ zKO@s~veKM04A0=47T%_|4~k1Ym6g*Bl|tJ}?O;k-ml__>jIhL5lGIYshdO+H2jQ}r zX;YK6@7r{(Tv#1QjgmYSEm9|FUE0PrAmkJjOii01MSpT~GF1Qtf3o;vaXx7;v~^UM zn6mP+rLN7v6nzLLo0!w^hi2NxZL0;-uwdZgibu@f3>CCL+lB=bx)e^SV$jwl=t?cC z*J@^YSdn)jo|TuyWnyzZmK=sZm#BNUsY?{zM+=ZK1(~_zG(mo8-9+OVU&!# zbT+ga32_lFc`i1U#)tAoaO4pAL0eI%jpXm3&i#C~@b50dxA4BjU1jv{h|Gm5ZAGL^NuqTrG+HRC7GSfeQDz`xsjn<+R1cr3S3qeN;Y$J z@8~egX-eiaty0UtM$}}Cw$hZ*0%go9`)RCM`Hp-ml9J)&TW9T^TpF=Be&m8u$x;<#b0ad#{ zQtO_VfwN*vxq!f08XME3t<6nMm&(%G6mw@JnKfE?v+(#>M>>^FYECkCO`@IF?u<%N zyKBzTG5$uuk#4NG-$3zeU+s@EyZSmBb)Y#wYg!hn5~Gn6k=$gAlSJ*8>xgqu-s2k= z)t{Y>3ZM~zP{%u|GSah(sy6NP*qYj(V{dBS&R%V;JV=$&n4O1|97&py;Y?3Wq&s2Q z-jOqdn9>bb$j(eFs&R6*&vibbRyV5cRMDC~0WOJ6a%cgJYFMk5IML11(^u=?$bWme zr1q*C{;l;%ZfbYtB&Mcnvy*T5;PZv8u(ohQ;+Mp#- z4jQDrHz7p3l2t={aZ1hd&CGf>F*A({>gbgEzJrYhoF<3{AwzS|j?!9XhijSH)wPS+ zZ2~FLk~qwV!t_^6ZQ^n^MK^E^bPRF~b_{V0bqsS1cZ_h<^)@>|V*eD!c+%w<)+i#P zv0PEh1CR!pdGNJw6EqlJX6P~ zi}f_W$EHRYZd;^}(SVpvhEqs!$dZH_{l-C*G&In5KNjbm$rVOzuHAU7QF+EnwDEM%!q*+xP<`$;Jv+>V<2;&v@NO5u|PdV0!oY-V1r7{qg^^fRGP-$m zczAg8@W%8nlFh!SW{nHYp;Kly9muYE^zWC``gH7PWuY-_8<^@tKh82{*QcLo>zhQ+ zCoyLlnnd6UzSe$bjw75MIpt^(&VV%{o(~78!QxQCcVZ^OntfU8IODQHQO@v*fYPD_ zY`T!O5w3mu^!R);E2T**tX&H`7shyZ293TWGhI5!N#dt`dP#k3jOV0Mb~GB$iB707 z$ikk|G)j-t?C=|U%4GwK`(IYGlw_1?rZq+{t60sbAc(=N=5te=W?f3$+1jFIJ?avI zF_6f~%*)29tO~a)X1<$T zQhmv0)mIy^G|$G)M@!>ubRAADtK}i#aU@0?SH-t0s*A(rI4mcW4!PECd2M%k3z^!K z-n|r-MxMH_SNsMeslHs$G4BjckhwCo7SvYlfP+A>Y6dk zN!QSx-t19*>&!MvdN;*A1M<97rD7RLR**zoxN+6n))ZED%P z=DJO~ZRVPb?X){v-u=HsZe(D^{w3r8|CVpsrfucjFj0y8k^|eXZ>yl@KcGdhk=o%N z5BjKShtu3b`+L7LLl|qyS?(gVwqc4WSt{hn~<2dc#CWfmE0TlOYY#Ap<+xB*^hxt+~?vIwP?@WWf@AIDwYGz4-DOVy(O4$nk z`deQrrQF|Cg{Eo;y&tBU(rg1+Af^^G9ft^iMR^7;LmamopMu*kG>|*(P>!3lO-8a< z5B4hL5qN<&_&^ot609iG;c~D(mjSr`LQDDv`YvB%L!Z4`t*S41g7%E#2}Q@X(RY3I zk)Ls{TszfQ{Yt;zmR2zRAIQl8?Ng76`g3R1^7_^8YGA&5RjWNRwtmgUlW=z5!*)dt zt?e^0>E(XWI8$NcR-(ZxY6PnsCBYxVC-5nJ2FE}QaRNSvpW!+bzzw(ww<_l=N<}PG z3H+cbG=t_43SkfqV$EAuzPobjgDvY;uA8@IUD`V50B8FF&H-D}P*|yJR8V2k{FiJ* zT^gSn4>qUi-86kq#sAbGHK_a+_ee`tBHI6<&l6C-RGa<3mHXXQtV%0b%n=Du&=>ka ze;5FRVF;u{24unlSO`zSB3KMh!!xi1mcpB`8MeSy*a2_DVK@RG`YW2-`yoxlp|8MI z@W7!x!3(^h0#t+`s1l&P`$5b6wG~U7u4K(x*F0aM7@MVSJ>8>{MlX3~WAl88D<7x; zLTF)%>(Wy8mp)VeCevwL+HfnHhgaYa?=vZ(RY-d}q(CZ6g8A?`JONL_0$2!Aqb!2OumLv08?Xtsz*aZ`pTie$4St5}a070_ ztpEz3R7=0W9jHvzNgTq?*C;|9adiSz-?ORJayCGyj}^tno9Ui!D)qf%Mj(4|w^es5K)B)Ry; z1FqwxhKnTvAP|Bf1fn4ZVxb@OhXF7M2E!1LN`4p&hdh`H(_lKxgh%DXa##V+!dBP@ zZ^1ud2fPi^QoIAZ;43%@r{HV&7o3L6a0RY{dyw|lTOIP}k&|WEy2#Xa^L!bmeo{*H zgSq5lYBRISnQ|pUD6(K}mqE-!3LibW|F!j%en#1P4R`s z&;*)7Gw2b&!mJ=|_PcSFr?Od6zyDJs z!SKan#Bby!VU;kiSr#5O&-_o-Rq3)&%JO7xaV`~QqDvl{S$_XPr>QlIG|z^|U_Lw! zFTz?_2QR}b@G3}0=QVgeh^Mv=vT+Cw!x1f#(Z{6(3S3(q0W&<~H2kBILfOIUaPGw)V2f#oW0?XiKV3I%?0MiOPoR6}89NvO= z;S`*Q@8I8X1?)ULRv+S_eLjmm&=;~H2j;=!un1Peo3I%?t5Qf|Fgy*vfk!otLp7)l zJK*<%OP?Ls`_B!p?&Z7o)xE1;UGb{Gcj=17D;Drwyue&9XtsF4<16?|XOIs~_fHwM zjP++Bi;VU9aV?GY3(ia0`Ok76=!-pADE{8Ll&H&vhLES|T7jfp(k*E`4QHSLB&}7U zF|>ncU94napGA5%y7J??$<{`??|Z(is%`zUp?X34 z>3E3jsUPajjcSOxkLL{Q)+REa25Px3o^ZXmd{t?4T5P`vWbL zzlF)SLwXH5j*tmcU@nAW%P?pS3DBdKXxULlA5}%whSk0|4R0<>?&t}FY!R@<0 zUA}$!!dFN4?=Zd__ix<4j_h^+^)SB4h$E#lv9cT2A7Dt^wP#s2GP zpk>nCh#m$pZSf@|tCewyW&LZ2-UZ2pLZ!~W>DIq`iAxFsT{EdYqLMd-FEb01E6b<6T2b*(D=BljXg#mIu3bAcIEkN&tKE8U0ibUq`pX3tdG|0T3tWA z>!Z@QHs}ypT$_&0apWn9!2?3FjqEh0hw)t9B?fA8@?o!bk1&OsWsm?mP z(NLqJ|75VJA872GM`OhDUxBOjeMo%WI+|lw^%XU!UVB~j)!JQMq@BJRWNTNeu#}yv z>`^*n=4ds44$+$Y{4civN1T4ffuV2%7$8D5tMy{{tb=vUK`CS~&*R_j0@xKVi@)hwD@sZ+ia0IJXkZ{Ur z{cmgtFeA5|NgOG)j#lC3Ew|U}7D;<(k+(kcEA3me^_qPsW20_Tp4#}RFKA!hZtnJM zy`rlmj(wq)7tSMO@j%P-df|P&VFMh3ugJQS_4Ls7w1lg-a{p%bodkXMdh%!QoepmE z>lX!EMeF$Mo)B@^pIw|a0w?VZxAp!5Y$4jH%f5Q6nkY7UfNhGt7Yo- zPHM3I_}%(yzFj=K2GoTH5DpShCy>CpKo1xIgJ3wMLN?^VESL@X@E9zBg|G%*gm+;# z9EFeJ6Zje~zz_8)u9w-k3Af-j`~rW$eF)|anh=08*GOI za1idmuTYCuG91tfT7whDcV{sdq**JtUGUxA+iVr^_ucv1=Wl;`@Akdh9~Im!I1hIV zzPoqm-l2EzZ85&*@14K5<@_s!U(`5XO%2xC{@FuY@@HM`i$8;#S|xMmu=YmDd@GHn zkCG~x(B3lbBvLuMzFuLBdbPX=&XvrGZ)oInsNTAx>aDf<<4^_5!b=cegSZFcPxl>W ziib2RCGKY#UkoospQ}f#=S8JnSC?>Sw65U``p-5s#O*iNOZ5a*-CM!Rq^n%_SN#O)(ina1o4^^PWRBS;||zufro z#*g0{-y0WhoQAJ&oH(?P^$uAay78l|F5K9L+&1~XX?)jzz5eT$zUCP9#ObU=Rm;B zSVj}Qf`h{OL$quDwW_Tiip7S83A0#FfiocHk|eHxv(4#A!1OTYgy3D+9VU%db$x9e zwV~lEZD_P)FF_W*daYONUiy|dRJ;Cj9o66Ma7>9<>#B$H#b$qi8zHZQSKttQ1jpb@ zkXXACTQ?XAi7*Wg!KZK)ZbA)aTIxdw=mEW901SblFczMK1)#yoaJ=SYHok;!;UZjy zRuOa`pbrd$!7vuoNJeOo4u66@ii#b)U^?W3Ga46%s2Jv*fuU2uy`T90aQ@pLzWw3w zTgG?ITWj7ryyn}xtykV%ZhTkXWoyauB|jP8MN1Y*ixEG8NLk19CLb)%;0Y0FVZwW~ z*XK7@AIWE5Jf>d{cbNoCVZdLsEgobX=UO?gR18d!eqxZZjP;t!ajUhG<1Kb$#e*Q0 z{R*ytSocq;j$y>Y;gA4gWvm*dOk%?_>oaU$1+idj=nDH_KZw;bK#4JL@11FYn;dVT z_K}6JzM0{^dRkk0JW4&SPidm|=GI-g+Fou9QEcWAg(}FHUhtcLkY`K|GQgL@ajcbE zMK5TmR+^+>ZWV6AEjSyC@4(>}boAj9+Tl-OWjtd>SOed~4=}JL-5mG>?txz`Mlx^` z+O_6Z1=McCs0Es|DVh$5E}9eY)yJJD6-*H{)Ja)YWBS58*1IV^xfhO;M49EV#EiR^ zzS`BBmG#5z)JpkhhHg+ENNw@NMOASoNtrt-@`c5)9B#mEuu}OkDg6xo4L?CmQrrw8 z3sZlB^%rml+(@|(RF0=4)MKMLv;-Z*Ok$#!KunY9Vjjyhk7AZtFdG)YY4`ztgg-&d z6#4mA2#ikJ-JkB>yL^%FS-$2{wto8Z zr{g~zzr5%2@xt%h8(+OFf0qj`ue-eZ@Sz1wp^ep`Hf+mzIksqoW~`0E#J+0*ZPSFbluqk!#(-$yE?+H- z``C;Wws_8xKGgbH##*iP&K=cVwLDrWLG{$`6I4`H+)G>NF}-Fd8O?W6FSyNYVb!0V z)q@e1{nin0Kg`r0o&Yi7@%D^&;dlaTxYPlAi!OSNAbitU%%CjX_u9Q%|Gsta+PzE0_uNrXY-CIIkY}Up} z{-zT!YShp7QiHVPe+D;VygtsaFU}*&qES4q@k96Ti#!jf(px5|4&U;oCz?*C4^L1d z`W08_hG*fPMVA#<&@CkY6pR!Mr44z7V`9u3aJQr0r-!Y&F^jsBS=6x%i6w^74*wJ)F4}{`1L(i)vvVa3x~Q*`lzSeDz&t{g#n7*sxN)|lDT7y zo(oD!^+&2?z8O--Ta^e4sYokFpD)Z+CpkMFyva=;7zI{NXR-ZSm!j@RRk|NlWz1|W zd{;D~%H@bQ+UBVr8KhRLTs#LnR|??P)+J&etRC!GUYzH35C{4N#EHa##CZn7D0l%b zz(u$U$=wuX0&ufJnbl2yF;tB;S~A^xE(Z2ptol9+#d}5VK!vZ!(W1{+y7M383XiRX zGE$o$)5nAJjrOj%1*jwrEP9Lt(PcG=KIcL75j|$XY?ur4U;(@cYvEOR7k0x3@Hu<| zW4iO>1&{}izyes$o7^o;a}MEUee~-k!l;;6@R_mNXk`}3c9l+y_`2x9AWjZ zYNu*4@nwYXRyu2D>wZCWe`LT-D}gI~N7IO%2jNQ`P#~wLknT zl+0q8Vz}kjx!r@oj5UK9t*Xz;b#*Lv_>zR3h0)}sxJDwRKyG)lw6z_lZVf8wn}(|O z+dmkGvryHpqG}Dbo3`h-%0XVP&NhpX#o~TnF;=gXs1^hkI-}u> z8gk-~%&UKkXp;J-TjdUgk(N(ZZwIlOsXVU0<6J#+%XG)*!I7^;__h_I_Se~6%X zv`fgrom_=o-TfSb;_@!S0i9iiUCYBA1f@*42v_RjD(qTdJn?fWG%mvBySfUymZ;hY zN~uElYpjt?0=>Gq3YRW&Qp^g4a}jp$ZVBh8zck{URRpEfU4%;z-IG=vT0%R>(E42t z(c4bNl~>9HW#7wHjS0u(snonLOjSF%QTPjuoTygP>r7M6>F2#CLD9yM8)f4X!|a z#WWf}8ANIn12Uim*Bw$I4h} z8#h+f4-Zl+=mkqvcYX6>CiGwWD#*>R#Tos=T(xF?uy{s0a8=#O{&+|PNrtG~3q<8U z&=)L~KVRIX zFb(FxKDd4P+{t4fA33&v%l<8^_iOWA|E3!|`?aF4N8q#1sNL*5EK;qvKAcUrHxj

cbCZkHLAk0KY@|0Sr1I z3=Y6S$QekPg~jmnK*`+d`aS$x^3_*==3N%Wd2M8PS&Qo;+;piLT`XMTxJ!XlK9=`m z%n7dZx*DKwU8+X8(PPt3FI7YGtBC22!ErbTqVX-b4R_%;kQ8{Mu@963Nlge;g=!!v zYX;3B6s%O9W&0fb3U?u!lv=5tW~7{IPiJE_ybNE%H*gMqg5ROeARcIe4v-8JU_HDB zhv5_W48Dc)@av6VZ(RQ7@;9<5=EgUCkAHON{T*9&Y*;Jb9r}(9J3Kb*cxv8LYxPz6 z7@useq@T#A?3`Mzb}!G3N}PgWleortO%3p@9++~y4tFKgXPC}euc?()AN@^Dtv)&G zX%wwXZVI}Yb(LNetApyEU50Dg1fE37qN8nMARIZ2D;h*p>?1m3PQXWd`B<0&x@i+NNtATdr2mZ!2*JK?qcZ8c+-BgJf|ew1hU$780N%bccS>ABMnmcm!s` zB3KN|K!eq=7Pi4#upQopox>?```FkIAHh*L2FKwvT!Jfb6@G*pa1;DTaDx*fAqt`) z26nAd-FRB5)yr3haA9FHGKk=ekQ;Zs*&v;&K&@{F=3Ppfe%Cd-Mi8&lAwuU*0 zEAME?s~HKZQ&$($bJ)9D4fL8PeTF^5R9#)C{-s}9%b@D)3u^5kA2Fh<(Zm+Fbw3Za zfj)Yl8pGJvY2LAx88%~7v23_%b|>YYsNU*j^`N%>u3x~1v-}xjx|%X-gxq)hQor~L zck{AGl(_0u^-$>FnYP|Yd<43|BXD%240XP68!)m&Ft2gLLUQ6TltZi;#6T>x1i5@L zWI!fl!4$}Y86ZI~hIQ~0Tm!dJ)c?={IzlJt4Elgxq31jI$LmH&RkJbJC z#*bedz47)-*7wG0zCW&9y3#7Nv^t;eQLA_`v9)-NhyKKy>JUA5gIdjPRlNiHoDFKY zelcGSoGckAJ=hjU3k~rzYs&zxY5brtjgme|o1{z9Bfc4feuU z@b9sDpM8`t{MT0)<7L88*Og*S`7io2Cb^ZD+;urKcA@ zvG9pUwx=dLlLsH9FIxD)1H`1{vi{@|>h3p>s9`eEGAHMKbE4(Ud+MXcjpb2$)G0wV zEVV_|K%x~<}t}z0+bB10+x)lwym`hS?@#Y zdi~k~)wh}%nPqe_xCUZu<4Hh0^q@M=$ZGAayWAu?NEu2TYsTK{!k=CzyC`ni_X}O= zztzA4S3-j~>(&p9B&Du7Yj@&(P#2m)C%yJmwTAgP(RloM(1&V99eG;QqpIRjPo0=l zJO?BxSt?mEc3h!;-~aVc{Vcb3wUBjej_Bv?YGy|z{q>L30r`fep5k{~;5@jaou#cO z+uk5rH-S#j8T!Hi7zl&lQJ4kG;CWaLufglE5q`h@`_ES|oxb$drH^*Jvg4H{uRNME zG)4M80gCIVVW7CLqA&iGp2wn3)oc&*h+goX+DV_Yhc@b$!)iCZ=Mgoe4+C<;Mic~D zTLbpOLP2#Flp^+&<5euZEqznb$`9qKQPYWNrJ4ze8;wxAW1|;l$J!)g?dmQ8bCvkgvCQg=mK4#+jto##_F@*#@UTq(rw;m z+S0l?oxntXRac~|>P;m_<#MB;2xj`TA}D14`nsCC3sh{bd-aU-(?vgMfE#IpAQ?C5ImS?s&oTWoz9 zuE16J5ybYM*wwPXgY7LKd9V${_Q&A_e4c1d9<`Nct@FQraM4zd@rp8!W0!HZ)D@O+ zRr3m5kcT8bQ#}kvlQLs;08Sob7=+ikCn;4wM+eFJ;UHQ6EJ*g3&U(rA7#Iq zzy8EAwVqyNoO(*|coJaww#N1*I0%OzbRyF!6U{#9497H#?cCwyiFOsk`Gx#=UVmLMOqgYm1;p)p%#SLg=aL4Nq2yK21HargGMi)T+9Ibm?%>`q=`385b5=`(%|N2zQ!Umbf? z<~FBK`5fT=(3DM`k5PQ3K$bYeRYs$yAN)kEm%yG?{EcGIz7*}iFyaq}dz4b)r4s=_U?p!K=MvqB*|x%t*ZeRieYJ4EU%P^n8}%L>mtSSq{| zqaFxP4wVWouB`CPgQdbdKIMV%IVf3@;Uq94Hme1NM*7AFzLvQilDlgC$}-HmX#Na-fv0%CLQuQikoL z^apHj9x4%I`>~~BlmjKw82zBl%|j)^+2$-2jvOcz&I2}&Hf&xZebHt4zICufj4vjY zict=f3abpeQ&@LKOtVe*(4Wt@_0{jr;$}>j$88RM<2+j>z2PcboSrq?R!;wYo~_Q# zC+67tsCv&wZEa=0wO((&Ek@t`Bu{_5G}jjS-<;?pmrZ}n7P<4idA3s?JJT21?EZ4| z{`y+m5IuZ>&CBPaTg*wjYIEb@x=-CZ>(!pHIlL~q)t#z}+|q@%k**^BuDf^9UwjU& zAC&Vh3QFHL)8?#h-8yBBP}cDa{VPT#-57P0f!wYDqXdciBUAf3%q zZcLl)Jh9H^sd~x;+DqkBedGnV5dHJ7FjmxN+ax{rq|MD}5uU27_x1?xK`MOhWZVbmNe(65Mp{mVJy4l=R44|lPle|qs>?zOM z<|a~O*V!iM?|G6Td=UG<;Ox_i|lOyxg@Jo;Pr5&9QjxmT0v z5B>U=?lnql_&)~N`?Pzw{>Dl72)pR`yME!Md$p=16Wwx1ImPyDn&P?q!k@a|UbU@0 z?xef-f3|`ZbUl5~DR)o1GEx$( z`Nn;oha}_|?wfw?9`5eBTz8n~+kfjmMc?;^&0R9a$Bl+qkML2ox4rD;J&k#nDV6O0 zdYy{)FdzO`&P!?^rF=+beQX7Lm7UoY?cHr^rv9FveKf18mF;~iWZt~*r}k3HD{cyn zt3Iu=y_>4;+*jGYz^%eKRk0~;6<;s<$TQpQ92#Wzbmz8Kczad(+%`a;Sk)d;B~WQ@ zzHjJeyrb*?%0Cr(Pj}~QRqfRRe56kl3_X}n3$u4?VeMBFUo}3eu{8fzj%@Z|o`}); zAUQ5mEDDkL(eH=ZtE9_M^h7X2EI&^oKWpJ0#Aq7it??a%C@(9@8&Go_(tT>iTzriA zsHr?+B@Zje9a_12CwFn=rh?4+%50m=Ldf7+#&psplP*-WeqyD)nqIKdUOm4HQE;ik zeGnxD(jXIZU?wbtr(p>!0}W*6^m$kdFTpGDI!JQlcb4SEYk6x~-jS78U*&yPc|ld) zIE`?auZ|ujJ-oA*Z@fh*Z_~+}aPnfCytp<8Z z$nAf*Lo9a!bMfigsrk%06%CCgA= zX$|P7bk+k`*=y->tL*jkajWdDYou~;5=@44$bc-E0@?aUBK*@Td)$Dh*k1&T;Td28 zOj!;q;8|e!psWIV(8_9f0oK5aunt~^S7AN81{;)}TVw6~Al>)gjMII%H30750S%xR zq`)MY4C$~Kw!p{mDSQUUp#UnC!w(=7!XN_rLk28_MX(s2fh}+ZE|tTHzGveHxC~z9 zDKroTF%S!JFbq=Rad;9Iz*F!Bd=5Xu4Y&!nA;6dGp+5|Q!7vo2!3x+0|AZaBIMGfv zPQewhS3n8yhH}sp;$bihgW)g|X2N_}3opYfAU~>f7%stmurXG113Mg}Sp5oqA!beD z9~5wZ#T?}KWc5Sq`#S9_t7V}u~*h(66^u0P4AJwss3&3RoQ+g!QL}6 zOtBX@2nrJ$!4iWa;}~n-#+F3WvnvmR0Ci(tM|+$ap>OVJZ(5?$7Rhts_8PpP;j4^Q z22trG;^i)VZ6#8P(jA@bjZ1XABB{MNSgl6n-&_}?FM05~So6B*zqzi(vz_goOGOuF zT&8DswpS>1CSG6L)gGe1+Sy*Iv8&z;FCH34l)k1bRc~Myd!-VgMKQ`VLhJqDnJDwj z;}4#RHqY#N@Jx)Hsiyzh#a^L=(WCUrUG0gbqHdvwOF~}gYELR9T%ntte^cZ#7L8Jj zR9DN7eP|M+|0em-O2pq>_wX!@=B=F)Zj$e!6J7X{Crg}*`I~dGiVx*V=u*jKN+8vy zKp7J@(2NP=9VP>7GeHmevRKf_q;+E|XIK@%^aM94gm%#;^QpOoOD#>5R+JEUy=_U} zVgF*gl6={oyL~XRqsbszrre&)b@ibbzcYY?L#b1t=UDxB-F`Sfh?EG^NR2Ruln9TJ z65${z5oVDZA)Q26JWXPRE+j;Ffy7jbG8s)`gta6@xKCn)DkMaZ#E^h|Sr}X)C8aq- zN`!f&=1GvZ9~P0C$$jX#keDmM{!PLK39I=WrH!j#c!6-uAlr?uw^Uy%eHKoJ#9W%{Bqk zP60iTeh=IT;$#*2MpbDeA-OsMLtD(+6TSlZ5ea#l{%NRFm#|<6jE60-8v^RleW{1} za@fd+4X_=mG*Fb<&;(k-hwwSvfHn-aNZ^8w*1{raf zAEuBcvq0X=S`YF@Rt7xQ3ah~va0xcI=59hhi`DeZ)_}OeF3*;?>g>Vo)1bcTZ@5!P+412lx?c;oXhlTetu%`tlGDY=T`N&kWvx zhW*L^Cb)NVkOv2QLLac)e)<4rTVXTofLrhj+@Xtk7sgNooX{B04+nXW%(XN~J@GhL zULQV|dI;J;H|RNb=b!!UNvcr_q9_HP)VZEUzk$vjRwVI8RavDX7y6M!a0c2|CNE(F zoPuipC=x(l3#2NY3vN{~FU*0%AiouM7ozCSj0CA_=fmL;tneKh%_&ZELF(Q^aFSx> zTZ1fsE-(pRgx&C1EwgT(?J(=+42oPp9Rh~|kOjLbCGw8@w)u^nN+g!WWKFeZU2J--8k8dr7My|~;3x1LNk@JZ$6)AarJj;An&L5r z`~vaPco0wR0;Z=bx?`AqqF!aV{j8gt;;DBUVXy7T-F^5s>bO!LRe3R@u^MnWZLR+J z2z#%c*GAY|@W_mQA=zF<-#W(bv2%B_J;R+_qD>~*FL}tQ+^3@6ak70;pl7L|X!GuS z>Nh9bhw7PW_A&XWr?`U`d|xO_8Wj1BUU{rNq@rEnfg(kIG>5yx3h!qs@(|JfssW1p zmXy6|ZDmP*T}57GmM2N&rD=ITQ|4e+Cr2sr%f8oY$0)V=c^&yl4*7*N`3<@Q>FpFA zi0iBD9M+!qT@nA*t+nE=9hAQ%lJMtSGoqG>g*T-hqgN)np@^-fTEZaA|7At)RKBLG>r*d;bo@7~n)jW)Hq#zBZf(bFiu}|~|GKx8DwXdkpLPFJ zsZjAR!^Ywfksu$bmhQKAo1+>X2kAV>N9Aj6%ewvieKT$JhK!F)!K~dGlV$%%2CUX+ zr&qSUwc2XICy7R;*H&^XnB%cUl%xuDXeFoJmb}6GbM^4~8;I z@K_%AX{%Swv-|jZ_vGR40tR8qy+2js!L9Cj_Q&0`A{*uEpXb@1_NE?EJit>=oys^p z(nnqJ_H_Fo)h&u2tQb1O-XQLsz8BqXq(Wl)qoS4( zr0k2-!w_RZG5ZD@z zUtM^vveLnjS*`b8M2Wihl)amGYet=N-3mDtQOkAwAosJ(KrNwX$`YcoHA1k27L+AK ztz1Irv9g4y#!CpzDoZG`l+d)Ygd$1_O({#rGFfZ-g<^uq4+=4aDhkOIN-j$%u9VQ& zvV>Zc5*l8XP_f0$=mwT0RBUlmsCQXH#TGY(x|StWY;jX4p)8?diC@p<;`h zLgmU5Dz>;OWH*FL4CN#Bxp_>ImsuIqRNr1{f8FLT|9F1qrswQ;Rre;;torM#?H?Kk z_1qWiTg|OTYwXp{t!`}bsC2~3cK^T^5nl@ug7C6zZ<~^%KKqJ2&1cS{uEswQe@WG+ zzG9#4Db-6xqN@M#ihYL1Xhf$C*B^P+o^Kn(u~+RgYzq-wZ=Y>jrs{Xr+cUcE3yU=W z19_?cL{2!$K;;AFpfW@mpd4U(0P_ojm81NR_@hiF9Z^1EUOSxWf&R*2WuN}WYxejG zB?H@e^ELY`_IlB=5iybR(Fx7tBck|kO$o7`nkU31#5eB}-??K