Trim whitespace
This commit is contained in:
@@ -7,8 +7,8 @@
|
||||
# Contact: Ron Burkey <info@sandroid.org>.
|
||||
# Website: www.ibiblio.org/apollo.
|
||||
# Pages: 1268-1283
|
||||
# Mod history: 2009-05-26 RSB Adapted from the corresponding
|
||||
# Luminary131 file, using page
|
||||
# Mod history: 2009-05-26 RSB Adapted from the corresponding
|
||||
# Luminary131 file, using page
|
||||
# images from Luminary 1A.
|
||||
# 2011-01-06 JL Fixed pseudo-label indentation.
|
||||
#
|
||||
@@ -25,7 +25,7 @@
|
||||
# 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 1268
|
||||
# THE TFF SUBROUTINES MAY BE USED IN EITHER EARTH OR MOON CENTERED COORDINATES. THE TFF ROUTINES NEVER
|
||||
@@ -426,7 +426,7 @@ CALCTFF CLEAR # ENTER WITH RTERM IN MPAC
|
||||
+2 # IF TFF, CONTINUE
|
||||
TFFZEROS # IF TPER, SET Q2 = 0
|
||||
+2 BMN SQRT # E:(-16) M:(-15)
|
||||
|
||||
|
||||
MAXTFF1 # NO FREE FALL CONIC TO RTERM FROM HERE
|
||||
# RESET PDL, SET TFF=POSMAX, AND EXIT.
|
||||
|
||||
@@ -667,15 +667,15 @@ TFFEL1 DLOAD DSU # (ENTER WITH D/N=0 IN PDL+0)
|
||||
T(X) TC POLY
|
||||
DEC 4 # N-1
|
||||
2DEC 3.333333333 E-1
|
||||
|
||||
|
||||
2DEC* -1.999819135 E-1*
|
||||
|
||||
|
||||
2DEC* 1.418148467 E-1*
|
||||
|
||||
|
||||
2DEC* -1.01310997 E-1*
|
||||
|
||||
|
||||
2DEC* 5.609004986 E-2*
|
||||
|
||||
|
||||
2DEC* -1.536156925 E-2*
|
||||
|
||||
ENDT(X) TC DANZIG
|
||||
|
Reference in New Issue
Block a user