Fixed typos
This commit is contained in:
@ -243,7 +243,7 @@ OANB SETPD STQ
|
||||
GOTO
|
||||
GCTR
|
||||
# Page 250
|
||||
# SURFSTAR COMPUTES A STAR VECTOR IN SM COORDINAGES FOR LUNAR
|
||||
# SURFSTAR COMPUTES A STAR VECTOR IN SM COORDINATES FOR LUNAR
|
||||
# SURFACE ALIGNMENT AND EXITS TO AVEIT TO AVERAGE STAR VECTORS.
|
||||
#
|
||||
# GIVEN X-MARK PLANE 1/4 VEC IN NB AT 18D OF LOCAL VAC
|
||||
|
@ -890,7 +890,7 @@ REP40ALM CAF V05N09 # (14)
|
||||
TCF +2 # PROCEED CHECK FOR P42
|
||||
TCF REP40ALM # V32E REDISPLAY ALARM
|
||||
|
||||
INDEX WHICH # FOR P42, ALLOW CREW TO PRECEED EVEN
|
||||
INDEX WHICH # FOR P42, ALLOW CREW TO PROCEED EVEN
|
||||
TCF 14 # THOUGH VEHICLE IS UNSTAGED.
|
||||
|
||||
# ********************************
|
||||
|
@ -115,7 +115,7 @@
|
||||
# SAME AS ECADR, BUT USED WHEN THE WORD ADDRESSED IS THE LEFT
|
||||
# HALF OF A DOUBLE-PRECISION WORD FOR DOWN TELEMETRY.
|
||||
# B. 2DNADR - 6DNADR N-WORD DOWNLIST ADDRESS, N = 2 - 6.
|
||||
# SAME AS 1DNADR, BUT WTIH THE 4 UNUSED BITS OF THE ECADR FORMAT
|
||||
# SAME AS 1DNADR, BUT WITH THE 4 UNUSED BITS OF THE ECADR FORMAT
|
||||
# FILLED IN WITH 0001-0101. USED TO POINT TO A LIST OF N DOUBLE-
|
||||
# PRECISION WORDS, STORED CONSECUTIVELY, FOR DOWN TELEMETRY.
|
||||
# C. DNCHAN DOWNLIST CHANNEL ADDRESS.
|
||||
@ -339,7 +339,7 @@ SUBLIST EQUALS DNQ
|
||||
# AFTER KEYING IN V74E THE CURRENT DOWNLIST WILL BE IMMEDIATELY TERMINATED AND THE DOWNLINK ERASABLE DUMP
|
||||
# WILL BEGIN.
|
||||
#
|
||||
# ONCE INITITIATED THE DOWNLINK ERASABLE DUMP CAN BE TERMINATED (AND INTERRUPTED DOWNLIST REINSTATED) ONLY
|
||||
# ONCE INITIATED THE DOWNLINK ERASABLE DUMP CAN BE TERMINATED (AND INTERRUPTED DOWNLIST REINSTATED) ONLY
|
||||
# BY THE FOLLOWING:
|
||||
#
|
||||
# 1. A FRESH START
|
||||
|
@ -289,7 +289,7 @@ DELGMBLP TS TEM2
|
||||
TS CPHI # OUTPUTS TO NOUN22
|
||||
EXTEND
|
||||
INDEX TEM2
|
||||
MSU CDUXD # NO MATTER THAT THESE SLIGHLTY DIFFERENT
|
||||
MSU CDUXD # NO MATTER THAT THESE SLIGHTLY DIFFERENT
|
||||
COM # FROM WHEN WE INITIALLY FETCHED THEM
|
||||
INDEX TEM2
|
||||
TS -DELGMB # -UNLIMITED GIMBAL ANGLE CHGS, 1'S, PI
|
||||
|
@ -32,7 +32,7 @@
|
||||
# BY -- GEORGE SCHMIDT IL7-146 EXT 1126
|
||||
# MOD NO-ZERO
|
||||
#
|
||||
# FUNCITONAL DESCRIPTION
|
||||
# FUNCTIONAL DESCRIPTION
|
||||
#
|
||||
# THIS SECTION CONSISTS OF THE FILTER FOR THE GYRO DRIFT TESTS. NO COMPASS
|
||||
# IS DONE IN LEM. FOR A DESCRIPTION OF THE FILTER SEE E-1973. THIS
|
||||
|
@ -415,7 +415,7 @@ REDES1 DLOAD DSU
|
||||
# VELOCITY RELATIVE TO THE SURFACE
|
||||
# _______ _ _ __
|
||||
# ANGTERM = V + R * WM
|
||||
# STATE IN GUIDANCE COORDINTES:
|
||||
# STATE IN GUIDANCE COORDINATES:
|
||||
# ___ * _ ____
|
||||
# RGU = CG (R - LAND)
|
||||
# ___ * _ __ _
|
||||
@ -1257,11 +1257,11 @@ DESCBITS MASK BIT7 # COME HERE FROM MARKRUPT CODING WITH BIT
|
||||
#
|
||||
# PRECAUTION: ROOTPSRS MAKES NO CHECKS FOR OVERFLOW OR FOR IMPROPER USAGE. IMPROPER USAGE COULD
|
||||
# PRECLUDE CONVERGENCE OR REQUIRE EXCESSIVE ITERATIONS. AS A SPECIFIC EXAMPLE, ROOTPSRS FORMS A DERIVATIVE
|
||||
# COEFFICIENT TABLE BY MULTIPLYINE EACH A(I) BY I, WHERE I RANGES FROM 1 TO N. IF AN ELEMENT OF THE DERIVATIVE
|
||||
# COEFFICIENT TABLE = 1 OR >1 IN MAGNITUDE, ONLY THE EXCESS IS RETAINED. ROOTPSRS MAY CONVERGE ON THE COREECT
|
||||
# COEFFICIENT TABLE BY MULTIPLYING EACH A(I) BY I, WHERE I RANGES FROM 1 TO N. IF AN ELEMENT OF THE DERIVATIVE
|
||||
# COEFFICIENT TABLE = 1 OR >1 IN MAGNITUDE, ONLY THE EXCESS IS RETAINED. ROOTPSRS MAY CONVERGE ON THE CORRECT
|
||||
# ROOT NONETHELESS, BUT IT MAY TAKE AN EXCESSIVE NUMBER OF ITERATIONS. THEREFORE THE USER SHOULD RECOGNIZE:
|
||||
# 1. USER'S RESPONSIBILITY TO ASSUR THAT I X A(I) < 1 IN MAGNITUDE FOR ALL I.
|
||||
# 2. USER'S RESPONSIBILITY TO ASSURE OVERFLOW WILL NOT OCCUR IN EVALUTATING EITHER THE RESIDUAL OR THE DERIVATIVE
|
||||
# 2. USER'S RESPONSIBILITY TO ASSURE OVERFLOW WILL NOT OCCUR IN EVALUATING EITHER THE RESIDUAL OR THE DERIVATIVE
|
||||
# POWER SERIES. THIS OVERFLOW WOULD BE PRODUCED BY SUBROUTINE POWRSERS, CALLED BY ROOTPSRS, AND MIGHT NOT
|
||||
# PRECLUDE EVENTUAL CONVERGENCE.
|
||||
# 3. AT PRESENT, ERASABLE LOCATIONS ARE RESERVED ONLY FOR N UP TO 5. AN N IN EXCESS OF 5 WILL PRODUCE CHAOS.
|
||||
|
@ -964,7 +964,7 @@ HEADTJET CA ZERO
|
||||
-FOURDEG DEC -.08888
|
||||
|
||||
# Page 1440
|
||||
# JET POLICY CONTSTRUCTION SUBROUTINE
|
||||
# JET POLICY CONSTRUCTION SUBROUTINE
|
||||
#
|
||||
# INPUT: ROTINDEX, NUMBERT
|
||||
#
|
||||
|
@ -90,7 +90,7 @@ V06N33 VN 0633
|
||||
V06N42 VN 0642
|
||||
|
||||
# Page 616
|
||||
# PROGRAM DESCRPTION S30.1 DATE 9NOV66
|
||||
# PROGRAM DESCRIPTION S30.1 DATE 9NOV66
|
||||
# MOD NO 1 LOG SECTION P30,P37
|
||||
# MOD BY RAMA AIYAWAR **
|
||||
#
|
||||
|
@ -34,7 +34,7 @@
|
||||
#
|
||||
# PURPOSE
|
||||
|
||||
# (1) TO CALCULATE PARAMETERS ASSOCIATED WTIH THE TIME FOLLOWING
|
||||
# (1) TO CALCULATE PARAMETERS ASSOCIATED WITH THE TIME FOLLOWING
|
||||
# CONCENTRIC FLIGHT PLAN MANEUVERS -- THE CO-ELLIPTIC SEQUENCE
|
||||
# INITIATION (CSI) MANEUVER AND THE CONSTANT DELTA ALTITUDE
|
||||
# (CDH) MANEUVER.
|
||||
|
@ -236,7 +236,7 @@ GOABORT TC INTPRET
|
||||
TC DOWNFLAG
|
||||
ADRES IDLEFLAG
|
||||
|
||||
TC UPFLAG # INSURE 4-JET TRANSLATION CAPABILIITY.
|
||||
TC UPFLAG # INSURE 4-JET TRANSLATION CAPABILITY.
|
||||
ADRES ACC4-2FL
|
||||
|
||||
TC CHECKMM
|
||||
|
@ -476,7 +476,7 @@ QERRCALC CAE CDUY # Q-ERROR CALCULATION
|
||||
TS DAPTEMP2 # SAVE FOR RERRCALC
|
||||
EXTEND
|
||||
MP M22 # (CDUZ-CDUZD)*M22 SCALED AT PI RADIANS
|
||||
AD DELQEROR # KALCMANU INERFACE ERROR
|
||||
AD DELQEROR # KALCMANU INTERFACE ERROR
|
||||
AD E
|
||||
XCH QERROR # SAVE Q-ERROR FOR EIGHT-BALL DISPLAY.
|
||||
|
||||
@ -487,7 +487,7 @@ RERRCALC CAE DAPTEMP1 # R-ERROR CALCULATION:
|
||||
CAE DAPTEMP2 # SECOND TERM CALCULATION:
|
||||
EXTEND # CDU ANGLE -ANGLE DESIRED (Z-AXIS)
|
||||
MP M32 # (CDUZ-CDUZD)*M32 SCALED AT PI RADIANS
|
||||
AD DELREROR # KALCMANU INERFACE ERROR
|
||||
AD DELREROR # KALCMANU INTERFACE ERROR
|
||||
AD E
|
||||
XCH RERROR # SAVE R-ERROR FOR EIGHT-BALL DISPLAY.
|
||||
TC Q
|
||||
@ -538,7 +538,7 @@ TJLAW CA TJLAWADR
|
||||
CADR SPSRCS # DETERMINE RCS CONTROL
|
||||
RELINT
|
||||
CAF FOUR # ALWAYS CALL FOR 2-JET CONTROL ABOUT U,V.
|
||||
TS NUMBERT # FALL THROUGH TO JET SLECTION, ETC.
|
||||
TS NUMBERT # FALL THROUGH TO JET SELECTION, ETC.
|
||||
|
||||
# Q,R-JET-SELECTION-LOGIC
|
||||
#
|
||||
|
@ -113,7 +113,7 @@ TPMODE CAF ONE # MODE IS TP.
|
||||
TS MPAC # AND SKIP ON OVERFLOW.
|
||||
TC Q
|
||||
|
||||
INDEX A # OVERFLOW UNCORRECT AND IN MSU.
|
||||
INDEX A # OVERFLOW INCORRECT AND IN MSU.
|
||||
CAF LIMITS
|
||||
ADS MPAC
|
||||
TC Q
|
||||
|
@ -1067,7 +1067,7 @@ MUNRVG VLOAD VXSC
|
||||
R1S
|
||||
VXV VSL2
|
||||
WM
|
||||
STODL DELVS # LUNAR ROTATION CORRECTON TERM*2(5) M/CS.
|
||||
STODL DELVS # LUNAR ROTATION CORRECTION TERM*2(5) M/CS.
|
||||
36D
|
||||
DSU
|
||||
/LAND/
|
||||
|
@ -126,7 +126,7 @@ IGNALOOP DLOAD
|
||||
# 10
|
||||
# 2 (VGU - 16 VGU KIGNX/B4)
|
||||
# 2 0
|
||||
# Page 787 new page is actually one line earlier but this would put the indices on a seperate line
|
||||
# Page 787 new page is actually one line earlier but this would put the indices on a separate line
|
||||
# disconnected from their respective variables
|
||||
# THE NUMERATOR IS SCALED IN METERS AT 2(28). THE DENOMINATOR IS A VELOCITY IN UNITS OF 2(10) M/CS.
|
||||
# THE QUOTIENT IS THUS A TIME IN UNITS OF 2(18) CENTISECONDS. THE FINAL SHIFT RESCALES TO UNITS OF 2(28) CS.
|
||||
|
@ -131,7 +131,7 @@ DOIT CA PIF
|
||||
CA TIME1
|
||||
TS TTHROT
|
||||
|
||||
# SINCE /AF/ IS NOT AN INSTANTANEOUS ACELERATION, BUT RATHER AN "AVERAGE" OF THE ACCELERATION LEVELS DURING
|
||||
# SINCE /AF/ IS NOT AN INSTANTANEOUS ACCELERATION, BUT RATHER AN "AVERAGE" OF THE ACCELERATION LEVELS DURING
|
||||
# THE PRECEEDING PIPA INTERVAL, AND SINCE FP IS COMPUTED DIRECTLY FROM /AF/, FP IN ORDER TO CORRESPOND TO THE
|
||||
# ACTUAL THRUST LEVEL AT THE END OF THE INTERVAL MUST BE WEIGHTED BY
|
||||
#
|
||||
|
@ -31,7 +31,7 @@
|
||||
# Page 1460
|
||||
# PROGRAM DESCRIPTION
|
||||
# DESIGNED BY: R. D. GOSS AND P. S. WEISSMAN
|
||||
# CODED BY: P. S. WEISSMAN, 28 FEBRURARY 1968
|
||||
# CODED BY: P. S. WEISSMAN, 28 FEBRUARY 1968
|
||||
#
|
||||
# TJETLAW IS CALLED AS A SUBROUTINE WHEN THE LEM IS NOT DOCKED AND THE AUTOPILOT IS IN THE AUTOMATIC OR
|
||||
# ATTITUDE-HOLD MODE TO CALCULATE THE JET-FIRING-TIME (TJET) REQUIRED FOR THE AXIS INDICATED BY AXISCTR:
|
||||
|
@ -603,7 +603,7 @@ GMBLBITB OCTAL 06000 # INDEXED WRT GMBLBITA DO NOT MOVE *******
|
||||
|
||||
# SUBROUTINE ROOTCYCL: BY CRAIG WORK, 3 APRIL 68
|
||||
#
|
||||
# ROOTCYCL IS A SUBROUTINE WHICH EXECUTS ONE NEWTON SQUARE ALGORITHM ITERATION. THE INITIAL GUESS AT THE
|
||||
# ROOTCYCL IS A SUBROUTINE WHICH EXECUTES ONE NEWTON SQUARE ALGORITHM ITERATION. THE INITIAL GUESS AT THE
|
||||
# SQUARE ROOT IS PRESUMED TO BE IN THE A REGISTER AND ONE-HALF THE SQUARE IS TAKEN FROM HALFARG. THE NEW APPROXIMATION
|
||||
# TO THE SQUARE ROOT IS RETURNED IN THE A REGISTER. DEBRIS: A, L, SR, SCRATCH. ROOTCYCL IS CALLED FROM
|
||||
# LOCATION (LOC) BY A TC ROOTCYCL, AND RETURNS (TC Q) TO LOC +1.
|
||||
|
Reference in New Issue
Block a user