J1 T
J2 T
J3 Y
J4 Y
|
+ J1 - T \ + J1 - I \ ? J1
+ J2 - T \ + J2 - I \ ? J2
+ J3 - Y \ + J3 - N \ ? J3
+ J4 - Y \ + J4 - N \ ? J4
+ JBIA - JBCA ^ JDA                  ' LINE 22A
+ JDA < ^ JDA
+ JBIB - JBCB ^ JDB                  ' LINE 22B
+ JDB < ^ JDB
+ 1 ^ TP1                            ' TEST TO COMPLETE LINES 23 - 27
+ JDA > ^ TP1
+ 1 ^ TP2
+ JDB > ^ TP2
+ JBBA - JBAA * TP1 ^ JGA            ' LINE 25A
+ JBBB - JBAB * TP2 ^ JGB            ' LINE 25B
+ JBCA * TP1 ^ JHA                   ' LINE 26A
+ JBAA > + JGA - JBCA < + JGA ^ JHA
+ JBCB * TP2 ^ JHB                   ' LINE 26B
+ JBAB > + JGB - JBCB < + JGB ^ JHB
+ JHA - JBIA * TP1 ^ JIA             ' LINE 27A
+ JIA < ^ JIA
+ JHB - JBIB * TP2 ^ JIB             ' LINE 27B
+ JIB < ^ JIB
+ JIA + JIB ^ J28                    ' LINE 28
+ J3 - N = + J1 - T = + JIA ^ JK1      ' LINE 29/B/I
+ J4 - N = + J2 - T = + JK1 + JIB ^ JK1
+ J3 - N = + J1 - I = + JIA ^ JK2      ' LINE 29/B/II
+ J4 - N = + J2 - I = + JK2 + JIB ^ JK2
+ J3 - N = + JDA ^ JKC                 ' LINE 29/C
+ J4 - N = + JKC + JDB ^ JKC
- JK1 + JKC ^ J31                      ' LINE 31
+ J3 - Y = + J1 - T = + JIA ^ JP1      ' LINE 34/B/I
+ J4 - Y = + J2 - T = + JP1 + JIB ^ JP1
+ J3 - Y = + J1 - I = + JIA ^ JP2      ' LINE 34/B/II
+ J4 - Y = + J2 - I = + JP2 + JIB ^ JP2
+ J3 - Y = + JDA ^ JPC                 ' LINE 34/C
+ J4 - Y = + JPC + JDB ^ JPC
+ J33 + JPC ^ J36                    ' LINE 36
+ JP1 + JP2 ^ J37                    ' LINE 37
+ J36 - J37 ^ J39                    ' LINE 39
+ J39 < - JP1 + J36 ^ JTA            ' LINE 38A
+ J39 < + JP2 ^ JTB                  '        B
+ J39 < ^ J39                        ' LINE 39
+ J31 < - J31 ^ G5G                  ' FG1 4797 LINE 15
+ JTA < + G5G - JTA ^ G5G
+ J31 > + J31 ^ G5H
+ JTA > + G5H + JTA ^ G5H
- G4G + G5H ^ Z15                    ' 1040 LINE 15
+ JK2 + JTB ^ A2A                    ' SCH A LINE 21
|
|