diff --git a/Luminary099/ATTITUDE_MANEUVER_ROUTINE.agc b/Luminary099/ATTITUDE_MANEUVER_ROUTINE.agc index 21c0d9e..c804ea8 100644 --- a/Luminary099/ATTITUDE_MANEUVER_ROUTINE.agc +++ b/Luminary099/ATTITUDE_MANEUVER_ROUTINE.agc @@ -910,59 +910,52 @@ DELCOMP SETPD PUSH # MPAC CONTAINS THE ANGLE A BDSU SL2 BOVB SIGNMPAC - STODL KEL +12D # UX UZ (1-COS(A))-UY SIN(A) - COF +2 + STODL KEL +12D # UX UZ (1-COS(A))-UY SIN(A) + COF +2 DMP DMP - COF +4 + COF +4 4 - SL1 PDDL # D6 UY UZ (1-COS(A)) $ 4 + SL1 PDDL # D6 UY UZ (1-COS(A)) $ 4 COF - DMP PUSH # D8 UX SIN(A) + DMP PUSH # D8 UX SIN(A) 0 DAD SL2 6 BOVB SIGNMPAC - STODL KEL +14D # UY UZ(1-COS(A)) +UX SIN(A) + STODL KEL +14D # UY UZ(1-COS(A)) +UX SIN(A) BDSU SL2 BOVB SIGNMPAC - STORE KEL +10D # UY UZ (1-COS(A)) -UX SIN(A) + STORE KEL +10D # UY UZ (1-COS(A)) -UX SIN(A) RVQ # DIRECTION COSINE MATRIX TO CDU ANGLE ROUTINE # X1 CONTAINS THE COMPLEMENT OF THE STARTING ADDRESS FOR MATRIX (SCALED 2). -# LEAVE CDU ANGLES SCALED 2PI IN V(MPAC). -# COS(MGA) WILL BE LEFT IN S1 (SCALED 1). +# LEAVES CDU ANGLES SCALED 2PI IN V(MPAC) +# COS(MGA) WILL BE LEFT IN S1 (SCALED 1) # -# THE DIRECTION COSINE MATRIX RELATING S/C AXES TO STABLE MEMBER AXES CAN BE WRITTEN AS: +# THE DIRECTION COSINE MATRIX RELATING S/C AXES TO STABLE MEMBER AXES CAN BE WRITTEN AS*** # -# C = COS(THETA) COS(PSI -# 0 -# -# C = -COS(THETA) SIN(PSI) COS(PHI) + SIN(THETA) SIN(PHI) -# 1 -# -# C = COS(THETA) SIN(PSI) SIN(PHI) + SIN(THETA) COS(PHI) -# 2 -# -# C = SIN(PSI) -# 3 -# -# C = COS(PSI) COS(PHI) -# 4 -# -# C = -COS(PSI) SIN(PHI) -# 5 -# -# C = -SIN(THETA) COS(PSI) -# 6 -# -# C = SIN(THETA) SIN(PSI) COS(PHI) + COS (THETA) SIN(PHI) -# 7 -# -# C = -SIN(THETA) SIN(PSI) SIN(PHI) + COS(THETA)COS(PHI) -# 8 +# C =COS(THETA)COS(PSI) +# 0 +# C =-COS(THETA)SIN(PSI)COS(PHI)+SI (THETA)SIN(PHI) +# 1 +# C =COS(THETA)SIN(PSI)SIN(PHI) + S N(THETA)COS(PHI) +# 2 +# C =SIN(PSI) +# 3 +# C =COS(PSI)COS(PHI) +# 4 +# C =-COS(PSI)SIN(PHI) +# 5 +# C =-SIN(THETA)COS(PSI) +# 6 +# C =SIN(THETA)SIN(PSI)COS(PHI)+COS THETA)SIN(PHI) +# 7 +# C =-SIN(THETA)SIN(PSI)SIN(PHI)+CO (THETA)COS(PHI) +# 8 + # Page 362 # # WHERE PHI = OGA