Proof reading performed for R31 code. (#293)
* Proof reading performed for R31 code. Open issue: Proof R31 #246. * Revision and required corrections were performed in file R31
This commit is contained in:
parent
f1a5e823c3
commit
947420dd32
@ -50,7 +50,7 @@ DSPDELAY CAF 1SEC
|
||||
BZF DSPDELAY
|
||||
|
||||
DISPN5X CA FLAGWRD9 # TEST R31FLAG (IN SUNDANCE R31FLAG WILL
|
||||
MASK BIT4 # ALWAYS BE SET AS R34 DOES NOT EXIST.
|
||||
MASK BIT4 # ALWAYS BE SET AS R34 DOES NOT EXIST)
|
||||
EXTEND
|
||||
BZF +3
|
||||
CAF V16N54 # R31 USE NOUN 54
|
||||
@ -141,7 +141,7 @@ V16N53 VN 1653
|
||||
|
||||
# Page 508
|
||||
# STATEXTP DOES AN INITIAL PRECISION EXTRAPOLATION OF THE
|
||||
# LEM STATE VECTOR TO PRESENT TIME OR TO PIPTIME IF AV G.
|
||||
# LEM STATE VECTOR TO PRESENT TIME OR TO PIPTIME IF AV G
|
||||
# IS ON AND SAVES AS BASE VECTOR. IF AV G IS ON RN + VN
|
||||
# ARE USED AS THE CM STATE VECTOR AND THE INITIAL R RDOT
|
||||
# RTHETA ARE COMPUTED WITH NO FURTHER INTEGRATION. IF AV
|
||||
@ -191,7 +191,7 @@ HAVEBASE BON RTB # SUBSEQUENT INTEGRATIONS
|
||||
V37FLAG
|
||||
GETRVN5
|
||||
LOADTIME
|
||||
STCALL TDEC1 # AV G OFF, SET INTEG, OF CM
|
||||
STCALL TDEC1 # AV G OFF. SET INTEG. OF CM
|
||||
INTSTALL
|
||||
VLOAD CLEAR
|
||||
BASETHP
|
||||
@ -212,12 +212,12 @@ HAVEBASE BON RTB # SUBSEQUENT INTEGRATIONS
|
||||
+2 # PREC. IF LM DOWN
|
||||
INTYPFLG # CONIC IF LM NOT DOWN
|
||||
STCALL TET
|
||||
INTEGRVS # INTEGRATION --- AT LAST ---
|
||||
INTEGRVS # INTEGRATION --- AT LAST---
|
||||
VLOAD
|
||||
RATT
|
||||
STOVL RONE
|
||||
VATT
|
||||
STODL VONE # GET SET FOR CONIC EXTRAP., OTHER.
|
||||
STODL VONE # GET SET FOR CONIC EXTRAP.,OTHER
|
||||
TAT
|
||||
BON CALL
|
||||
SURFFLAG
|
||||
|
Loading…
Reference in New Issue
Block a user