From 0b93a9ba1c5a0bfb8b8ef7f62c855cfe74ac43be Mon Sep 17 00:00:00 2001 From: Alejandro Garcia Date: Tue, 2 Jun 2020 15:02:37 -0400 Subject: [PATCH] Proof P12 #611 (#672) * Fix typo of a comment in P12 * Fix more typos * Update P12.agc * Update P12.agc * Remove spaces * Update P12.agc --- Luminary099/P12.agc | 14 ++++++-------- 1 file changed, 6 insertions(+), 8 deletions(-) diff --git a/Luminary099/P12.agc b/Luminary099/P12.agc index a4a58bf..cca91ab 100644 --- a/Luminary099/P12.agc +++ b/Luminary099/P12.agc @@ -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 - -