proof(luminary099): RTP_OP_CODES (#697)
This commit is contained in:
parent
3676b43413
commit
05e8a67191
@ -132,7 +132,7 @@ CDUINC TS TEM2 # 1S COMPL.QUANT. ARRIVES IN ACC. STORE IT
|
||||
AD ONE # OVERFLOW HERE IF 2S COMPL. IS 180 DEG.
|
||||
COM
|
||||
|
||||
AD TEM2 # SULT MOVES FROM 2ND TO 3D QUAD. (OR BACK)
|
||||
AD TEM2 # SULT MOVES FROM 2ND TO 3D QUAD.(OR BACK)
|
||||
CCS A # BACK TO 2S COMPL.
|
||||
AD ONE
|
||||
TCF +2
|
||||
@ -140,7 +140,7 @@ CDUINC TS TEM2 # 1S COMPL.QUANT. ARRIVES IN ACC. STORE IT
|
||||
TS TEM2 # STORE 14BIT QUANTITY WITH PRESENT SIGN
|
||||
TCF +4
|
||||
INDEX A # SIGN.
|
||||
CAF LIMITS # FIX IT, BY ADDING IN 37777 OR 40000
|
||||
CAF LIMITS # FIX IT,BY ADDING IN 37777 OR 40000
|
||||
AD TEM2
|
||||
|
||||
INDEX BUF
|
||||
@ -181,9 +181,9 @@ DPMODE CAF ZERO # SETS MPAC +2 TO ZERO IN THE PROCESS
|
||||
TCF SLOAD2
|
||||
|
||||
# RTB OP CODE NORMUNIT IS LIKE INTERPRETIVE INSTRUCTION UNIT, EXCEPT THAT IT CAN BE DEPENDED ON NOT TO BLOW
|
||||
# UP WHEN THE VECTOR BEING UNITIZED IS VERY SMALL -- IT WILL BLOW UP WHEN ALL COMPONENT ARE ZERO. IF NORMUNIT
|
||||
# UP WHEN THE VECTOR BEING UNITIZED IS VERY SMALL -- IT WILL BLOW UP WHEN ALL COMPONENTS ARE ZERO. IF NORMUNIT
|
||||
# IS USED AND THE UPPER ORDER HALVES OF ALL COMPONENTS ARE ZERO, THE MAGNITUDE RETURNED IN 36D WILL BE TOO LARGE
|
||||
# BY A FACTOR OF 2(13) AND THE SQUARED MAGNITUDE RETURNED ATE 34D WILL BE TOO BIG BY A FACTOR OF 2(26).
|
||||
# BY A FACTOR OF 2(13) AND THE SQUARED MAGNITUDE RETURNED AT 34D WILL BE TOO BIG BY A FACTOR OF 2(26).
|
||||
|
||||
NORMUNX1 CAF ONE
|
||||
TCF NORMUNIT +1
|
||||
@ -226,7 +226,7 @@ OFFTUNIT TC POSTJUMP
|
||||
NOSHIFT CAF ZERO
|
||||
TCF OFFTUNIT -2
|
||||
|
||||
# RTB VECSGNAG ... FORCES SIGN AGREEMENT OF VECTOR IN MPAC.
|
||||
# RTB VECSGNAG ...FORCES SIGN AGREEMENT OF VECTOR IN MPAC.
|
||||
|
||||
VECSGNAG TC BANKCALL
|
||||
CADR VECAGREE
|
||||
|
Loading…
Reference in New Issue
Block a user