cleanup proposed for next staged

This commit is contained in:
Gary Young 2016-07-27 15:32:24 -06:00
parent 1cb2fd5ae0
commit 497b7fff11
7 changed files with 9 additions and 9 deletions

View File

@ -2458,7 +2458,7 @@ DSQSUB CA MPAC +1 # SQUARES THE SCALAR CONTENTS OF MPAC.
XCH MPAC +1
EXTEND
MP MPAC
DDOUBL # AND MAYBE OVERFLOW.
DDOUBL # AND MAYBE OVEFLOW.
DAS MPAC +1 # AND SET A TO NET OVERFLOW.
XCH MPAC
EXTEND

View File

@ -1398,8 +1398,8 @@ RTRNMU STORE RTMU
# Page 495
# ***** PERIAPO *****
# MOD NO -1 LOG SECTION -- P34-P35, P74-P75
# MOD BY WHITE, P. DATE 18 JAN 68
# MOD NO -1 LOG SECTION - P34-P35, P74-P75
# MOD BY WHITE.P DATE 18JAN68
#
# FUNCTIONAL DESCRIPTION
# THIS SUBROUTINE COMPUTES THE TWO BODY APOCENTER AND PERICENTER

View File

@ -2105,7 +2105,7 @@ R56A1 CAF VB53 # DISPLAY V53 REQUESTING ALTERNATE MARK
# Page 782
CADR GOMARK2
TCF GOTOP00H # V34: TERMINATE
TCF R56A1 # V33: DONT PROCEED -- JUST ENTER TO MARK
TCF R56A1 # V33: DON'T PROCEED -- JUST ENTER TO MARK
TC INTPRET
DLOAD
MRKBUF1 +3

View File

@ -1358,7 +1358,7 @@ OPDEGOUT CCS MPAC # RANGE IS 90 DEG
TC NEGOPT # IF NEG NON ZERO
AD NEG1 # IF NEG ZERO SUBTRACT 1
AD 20BIAS
BIASCOM TS MPAC # TEST FOR OVERFLOW
BIASCOM TS MPAC # TEST FOR OVEFLOW
TC +3 # NO OVFLOW
CAF BIT15 # IF OVFLOW
ADS MPAC

View File

@ -171,7 +171,7 @@ CDUINC TS TEM2 # 1'S COMPL. QUANT. ARRIVES IN ACC. STORE IT
AD ONE
TCF +4
AD ONE
AD ONE # OVERFLOW HERE IF 2'S COMPL. IS 180 DEG.
AD ONE # OVEFLOW HERE IF 2'S COMPL. IS 180 DEG.
COM
AD TEM2 # SULT MOVES FROM 2ND TO 3D QUAD. (OR BACK)
@ -250,7 +250,7 @@ TRANSP2 CAF XNB1EB
# 2. GENERATE IN MPAC THE SIGNUM FUNCTION OF MPAC:
# ENTRY: RTB
# SIGNMPAC
# IN EITHER CASE, RETURN IS TO THE NEXT INTERPRETIVE INSTRUCTION IN THE CALLING SEQUENCE.
# IN EITHER CASE, RETURN IS TO TEH NEXT INTERPRETIVE INSTRUCTION IN THE CALLING SEQUENCE.
SIGNMPAC EXTEND
DCA DPOSMAX

View File

@ -150,7 +150,7 @@
# SECOND INTERVALS) WILL BENEFIT FROM THE CONVERGENT NATURE OF THE
# APPROXIMATION.
#
# FOR LARGE OGAERROR THE TANGENT INTERSECTS +-MINLIM SWITCH BOUNDRY BEFORE
# FOR LARGE OGAERROR THE TANGENT INTERSECTS +-MINLIM SWITCH BOUNDARY BEFORE
# INTERSECTING THE STRAIGHT LINE SWITCH. HOWEVER THE MINLIM IS
# IGNORED IN COMPUTING THE FIRING TIME, SO THAT THE EXTENSION (INTO
# THE COAST REGION) OF THE STRAIGHT LINE SWITCH IS WHAT IS FIRED TO.

View File

@ -1,5 +1,5 @@
# Copyright: Public domain.
# Filename: ASCENT_GUIDNCE.agc
# Filename: ASCENT_GUIDANCE.agc
# Purpose: Part of the source code for Luminary 1A build 099.
# It is part of the source code for the Lunar Module's (LM)
# Apollo Guidance Computer (AGC), for Apollo 11.