Trim whitespace

Luminary099/P70-P71.agc

@@ -23,7 +23,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 829
 		BANK	21
@@ -79,7 +79,7 @@ P71NOW?		CS	MODREG		# YES.  ARE WE IN P71 NOW?
 		AD	1DEC71
 		EXTEND
 		BZF	LANDISP		# YES.  PROCEED TO R10.
-		
+
 		EXTEND			# NO. IS AN ABORT STAGE COMMANDED?
 		READ	CHAN30
 		COM
@@ -181,24 +181,24 @@ ABRTJASK	CAF	OCTAL27
 		EXTEND
 		DCA	NEG0
 		DXCH	-PHASE1
-		
+
 		EXTEND
 		DCA	NEG0
 		DXCH	-PHASE3
-		
+
 		EXTEND
 		DCA	NEG0
 		DXCH	-PHASE6
-		
+
 		CAF	THREE		# SET UP 4.3SPOT FOR GOABORT
 		TS	L
 		COM
 		DXCH	-PHASE4
 
 # the 3 in OCT37774 could be something else, garbled
-		CAF	OCT37774	# SET T5RUPT TO CALL DAPIDLER IN	
+		CAF	OCT37774	# SET T5RUPT TO CALL DAPIDLER IN
 		TS	TIME5		# 40 MILLISECONDS.
-		
+
 		TC	POSTJUMP
 		CADR	ENEMA
 
@@ -232,13 +232,13 @@ GOABORT		TC	INTPRET
 # Page 833
 		TC	DOWNFLAG
 		ADRES	FLUNDISP
-		
+
 		TC	DOWNFLAG
 		ADRES	IDLEFLAG
-		
+
 		TC	UPFLAG		# INSURE 4-JET TRANSLATION CAPABILITY.
 		ADRES	ACC4-2FL
-		
+
 		TC	CHECKMM
 70DEC		DEC	70
 		TCF	P71RET
@@ -288,7 +288,7 @@ BOTHPOLY	DLOAD*	DMP		# TGO D
 			ABTCOF +4,1	# TGO(B+TGO d))
 			TGO
 		DAD*
-			ABTCOF +6,1	# A+TGO(B+TGO(C+TGO D))	
+			ABTCOF +6,1	# A+TGO(B+TGO(C+TGO D))
 		STORE	ZDOTD		# STORE TENTATIVELY IN ZDOTD
 		DSU	BPL		# CHECK AGAINST MINIMUM
 			VMIN
@@ -314,18 +314,18 @@ YOK		DLOAD	DSU
 		STORE	XRANGE		# TO LOOK.
 UPTHROT		SET	EXIT
 			FLVR
-			
+
 		TC	UPFLAG		# SET ROTFLAG
 		ADRES	ROTFLAG
-		
+
 		TC	THROTUP
 
 		TC	PHASCHNG
 		OCT	04024
 
--3		TC	BANKCALL	# VERIFY THAT THE PANEL SWITCHES 
+-3		TC	BANKCALL	# VERIFY THAT THE PANEL SWITCHES
 		CADR	P40AUTO		# ARE PROPERLY SET.
-		
+
 		TC	THROTUP
 
 UPTHROT1	EXTEND			# SET SERVICER TO CALL ASCENT GUIDANCE.