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

Proof P12 #611 (#672)

Browse Source 
* Fix typo of a comment in P12

* Fix more typos

* Update P12.agc

* Update P12.agc

* Remove spaces

* Update P12.agc
This commit is contained in:
Alejandro Garcia 2020-06-02 15:02:37 -04:00 committed by GitHub
parent 8c3f025d33
commit 0b93a9ba1c
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 6 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
Luminary099/P12.agc
View File

@ -58,7 +58,7 @@ P12LM TC PHASCHNG
TS DVCNTR
CA ZERO
TS TRKMKCNT # SHOW THAT R29 DOWNLINK DATA IS NOT READY.
TS TRKMKCNT # SHOW THAT R29 DOWNLINK DATA ISN'T READY.
CAF V06N33A
TC BANKCALL # FLASH TIG
CADR GOFLASH
@ -86,19 +86,19 @@ P12LMB DLOAD
VATT
REFSMMAT
VSL1
STOVL V1S # COMPUTE V1S = VEL(TIG)*2(-7) M/CS.
STOVL V1S # COMPUTE V1S = VEL(TIG)*2(-7)M/CS.
RATT
MXV VSL6
REFSMMAT
STCALL R # COMPUTE R = POS(TIG)*2(-24) M.
MUNGRAV # COMPUTE GDT1/2(TIG)*2(-T)M/CS.
STCALL R # COMPUTE R = POS(TIG)*2(-24)M.
MUNGRAV # COMPUTE GDT1/2(TIG)*2(-7)M/CS.
VLOAD UNIT
R
STCALL UNIT/R/ # COMPUTE UNIT/R/ FOR YCOMP.
YCOMP
SR DCOMP
5D
STODL XRANGE # INITIALIZE XRANGE FOR NOUN 76
STODL XRANGE # INITIALIZE XRANGE FOR NOUN 76.
VINJNOM
STODL ZDOTD
RDOTDNOM
@ -136,7 +136,7 @@ NEWLOAD CAF V06N76 # FLASH CROSS-RANGE, AND APOLUNE VALUES.
STORE V # V(TIPOVER) = V(IGN) + 57FPS (UNIT/R/)
DOT SL1
UNIT/R/
STOVL RDOT # RDOT = 2(-7)
STOVL RDOT # RDOT * 2(-7)
UNIT/R/
VXV UNIT
QAXIS
@ -241,5 +241,3 @@ GUIDINIT STQ SETPD
49FPS 2DEC .149352 B-6 # EXPECTED RDOT AT TIPOVER
VINJNOM 2DEC 16.7924 B-7 # 5509.5 FPS(APO=30NM WITH RDOT=19.5FPS)
RDOTDNOM 2DEC .059436 B-7 # 19.5 FPS