kjodle/Apollo-11
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Proof read STABLE_ORBIT (#294)

Browse Source 
* Proof read page 525

* Proof read page 526

* Proof read page 527

* Proof read page 528

* Proof read page 529 and fix in page 525

* Proof read page 530

* Proof read page 531

* Proof read page 532

* Do requested adjustments
This commit is contained in:
Felix Wittwer 2017-05-04 01:06:02 +02:00 committed by James Harris
parent 947420dd32
commit 66773eedab
1 changed files with 13 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
Comanche055/STABLE_ORBIT.agc
View File

@ -56,7 +56,7 @@
#
# (A) TIG TIME OF SOI MANEUVER
# (B) CENTANG ORBITAL CENTRAL ANGLE OF THE PASSIVE VEHICLE
# DURING THE TRANSFER FROM TIG TO TIME OF INTERCEPT
# DURING TRANSFER FROM TIG TO TIME OF INTERCEPT
# (C) DELTAR THE DESIRED SEPARATION OF THE TWO VEHICLES
# SPECIFIED AS A DISTANCE ALONG THE PASSIVE VEHICLE
# ORBIT
@ -85,7 +85,7 @@
# THE SOI (SOR) MANEUVER
# (6) DELVTPI MAGNITUDE OF DELTA V AT SOI (SOR) TIME
# (7) DELVTPF MAGNITUDE OF DELTA V AT INTERCEPT TIME
# (8) DELTA VELOCITY AT SOI (AND SOR) - LOCAL VERTICAL
# (8) DELVLVC DELTA VELOCITY AT SOI (AND SOR) - LOCAL VERTICAL
# COORDINATES
#
# SUBROUTINES USED
@ -122,7 +122,7 @@ P78 TC AVFLAGP # OTHER VEHICLE ACTIVE
TCF GOTOP00H # TERMINATE
TCF +5 # PROCEED
TCF -5 # RECYCLE
CAF THREE # IMMEDIATE RETURN -- BLANK R1, R2
CAF THREE # IMMEDIATE RETURN - BLANK R1, R2
TCR BLANKET
TCF ENDOFJOB
CAF FIVE
@ -130,13 +130,13 @@ P78 TC AVFLAGP # OTHER VEHICLE ACTIVE
CAF ONE
TS OPTION2 # OPTION CODE IS SET TO 1
# Page 527
CAF V04N06SR # DISPLAY OPTION CODE -1 = SOI, 2 = SOR
CAF V04N06SR # DISPLAY OPTION CODE - 1 = SOI, 2 = SOR
TCR BANKCALL
CADR GOFLASHR
TCF GOTOP00H # TERMINATE
TCF +5 # PROCEED
TCF -5 # RECYCLE
CAF BIT3 # IMMEDIATE RETURN -- BLANK R3
CAF BIT3 # IMMEDIATE RETURN - BLANK R3
TCR BLANKET
TCF ENDOFJOB
TC INTPRET
@ -150,7 +150,7 @@ P78 TC AVFLAGP # OTHER VEHICLE ACTIVE
TINT
STORE TINTSOI # STORE FOR SOR PHASE
CLRGO
OPTNSW # OPTNSW: ON = SOI. OFF = SOR
OPTNSW # OPTNSW; ON = SOI, OFF = SOR
JUNCTN1
OPTN1 SET CLEAR # SOI
OPTNSW
@ -209,7 +209,6 @@ JUNCTN2 DLOAD DSU
STORE TARGTIME # TT = TI - DELTA T
# .... MAINRTNE ....
#
# SUBROUTINES USED
#
# S3435.25
@ -248,7 +247,7 @@ MAINRTN1 VLOAD ABVAL
VPASS4
VSU ABVAL
VTPRIME
STOVL DELVTPF # DELTA V (FINAL) = V-T - VT
STOVL DELVTPF # DELTA V (FINAL) = V'T - VT
RACT3
PDVL CALL
VIPRIME
@ -287,7 +286,7 @@ DSPLY81 CAF V06N81SR # DISPLAY DELTA V (LV)
# CONDITIONS REQUIRED BY THE AGC TO MAKE A MIDCOURSE CORRECTION
# Page 530
# MANEUVER AFTER COMPLETING THE SOI MANEUVER BUT BEFORE MAKING
# THE SOR MANEUVER.
# THE SOR MANEUVER
#
# CALLING SEQUENCE
#
@ -298,8 +297,8 @@ DSPLY81 CAF V06N81SR # DISPLAY DELTA V (LV)
#
# INPUT
#
# (1) TPASS4 TIME OF INTERCEPT -- SAVED FROM P38/P78
# (2) TARGTIME TIME THAT PASSIVE VEHICLE IS AT INTERCEPT POINT --
# (1) TPASS4 TIME OF INTERCEPT - SAVED FROM P38/P78
# (2) TARGTIME TIME THAT PASSIVE VEHICLE IS AT INTERCEPT POINT -
# SAVED FROM P38/P78
#
# OUTPUT
@ -307,7 +306,7 @@ DSPLY81 CAF V06N81SR # DISPLAY DELTA V (LV)
# (1) TRKMKCNT NUMBER OF MARKS
# (2) TTOGO TIME TO GO
# (3) +MGA MIDDLE GIMBAL ANGLE
# (4) DELVLVC DELTA VELOCITY AT MID -- LOCAL VERTICAL COORDINATES
# (4) DELVLVC DELTA VELOCITY AT MID - LOCAL VERTICAL COORDINATES
#
# SUBROUTINES USED
#
@ -346,7 +345,6 @@ P39/P79B RTB DAD
MAINRTNE # CALCULATE DELTA V AND DELTA V (LV)
# .... PREC/TT ....
#
# SUBROUTINES USED
#
# PRECSET
@ -378,9 +376,7 @@ PREC/TT STQ DLOAD
DLOAD GOTO
T
RTRN
# .... INTRPVP ....
#
# SUBROUTINES USED
#
# CSMPREC
@ -399,9 +395,7 @@ OTHERV CALL
LEMPREC
GOTO
RTRN
# .... VNDSPLY ....
#
# SUBROUTINES USED
#
# BANKCALL