Source Code
|
These source-code files are part of a reconstructed copy of Sundial E, the
final release of the Block II Command Module (CM) Apollo Guidance Computer
(AGC) system test software.
They have been created via disassembly of binary dumps of original core rope memory modules, part numbers 2003053-121, 2003053-151, and 2003972-211, belonging to the MIT Museum. Since only binary dumps (rather than listings) of Sundial 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. |
018922,000002: ## Copyright: Public domain.
018923,000003: ## Filename: OPTIMUM_PRELAUNCH_ALIGNMENT_CALIBRATION.agc
018924,000004: ## Purpose: A section of Sundial E.
018925,000005: ## It is part of the reconstructed source code for the final
018926,000006: ## release of the Block II Command Module system test software. No
018927,000007: ## original listings of this program are available; instead, this
018928,000008: ## file was created via disassembly of dumps of Sundial core rope
018929,000009: ## modules and comparison with other AGC programs.
018930,000010: ## Assembler: yaYUL
018931,000011: ## Contact: Ron Burkey <info@sandroid.org>.
018932,000012: ## Website: www.ibiblio.org/apollo/index.html
018933,000013: ## Mod history: 2023-06-22 MAS Created from Aurora 12.
018934,000014: ## 2023-06-30 MAS Updated for Sundial E.
018935,000015:
018936,000016:
018937,000017: # THIS PROGRAM USES A VERTICAL,SOUTH,EAST COORDINATE SYSTEM FOR PIPAS
018938,000018: 16,2000 BANK 16
018939,000019: 16,2000 E5,1400 EBANK= XSM
018940,000020:
018941,000021: # G SCHMIDT SIMPLIFIED ESTIMATION PROGRAM FOR ALIGNMENT CALIBRATION. THE
018942,000022: # PROGRAM IS COMPLETELY RESTART PROFED. DATA STORED IN BANK4.
018943,000023: 16,2000 31704 ESTIMS CA GEOCOMPS
018944,000024: 16,2001 55022 TS GEOSAVED
018945,000025: 16,2002 00006 EXTEND
018946,000026: 16,2003 62006 BZMF ESTIMS1
018947,000027: 16,2004 04064 TC BANKCALL
018948,000028: 16,2005 14433 CADR EARTHR
018949,000029:
018950,000030: 16,2006 04517 ESTIMS1 TC PHASCHNG
018951,000031: 16,2007 00101 OCT 00101
018952,000032:
018953,000033: 16,2010 00004 RSTGTS1 INHINT # COMES HERE PHASE1 RESTART
018954,000034: 16,2011 31022 CA GEOSAVED
018955,000035: 16,2012 55704 TS GEOCOMPS
018956,000036:
018957,000037: 16,2013 33177 CAF 1SEC
018958,000038: 16,2014 04451 TC WAITLIST
018959,000039: 16,2015 02205 34005 2CADR ALLOOP
018960,000040:
018961,000041: 16,2017 37657 CAF ZERO # ZERO THE PIPAS
018962,000042: 16,2020 54037 TS PIPAX
018963,000043: 16,2021 54040 TS PIPAY
018964,000044: 16,2022 54041 TS PIPAZ
018965,000045: 16,2023 55661 TS ALTIM
018966,000046:
018967,000047: 16,2024 33176 CAF 13DECML
018968,000048: 16,2025 55753 TS ZERONDX
018969,000049: 16,2026 32114 CAF LINTY
018970,000050: 16,2027 04064 TC BANKCALL
018971,000051: 16,2030 37155 CADR ZEROING
018972,000052:
018973,000053: 16,2031 00003 RELINT
018974,000054: 16,2032 37645 CAF BIT6
018975,000055: 16,2033 55753 TS ZERONDX
018976,000056: 16,2034 32115 CAF LVLAUN
018977,000057: 16,2035 04064 TC BANKCALL
018978,000058: 16,2036 37155 CADR ZEROING
018979,000059: 16,2037 37656 CAF SEVEN
018980,000060: 16,2040 55753 TS ZERONDX
018981,000061: 16,2041 33174 CAF LALK4
018982,000062: 16,2042 04064 TC BANKCALL
018983,000063: 16,2043 37155 CADR ZEROING
018984,000064: 16,2044 06000 TC INTPRET
018985,000065: 16,2045 77745 DLOAD
018986,000066: 16,2046 35155 INTVAL
018987,000067: 16,2047 22051 STOVL S1
018988,000068: 16,2050 35157 INTVAL +2
018989,000069: 16,2051 23570 STOVL ALX1S
018990,000070: 16,2052 34127 GEORGED
018991,000071: 16,2053 23755 STOVL TRANSM1
018992,000072: 16,2054 34135 GEORGEC
018993,000073: 16,2055 23763 STOVL TRANSM1 +6
018994,000074: 16,2056 34143 GEORGEB
018995,000075: 16,2057 01771 STORE TRANSM1 +12D
018996,000076: 16,2060 77776 EXIT
018997,000077:
018998,000078: 16,2061 11704 CCS GEOCOMPS
018999,000079: 16,2062 02173 TC SETUPALK
019000,000080: 16,2063 02111 TC NOCHORLD
019001,000081:
019002,000082: 16,2064 37652 CAF ONE
019003,000083: 16,2065 55704 TS GEOCOMPS
019004,000084:
019005,000085: 16,2066 06000 TC INTPRET
019006,000086: 16,2067 57535 SETDRIFT SLOAD DCOMP
019007,000087: 16,2070 01712 SPDRIFT +2
019008,000088: 16,2071 77606 PUSH
019009,000089: 16,2072 41535 SLOAD PUSH
019010,000090: 16,2073 01711 SPDRIFT +1
019011,000091: 16,2074 55535 SLOAD VDEF
019012,000092: 16,2075 01710 SPDRIFT
019013,000093: 16,2076 76505 VXM VSL1
019014,000094: 16,2077 01401 XSM
019015,000095: 16,2100 01634 STORE DRIFTO
019016,000096: 16,2101 77776 EXIT
019017,000097:
019018,000098: 16,2102 04064 TC BANKCALL
019019,000099: 16,2103 37606 CADR LOADGTSM
019020,000100:
019021,000101: 16,2104 11776 CCS PREMTRXC
019022,000102: 16,2105 02111 TC NOCHORLD
019023,000103: 16,2106 06000 TC INTPRET
019024,000104: 16,2107 77650 GOTO
019025,000105: 16,2110 34476 BOOP -3
019026,000106:
019027,000107: 16,2111 04517 NOCHORLD TC PHASCHNG
019028,000108: 16,2112 00301 OCT 00301
019029,000109: 16,2113 04353 TC ENDOFJOB
019030,000110:
019031,000111: 16,2114 01621 LINTY GENADR INTY
019032,000112: 16,2115 01640 LVLAUN GENADR VLAUN -1
019033,000113:
019034,000114: 16,2116 30341 22444 PIPASC 2DEC .76376833
019035,000115:
019036,000116: 16,2120 57223 66451 VELSC 2DEC -.52223476 # 512/980.402
019037,000117:
019038,000118: 16,2122 05427 12577 ALSK 2DEC .17329931 # SSWAY VEL GAIN X 980.402/4096
019039,000119:
019040,000120: 16,2124 77567 44202 2DEC -.00835370 # SSWAY ACCEL GAIN X 980.402/4096
019041,000121:
019042,000122: 16,2126 47762 75077 GEORGED 2DEC -.75079894
019043,000123:
019044,000124: 16,2130 73511 61546 2DEC -.13613567
019045,000125:
019046,000126: 16,2132 73733 67243 2DEC -.12721382
019047,000127:
019048,000128: 16,2134 36256 35610 GEORGEC 2DEC .94817689
019049,000129:
019050,000130: 16,2136 16631 34443 2DEC .46251787
019051,000131:
019052,000132: 16,2140 11243 22276 2DEC .29123377
019053,000133:
019054,000134: 16,2142 65174 70374 GEORGEB 2DEC -.33613492
019055,000135:
019056,000136: 16,2144 11762 06753 2DEC .31165878
019057,000137:
019058,000138: 16,2146 60047 67652 2DEC -.49757417
019059,000139:
019060,000140: 16,2150 24276 14066 GEORGEJ 2DEC .63661977
019061,000141:
019062,000142: 16,2152 23073 11773 GEORGEK 2DEC .59737013
019063,000143:
019064,000144: 16,2154 31103 36651 PI/4.0 2DEC .78539816
019065,000145:
019066,000146: 16,2156 02521 AINGYRO ECADR GYROD
019067,000147:
019068,000148: 16,2157 00074 ALX1S1 DEC 60 B-14
019069,000149: 16,2160 77776 DEC -1 B-14
019070,000150: 16,2161 00115 22254 2DEC .00473468
019071,000151: 16,2163 00000 02423 2DEC .000004839
019072,000152:
019073,000153: 16,2165 77775 52725 ALK1 2DEC -.00016228
019074,000154: 16,2167 77735 54660 2DEC -.00211173
019075,000155: 16,2171 00000 07635 2DEC .00001489
019076,000156:
019077,000157: 16,2173 33200 SETUPALK CAF 150DECML
019078,000158: 16,2174 55527 TS LENGTHOT
019079,000159:
019080,000160: 16,2175 06000 TC INTPRET
019081,000161: 16,2176 77775 VLOAD
019082,000162: 16,2177 34160 ALX1S1
019083,000163: 16,2200 23570 STOVL ALX1S
019084,000164: 16,2201 34166 ALK1
019085,000165: 16,2202 01576 STORE ALK +4
019086,000166: 16,2203 77650 GOTO
019087,000167: 16,2204 34067 SETDRIFT
019088,000168:
019089,000169: 16,2205 00004 ALLOOP INHINT
019090,000170: 16,2206 41075 CS PHASE1
019091,000171: 16,2207 66165 AD THREE
019092,000172: 16,2210 00006 EXTEND
019093,000173: 16,2211 12213 BZF +2
019094,000174: 16,2212 03261 TC SOMEERRR
019095,000175:
019096,000176: 16,2213 31661 CA ALTIM
019097,000177: 16,2214 55022 TS GEOSAVED
019098,000178: 16,2215 04517 TC PHASCHNG
019099,000179: 16,2216 00201 OCT 00201
019100,000180: 16,2217 02221 TC +2
019101,000181:
019102,000182: 16,2220 00004 ALLOOP1 INHINT # RESTARTS COME IN HERE
019103,000183: 16,2221 31022 CA GEOSAVED
019104,000184: 16,2222 55661 TS ALTIM
019105,000185: 16,2223 10000 CCS A
019106,000186: 16,2224 03261 TC SOMEERRR # SHOULD NEVER HIT THIS LOCATION
019107,000187: 16,2225 55662 TS ALTIMS
019108,000188: 16,2226 40000 CS A
019109,000189: 16,2227 55661 TS ALTIM
019110,000190: 16,2230 31527 CA LENGTHOT
019111,000191: 16,2231 00006 EXTEND
019112,000192: 16,2232 62237 BZMF ALLOOP2
019113,000193: 16,2233 33177 CAF 1SEC
019114,000194: 16,2234 04451 TC WAITLIST
019115,000195: 16,2235 02205 34005 2CADR ALLOOP
019116,000196:
019117,000197: 16,2237 37657 ALLOOP2 CAF ZERO
019118,000198: 16,2240 55614 TS FILDELVX +1
019119,000199: 16,2241 55616 TS FILDELVY +1
019120,000200: 16,2242 55620 TS FILDELVZ +1
019121,000201: 16,2243 56037 XCH PIPAX
019122,000202: 16,2244 55613 TS FILDELVX
019123,000203: 16,2245 37657 CAF ZERO
019124,000204: 16,2246 56040 XCH PIPAY
019125,000205: 16,2247 55615 TS FILDELVY
019126,000206: 16,2250 37657 CAF ZERO
019127,000207: 16,2251 56041 XCH PIPAZ
019128,000208: 16,2252 55617 TS FILDELVZ
019129,000209: 16,2253 00003 RELINT
019130,000210: 16,2254 37635 SPECSTS CAF PRIO20
019131,000211: 16,2255 04307 TC FINDVAC
019132,000212: 16,2256 02275 34005 2CADR ALFLT # START THE JOB
019133,000213:
019134,000214: 16,2260 04505 TC TASKOVER
019135,000215:
019136,000216: 16,2261 72174 ALKCG AXT,2 LXA,1 # LOADS SLOPES AND TIME CONSTANTS AT RQST
019137,000217: 16,2262 00014 12D
019138,000218: 16,2263 01567 ALX1S
019139,000219: 16,2264 62143 ALKCG2 DLOAD* INCR,1
019140,000220: 16,2265 35155 ALFDK +156D,1
019141,000221: 16,2266 77775 DEC -2 B-14
019142,000222: 16,2267 05676 STORE ALDK +10D,2
019143,000223: 16,2270 66104 TIX,2 SXA,1
019144,000224: 16,2271 34264 ALKCG2
019145,000225: 16,2272 01567 ALX1S
019146,000226: 16,2273 77650 GOTO
019147,000227: 16,2274 34327 ALFLT2
019148,000228:
019149,000229: 16,2275 03566 ALFLT TC STOREDTA # STORE DATA IN CASE OF RESTART IN JOB
019150,000230: 16,2276 31527 CA LENGTHOT
019151,000231: 16,2277 55023 TS LTHOTSAV
019152,000232: 16,2300 04517 TC PHASCHNG # THIS IS THE JOB DONE EVERY ITERATION
019153,000233: 16,2301 01101 OCT 01101
019154,000234: 16,2302 02320 TC NORMLOP
019155,000235: 16,2303 33565 REALFLT CA GEOBND1
019156,000236: 16,2304 54003 TS EBANK
019157,000237:
019158,000238: 16,2305 03607 ALFLT1 TC LOADSTDT # COMES HERE ON RESTART
019159,000239:
019160,000240: 16,2306 31023 CA LTHOTSAV
019161,000241: 16,2307 55527 TS LENGTHOT
019162,000242: 16,2310 00006 EXTEND
019163,000243: 16,2311 62320 BZMF NORMLOP
019164,000244: 16,2312 00004 INHINT
019165,000245: 16,2313 37644 CAF BIT7
019166,000246: 16,2314 04451 TC WAITLIST
019167,000247: 16,2315 02205 34005 2CADR ALLOOP
019168,000248:
019169,000249: 16,2317 00003 RELINT
019170,000250:
019171,000251: 16,2320 06000 NORMLOP TC INTPRET
019172,000252: 16,2321 77745 DLOAD
019173,000253: 16,2322 35155 INTVAL
019174,000254: 16,2323 00051 STORE S1 # STEP REGISTERS MAY HAVE BEEN WIPED OUT
019175,000255: 16,2324 53135 SLOAD BZE
019176,000256: 16,2325 01663 ALTIMS
019177,000257: 16,2326 34261 ALKCG
019178,000258:
019179,000259: 16,2327 61375 ALFLT2 VLOAD VXM
019180,000260: 16,2330 01614 FILDELVX
019181,000261: 16,2331 01001 GEOMTRX
019182,000262: 16,2332 01614 STORE FILDELVX
019183,000263: 16,2333 57545 DLOAD DCOMP
019184,000264: 16,2334 01616 FILDELVY
019185,000265: 16,2335 07654 STODL DPIPAY
019186,000266: 16,2336 01620 FILDELVZ
019187,000267: 16,2337 01660 STORE DPIPAZ
019188,000268:
019189,000269: 16,2340 76001 SETPD AXT,1 # MEASUREMENT INCORPORATION ROUTINES.
019190,000270: 16,2341 00001 0
019191,000271: 16,2342 00010 8D
019192,000272:
019193,000273: 16,2343 41343 DELMLP DLOAD* DMP
019194,000274: 16,2344 01664 DPIPAY +8D,1
019195,000275: 16,2345 34117 PIPASC
019196,000276: 16,2346 41061 SLR BOVB
019197,000277: 16,2347 01213 10D
019198,000278: 16,2350 35265 SOMERR1
019199,000279: 16,2351 77617 BDSU*
019200,000280: 16,2352 01632 INTY +8D,1
019201,000281: 16,2353 03632 STORE INTY +8D,1
019202,000282: 16,2354 40725 PDDL DMP*
019203,000283: 16,2355 34121 VELSC
019204,000284: 16,2356 01652 VLAUN +8D,1
019205,000285: 16,2357 77732 SL2R
019206,000286: 16,2360 45425 DSU STADR
019207,000287: 16,2361 74023 STORE DELM +8D,1
019208,000288: 16,2362 03756 STORE DELM +10D,1
019209,000289: 16,2363 77100 TIX,1 AXT,2
019210,000290: 16,2364 34343 DELMLP
019211,000291: 16,2365 00004 4
019212,000292: 16,2366 56743 ALILP DLOAD* DMPR*
019213,000293: 16,2367 76201 ALK +4,2
019214,000294: 16,2370 76107 ALDK +4,2
019215,000295: 16,2371 05576 STORE ALK +4,2
019216,000296: 16,2372 77104 TIX,2 AXT,2
019217,000297: 16,2373 34366 ALILP
019218,000298: 16,2374 00010 8D
019219,000299: 16,2375 66140 ALKLP LXC,1 SXA,1
019220,000300: 16,2376 01570 CMPX1
019221,000301: 16,2377 01570 CMPX1
019222,000302: 16,2400 56743 DLOAD* DMPR*
019223,000303: 16,2401 01573 ALK +1,1
019224,000304: 16,2402 76023 DELM +8D,2
019225,000305: 16,2403 77613 DAD*
019226,000306: 16,2404 76145 INTY +8D,2
019227,000307: 16,2405 21632 STODL* INTY +8D,2
019228,000308: 16,2406 76171 ALK +12D,2
019229,000309: 16,2407 77613 DAD*
019230,000310: 16,2410 76077 ALDK +12D,2
019231,000311: 16,2411 05606 STORE ALK +12D,2
019232,000312: 16,2412 42673 DMPR* DAD*
019233,000313: 16,2413 76023 DELM +8D,2
019234,000314: 16,2414 76135 INTY +16D,2
019235,000315: 16,2415 21642 STODL* INTY +16D,2
019236,000316: 16,2416 34124 ALSK +1,1
019237,000317: 16,2417 76403 DMP* SL1R
019238,000318: 16,2420 76023 DELM +8D,2
019239,000319: 16,2421 77613 DAD*
019240,000320: 16,2422 76125 VLAUN +8D,2
019241,000321: 16,2423 05652 STORE VLAUN +8D,2
019242,000322: 16,2424 76104 TIX,2 AXT,1
019243,000323: 16,2425 34375 ALKLP
019244,000324: 16,2426 00010 8D
019245,000325:
019246,000326:
019247,000327: 16,2427 57343 LOOSE DLOAD* DMPR
019248,000328: 16,2430 01652 VLAUN +8D,1
019249,000329: 16,2431 01755 TRANSM1
019250,000330: 16,2432 77752 SL1
019251,000331: 16,2433 57323 PDDL* DMPR
019252,000332: 16,2434 01662 POSNV +8D,1
019253,000333: 16,2435 01757 TRANSM1 +2
019254,000334: 16,2436 57323 PDDL* DMPR
019255,000335: 16,2437 01662 POSNV +8D,1
019256,000336: 16,2440 01761 TRANSM1 +4
019257,000337: 16,2441 57323 PDDL* DMPR
019258,000338: 16,2442 01662 POSNV +8D,1
019259,000339: 16,2443 01763 TRANSM1 +6
019260,000340: 16,2444 57323 PDDL* DMPR
019261,000341: 16,2445 01652 VLAUN +8D,1
019262,000342: 16,2446 01765 TRANSM1 +8D
019263,000343: 16,2447 77615 DAD
019264,000344: 16,2450 57323 PDDL* DMPR
019265,000345: 16,2451 01654 ACCWD +8D,1
019266,000346: 16,2452 01767 TRANSM1 +10D
019267,000347: 16,2453 45415 DAD STADR
019268,000348: 16,2454 60115 STODL* POSNV +8D,1
019269,000349: 16,2455 01652 VLAUN +8D,1
019270,000350: 16,2456 77675 DMPR
019271,000351: 16,2457 01771 TRANSM1 +12D
019272,000352: 16,2460 77615 DAD
019273,000353: 16,2461 57323 PDDL* DMPR
019274,000354: 16,2462 01654 ACCWD +8D,1
019275,000355: 16,2463 01773 TRANSM1 +14D
019276,000356: 16,2464 45415 DAD STADR
019277,000357: 16,2465 60125 STODL* VLAUN +8D,1
019278,000358: 16,2466 01654 ACCWD +8D,1
019279,000359: 16,2467 77675 DMPR
019280,000360: 16,2470 01775 TRANSM1 +16D
019281,000361: 16,2471 77615 DAD
019282,000362: 16,2472 45415 DAD STADR
019283,000363: 16,2473 74123 STORE ACCWD +8D,1
019284,000364: 16,2474 77700 TIX,1
019285,000365: 16,2475 34427 LOOSE
019286,000366:
019287,000367:
019288,000368: 16,2476 76174 AXT,2 AXT,1 # EVALUATE SINES AND COSINES
019289,000369: 16,2477 00006 6
019290,000370: 16,2500 00002 2
019291,000371: 16,2501 57343 BOOP DLOAD* DMPR
019292,000372: 16,2502 01634 ANGX +2,1
019293,000373: 16,2503 34151 GEORGEJ
019294,000374: 16,2504 77722 SR2R
019295,000375: 16,2505 73406 PUSH SIN
019296,000376: 16,2506 56172 SL1R XAD,1
019297,000377: 16,2507 00046 X1
019298,000378: 16,2510 13730 STODL BPLAC +6,2
019299,000379: 16,2511 77746 COS
019300,000380: 16,2512 05736 STORE WPLATO,2 # COSINES
019301,000381: 16,2513 77704 TIX,2
019302,000382: 16,2514 34501 BOOP
019303,000383: 16,2515 62545 DLOAD SL2
019304,000384: 16,2516 01726 BPLAC +4
019305,000385: 16,2517 77615 DAD
019306,000386: 16,2520 01622 INTY
019307,000387: 16,2521 07622 STODL INTY
019308,000388: 16,2522 01724 BPLAC +2
019309,000389: 16,2523 56405 DMP SL3R
019310,000390: 16,2524 01734 BPLAC +10D
019311,000391: 16,2525 77615 DAD
019312,000392: 16,2526 01626 INTZ
019313,000393: 16,2527 07626 STODL INTZ
019314,000394: 16,2530 01730 BPLAC +6
019315,000395: 16,2531 57275 DMPR DMPR
019316,000396: 16,2532 01732 BPLAC +8D
019317,000397: 16,2533 01726 BPLAC +4
019318,000398: 16,2534 77712 SL2
019319,000399: 16,2535 57325 PDDL DMPR
019320,000400: 16,2536 01722 BPLAC
019321,000401: 16,2537 01724 BPLAC +2
019322,000402: 16,2540 77615 DAD
019323,000403: 16,2541 77675 DMPR
019324,000404: 16,2542 01610 WANGI
019325,000405: 16,2543 57325 PDDL DMPR
019326,000406: 16,2544 01732 BPLAC +8D
019327,000407: 16,2545 01734 BPLAC +10D
019328,000408: 16,2546 66405 DMP SL2R
019329,000409: 16,2547 01606 WANGO
019330,000410: 16,2550 77621 BDSU
019331,000411: 16,2551 01634 DRIFTO
019332,000412: 16,2552 45425 DSU STADR
019333,000413: 16,2553 70041 STODL WPLATO
019334,000414: 16,2554 01730 BPLAC +6
019335,000415: 16,2555 41275 DMPR DMP
019336,000416: 16,2556 01734 BPLAC +10D
019337,000417: 16,2557 01610 WANGI
019338,000418: 16,2560 77732 SL2R
019339,000419: 16,2561 57325 PDDL DMPR
019340,000420: 16,2562 01606 WANGO
019341,000421: 16,2563 01726 BPLAC +4
019342,000422: 16,2564 77615 DAD
019343,000423: 16,2565 01636 DRIFTI
019344,000424: 16,2566 77625 DSU
019345,000425: 16,2567 57325 PDDL DMPR
019346,000426: 16,2570 01612 WANGT
019347,000427: 16,2571 01610 WANGI
019348,000428: 16,2572 45415 DAD STADR
019349,000429: 16,2573 70037 STODL WPLATI
019350,000430: 16,2574 01732 BPLAC +8D
019351,000431: 16,2575 76405 DMP SL1R
019352,000432: 16,2576 01722 BPLAC
019353,000433: 16,2577 57325 PDDL DMPR
019354,000434: 16,2600 01724 BPLAC +2
019355,000435: 16,2601 01730 BPLAC +6
019356,000436: 16,2602 76405 DMP SL1R
019357,000437: 16,2603 01726 BPLAC +4
019358,000438: 16,2604 77621 BDSU
019359,000439: 16,2605 77675 DMPR
019360,000440: 16,2606 01610 WANGI
019361,000441: 16,2607 57325 PDDL DMPR
019362,000442: 16,2610 01724 BPLAC +2
019363,000443: 16,2611 01734 BPLAC +10D
019364,000444: 16,2612 76405 DMP SL1R
019365,000445: 16,2613 01606 WANGO
019366,000446: 16,2614 77621 BDSU
019367,000447: 16,2615 01640 DRIFTT
019368,000448: 16,2616 45415 DAD STADR # WPLATT NOW IN MPAC
019369,000449: 16,2617 76035 STORE WPLATT # PUSH IT DOWN-X IT BY SANG +2
019370,000450: 16,2620 74475 DMPR SR1R
019371,000451: 16,2621 01724 BPLAC +2
019372,000452: 16,2622 57325 PDDL DMPR
019373,000453: 16,2623 01736 WPLATO
019374,000454: 16,2624 01732 BPLAC +8D
019375,000455: 16,2625 77615 DAD
019376,000456: 16,2626 77671 DDV
019377,000457: 16,2627 01734 BPLAC +10D
019378,000458: 16,2630 57206 PUSH DMPR
019379,000459: 16,2631 34153 GEORGEK
019380,000460: 16,2632 43261 SRR DAD
019381,000461: 16,2633 01616 13D
019382,000462: 16,2634 01632 ANGX
019383,000463: 16,2635 07632 STODL ANGX
019384,000464: 16,2636 43275 DMPR DAD
019385,000465: 16,2637 01726 BPLAC +4
019386,000466: 16,2640 01740 WPLATI
019387,000467: 16,2641 54275 DMPR SRR
019388,000468: 16,2642 34153 GEORGEK
019389,000469: 16,2643 01616 13D
019390,000470: 16,2644 77615 DAD
019391,000471: 16,2645 01630 ANGY
019392,000472: 16,2646 07630 STODL ANGY
019393,000473: 16,2647 01732 BPLAC +8D
019394,000474: 16,2650 76405 DMP SL1R # MULTIPLY X WPLATT -SL1- PUSH AND RELOAD
019395,000475: 16,2651 01742 WPLATT
019396,000476: 16,2652 57325 PDDL DMPR
019397,000477: 16,2653 01724 BPLAC +2
019398,000478: 16,2654 01736 WPLATO
019399,000479: 16,2655 77621 BDSU
019400,000480: 16,2656 54275 DMPR SRR
019401,000481: 16,2657 34153 GEORGEK
019402,000482: 16,2660 01616 13D
019403,000483: 16,2661 77615 DAD
019404,000484: 16,2662 01624 ANGZ
019405,000485: 16,2663 01624 STORE ANGZ
019406,000486: 16,2664 77776 EXIT
019407,000487:
019408,000488: 16,2665 11527 ONCEMORE CCS LENGTHOT
019409,000489: 16,2666 02677 TC SLEEPIE
019410,000490: 16,2667 03463 TC SETUPER
019411,000491:
019412,000492: 16,2670 11704 CCS GEOCOMPS
019413,000493: 16,2671 02705 TC SAVEST
019414,000494:
019415,000495: 16,2672 11611 CCS TORQNDX
019416,000496: 16,2673 02675 TC +2
019417,000497: 16,2674 03201 TC GOAGAIN
019418,000498: 16,2675 04064 TC BANKCALL
019419,000499: 16,2676 37717 CADR VALMIS
019420,000500:
019421,000501: 16,2677 55527 SLEEPIE TS LENGTHOT # TEST NOT OVER-DECREMENT LENGTHOT
019422,000502: 16,2700 04517 TC PHASCHNG # CHANGE PHASE
019423,000503: 16,2701 00301 OCT 00301
019424,000504: 16,2702 11611 CCS TORQNDX # ARE WE DOING VERTDRIFT
019425,000505: 16,2703 02715 TC EARTTPRQ # YES,DO HOR ERATE TORQ THEN SLEEP
019426,000506: 16,2704 04353 TC ENDOFJOB
019427,000507:
019428,000508: 16,2705 06000 SAVEST TC INTPRET
019429,000509: 16,2706 77745 DLOAD
019430,000510: 16,2707 01632 ANGX
019431,000511: 16,2710 07025 STODL ANGXSAV
019432,000512: 16,2711 01702 GAZ1
019433,000513: 16,2712 01027 STORE GAZ1SAV
019434,000514: 16,2713 77776 EXIT
019435,000515: 16,2714 03201 TC GOAGAIN
019436,000516:
019437,000517: 16,2715 04064 EARTTPRQ TC BANKCALL # IN VERTDRIFT,ADD HOR ERATE AND SLEEP
019438,000518: 16,2716 14433 CADR EARTHR
019439,000519: 16,2717 04353 TC ENDOFJOB
019440,000520:
019441,000521: 16,2720 77743 ALFDK DEC -28 B-14 # SLOPES AND TIME CONSTANTS FOR FIRST 30SC
019442,000522: 16,2721 77776 DEC -1 B-14
019443,000523: 16,2722 35143 10237 2DEC .91230833 # TIME CONSTANTS-PIPA OUTPUTS
019444,000524:
019445,000525: 16,2724 31766 26106 2DEC .81193187 # TIME CONSTANT-ERECTION ANGLES
019446,000526:
019447,000527: 16,2726 77772 43677 2DEC -.00035882 # SLOPE-AZIMUTH ANGLE
019448,000528:
019449,000529: 16,2730 77777 77661 2DEC -.00000029 # SLOPE-VERTICAL DRIFT
019450,000530:
019451,000531: 16,2732 00002 05420 2DEC .00013262 # SLOPE-NORTH SOUTH DRIFT
019452,000532:
019453,000533:
019454,000534: 16,2734 77705 DEC -58 B-14 # 31-90 SEC
019455,000535: 16,2735 77776 DEC -1 B-14
019456,000536: 16,2736 37560 05346 2DEC .99122133
019457,000537:
019458,000538: 16,2740 37522 15525 2DEC .98940595
019459,000539:
019460,000540: 16,2742 77763 41604 2DEC -.00079010
019461,000541:
019462,000542: 16,2744 77777 76470 2DEC -.00000265
019463,000543:
019464,000544: 16,2746 00007 02201 2DEC .00043154
019465,000545:
019466,000546:
019467,000547: 16,2750 77767 DEC -8 B-14 # 91-100 SEC
019468,000548: 16,2751 77776 DEC -1 B-14
019469,000549: 16,2752 37773 10042 2DEC .99971021
019470,000550:
019471,000551: 16,2754 37747 30232 2DEC .99852047
019472,000552:
019473,000553: 16,2756 00006 37666 2DEC .00042697
019474,000554:
019475,000555: 16,2760 77777 76703 2DEC -.00000213
019476,000556:
019477,000557: 16,2762 00001 36147 2DEC .00011864
019478,000558:
019479,000559: 16,2764 77635 DEC -98 B-14 # 101-200 SEC
019480,000560: 16,2765 77776 DEC -1 B-14
019481,000561: 16,2766 37666 11022 2DEC .99550063
019482,000562:
019483,000563: 16,2770 37532 33647 2DEC .98992124
019484,000564:
019485,000565: 16,2772 00007 03641 2DEC .00043452
019486,000566:
019487,000567: 16,2774 77777 75713 2DEC -.00000401
019488,000568:
019489,000569: 16,2776 77774 54605 2DEC -.00021980
019490,000570:
019491,000571:
019492,000572: 16,3000 77407 DEC -248 B-14 # 201-450 SEC
019493,000573: 16,3001 77776 DEC -1 B-14
019494,000574: 16,3002 37712 16755 2DEC .99673264
019495,000575:
019496,000576: 16,3004 37630 01160 2DEC .99365467
019497,000577:
019498,000578: 16,3006 00000 23600 2DEC .00003767
019499,000579:
019500,000580: 16,3010 77777 63663 2DEC -.00002317
019501,000581:
019502,000582: 16,3012 77777 56527 2DEC -.00003305
019503,000583:
019504,000584:
019505,000585: 16,3014 77255 DEC -338 B-14 # 451-790 SEC
019506,000586: 16,3015 77776 DEC -1 B-14
019507,000587: 16,3016 37763 23341 2DEC .99924362
019508,000588:
019509,000589: 16,3020 37755 26170 2DEC .99888274
019510,000590:
019511,000591: 16,3022 00000 00254 2DEC .00000064
019512,000592:
019513,000593: 16,3024 77777 52755 2DEC -.00004012
019514,000594:
019515,000595: 16,3026 77777 76764 2DEC -.00000195
019516,000596:
019517,000597:
019518,000598: 16,3030 77147 DEC -408 B-14 # 791-1200 SEC
019519,000599: 16,3031 77776 DEC -1 B-14
019520,000600: 16,3032 37772 02343 2DEC .99963845
019521,000601:
019522,000602: 16,3034 37761 30560 2DEC .99913162
019523,000603:
019524,000604: 16,3036 00000 00362 2DEC .00000090
019525,000605:
019526,000606: 16,3040 00000 17261 2DEC .00002927
019527,000607:
019528,000608: 16,3042 77777 77671 2DEC -.00000026
019529,000609:
019530,000610:
019531,000611: 16,3044 77015 DEC -498 B-14 # 1201-1700 SEC
019532,000612: 16,3045 77776 DEC -1 B-14
019533,000613: 16,3046 37765 12403 2DEC .99934865
019534,000614:
019535,000615: 16,3050 37752 20062 2DEC .99868793
019536,000616:
019537,000617: 16,3052 00000 00224 2DEC .00000055
019538,000618:
019539,000619: 16,3054 00000 06150 2DEC .00001183
019540,000620:
019541,000621: 16,3056 77777 77762 2DEC -.00000005
019542,000622:
019543,000623:
019544,000624: 16,3060 77161 DEC -398 B-14 # 1701-2100 SEC
019545,000625: 16,3061 77776 DEC -1 B-14
019546,000626: 16,3062 37767 12513 2DEC .99947099
019547,000627:
019548,000628: 16,3064 37756 30343 2DEC .99894799
019549,000629:
019550,000630: 16,3066 00000 00060 2DEC .00000018
019551,000631:
019552,000632: 16,3070 00000 01445 2DEC .00000300
019553,000633:
019554,000634: 16,3072 77777 77774 2DEC -.00000001
019555,000635:
019556,000636:
019557,000637: 16,3074 76651 DEC -598 B-14 # 2101-2700 SEC
019558,000638: 16,3075 77776 DEC -1 B-14
019559,000639: 16,3076 37771 02603 2DEC .99957801
019560,000640:
019561,000641: 16,3100 37762 10061 2DEC .99916095
019562,000642:
019563,000643: 16,3102 00000 00023 2DEC .00000007
019564,000644:
019565,000645: 16,3104 00000 00402 2DEC .00000096
019566,000646:
019567,000647: 16,3106 00000 00000 2DEC .00000000
019568,000648:
019569,000649:
019570,000650: 16,3110 76505 DEC -698 B-14 # 2700-3400 SEC
019571,000651: 16,3111 77776 DEC -1 B-14
019572,000652: 16,3112 37772 22005 2DEC .99966814
019573,000653:
019574,000654: 16,3114 37765 05560 2DEC .99933952
019575,000655:
019576,000656: 16,3116 00000 00005 2DEC .00000002
019577,000657:
019578,000658: 16,3120 00000 00113 2DEC .00000028
019579,000659:
019580,000660: 16,3122 00000 00000 2DEC .00000000
019581,000661:
019582,000662:
019583,000663: 16,3124 76651 DEC -598 B-14 # 3401-4000 SEC
019584,000664: 16,3125 77776 DEC -1 B-14
019585,000665: 16,3126 37773 20750 2DEC .99972716
019586,000666:
019587,000667: 16,3130 37767 03044 2DEC .99945654
019588,000668:
019589,000669: 16,3132 00000 00003 2DEC .00000001
019590,000670:
019591,000671: 16,3134 00000 00033 2DEC .00000010
019592,000672:
019593,000673: 16,3136 00000 00000 2DEC .00000000
019594,000674:
019595,000675:
019596,000676: 16,3140 40577 DEC -16000 B-14 # 4001- SEC
019597,000677: 16,3141 77776 DEC -1 B-14
019598,000678: 16,3142 37777 37775 2DEC .99999999
019599,000679:
019600,000680: 16,3144 37777 37775 2DEC .99999999
019601,000681:
019602,000682: 16,3146 00000 00000 2DEC .00000000
019603,000683:
019604,000684: 16,3150 00000 00000 2DEC .00000000
019605,000685:
019606,000686: 16,3152 00000 00000 2DEC .00000000
019607,000687:
019608,000688:
019609,000689: 16,3154 00004 INTVAL OCT 4
019610,000690: 16,3155 00002 OCT 2
019611,000691: 16,3156 00234 DEC 156 B-14
019612,000692: 16,3157 77776 DEC -1 B-14
019613,000693: 16,3160 35730 00035 SOUPLY 2DEC .93505870 # INITIAL GAINS FOR PIP OUTPUTS
019614,000694: 16,3162 10317 17550 2DEC .26266423 # INITIAL GAINS/4 FOR ERECTION ANGLES
019615,000695:
019616,000696:
019617,000697: 16,3164 47652 GTSCPSS CS ONE
019618,000698: 16,3165 55704 TS GEOCOMPS # THIS IS THE LEAD IN FOR COMPASS
019619,000699: 16,3166 37657 CA ZERO
019620,000700: 16,3167 55703 TS GTSOPNDZ
019621,000701: 16,3170 55776 TS PREMTRXC
019622,000702: 16,3171 03274 TC CALCXSM
019623,000703: 16,3172 04064 TC BANKCALL
019624,000704: 16,3173 36010 CADR GEOIMUTT # TO IMU PERF TESTS 2
019625,000705:
019626,000706: 16,3174 01575 LALK4 GENADR ALK +4D
019627,000707: 16,3175 01000 GBIT10 OCT 01000
019628,000708: 16,3176 00015 13DECML DEC 13 B-14
019629,000709: 16,3177 00144 1SEC DEC 100 B-14
019630,000710: 16,3200 00226 150DECML DEC 150 B-14
019631,000711:
019632,000712: 16,3201 04517 GOAGAIN TC PHASCHNG
019633,000713: 16,3202 00401 OCT 00401
019634,000714:
019635,000715: 16,3203 31704 CA GEOCOMPS
019636,000716: 16,3204 55022 TS GEOSAVED
019637,000717: 16,3205 10000 CCS A
019638,000718: 16,3206 03212 TC +4
019639,000719: 16,3207 03230 TC SETUPER1
019640,000720: 16,3210 03270 TC SOMERR2
019641,000721: 16,3211 03227 TC GOAGAIN1
019642,000722:
019643,000723: 16,3212 06000 TC INTPRET
019644,000724: 16,3213 77745 DLOAD
019645,000725: 16,3214 01025 ANGXSAV
019646,000726: 16,3215 07632 STODL ANGX
019647,000727: 16,3216 01027 GAZ1SAV
019648,000728: 16,3217 01702 STORE GAZ1
019649,000729:
019650,000730: 16,3220 41225 DSU DMP
019651,000731: 16,3221 01706 GAZIMUTH
019652,000732: 16,3222 34155 PI/4.0
019653,000733: 16,3223 43272 SL3R DAD
019654,000734: 16,3224 01632 ANGX
019655,000735: 16,3225 01632 STORE ANGX
019656,000736: 16,3226 77776 EXIT
019657,000737:
019658,000738: 16,3227 03274 GOAGAIN1 TC CALCXSM
019659,000739:
019660,000740: 16,3230 06000 SETUPER1 TC INTPRET
019661,000741: 16,3231 65345 DLOAD PDDL # ANGLES FROM DRIFT TEST ONLY
019662,000742: 16,3232 01624 ANGZ
019663,000743: 16,3233 01630 ANGY
019664,000744: 16,3234 55525 PDDL VDEF
019665,000745: 16,3235 01632 ANGX
019666,000746: 16,3236 74276 VCOMP VXSC
019667,000747: 16,3237 34151 GEORGEJ
019668,000748: 16,3240 74521 MXV VSR1
019669,000749: 16,3241 01001 GEOMTRX
019670,000750: 16,3242 01522 STORE GYROD
019671,000751: 16,3243 77776 EXIT
019672,000752:
019673,000753:
019674,000754: 16,3244 04517 TORQINCH TC PHASCHNG
019675,000755: 16,3245 00501 OCT 00501
019676,000756: 16,3246 32156 CA AINGYRO
019677,000757: 16,3247 04064 TC BANKCALL
019678,000758: 16,3250 26333 CADR IMUPULSE
019679,000759: 16,3251 04064 TC BANKCALL
019680,000760: 16,3252 26730 CADR IMUSTALL
019681,000761: 16,3253 03270 TC SOMERR2 # BAD GYRO TORQUE-END OF TEST
019682,000762:
019683,000763: 16,3254 11022 RETORQIN CCS GEOSAVED
019684,000764: 16,3255 03316 TC GCSTART
019685,000765: 16,3256 04064 TC BANKCALL
019686,000766: 16,3257 36071 CADR TORQUE
019687,000767:
019688,000768: 16,3260 03425 TC GOGAZCHK
019689,000769:
019690,000770: 16,3261 00003 SOMEERRR RELINT
019691,000771: 16,3262 05644 TC ALARM
019692,000772: 16,3263 01600 OCT 1600
019693,000773: 16,3264 02665 TC ONCEMORE
019694,000774:
019695,000775: 16,3265 05644 SOMERR1 TC ALARM
019696,000776: 16,3266 01601 OCT 1601
019697,000777: 16,3267 02665 TC ONCEMORE
019698,000778:
019699,000779: 16,3270 05644 SOMERR2 TC ALARM
019700,000780: 16,3271 01602 OCT 1602
019701,000781: 16,3272 04064 TC BANKCALL
019702,000782: 16,3273 14756 CADR ENDTEST
019703,000783:
019704,000784: 16,3274 00006 CALCXSM EXTEND
019705,000785: 16,3275 23547 QXCH QPLACES
019706,000786: 16,3276 06000 TC INTPRET
019707,000787: 16,3277 77745 DLOAD
019708,000788: 16,3300 01706 GAZIMUTH
019709,000789: 16,3301 01702 STORE GAZ1
019710,000790: 16,3302 73406 PUSH SIN
019711,000791: 16,3303 07713 STODL SINGAZ
019712,000792: 16,3304 77746 COS
019713,000793: 16,3305 01715 STORE COSGAZ
019714,000794: 16,3306 01411 STORE YSM +2
019715,000795: 16,3307 07405 STODL XSM +4
019716,000796: 16,3310 01713 SINGAZ
019717,000797: 16,3311 01413 STORE YSM +4
019718,000798: 16,3312 77676 VCOMP
019719,000799: 16,3313 01403 STORE XSM +2
019720,000800: 16,3314 77776 EXIT
019721,000801: 16,3315 01547 TC QPLACES
019722,000802:
019723,000803: 16,3316 11703 GCSTART CCS GTSOPNDZ
019724,000804: 16,3317 03321 TC +2
019725,000805: 16,3320 02000 TC ESTIMS
019726,000806: 16,3321 03463 TC SETUPER
019727,000807:
019728,000808: 16,3322 00004 INHINT
019729,000809: 16,3323 37657 CAF ZERO
019730,000810: 16,3324 55613 TS FILDELVX
019731,000811: 16,3325 55615 TS FILDELVY
019732,000812: 16,3326 55617 TS FILDELVZ
019733,000813:
019734,000814: 16,3327 33177 CAF 1SEC
019735,000815: 16,3330 04451 TC WAITLIST
019736,000816: 16,3331 03337 34005 2CADR GAZCHECK
019737,000817:
019738,000818: 16,3333 00003 RELINT
019739,000819: 16,3334 04517 TC PHASCHNG
019740,000820: 16,3335 00601 OCT 00601
019741,000821: 16,3336 04353 TC ENDOFJOB
019742,000822:
019743,000823: 16,3337 41701 GAZCHECK CS GAZ1
019744,000824: 16,3340 61705 AD GAZIMUTH
019745,000825: 16,3341 00006 EXTEND
019746,000826: 16,3342 13346 BZF GAZCHK2
019747,000827:
019748,000828: 16,3343 37652 GAZCHK1 CA ONE
019749,000829: 16,3344 55617 TS FILDELVZ
019750,000830: 16,3345 03363 TC GCHKOUT
019751,000831:
019752,000832: 16,3346 41702 GAZCHK2 CS GAZ1 +1
019753,000833: 16,3347 31706 CA GAZIMUTH +1
019754,000834: 16,3350 00006 EXTEND
019755,000835: 16,3351 13353 BZF +2
019756,000836: 16,3352 03343 TC GAZCHK1
019757,000837:
019758,000838: 16,3353 11613 CCS FILDELVX
019759,000839: 16,3354 03370 TC GAZCHK3
019760,000840: 16,3355 00004 INHINT
019761,000841: 16,3356 33177 CAF 1SEC
019762,000842: 16,3357 04451 TC WAITLIST
019763,000843: 16,3360 03337 34005 2CADR GAZCHECK
019764,000844:
019765,000845: 16,3362 00003 RELINT
019766,000846:
019767,000847: 16,3363 37635 GCHKOUT CAF PRIO20
019768,000848: 16,3364 04307 TC FINDVAC
019769,000849: 16,3365 03373 34005 2CADR GTSPHAS7
019770,000850:
019771,000851: 16,3367 04505 TC TASKOVER
019772,000852:
019773,000853: 16,3370 37652 GAZCHK3 CAF ONE
019774,000854: 16,3371 55615 TS FILDELVY
019775,000855: 16,3372 03363 TC GCHKOUT
019776,000856:
019777,000857: 16,3373 04517 GTSPHAS7 TC PHASCHNG
019778,000858: 16,3374 00701 OCT 00701
019779,000859:
019780,000860: 16,3375 04064 TC BANKCALL
019781,000861: 16,3376 14433 CADR EARTHR
019782,000862: 16,3377 11617 CALCANGX CCS FILDELVZ
019783,000863: 16,3400 03402 TC +2
019784,000864: 16,3401 03437 TC ENDGCHK
019785,000865:
019786,000866: 16,3402 06000 TC INTPRET
019787,000867: 16,3403 45345 DLOAD DSU
019788,000868: 16,3404 01702 GAZ1
019789,000869: 16,3405 01706 GAZIMUTH
019790,000870: 16,3406 56405 DMP SL3R
019791,000871: 16,3407 34155 PI/4.0
019792,000872: 16,3410 01632 STORE ANGX
019793,000873: 16,3411 77776 EXIT
019794,000874:
019795,000875: 16,3412 04517 TC PHASCHNG
019796,000876: 16,3413 01001 OCT 01001
019797,000877:
019798,000878: 16,3414 37657 RESETGTS CAF ZERO
019799,000879: 16,3415 55627 TS ANGY
019800,000880: 16,3416 55630 TS ANGY +1
019801,000881: 16,3417 55623 TS ANGZ
019802,000882: 16,3420 55624 TS ANGZ +1
019803,000883: 16,3421 55617 TS SAVE
019804,000884: 16,3422 40000 CS A
019805,000885: 16,3423 55704 TS GEOCOMPS
019806,000886: 16,3424 03201 TC GOAGAIN
019807,000887:
019808,000888: 16,3425 03463 GOGAZCHK TC SETUPER
019809,000889: 16,3426 00004 INHINT
019810,000890: 16,3427 37652 CAF ONE
019811,000891: 16,3430 55704 TS GEOCOMPS
019812,000892: 16,3431 33177 CAF 1SEC
019813,000893: 16,3432 04451 TC WAITLIST
019814,000894: 16,3433 03337 34005 2CADR GAZCHECK
019815,000895:
019816,000896: 16,3435 00003 RELINT
019817,000897: 16,3436 03441 TC +3
019818,000898:
019819,000899: 16,3437 11615 ENDGCHK CCS FILDELVY
019820,000900: 16,3440 03444 TC +4
019821,000901: 16,3441 04517 TC PHASCHNG
019822,000902: 16,3442 00601 OCT 00601
019823,000903: 16,3443 04353 TC ENDOFJOB
019824,000904:
019825,000905: 16,3444 37657 CAF ZERO
019826,000906: 16,3445 55703 TS GTSOPNDZ
019827,000907: 16,3446 02000 TC ESTIMS
019828,000908:
019829,000909: 16,3447 11615 RECALCAX CCS FILDELVY
019830,000910: 16,3450 03377 TC CALCANGX
019831,000911: 16,3451 11617 CCS FILDELVZ
019832,000912: 16,3452 03377 TC CALCANGX
019833,000913: 16,3453 03463 TC SETUPER
019834,000914: 16,3454 00004 INHINT
019835,000915: 16,3455 33177 CAF 1SEC
019836,000916: 16,3456 04451 TC WAITLIST
019837,000917: 16,3457 03337 34005 2CADR GAZCHECK
019838,000918:
019839,000919: 16,3461 00003 RELINT
019840,000920: 16,3462 03377 TC CALCANGX
019841,000921:
019842,000922: 16,3463 00006 SETUPER EXTEND # SUBROUTINE CALLED IN 3 PLACES
019843,000923: 16,3464 23547 QXCH QPLACES
019844,000924: 16,3465 06000 TC INTPRET
019845,000925: 16,3466 77634 CALL
019846,000926: 16,3467 14416 ERTHRVSE
019847,000927: 16,3470 77776 EXIT
019848,000928: 16,3471 04064 TC BANKCALL
019849,000929: 16,3472 14740 CADR OGCZERO
019850,000930: 16,3473 01547 TC QPLACES
019851,000931:
019852,000932: 16,3474 51075 OPTMSTRT INDEX PHASE1
019853,000933: 16,3475 03475 TC +0
019854,000934: 16,3476 03507 TC GTSGTS1
019855,000935: 16,3477 03514 TC GTSGTS2
019856,000936: 16,3500 03521 TC GTSGTS3
019857,000937: 16,3501 03526 TC GTSGTS4
019858,000938: 16,3502 03533 TC GTSGTS5
019859,000939: 16,3503 03540 TC GTSGTS6
019860,000940: 16,3504 03545 TC GTSGTS7
019861,000941: 16,3505 03552 TC GTSGTS10
019862,000942: 16,3506 03557 TC GTSGTS11
019863,000943:
019864,000944:
019865,000945: 16,3507 37635 GTSGTS1 CAF PRIO20
019866,000946: 16,3510 04307 TC FINDVAC
019867,000947: 16,3511 02010 34005 2CADR RSTGTS1
019868,000948:
019869,000949: 16,3513 04077 TC SWRETURN
019870,000950: 16,3514 37652 GTSGTS2 CAF ONE
019871,000951: 16,3515 04451 TC WAITLIST
019872,000952: 16,3516 02220 34005 2CADR ALLOOP1
019873,000953:
019874,000954: 16,3520 04077 TC SWRETURN
019875,000955: 16,3521 37652 GTSGTS3 CAF ONE
019876,000956: 16,3522 04451 TC WAITLIST
019877,000957: 16,3523 02205 34005 2CADR ALLOOP
019878,000958:
019879,000959: 16,3525 04077 TC SWRETURN
019880,000960: 16,3526 37635 GTSGTS4 CAF PRIO20
019881,000961: 16,3527 04307 TC FINDVAC
019882,000962: 16,3530 03201 34005 2CADR GOAGAIN
019883,000963:
019884,000964: 16,3532 04077 TC SWRETURN
019885,000965: 16,3533 37635 GTSGTS5 CAF PRIO20
019886,000966: 16,3534 04307 TC FINDVAC
019887,000967: 16,3535 03254 34005 2CADR RETORQIN
019888,000968:
019889,000969: 16,3537 04077 TC SWRETURN
019890,000970: 16,3540 37652 GTSGTS6 CAF ONE
019891,000971: 16,3541 04451 TC WAITLIST
019892,000972: 16,3542 03337 34005 2CADR GAZCHECK
019893,000973:
019894,000974: 16,3544 04077 TC SWRETURN
019895,000975:
019896,000976: 16,3545 37635 GTSGTS7 CAF PRIO20
019897,000977: 16,3546 04307 TC FINDVAC
019898,000978: 16,3547 03447 34005 2CADR RECALCAX
019899,000979:
019900,000980: 16,3551 04077 TC SWRETURN
019901,000981: 16,3552 37635 GTSGTS10 CAF PRIO20
019902,000982: 16,3553 04307 TC FINDVAC
019903,000983: 16,3554 03414 34005 2CADR RESETGTS
019904,000984:
019905,000985: 16,3556 04077 TC SWRETURN
019906,000986: 16,3557 37635 GTSGTS11 CAF PRIO20
019907,000987: 16,3560 04307 TC FINDVAC
019908,000988: 16,3561 02303 34005 2CADR REALFLT
019909,000989:
019910,000990: 16,3563 04077 TC SWRETURN
019911,000991:
019912,000992: 16,3564 02000 GEOBND OCT 02000 # BANK 4 -THIS IS THE STORE DTA SECTION
019913,000993: 16,3565 02400 GEOBND1 OCT 02400 # BANK NUMBER 5
019914,000994:
019915,000995:
019916,000996: 16,3566 33564 STOREDTA CAF GEOBND
019917,000997: 16,3567 54001 TS L
019918,000998: 16,3570 37644 CAF BIT7
019919,000999: 16,3571 54140 TS MPAC
019920,001000: 16,3572 50140 INDEX MPAC
019921,001001: 16,3573 31567 CA ALX1S
019922,001002: 16,3574 22003 LXCH EBANK
019923,001003: 16,3575 E4,1407 EBANK= JETSTEP
019924,001004: 16,3575 50140 INDEX MPAC
019925,001005: 16,3576 55407 TS JETSTEP
019926,001006: 16,3577 22003 LXCH EBANK
019927,001007: 16,3600 E5,1400 EBANK= XSM
019928,001008: 16,3600 10140 CCS MPAC
019929,001009: 16,3601 13603 TCF +2
019930,001010: 16,3602 00002 TC Q
019931,001011: 16,3603 54140 TS MPAC
019932,001012: 16,3604 33564 CAF GEOBND
019933,001013: 16,3605 54001 TS L
019934,001014: 16,3606 13572 TCF STOREDTA +4
019935,001015:
019936,001016:
019937,001017: 16,3607 37644 LOADSTDT CAF BIT7
019938,001018: 16,3610 54140 TS MPAC
019939,001019: 16,3611 33564 CA GEOBND
019940,001020: 16,3612 56003 XCH EBANK
019941,001021: 16,3613 54001 TS L
019942,001022: 16,3614 E4,1407 EBANK= JETSTEP
019943,001023: 16,3614 50140 INDEX MPAC
019944,001024: 16,3615 31407 CA JETSTEP
019945,001025: 16,3616 22003 LXCH EBANK
019946,001026: 16,3617 E5,1400 EBANK= XSM
019947,001027: 16,3617 50140 INDEX MPAC
019948,001028: 16,3620 55567 TS ALX1S
019949,001029: 16,3621 10140 CCS MPAC
019950,001030: 16,3622 13624 TCF +2
019951,001031: 16,3623 00002 TC Q
019952,001032: 16,3624 54140 TS MPAC
019953,001033: 16,3625 13611 TCF LOADSTDT +2
019954,001034:
019955,001035: # OPTICAL VERIFICATION ROUTINES FOR GYROCOMPASS
019956,001036:
019957,001037: 16,3626 04572 GCOMPVER TC NEWMODEX
019958,001038: 16,3627 00010 OCT 10
019959,001039: 16,3630 04064 TC BANKCALL
019960,001040: 16,3631 27033 CADR MKRELEAS
019961,001041: 16,3632 37652 CAF ONE
019962,001042: 16,3633 55703 TS GTSOPNDZ
019963,001043:
019964,001044: 16,3634 04064 TC BANKCALL
019965,001045: 16,3635 15455 CADR OPTDATA2
019966,001046:
019967,001047: 16,3636 37652 CAF ONE
019968,001048: 16,3637 55527 TS LENGTHOT
019969,001049: 16,3640 00004 INHINT
019970,001050: 16,3641 33772 CAF 10SECS
019971,001051: 16,3642 04451 TC WAITLIST
019972,001052: 16,3643 03650 34005 2CADR GCOMP2
019973,001053:
019974,001054: 16,3645 00003 RELINT
019975,001055: 16,3646 33767 CAF LGCOMP3
019976,001056: 16,3647 04331 TC JOBSLEEP
019977,001057:
019978,001058: 16,3650 33767 GCOMP2 CAF LGCOMP3
019979,001059: 16,3651 04335 TC JOBWAKE
019980,001060: 16,3652 04505 TC TASKOVER
019981,001061:
019982,001062: 16,3653 37652 GCOMP3 CAF ONE
019983,001063: 16,3654 54333 TS DSPTEM1
019984,001064: 16,3655 37651 CAF TWO
019985,001065: 16,3656 54334 TS DSPTEM1 +1
019986,001066: 16,3657 33770 CAF V06N30E
019987,001067: 16,3660 05563 TC NVSBWAIT
019988,001068: 16,3661 37651 CAF TWO
019989,001069: 16,3662 04064 TC BANKCALL
019990,001070: 16,3663 26765 CADR SXTMARK
019991,001071: 16,3664 04064 TC BANKCALL
019992,001072: 16,3665 26726 CADR OPTSTALL
019993,001073: 16,3666 03764 TC GTSOPTCS
019994,001074:
019995,001075: 16,3667 06000 TC INTPRET
019996,001076: 16,3670 77634 CALL
019997,001077: 16,3671 14360 TAR/EREF
019998,001078: 16,3672 64375 VLOAD MXV
019999,001079: 16,3673 00007 6
020000,001080: 16,3674 01401 XSM
020001,001081: 16,3675 77772 VSL1
020002,001082: 16,3676 23445 STOVL STARAD
020003,001083: 16,3677 00015 12D
020004,001084: 16,3700 76521 MXV VSL1
020005,001085: 16,3701 01401 XSM
020006,001086: 16,3702 01453 STORE STARAD +6D
020007,001087: 16,3703 77140 LXC,1 AXT,2
020008,001088: 16,3704 00365 MARKSTAT
020009,001089: 16,3705 00002 2
020010,001090: 16,3706 67064 XSU,2 SXA,2
020011,001091: 16,3707 00046 X1
020012,001092: 16,3710 00050 S1
020013,001093: 16,3711 77634 CALL
020014,001094: 16,3712 16310 SXTNB
020015,001095: 16,3713 77634 CALL
020016,001096: 16,3714 16130 NBSM
020017,001097: 16,3715 01531 STORE LOSVEC
020018,001098:
020019,001099: 16,3716 62140 LXC,1 INCR,1
020020,001100: 16,3717 00365 MARKSTAT
020021,001101: 16,3720 77770 DEC -7 B-14
020022,001102: 16,3721 55174 AXT,2 XSU,2
020023,001103: 16,3722 00002 2
020024,001104: 16,3723 00046 X1
020025,001105: 16,3724 47134 SXA,2 CALL
020026,001106: 16,3725 00050 S1
020027,001107: 16,3726 16310 SXTNB
020028,001108: 16,3727 77634 CALL
020029,001109: 16,3730 16130 NBSM
020030,001110: 16,3731 22015 STOVL 12D
020031,001111: 16,3732 01531 LOSVEC
020032,001112: 16,3733 36007 STCALL 6D
020033,001113: 16,3734 16344 AXISGEN
020034,001114: 16,3735 77634 CALL
020035,001115: 16,3736 16000 CALCGTA
020036,001116: 16,3737 77776 EXIT
020037,001117:
020038,001118: 16,3740 33771 GCOMP4 CAF V06N60E
020039,001119: 16,3741 05563 TC NVSBWAIT
020040,001120: 16,3742 05525 TC FLASHON
020041,001121: 16,3743 04724 TC ENDIDLE
020042,001122: 16,3744 03755 TC GCOMP5
020043,001123: 16,3745 13747 TCF +2
020044,001124: 16,3746 13740 TCF GCOMP4
020045,001125:
020046,001126: 16,3747 06000 TC INTPRET
020047,001127: 16,3750 53375 VLOAD VAD
020048,001128: 16,3751 01501 OGC
020049,001129: 16,3752 00406 ERCOMP
020050,001130: 16,3753 00406 STORE ERCOMP
020051,001131: 16,3754 77776 EXIT
020052,001132:
020053,001133: 16,3755 37652 GCOMP5 CAF ONE
020054,001134: 16,3756 55613 TS FILDELVX
020055,001135: 16,3757 04064 TC BANKCALL
020056,001136: 16,3760 27033 CADR MKRELEAS
020057,001137: 16,3761 04572 TC NEWMODEX
020058,001138: 16,3762 00007 OCT 07
020059,001139: 16,3763 04353 TC ENDOFJOB
020060,001140:
020061,001141: 16,3764 05644 GTSOPTCS TC ALARM
020062,001142: 16,3765 01603 OCT 01603
020063,001143: 16,3766 03755 TC GCOMP5
020064,001144:
020065,001145: 16,3767 35653 LGCOMP3 CADR GCOMP3
020066,001146: 16,3770 00630 V06N30E OCT 00630
020067,001147: 16,3771 00660 V06N60E OCT 00660
020068,001148: 16,3772 01750 10SECS DEC 1000 B-14
020069,001149:
020070,001150: 16,3773 ENDPREL1 EQUALS
End of include-file OPTIMUM_PRELAUNCH_ALIGNMENT_CALIBRATION.agc. Parent file is MAIN.agc