Source Code
|
These source code files are a reconstruction of Sundance, the Apollo 9 LM (Lunar Module) AGC
(Apollo Guidance Computer) flight software, created from binary dumps of original core rope
program modules, as follows:
Since only binary dumps (rather than listings) of Sundance are available as source material, all comments and labels are approximate. They have been taken from other AGC programs where possible, or, in some places, written from scratch to match what we believe would have been in the original listing. |
044130,000002: ## Copyright: Public domain.
044131,000003: ## Filename: MEASUREMENT_INCORPORATION.agc
044132,000004: ## Purpose: A section of a reconstructed, mixed version of Sundance
044133,000005: ## It is part of the reconstructed source code for the Lunar
044134,000006: ## Module's (LM) Apollo Guidance Computer (AGC) for Apollo 9.
044135,000007: ## No original listings of this program are available;
044136,000008: ## instead, this file was created via disassembly of dumps
044137,000009: ## of various revisions of Sundance core rope modules.
044138,000010: ## Assembler: yaYUL
044139,000011: ## Contact: Ron Burkey <info@sandroid.org>.
044140,000012: ## Website: www.ibiblio.org/apollo/index.html
044141,000013: ## Mod history: 2020-06-17 MAS Created from Luminary 69.
044142,000014:
044143,000015: ## Sundance 302
044144,000016:
044145,000017: # INCORP1--PERFORMS THE SIX DIMENSIONAL STATE VECTOR DEVIATION FOR POSITI
044146,000018: # ON AND VELOCITY OR THE NINE DIMENSIONAL DEVIATION OF POSITION,VELOCITY,A
044147,000019: # ND RADAR OR LANDMARK BIAS.THE OUTPUT OF THE BVECTOR ROUTINE ALONG WITH T
044148,000020: # HE ERROR TRANSITION MATRIX(W) ARE USED AS INPUT TO THE ROUTINE.THE DEVIA
044149,000021: # TION IS OBTAINED BY COMPUTING AN ESTIMATED TRACKING MEASUREMENT FROM THE
044150,000022: # CURRENT STATE VECTOR AND COMPARING IT WITH AN ACTUAL TRACKING MEASUREMEN
044151,000023: # T AND APPLYING A STATISTICAL WEIGHTING VECTOR.
044152,000024:
044153,000025: # INPUT
044154,000026: # DMENFLG = 0 6DIMENSIONAL BVECTOR 1=9DIMENSIONAL
044155,000027: # W = ERROR TRANSITION MATRIX 6X6 OR 9X9
044156,000028: # VARIANCE = VARIANCE (SCALAR)
044157,000029: # DELTAQ = MEASURED DEVIATION (SCALAR)
044158,000030: # BVECTOR = 6 OR 9 DIMENSIONAL BVECTOR
044159,000031:
044160,000032: # OUTPUT
044161,000033: # DELTAX = STATE VECTOR DEVIATIONS 6 OR 9 DIMENSIONAL
044162,000034: # ZI = VECTOR USED FOR THE INCORPORATION 6 OR 9 DIMENSIONAL
044163,000035: # GAMMA = SCALAR
044164,000036: # OMEGA = OMEGA WEIGHTING VECTOR 6 OR 9 DIMENTIONAL
044165,000037: # CALLING SEQUENCE
044166,000038: # L CALL INCORP1
044167,000039:
044168,000040: # NORMAL EXIT
044169,000041: # L+1 OF CALLING SEQUENCE
044170,000042:
044171,000043: 37,3507 BANK 37
044172,000044: 23,2000 SETLOC MEASINC
044173,000045: 23,2000 BANK
044174,000046:
044175,000047: 23,2242 COUNT* $$/INCOR
044176,000048:
044177,000049: 23,2242 E5,1400 EBANK= W
044178,000050:
044179,000051: 23,2242 77620 INCORP1 STQ
044180,000052: 23,2243 02772 EGRESS
044181,000053: 23,2244 66370 AXT,1 SSP
044182,000054: 23,2245 00066 54D
044183,000055: 23,2246 00051 S1
044184,000056: 23,2247 00022 18D # IX1 = 54 S1= 18
044185,000057: 23,2250 66374 AXT,2 SSP
044186,000058: 23,2251 00022 18D
044187,000059: 23,2252 00052 S2
044188,000060: 23,2253 00006 6 # IX2 = 18 S2=6
044189,000061: 23,2254 63775 Z123 VLOAD MXV*
044190,000062: 23,2255 03512 BVECTOR # BVECTOR (0)
044191,000063: 23,2256 02467 W +54D,1
044192,000064: 23,2257 12665 STORE ZI +18D,2
044193,000065: 23,2260 77775 VLOAD
044194,000066: 23,2261 03520 BVECTOR +6 # BVECTOR (1)
044195,000067: 23,2262 52717 MXV* VAD*
044196,000068: 23,2263 02555 W +108D,1
044197,000069: 23,2264 75112 ZI +18D,2
044198,000070: 23,2265 12665 STORE ZI +18D,2
044199,000071: 23,2266 77775 VLOAD
044200,000072: 23,2267 03526 BVECTOR +12D # BVECTOR (2)
044201,000073: 23,2270 52717 MXV* VAD*
044202,000074: 23,2271 02643 W +162D,1
044203,000075: 23,2272 75112 ZI +18D,2 # B(0)*W+B(1)*(W+54)+B(2)*(W+108) FIRST PAS
044204,000076: 23,2273 12665 STORE ZI +18D,2 # ZI THEN Z2 THEN Z3
044205,000077: 23,2274 77700 TIX,1
044206,000078: 23,2275 46276 INCOR1
044207,000079: 23,2276 43104 INCOR1 TIX,2 BON
044208,000080: 23,2277 46254 Z123 # LOOP FOR Z1,Z2,Z3
044209,000081: 23,2300 02706 DMENFLG
044210,000082: 23,2301 46305 INCOR1A
044211,000083: 23,2302 77775 VLOAD
044212,000084: 23,2303 06233 ZEROVECS
044213,000085: 23,2304 02657 STORE ZI +12D
044214,000086: 23,2305 77201 INCOR1A SETPD VLOAD
044215,000087: 23,2306 00001 0
044216,000088: 23,2307 02643 ZI
044217,000089: 23,2310 47036 VSQ RTB
044218,000090: 23,2311 21531 TPMODE
044219,000091: 23,2312 47515 PDVL VSQ
044220,000092: 23,2313 02651 ZI +6
044221,000093: 23,2314 76234 RTB TAD
044222,000094: 23,2315 21531 TPMODE
044223,000095: 23,2316 47515 PDVL VSQ
044224,000096: 23,2317 02657 ZI +12D
044225,000097: 23,2320 76234 RTB TAD
044226,000098: 23,2321 21531 TPMODE
044227,000099: 23,2322 77171 TAD AXT,2
044228,000100: 23,2323 02707 VARIANCE
044229,000101: 23,2324 00000 0
044230,000102: 23,2325 02665 STORE TRIPA # ZI*2 + Z2*2 + Z3*2 + VARIANCE
044231,000103: 23,2326 40151 TLOAD BOV
044232,000104: 23,2327 02707 VARIANCE # CLEAR OVFIND
044233,000105: 23,2330 46331 +1
044234,000106: 23,2331 02670 STORE TEMPVAR # TEMP STORAGE FOR VARIANCE
044235,000107: 23,2332 77654 BZE
044236,000108: 23,2333 46342 INCOR1C
044237,000109: 23,2334 40112 INCOR1B SL2 BOV
044238,000110: 23,2335 46342 INCOR1C
044239,000111: 23,2336 02670 STORE TEMPVAR
044240,000112: 23,2337 52114 INCR,2 GOTO
044241,000113: 23,2340 00001 DEC 1 B-14
044242,000114: 23,2341 46334 INCOR1B
044243,000115: 23,2342 61551 INCOR1C TLOAD ROUND
044244,000116: 23,2343 02665 TRIPA
044245,000117: 23,2344 75405 DMP SQRT
044246,000118: 23,2345 02670 TEMPVAR
044247,000119: 23,2346 76257 SL* TAD
044248,000120: 23,2347 57576 0,2
044249,000121: 23,2350 02665 TRIPA
044250,000122: 23,2351 63101 NORM INCR,2
044251,000123: 23,2352 00050 X2
044252,000124: 23,2353 77775 DEC -2 B-14
044253,000125: 23,2354 77134 SXA,2 AXT,2
044254,000126: 23,2355 02105 NORMGAM # NORMALIZATION COUNT -2 FOR GAMMA
044255,000127: 23,2356 00242 162D
044256,000128: 23,2357 40265 BDDV SETPD
044257,000129: 23,2360 06223 DP1/4TH
044258,000130: 23,2361 00001 0
044259,000131: 23,2362 03465 STORE GAMMA
044260,000132: 23,2363 60351 TLOAD NORM
044261,000133: 23,2364 02665 TRIPA
044262,000134: 23,2365 00047 X1
044263,000135: 23,2366 65345 DLOAD PDDL # PD 0-1 = NORM (A)
044264,000136: 23,2367 00155 MPAC
044265,000137: 23,2370 03534 DELTAQ
044266,000138: 23,2371 77701 NORM
044267,000139: 23,2372 00051 S1
044268,000140: 23,2373 70460 XSU,1 SR1
044269,000141: 23,2374 00050 S1
044270,000142: 23,2375 41471 DDV PUSH # PD 0-1 = DELTAQ/A
044271,000143: 23,2376 77731 -3 SSP
044272,000144: 23,2377 00052 S2
044273,000145: 23,2400 00066 54D
044274,000146: 23,2401 60775 INCOR2 VLOAD VXM* # COMPUTE OMEGA1,2,3
044275,000147: 23,2402 02643 ZI
044276,000148: 23,2403 75134 W +162D,2
044277,000149: 23,2404 77206 PUSH VLOAD
044278,000150: 23,2405 02651 ZI +6
044279,000151: 23,2406 53303 VXM* VAD
044280,000152: 23,2407 75112 W +180D,2
044281,000153: 23,2410 77206 PUSH VLOAD
044282,000154: 23,2411 02657 ZI +12D
044283,000155: 23,2412 53303 VXM* VAD
044284,000156: 23,2413 75070 W +198D,2
044285,000157: 23,2414 61006 PUSH TIX,2 # PD 2-7=OMEGA1, 8-13=OMEGA2, 14-19=OMEGA3
044286,000158: 23,2415 46401 INCOR2
044287,000159: 23,2416 45575 VLOAD STADR
044288,000160: 23,2417 74273 STORE OMEGA +12D
044289,000161: 23,2420 45575 VLOAD STADR
044290,000162: 23,2421 74301 STORE OMEGA +6
044291,000163: 23,2422 45575 VLOAD STADR
044292,000164: 23,2423 74307 STORE OMEGA
044293,000165: 23,2424 77214 BON VLOAD
044294,000166: 23,2425 02706 DMENFLG
044295,000167: 23,2426 46431 INCOR2AB
044296,000168: 23,2427 06233 ZEROVECS
044297,000169: 23,2430 03504 STORE OMEGA +12D
044298,000170: 23,2431 66374 INCOR2AB AXT,2 SSP
044299,000171: 23,2432 00022 18D
044300,000172: 23,2433 00052 S2
044301,000173: 23,2434 00006 6
044302,000174: 23,2435 77773 INCOR3 VLOAD*
044303,000175: 23,2436 74265 OMEGA +18D,2
044304,000176: 23,2437 53761 VXSC VSL*
044305,000177: 23,2440 00001 0 # DELTAQ/A
044306,000178: 23,2441 20201 0,1
044307,000179: 23,2442 12707 STORE DELTAX +18D,2
044308,000180: 23,2443 77304 TIX,2 VLOAD
044309,000181: 23,2444 46435 INCOR3
044310,000182: 23,2445 02673 DELTAX +6
044311,000183: 23,2446 77732 VSL3
044312,000184: 23,2447 02673 STORE DELTAX +6
044313,000185: 23,2450 77650 GOTO
044314,000186: 23,2451 02772 EGRESS
044315,000187:
044316,000188: # INCORP2 -INCORPORATES THE COMPUTED STATE VECTOR DEVIATIONS INTO THE
044317,000189: # ESTIMATED STATE VECTOR. THE STATE VECTOR UPDATED MAY BE FOR EITHER THE
044318,000190: # LEM OR THE CSM. DETERMINED BY FLAG VEHUPFLG. (ZERO = LEM) (1 = CSM)
044319,000191:
044320,000192: # INPUT
044321,000193: # PERMANENT STATE VECTOR FOR EITHER THE LEM OR CSM
044322,000194: # VEHUPFLG = UPDATE VEHICLE 0=LEM 1=CSM
044323,000195: # W = ERROR TRANSITION MATRIX
044324,000196: # DELTAX = COMPUTED STATE VECTOR DEVIATIONS
044325,000197: # DMENFLG = SIZE OF W MATRIX (ZERO=6X6) (1=9X9)
044326,000198: # GAMMA = SCALAR FOR INCORPORATION
044327,000199: # ZI = VECTOR USED IN INCORPORATION
044328,000200: # OMEGA = WEIGHTING VECTOR
044329,000201:
044330,000202: # OUTPUT
044331,000203: # UPDATED PERMANENT STATE VECTOR
044332,000204:
044333,000205: # CALLING SEQUENCE
044334,000206: # L CALL INCORP2
044335,000207:
044336,000208: # NORMAL EXIT
044337,000209: # L+1 OF CALLING SEQUENCE
044338,000210:
044339,000211:
044340,000212: 23,2000 SETLOC MEASINC1
044341,000213: 23,2000 BANK
044342,000214:
044343,000215: 23,2452 COUNT* $$/INCOR
044344,000216:
044345,000217: 23,2452 45020 INCORP2 STQ CALL
044346,000218: 23,2453 02772 EGRESS
044347,000219: 23,2454 27362 INTSTALL
044348,000220: 23,2455 74375 VLOAD VXSC # CALC. GAMMA * OMEGA1,2,3
044349,000221: 23,2456 03470 OMEGA
044350,000222: 23,2457 03465 GAMMA
044351,000223: 23,2460 26713 STOVL OMEGAM1
044352,000224: 23,2461 03476 OMEGA +6
044353,000225: 23,2462 77761 VXSC
044354,000226: 23,2463 03465 GAMMA
044355,000227: 23,2464 26721 STOVL OMEGAM2
044356,000228: 23,2465 03504 OMEGA +12D
044357,000229: 23,2466 77761 VXSC
044358,000230: 23,2467 03465 GAMMA
044359,000231: 23,2470 02727 STORE OMEGAM3
044360,000232: 23,2471 77776 EXIT
044361,000233: 23,2472 32754 CAF 54DD # INITIAL IX 1 SETTING FOR W MATRIX
044362,000234: 23,2473 55324 TS WIXA
044363,000235: 23,2474 55325 TS WIXB
044364,000236: 23,2475 35030 CAF ZERO
044365,000237: 23,2476 55326 TS ZIXA # INITIAL IX 2 SETTING FOR Z COMPONENT
044366,000238: 23,2477 55327 TS ZIXB
044367,000239: 23,2500 05413 FAZA TC PHASCHNG
044368,000240: 23,2501 04022 OCT 04022
044369,000241: 23,2502 40774 CS RASFLAG
044370,000242: 23,2503 75020 MASK REINTBIT
044371,000243: 23,2504 26774 ADS RASFLAG
044372,000244: 23,2505 31325 FAZA1 CA WIXB # START FIRST PHASE OF INCORP2
044373,000245: 23,2506 55324 TS WIXA # TO UPDATE 6 OR 9 DIM. W MATRIX IN TEMP
044374,000246: 23,2507 31327 CA ZIXB
044375,000247: 23,2510 55326 TS ZIXA
044376,000248: 23,2511 06014 TC INTPRET
044377,000249: 23,2512 73150 LXA,1 LXA,2
044378,000250: 23,2513 01324 WIXA
044379,000251: 23,2514 01326 ZIXA
044380,000252: 23,2515 70731 SSP DLOAD*
044381,000253: 23,2516 00051 S1
044382,000254: 23,2517 00006 6
044383,000255: 23,2520 75134 ZI,2
044384,000256: 23,2521 60276 DCOMP NORM # CALC UPPER 3X9 PARTITION OF W MATRIX
044385,000257: 23,2522 00052 S2
044386,000258: 23,2523 65161 VXSC XCHX,2
044387,000259: 23,2524 02713 OMEGAM1
044388,000260: 23,2525 00051 S2
044389,000261: 23,2526 57144 LXC,2 XAD,2
044390,000262: 23,2527 00047 X2
044391,000263: 23,2530 02105 NORMGAM
044392,000264: 23,2531 65057 VSL* XCHX,2
044393,000265: 23,2532 57576 0,2
044394,000266: 23,2533 00051 S2
044395,000267: 23,2534 77653 VAD*
044396,000268: 23,2535 02467 W +54D,1
044397,000269: 23,2536 02735 STORE HOLDW
044398,000270: 23,2537 57543 DLOAD* DCOMP # CALC MIDDLE 3X9 PARTITION OF W MATRIX
044399,000271: 23,2540 75134 ZI,2
044400,000272: 23,2541 74301 NORM VXSC
044401,000273: 23,2542 00052 S2
044402,000274: 23,2543 02721 OMEGAM2
044403,000275: 23,2544 71124 XCHX,2 LXC,2
044404,000276: 23,2545 00051 S2
044405,000277: 23,2546 00047 X2
044406,000278: 23,2547 53674 XAD,2 VSL*
044407,000279: 23,2550 02105 NORMGAM
044408,000280: 23,2551 57576 0,2
044409,000281: 23,2552 52724 XCHX,2 VAD*
044410,000282: 23,2553 00051 S2
044411,000283: 23,2554 02555 W +108D,1
044412,000284: 23,2555 02743 STORE HOLDW +6
044413,000285: 23,2556 77614 BOFF
044414,000286: 23,2557 02746 DMENFLG # BRANCH IF 6 DIMENSIONAL
044415,000287: 23,2560 46600 FAZB
044416,000288: 23,2561 57543 DLOAD* DCOMP # CALC LOWER 3X9 PARTITION OF W MATRIX
044417,000289: 23,2562 75134 ZI,2
044418,000290: 23,2563 74301 NORM VXSC
044419,000291: 23,2564 00052 S2
044420,000292: 23,2565 02727 OMEGAM3
044421,000293: 23,2566 71124 XCHX,2 LXC,2
044422,000294: 23,2567 00051 S2
044423,000295: 23,2570 00047 X2
044424,000296: 23,2571 53674 XAD,2 VSL*
044425,000297: 23,2572 02105 NORMGAM
044426,000298: 23,2573 57576 0,2
044427,000299: 23,2574 52724 XCHX,2 VAD*
044428,000300: 23,2575 00051 S2
044429,000301: 23,2576 02643 W +162D,1
044430,000302: 23,2577 02751 STORE HOLDW +12D
044431,000303: 23,2600 77624 FAZB CALL
044432,000304: 23,2601 11054 GRP2PC
044433,000305: 23,2602 77776 EXIT
044434,000306: 23,2603 31324 FAZB1 CA WIXA # START 2ND PHASE OF INCORP2 TO TRANSFER
044435,000307: 23,2604 62755 AD 6DD # TEMP REG TO PERM W MATRIX
044436,000308: 23,2605 55325 TS WIXB
044437,000309: 23,2606 31326 CA ZIXA
044438,000310: 23,2607 67720 AD MINUS2
044439,000311: 23,2610 55327 TS ZIXB
044440,000312: 23,2611 06014 TC INTPRET
044441,000313: 23,2612 66350 LXA,1 SSP
044442,000314: 23,2613 01324 WIXA
044443,000315: 23,2614 00051 S1
044444,000316: 23,2615 00006 6
044445,000317: 23,2616 77775 VLOAD
044446,000318: 23,2617 02735 HOLDW
044447,000319: 23,2620 06467 STORE W +54D,1
044448,000320: 23,2621 77775 VLOAD
044449,000321: 23,2622 02743 HOLDW +6
044450,000322: 23,2623 06555 STORE W +108D,1
044451,000323: 23,2624 77214 BOFF VLOAD
044452,000324: 23,2625 02746 DMENFLG
044453,000325: 23,2626 46636 FAZB5
044454,000326: 23,2627 02751 HOLDW +12D
044455,000327: 23,2630 06643 STORE W +162D,1
044456,000328: 23,2631 52100 FAZB2 TIX,1 GOTO
044457,000329: 23,2632 46634 +2
044458,000330: 23,2633 46644 FAZC # DONE WITH W MATRIX. UPDATE STATE VECTOR
044459,000331: 23,2634 77634 RTB
044460,000332: 23,2635 46500 FAZA
044461,000333: 23,2636 43335 FAZB5 SLOAD DAD
044462,000334: 23,2637 01330 ZIXB
044463,000335: 23,2640 06757 12DD
044464,000336: 23,2641 52030 BHIZ GOTO
044465,000337: 23,2642 46644 FAZC
044466,000338: 23,2643 46631 FAZB2
044467,000339: 23,2644 77624 FAZC CALL
044468,000340: 23,2645 11054 GRP2PC
044469,000341: 23,2646 53375 VLOAD VAD # START 3RD PHASE OF INCORP2
044470,000342: 23,2647 01701 X789 # 7TH,8TH,9TH,COMPONENT OF STATE VECTOR
044471,000343: 23,2650 02701 DELTAX +12D # INCORPORATION FOR X789
044472,000344: 23,2651 03457 STORE TX789
044473,000345: 23,2652 47014 BON RTB
044474,000346: 23,2653 00707 VEHUPFLG
044475,000347: 23,2654 46744 DOCSM
044476,000348: 23,2655 26740 MOVEPLEM
044477,000349: 23,2656 77004 FAZAB BOVB AXT,2
044478,000350: 23,2657 57702 TCDANZIG
044479,000351: 23,2660 00000 0
044480,000352: 23,2661 77014 BOFF AXT,2
044481,000353: 23,2662 04344 MOONTHIS
044482,000354: 23,2663 46665 +2
044483,000355: 23,2664 00002 2
044484,000356: 23,2665 53775 VLOAD VSR*
044485,000357: 23,2666 02665 DELTAX # B27 IF MOON ORBIT, B29 IF EARTH
044486,000358: 23,2667 57205 0 -7,2
044487,000359: 23,2670 40055 VAD BOV
044488,000360: 23,2671 01521 TDELTAV
044489,000361: 23,2672 46704 FAZAB1
044490,000362: 23,2673 25521 STOVL TDELTAV
044491,000363: 23,2674 02673 DELTAX +6 # B5 IF MOON ORBIT, B7 IF EARTH
044492,000364: 23,2675 53257 VSR* VAD
044493,000365: 23,2676 57202 0 -4,2
044494,000366: 23,2677 01527 TNUV
044495,000367: 23,2700 77600 BOV
044496,000368: 23,2701 46710 FAZAB2
044497,000369: 23,2702 35527 STCALL TNUV
044498,000370: 23,2703 46717 FAZAB3
044499,000371: 23,2704 53375 FAZAB1 VLOAD VAD
044500,000372: 23,2705 01535 RCV
044501,000373: 23,2706 02665 DELTAX
044502,000374: 23,2707 01535 STORE RCV
044503,000375: 23,2710 53375 FAZAB2 VLOAD VAD
044504,000376: 23,2711 01543 VCV
044505,000377: 23,2712 02673 DELTAX +6
044506,000378: 23,2713 01543 STORE VCV
044507,000379: 23,2714 45134 SXA,2 CALL
044508,000380: 23,2715 02032 PBODY
044509,000381: 23,2716 23340 RECTIFY
044510,000382: 23,2717 77624 FAZAB3 CALL
044511,000383: 23,2720 11054 GRP2PC
044512,000384: 23,2721 47014 BON RTB
044513,000385: 23,2722 00707 VEHUPFLG
044514,000386: 23,2723 46747 DOCSM1
044515,000387: 23,2724 26717 MOVEALEM
044516,000388: 23,2725 77624 CALL
044517,000389: 23,2726 26042 SVDWN2 # STORE DOWNLINK STATE VECTOR
044518,000390: 23,2727 77624 FAZAB4 CALL
044519,000391: 23,2730 11054 GRP2PC # PHASE CHANGE
044520,000392: 23,2731 77214 BOFF VLOAD
044521,000393: 23,2732 02746 DMENFLG
044522,000394: 23,2733 46736 FAZAB5 # 6 DIMENSIONAL
044523,000395: 23,2734 03457 TX789 # 9 DIMENSIONAL
044524,000396: 23,2735 01701 STORE X789
044525,000397: 23,2736 66150 FAZAB5 LXA,1 SXA,1
044526,000398: 23,2737 02772 EGRESS
044527,000399: 23,2740 00052 QPRET
044528,000400: 23,2741 77776 EXIT
044529,000401: 23,2742 04674 TC POSTJUMP # EXIT
044530,000402: 23,2743 27400 CADR INTWAKE
044531,000403: 23,2744 52034 DOCSM RTB GOTO
044532,000404: 23,2745 26673 MOVEPCSM
044533,000405: 23,2746 46656 FAZAB
044534,000406: 23,2747 45034 DOCSM1 RTB CALL
044535,000407: 23,2750 26644 MOVEACSM
044536,000408: 23,2751 26066 SVDWN1 # STORE DOWNLINK STATE VECTOR
044537,000409: 23,2752 77650 GOTO
044538,000410: 23,2753 46727 FAZAB4
044539,000411: 23,2754 23,2232 ZEROO = ZEROVECS
044540,000412: 23,2754 00066 54DD DEC 54 B-14
044541,000413: 23,2755 77771 6DD DEC -6 B-14
044542,000414: 23,2756 00014 12DD DEC 12 B-14
044543,000415:
044544,000416:
End of include-file MEASUREMENT_INCORPORATION.agc. Parent file is MAIN.agc