FRTN

* NAME: FRTN DWG 70180463000 REV J PAGE 184

6084 * 6085 * 6086 * *************** 6087 * *OUTPUT TRIADS* 6088 * *************** 6089 * PROCESSES THE TRIAD TABLE. HANDLES FETCH 6090 * GENERATION AND RELATIONAL OPERATOR CODE 6091 * GENERATION. DRIVES OUTPUT ITEM. ASSIGNS 6092 * AND OUTPUT TEMP STORES. 6093 11674 0 00 00000 T0OT PZE 0 6094 11675 0 00 00000 T2OT PZE 0 6095 11676 0 00 00000 T1OT PZE 0 6096 11677 0 00 00000 T3OT PZE 0 TEMP STORE FOR P 6097 11700 0 00 00000 T4OT PZE 0 6098 11701 0 000000 OT00 DAC ** 6099 11702 0 15 12231 STX OTXS SAVE INDEX 6100 11703 0 02 01060 LDA LIBF CHECK IF DIAGNOSTIC DUMPS REQUESTED 6101 11704 0416 75 ALR 3 MOVE BIT 4 TO SIGN BIT 6102 11705 101400 SMI 6103 11706 0 01 11740 JMP OT04 IF NOT, OMIT TABLE OUTPUT 6104 11707 0 02 00627 LDA L 6105 11710 0 11 00113 OT02 CAS L0 TEST FOR FINISH 6106 11711 0 01 11737 JMP OT03 ALL DONE 6107 11712 0 01 11737 JMP OT03 6108 11713 0 04 00626 STA I 6109 11714 0 10 13272 JST OR80 PRINT L 6110 11715 0 013746 DAC PRI+2 6111 11716 0 35 00626 LDX I PRINT P 6112 11717 1 02 17402 LDA DP+2,1 6113 11720 0 10 13272 JST OR80 6114 11721 0 013753 DAC PRI+7 6115 11722 0 35 00626 LDX I PRINT O1 6116 11723 1 02 17401 LDA DP+1,1 6117 11724 0 10 13272 JST OR80 6118 11725 0 013757 DAC PRI+11 6119 11726 0 35 00626 LDX I PRINT O2 6120 11727 1 02 17400 LDA DP,1 6121 11730 0 10 13272 JST OR80 6122 11731 0 013763 DAC PRI+15 6123 11732 0 10 00000 CALL F4$SYM PRINT -- NOW 6124 11733 0 013744 DAC PRI 6125 11734 0 02 00626 LDA I BUMP I 6126 11735 0 06 00737 ADD K103 6127 11736 0 01 11710 JMP OT02 6128 11737 0 10 13321 OT03 JST PRSP SET TO SPACES AFTER PRINTING 6129 * 6130 011740 OT04 EQU * 6131 11740 0 02 00113 LDA L0 6132 11741 0 04 00626 STA I I = L0 6133 11742 140040 CRA