Merge branch 'chrislgarry-master'
This commit is contained in:
commit
52accb294f
@ -425,7 +425,7 @@ PIPFREE INHINT # PROGRAM DONE WITH PIPAS. DON'T LIGHT
|
|||||||
EBANK= 1400 # VARIABLE, ACTUALLY.
|
EBANK= 1400 # VARIABLE, ACTUALLY.
|
||||||
|
|
||||||
IMUPULSE TS MPAC +5 # SAVE ARRIVING ECADR.
|
IMUPULSE TS MPAC +5 # SAVE ARRIVING ECADR.
|
||||||
TC CAGETSTJ # DON'T PROCEED IF IMU BEING CAGED.
|
TC CAGETSTJ # DONT PROCEED IF IMU BEING CAGED.
|
||||||
|
|
||||||
CCS LGYRO # SEE IF GYROS BUSY.
|
CCS LGYRO # SEE IF GYROS BUSY.
|
||||||
TC GYROBUSY # SLEEP.
|
TC GYROBUSY # SLEEP.
|
@ -660,7 +660,7 @@ C(30)LIM 2DEC .566985 # = 1.0 - .5 COS(30)
|
|||||||
# PROGRAM CALCULATES ENTRY DISPLAY OF MAXIMUM ACCELERATION EXPECTED (GMAX) AND ALSO THE EXPECTED
|
# PROGRAM CALCULATES ENTRY DISPLAY OF MAXIMUM ACCELERATION EXPECTED (GMAX) AND ALSO THE EXPECTED
|
||||||
# INERTIAL VELOCITY (VPRED) AND ENTRY ANGLE (GAMMAEI) THAT WILL OBTAIN AT 400K FT ABOVE THE FISCHER
|
# INERTIAL VELOCITY (VPRED) AND ENTRY ANGLE (GAMMAEI) THAT WILL OBTAIN AT 400K FT ABOVE THE FISCHER
|
||||||
# ELLIPSOID. PROGRAM ALSO CALCULATES A SECOND DISPLAY RELATIVE TO THE EMSALT ABOVE FISCHER ELLIPSOID
|
# ELLIPSOID. PROGRAM ALSO CALCULATES A SECOND DISPLAY RELATIVE TO THE EMSALT ABOVE FISCHER ELLIPSOID
|
||||||
# AND CONSISTS OF RANGE TO SPLASH FOM NOW (RTGO) , PREDICTED INERTIAL VELOCITY (VIO) , AND THE TIME TO
|
# AND CONSISTS OF RANGE TO SPLASH FROM NOW (RTGO) , PREDICTED INERTIAL VELOCITY (VIO) , AND THE TIME TO
|
||||||
# GO FROM NOW (TTE) .
|
# GO FROM NOW (TTE) .
|
||||||
#
|
#
|
||||||
# CALLING SEQUENCE: CALL
|
# CALLING SEQUENCE: CALL
|
@ -44,7 +44,7 @@
|
|||||||
# FUNCT. DESCR.: P27 (THE UPDATE PROGRAM) PROCESSES COMMANDS AND DATA
|
# FUNCT. DESCR.: P27 (THE UPDATE PROGRAM) PROCESSES COMMANDS AND DATA
|
||||||
# INSERTIONS REQUESTED BY THE GROUND VIA UPLINK.
|
# INSERTIONS REQUESTED BY THE GROUND VIA UPLINK.
|
||||||
# THE P27 PROGRAM WILL ACCEPT UPDATES
|
# THE P27 PROGRAM WILL ACCEPT UPDATES
|
||||||
# ONLY DURING P00 FOR THE LM, AND ONLY DURINT P00,
|
# ONLY DURING P00 FOR THE LM, AND ONLY DURING P00,
|
||||||
# P02, AND FRESH START FOR THE CSM.
|
# P02, AND FRESH START FOR THE CSM.
|
||||||
#
|
#
|
||||||
# CALLING SEQ: PROGRAM IS INITIATED BY UPLINK ENTRY OF VERBS 70, 71, 72, AND 73.
|
# CALLING SEQ: PROGRAM IS INITIATED BY UPLINK ENTRY OF VERBS 70, 71, 72, AND 73.
|
@ -236,7 +236,7 @@ WAIT2 TS WAITBANK # BBANK OF CALLING PROGRAM.
|
|||||||
# NOTE THAT THIS PROGRAM SECTION IS NEVER ENTERED WHEN T-T1 G/E -1,
|
# NOTE THAT THIS PROGRAM SECTION IS NEVER ENTERED WHEN T-T1 G/E -1,
|
||||||
# SINCE TD-T1+1 = (TD-T) + (T-T1+1), AND DELTA T = TD-T G/E +1. (G/E
|
# SINCE TD-T1+1 = (TD-T) + (T-T1+1), AND DELTA T = TD-T G/E +1. (G/E
|
||||||
# SYMBOL MEANS GREATER THAN OR EQUAL TO). THUS THERE NEED BE NO CON-
|
# SYMBOL MEANS GREATER THAN OR EQUAL TO). THUS THERE NEED BE NO CON-
|
||||||
# CERN OVER A PREVIOUS OR IMMINENT OVEFLOW OF TIME3 HERE.
|
# CERN OVER A PREVIOUS OR IMMINENT OVERFLOW OF TIME3 HERE.
|
||||||
|
|
||||||
AD POS1/2 # WHEN TD IS NEXT, FORM QUANTITY
|
AD POS1/2 # WHEN TD IS NEXT, FORM QUANTITY
|
||||||
AD POS1/2 # 1.0 - DELTA T = 1.0 - (TD - T)
|
AD POS1/2 # 1.0 - DELTA T = 1.0 - (TD - T)
|
@ -26,7 +26,7 @@
|
|||||||
|
|
||||||
# Page 206
|
# Page 206
|
||||||
|
|
||||||
# PROGRAM NAME: AGS INITIALIZIZATION (R47)
|
# PROGRAM NAME: AGS INITIALIZATION (R47)
|
||||||
#
|
#
|
||||||
# WRITTEN BY: RHODE/KILROY/FOLLETT
|
# WRITTEN BY: RHODE/KILROY/FOLLETT
|
||||||
#
|
#
|
@ -264,9 +264,9 @@ JACCUV CS COEFFQ
|
|||||||
TCF STCTR1
|
TCF STCTR1
|
||||||
|
|
||||||
# THIS SECTION COMPUTES THE RATE OF CHANGE OF ACCELERATION DUE TO THE ROTATION OF THE GIMBALS. THE EQUATION
|
# THIS SECTION COMPUTES THE RATE OF CHANGE OF ACCELERATION DUE TO THE ROTATION OF THE GIMBALS. THE EQUATION
|
||||||
# IMPLEMENTED IN BOTH THE Y-X PLANE AND THE Z-X PLANE IS -- D(ALPHA)/DT = TL/I*D(DELTA)/DT, WEHRE
|
# IMPLEMENTED IN BOTH THE Y-X PLANE AND THE Z-X PLANE IS -- D(ALPHA)/DT = TL/I*D(DELTA)/DT, WHERE
|
||||||
# T = ENGINE THRUST FORCE
|
# T = ENGINE THRUST FORCE
|
||||||
# L = PIVIT TO CG DISTANCE OF ENGINE
|
# L = PIVOT TO CG DISTANCE OF ENGINE
|
||||||
# I = MOMENT OF INERTIA
|
# I = MOMENT OF INERTIA
|
||||||
|
|
||||||
LRESC CAE ABDELV # SCALED AT 2(13) CM/SEC(2)
|
LRESC CAE ABDELV # SCALED AT 2(13) CM/SEC(2)
|
@ -63,7 +63,7 @@ MKVAC CCS VAC1USE # LOOK FOR A VAC AREAD -- DO ABORT IF
|
|||||||
OCT 01207
|
OCT 01207
|
||||||
|
|
||||||
MKVACFND AD TWO
|
MKVACFND AD TWO
|
||||||
TS MARKSTAT # STORE VAC ADR IN LOW 9 OF MARKSTAT
|
TS MARKSTAT # STORE VAC ADR IN LOW 9 OF MARKSTAT
|
||||||
|
|
||||||
CAF ZERO
|
CAF ZERO
|
||||||
INDEX MARKSTAT
|
INDEX MARKSTAT
|
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue
Block a user