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:
		| @@ -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 | ||||
|   | ||||
		Reference in New Issue
	
	Block a user