Trim whitespace
This commit is contained in:
@@ -7,8 +7,8 @@
|
||||
# Contact: Ron Burkey <info@sandroid.org>.
|
||||
# Website: www.ibiblio.org/apollo.
|
||||
# Pages: 320-325
|
||||
# Mod history: 2009-05-16 RSB Adapted from the corresponding
|
||||
# Luminary131 file, using page
|
||||
# Mod history: 2009-05-16 RSB Adapted from the corresponding
|
||||
# Luminary131 file, using page
|
||||
# images from Luminary 1A.
|
||||
#
|
||||
# This source code has been transcribed or otherwise adapted from
|
||||
@@ -24,16 +24,16 @@
|
||||
# Notations on the hardcopy document read, in part:
|
||||
#
|
||||
# Assemble revision 001 of AGC program LMY99 by NASA 2021112-61
|
||||
# 16:27 JULY 14, 1969
|
||||
# 16:27 JULY 14, 1969
|
||||
|
||||
# Page 320
|
||||
BANK 23
|
||||
SETLOC LEMGEOM
|
||||
BANK
|
||||
|
||||
|
||||
SBANK= LOWSUPER
|
||||
EBANK= XSM
|
||||
|
||||
|
||||
# THESE TWO ROUTINES COMPUTE THE ACTUAL STATE VECTOR FOR LM,CSM BY ADDING
|
||||
# THE CONIC R,V AND THE DEVIATIONS R,V. THE STATE VECTORS ARE CONVERTED TO
|
||||
# METERS B-29 AND METERS/CSEC B-7 AND STORED APPROPRIATELY IN RN,VN OR
|
||||
@@ -85,11 +85,11 @@ SVDWN1 VLOAD VSL*
|
||||
VSL* VAD
|
||||
0 -4,2
|
||||
VCV
|
||||
VSL*
|
||||
VSL*
|
||||
0,2
|
||||
STORE V-OTHER
|
||||
RVQ
|
||||
|
||||
|
||||
# Page 322
|
||||
# THE FOLLOWING ROUTINE TAKES A HALF UNIT TARGET VECTOR REFERRED TO NAV BASE COORDINATES AND FINDS BOTH
|
||||
# GIMBAL ORIENTATIONS AT WHICH THE RR MIGHT SIGHT THE TARGET. THE GIMBAL ANGLES CORRESPONDING TO THE PRESENT MODE
|
||||
@@ -112,7 +112,7 @@ RRANGLES STORE 32D
|
||||
PUSH BDSU # ANSWER WHOSE ABS VAL IS LESS THAN 90 DEG.
|
||||
LODPHALF
|
||||
STODL 4 # MODE 2 TRUNNION TO 4.
|
||||
|
||||
|
||||
LO6ZEROS
|
||||
STOVL 34D # UNIT THE PROJECTION OF THE VECTOR
|
||||
32D # IN THE X-Z PLANE
|
||||
@@ -140,16 +140,16 @@ RRANGLES STORE 32D
|
||||
2V1STO2S
|
||||
STORE MODEA
|
||||
EXIT
|
||||
|
||||
|
||||
CS RADMODES # SWAP MODEA AND MODEB IF RR IN MODE 2.
|
||||
MASK ANTENBIT
|
||||
CCS A
|
||||
TCF +4
|
||||
|
||||
|
||||
DXCH MODEA
|
||||
DXCH MODEB
|
||||
DXCH MODEA
|
||||
|
||||
|
||||
TC INTPRET
|
||||
GOTO
|
||||
S2
|
||||
@@ -160,7 +160,7 @@ RRANGLES STORE 32D
|
||||
|
||||
SETLOC INFLIGHT
|
||||
BANK
|
||||
|
||||
|
||||
COUNT* $$/GEOM
|
||||
|
||||
RRNB SLOAD RTB
|
||||
@@ -170,7 +170,7 @@ RRNB SLOAD RTB
|
||||
0
|
||||
SIN DCOMP
|
||||
STODL 34D # Y COMPONENT
|
||||
|
||||
|
||||
COS PUSH # .5 COS(T) TO 0
|
||||
SLOAD RTB
|
||||
TANGNB +1
|
||||
@@ -179,13 +179,13 @@ RRNB1 PUSH COS # SHAFT ANGLE TO 2
|
||||
DMP SL1
|
||||
0
|
||||
STODL 36D # Z COMPONENT
|
||||
|
||||
|
||||
SIN DMP
|
||||
SL1
|
||||
STOVL 32D
|
||||
32D
|
||||
RVQ
|
||||
|
||||
|
||||
# THIS ENTRY TO RRNB REQUIRES THE TRUNNION AND SHAFT ANGLES IN MPAC AND MPAC +1 RESPECTIVELY
|
||||
|
||||
RRNBMPAC STODL 20D # SAVE SHAFT CDU IN 21.
|
||||
@@ -206,4 +206,4 @@ RRNBMPAC STODL 20D # SAVE SHAFT CDU IN 21.
|
||||
# Page 325
|
||||
# (This page has nothing on it.)
|
||||
|
||||
|
||||
|
||||
|
Reference in New Issue
Block a user