Co-authored-by: James Harris <wopian@wopian.me>
This commit is contained in:
parent
9f58155b0c
commit
0c6136893e
@ -102,14 +102,14 @@ SVDWN1 VLOAD VSL*
|
|||||||
# S(2) = 180 + S(1)
|
# S(2) = 180 + S(1)
|
||||||
# T(2) = 180 - T(1)
|
# T(2) = 180 - T(1)
|
||||||
#
|
#
|
||||||
# THE VECTOR ARRIVES IN MPAC WHERE TRG*SMNG OR *SMNB* WILL HAVE LEFT IT.
|
# THE VECTOR ARRIVES IN MPAC WHERE TRG*SMNB OR *SMNB* WILL HAVE LEFT IT.
|
||||||
|
|
||||||
RRANGLES STORE 32D
|
RRANGLES STORE 32D
|
||||||
DLOAD DCOMP # SINCE WE WILL FIND THE MODE 1 SHAFT
|
DLOAD DCOMP # SINCE WE WILL FIND THE MODE 1 SHAFT
|
||||||
34D # ANGLE LATER, WE CAN FIND THE MODE 1
|
34D # ANGLE LATER, WE CAN FIND THE MODE 1
|
||||||
SETPD ASIN # TRUNNION BY SIMPLY TAKING THE ARCSIN OF
|
SETPD ASIN # TRUNNION BY SIMPLY TAKING THE ARCSIN OF
|
||||||
0 # THE Y COMPONENT, THE ASIN GIVIN AN
|
0 # THE Y COMPONENT, THE ASIN GIVIN AN
|
||||||
PUSH BDSU # ANSWER WHOSE ABS VAL IS LESS THAN 90 DEG.
|
PUSH BDSU # ANSWER WHOSE ABS VAL IS LESS THAN 90 DEG
|
||||||
LODPHALF
|
LODPHALF
|
||||||
STODL 4 # MODE 2 TRUNNION TO 4.
|
STODL 4 # MODE 2 TRUNNION TO 4.
|
||||||
|
|
||||||
@ -190,7 +190,7 @@ RRNB1 PUSH COS # SHAFT ANGLE TO 2
|
|||||||
|
|
||||||
RRNBMPAC STODL 20D # SAVE SHAFT CDU IN 21.
|
RRNBMPAC STODL 20D # SAVE SHAFT CDU IN 21.
|
||||||
MPAC # SET MODE TO DP. (THE PRECEEDING STORE
|
MPAC # SET MODE TO DP. (THE PRECEEDING STORE
|
||||||
# MAY BE DP, TP OR VECTOR.)
|
# MAY BE DP. TP OR VECTOR.)
|
||||||
RTB SETPD
|
RTB SETPD
|
||||||
CDULOGIC
|
CDULOGIC
|
||||||
0
|
0
|
||||||
@ -203,7 +203,4 @@ RRNBMPAC STODL 20D # SAVE SHAFT CDU IN 21.
|
|||||||
CDULOGIC
|
CDULOGIC
|
||||||
GOTO
|
GOTO
|
||||||
RRNB1
|
RRNB1
|
||||||
# Page 325
|
# Page 325 (empty page)
|
||||||
# (This page has nothing on it.)
|
|
||||||
|
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user