fix: (Issue #569) page 0357
This commit is contained in:
parent
11669b7fea
commit
8873d6c91a
@ -712,10 +712,10 @@ MINANG 2DEC 0.00069375
|
|||||||
|
|
||||||
MAXANG 2DEC 0.472222222
|
MAXANG 2DEC 0.472222222
|
||||||
|
|
||||||
# GIMBAL LOCK CONSTANTS
|
# GIMBAL LOCK CONSTANTS
|
||||||
|
|
||||||
# D = MGA CORRESPONDING TO GIMBAL LOCK = 60 DEGREES
|
# D = MGA CORRESPONDING TO GIMBAL LOCK = 60 DEGREES
|
||||||
# NGL = BUFFER ANGLE (TO AVOID DIVISIONS BY ZERO) = 2 DEGREES
|
# NGL = BUFFER ANGLE (TO AVOID DIVISIONS BY ZERO) = 2 DEGREES
|
||||||
|
|
||||||
SD 2DEC .433015 # = SIN(D) $2
|
SD 2DEC .433015 # = SIN(D) $2
|
||||||
|
|
||||||
@ -734,10 +734,11 @@ LOCKANGL DEC .388889 # = 70 DEGREES
|
|||||||
# INTERPRETIVE SUBROUTINE TO READ THE CDU ANGLES
|
# INTERPRETIVE SUBROUTINE TO READ THE CDU ANGLES
|
||||||
|
|
||||||
READCDUK CA CDUZ # LOAD T(MPAC) WITH CDU ANGLES
|
READCDUK CA CDUZ # LOAD T(MPAC) WITH CDU ANGLES
|
||||||
TS MPAC +2
|
TS MPAC +2
|
||||||
EXTEND
|
EXTEND
|
||||||
DCA CDUX # AND CHANGE MODE TO TRIPLE PRECISION
|
DCA CDUX # AND CHANGE MODE TO TRIPLE PRECISION
|
||||||
TCF TLOAD +6
|
TCF TLOAD +6
|
||||||
|
|
||||||
|
|
||||||
CDUTODCM AXT,1 SSP
|
CDUTODCM AXT,1 SSP
|
||||||
OCT 3
|
OCT 3
|
||||||
@ -749,6 +750,7 @@ CDUTODCM AXT,1 SSP
|
|||||||
LOOPSIN SLOAD* RTB
|
LOOPSIN SLOAD* RTB
|
||||||
10D,1
|
10D,1
|
||||||
CDULOGIC
|
CDULOGIC
|
||||||
|
|
||||||
# Page 358
|
# Page 358
|
||||||
STORE 10D # LOAD PD WITH 0 SIN(PHI)
|
STORE 10D # LOAD PD WITH 0 SIN(PHI)
|
||||||
SIN PDDL # 2 COS(PHI)
|
SIN PDDL # 2 COS(PHI)
|
||||||
|
Loading…
Reference in New Issue
Block a user