Source Code
|
These source-code files were transcribed from a printout in Don Eyles's personal
collection, scanned by archive.org, and financially sponsored by Peter McDermott.
A team of volunteers performed the transcription and proof-reading. The scanned
page images are available at
the Virtual AGC Project website, as well as higher-quality (but much larger)
images at
the Virtual AGC Project's collection in the Internet Archive. Report any problems by creating
"issues" at
the Virtual AGC Project's GitHub Repository. Notations on the program listing read, in part:
YUL SYSTEM FOR AGC: NEW PROGRAM SHEPATIN BY EYLES
DEC 13, 1966
THIS PROGRAM WAS ASSEMBLED AS A VERSION OF REVISION 37
OF PROGRAM SUNBURST BY LEM GROUP
Note that the date is the date of the printout, not the date of the program revision.
|
016756,000002: ## Copyright: Public domain.
016757,000003: ## Filename: IMU_PERFORMANCE_TESTS_2.agc
016758,000004: ## Purpose: A section of Sunburst revision 37, or Shepatin revision 0.
016759,000005: ## It is part of an early development version of the software
016760,000006: ## for Apollo Guidance Computer (AGC) on the unmanned Lunar
016761,000007: ## Module (LM) flight Apollo 5. Sunburst 37 was the program
016762,000008: ## upon which Don Eyles's offline development program Shepatin
016763,000009: ## was based; the listing herein transcribed was actually for
016764,000010: ## the equivalent revision 0 of Shepatin.
016765,000011: ## This file is intended to be a faithful transcription, except
016766,000012: ## that the code format has been changed to conform to the
016767,000013: ## requirements of the yaYUL assembler rather than the
016768,000014: ## original YUL assembler.
016769,000015: ## Reference: pp. 391-415
016770,000016: ## Assembler: yaYUL
016771,000017: ## Contact: Ron Burkey <info@sandroid.org>.
016772,000018: ## Website: www.ibiblio.org/apollo/index.html
016773,000019: ## Mod history: 2017-05-24 MAS Created from Sunburst 120.
016774,000020: ## 2017-06-08 RSB Transcribed.
016775,000021: ## 2017-06-22 RSB Proofed comment text with
016776,000022: ## octopus/ProoferComments.
016777,000023:
|
|
Page 391 |
016779,000025: 24,2000 BANK 24
016780,000026: 24,2000 E5,1400 EBANK= XSM
016781,000027:
016782,000028:
016783,000029: 24,2000 37761 IMUTEST CA ZERO # DRIFT AND SCALE FACTOR TEST
016784,000030: 24,2001 55576 TS DRIFTT
016785,000031: 24,2002 55742 TS GEOCOMPS
016786,000032: 24,2003 33707 CAF 1SECX
016787,000033: 24,2004 55744 TS 1SECXT
016788,000034:
016789,000035: 24,2005 06103 GEOIMUTT TC INTPRET # COMPASS COMES IN HERE
016790,000036: 24,2006 77624 CALL
016791,000037: 24,2007 30532 LATAZCHK
016792,000038: 24,2010 77776 EXIT
016793,000039: 24,2011 37755 CA ONE
016794,000040: 24,2012 55544 TS POSITON
016795,000041:
016796,000042: 24,2013 54344 TS DSPTEM2 +2
016797,000043:
016798,000044: 24,2014 54400 TS THETAD
016799,000045: 24,2015 54401 TS THETAD +1
016800,000046: 24,2016 54402 TS THETAD +2
016801,000047: 24,2017 05224 TC BANKCALL
016802,000048: 24,2020 26000 CADR IMUZERO
016803,000049: 24,2021 05224 TC BANKCALL
016804,000050: 24,2022 26762 CADR IMUSTALL
016805,000051: 24,2023 12245 TCF ENDTEST1
016806,000052: 24,2024 37761 IMUBACK CA ZERO
016807,000053: 24,2025 54343 TS DSPTEM2 +1
016808,000054: 24,2026 55537 TS NDXCTR
016809,000055: 24,2027 55574 TS TORQNDX
016810,000056: 24,2030 55575 TS TORQNDX +1
016811,000057: 24,2031 33637 CAF TESTTIME
016812,000058: 24,2032 54342 TS DSPTEM2
016813,000059: 24,2033 05224 TC BANKCALL # ISS RETURNS IN COARSE ALIGN MODE TO
016814,000060: 24,2034 26065 CADR IMUCOARS # ENABLE OPERATOR TO DECIDE WHAT TO DO
016815,000061: # ABOUT GIMBAL LOCK
016816,000062: 24,2035 03571 TC SHOWLD
016817,000063: 24,2036 03600 TC SHOW
016818,000064:
016819,000065:
016820,000066: 24,2037 05224 TC BANKCALL
016821,000067: 24,2040 26762 CADR IMUSTALL
016822,000068: 24,2041 02245 TC ENDTEST1
016823,000069: 24,2042 03346 TC NBPOSPL
016824,000070: 24,2043 03101 TC POSGMBL
016825,000071: 24,2044 02110 TC PIPACHK # IF MGA IS 60DEG+ PROG WILL STAY IN COARS
016826,000072: # ALIGN AND MEASURE VERITCAL PIPA RATE
016827,000073: 24,2045 03126 TC FALNE
|
|
Page 392 |
016829,000075: 24,2046 05224 TC BANKCALL
016830,000076: 24,2047 26762 CADR IMUSTALL
016831,000077:
016832,000078: 24,2050 12245 TCF ENDTEST1
016833,000079: 24,2051 11742 CCS GEOCOMPS
016834,000080: 24,2052 02073 TC JUMPLOAD
016835,000081: 24,2053 06103 GUESS TC INTPRET # CALCULATE -COS LATITUDE AND SIN LATITUDE
016836,000082: 24,2054 71545 DLOAD COS # FOR ESTIMATE
016837,000083: 24,2055 02511 LATITUDE
016838,000084: 24,2056 72476 DCOMP SL1
016839,000085: 24,2057 16573 STODL WANGI
016840,000086: 24,2060 02511 LATITUDE
016841,000087: 24,2061 72556 SIN SL1
016842,000088: 24,2062 26571 STOVL WANGO # LOAD TRANSITION MATRIX INTO ERASABLE
016843,000089: 24,2063 11711 GEORGED
016844,000090: 24,2064 26721 STOVL TRANSM1
016845,000091: 24,2065 11717 GEORGEC
016846,000092: 24,2066 26727 STOVL TRANSM1 +6
016847,000093: 24,2067 11725 GEORGEB
016848,000094: 24,2070 02735 STORE TRANSM1 +12D
016849,000095: 24,2071 77776 EXIT
016850,000096: 24,2072 02074 TC +2
016851,000097: 24,2073 04713 JUMPLOAD TC FREEDSP # FREE DISPLAY IF IN GYROCOMPASS
016852,000098: 24,2074 03614 TC LOADGTSM
016853,000099: 24,2075 05224 TC BANKCALL
016854,000100: 24,2076 72014 CADR ESTIMS
016855,000101:
016856,000102: 24,2077 04147 TORQUE TC PHASCHNG # FILTER RETURNS AFTER TORQUE AND ER SET
016857,000103: 24,2100 00005 OCT 00005
016858,000104: 24,2101 37761 CA ZERO
016859,000105: 24,2102 54342 TS DSPTEM2
016860,000106: 24,2103 31640 CA DRIFTI
016861,000107: 24,2104 54343 TS DSPTEM2 +1
016862,000108: 24,2105 51544 INDEX POSITON
016863,000109: 24,2106 55551 TS SOUTHDR -1
016864,000110: 24,2107 03600 TC SHOW
016865,000111:
016866,000112: 24,2110 51537 PIPACHK INDEX NDXCTR # TORQUE PLATFORM TO CORRECT LEVELING ERR
016867,000113: 24,2111 02112 TC +1 # IN PREPARATION TO MEASURING VERTICAL
016868,000114: 24,2112 05224 TC BANKCALL # PIPA OUTPUT PULSE RATE
016869,000115: 24,2113 30424 CADR EARTHR
016870,000116:
016871,000117: 24,2114 33642 CA DEC17 # ALLOW PIP COUNTER TO OVERFLOW 17 TIMES
016872,000118: 24,2115 55632 TS DATAPL +4
016873,000119: 24,2116 37744 CA BIT10 # IN THE ALLOTED TIME INTERVAL
016874,000120: 24,2117 55527 TS LENGTHOT
016875,000121: 24,2120 37755 CA ONE
016876,000122: 24,2121 55673 TS RESULTCT
016877,000123: 24,2122 37761 CA ZERO # ZERO PIPA COUNTER INITIALLY
016878,000124: 24,2123 51541 INDEX PIPINDEX
016879,000125:
016880,000126: 24,2124 54037 TS PIPAX
016881,000127: 24,2125 55626 TS DATAPL
|
|
Page 393 |
016883,000129: 24,2126 33654 CA DEC56 # LOOP 56 TIMES 5.12 SEC "ACH. EACH INCR.
016884,000130: 24,2127 03207 TC WAITLOOP # WILL ALSO CORRECT EARTH RATE
016885,000131: 24,2130 00004 INHINT
016886,000132: 24,2131 02773 TC CHECKG
016887,000133: 24,2132 00003 RELINT
016888,000134: 24,2133 03067 TC DATALD
016889,000135: 24,2134 37760 CA FIVE
016890,000136: 24,2135 55673 TS RESULTCT
016891,000137:
016892,000138: 24,2136 51537 INDEX NDXCTR
016893,000139: 24,2137 02140 TC +1
016894,000140: 24,2140 05224 TC BANKCALL
016895,000141: 24,2141 30424 CADR EARTHR
016896,000142: 24,2142 11676 CCS COUNTPL
016897,000143: 24,2143 03231 TC WAITLP2
016898,000144: 24,2144 11627 CCS DATAPL +1
016899,000145: 24,2145 02151 TC +4
016900,000146: 24,2146 04725 TC CCSHOLE
016901,000147: 24,2147 41632 CS DATAPL +4
016902,000148: 24,2150 55632 TS DATAPL +4
016903,000149: 24,2151 00006 EXTEND
016904,000150: 24,2152 41627 DCS DATAPL
016905,000151: 24,2153 21633 DAS DATAPL +4
016906,000152:
016907,000153: 24,2154 06103 TC INTPRET
016908,000154: 24,2155 45345 DLOAD DSU
016909,000155: 24,2156 02635 DATAPL +6
016910,000156: 24,2157 02631 DATAPL +2
016911,000157: 24,2160 56325 PDDL DDV
016912,000158: 24,2161 02633 DATAPL +4
016913,000159: 24,2162 41325 PDDL DMP
016914,000160: 24,2163 11644 DEC585 # DEC585 HAS BEEN REDEFINED FOR LEM
016915,000161:
016916,000162: 24,2164 77634 RTB
016917,000163: 24,2165 33565 SGNAGREE
016918,000164: 24,2166 00343 STORE DSPTEM2
016919,000165: 24,2167 77776 EXIT
016920,000166: 24,2170 03600 TC SHOW
016921,000167: 24,2171 33635 VERTDRFT CA 3990DEC # 3900 SECONDS FOR VERTICAL DRIFT
016922,000168: 24,2172 55527 TS LENGTHOT
016923,000169: 24,2173 05224 TC BANKCALL # THIS WILL CORRECT FOR EARTH RATE DURING
016924,000170: 24,2174 30424 CADR EARTHR # TIME SPENT IN SHOW ABOVE*
016925,000171: 24,2175 30032 CA CDUX # STOORE AXIS FOR LAB CALC OF DRIFT
016926,000172: 24,2176 55530 TS LOSVEC
016927,000173: 24,2177 51544 INDEX POSITON
016928,000174: 24,2200 41550 CS SOUTHDR -2
016929,000175: 24,2201 55576 TS DRIFTT
016930,000176: 24,2202 03614 TC LOADGTSM
016931,000177: 24,2203 37761 CA ZERO # ALLOW ONLY SOUTH GYRO EARTH RATE COMPENS
016932,000178: 24,2204 55400 TS XSM
016933,000179: 24,2205 55401 TS XSM +1
016934,000180: 24,2206 55404 TS XSM +4
|
|
Page 394 |
016936,000182: 24,2207 55405 TS XSM +5
016937,000183: 24,2210 55406 TS YSM
016938,000184: 24,2211 55407 TS YSM +1
016939,000185: 24,2212 55412 TS YSM +4
016940,000186: 24,2213 55413 TS YSM +5
016941,000187: 24,2214 55414 TS ZSM
016942,000188: 24,2215 55415 TS ZSM +1
016943,000189: 24,2216 55420 TS ZSM +4
016944,000190: 24,2217 55421 TS ZSM +5
016945,000191: 24,2220 37735 GUESS1 CAF POSMAX
016946,000192: 24,2221 55574 TS TORQNDX
016947,000193: 24,2222 55575 TS TORQNDX +1
016948,000194: 24,2223 05224 TC BANKCALL
016949,000195: 24,2224 72014 CADR ESTIMS
016950,000196:
016951,000197: 24,2225 04147 VALMIS TC PHASCHNG
016952,000198: 24,2226 00005 OCT 00005
016953,000199: 24,2227 31636 CA DRIFTO
016954,000200: 24,2230 54343 TS DSPTEM2 +1
016955,000201: 24,2231 30032 CA CDUX # STORE OG ANGLE FOR LAB CALC OF DRIFT**
016956,000202: 24,2232 55531 TS LOSVEC +1
016957,000203: 24,2233 37761 CA ZERO
016958,000204: 24,2234 54342 TS DSPTEM2
016959,000205: 24,2235 03600 TC SHOW
016960,000206:
016961,000207:
016962,000208:
016963,000209: 24,2236 37755 FINISH CA ONE
016964,000210: 24,2237 61544 AD POSITON
016965,000211: 24,2240 54344 TS DSPTEM2 +2
016966,000212: 24,2241 37754 CA TWO
016967,000213: 24,2242 55546 TS QPLACE
016968,000214: 24,2243 05224 TC BANKCALL
016969,000215: 24,2244 22343 CADR TSELECT -6
016970,000216: 24,2245 05224 ENDTEST1 TC BANKCALL
016971,000217: 24,2246 30747 CADR ENDTEST
016972,000218:
|
|
Page 395 |
016974,000220: 24,2247 33645 OPCHK CAF DELYOFF # AUTOMATIC TEST FOR SYSTEM OPERATION
016975,000221: 24,2250 00006 EXTEND
016976,000222: 24,2251 02030 RAND 30 # CHECK TO SEE IF IMU IS ON
016977,000223: 24,2252 10000 CCS A
016978,000224: 24,2253 02442 TC ALARMS
016979,000225: 24,2254 33640 CAF V16N20S
016980,000226: 24,2255 04646 TC NVSBWAIT
016981,000227:
016982,000228: 24,2256 04713 TC FREEDSP
016983,000229: 24,2257 05224 TC BANKCALL
016984,000230: 24,2260 26000 CADR IMUZERO
016985,000231: 24,2261 05224 TC BANKCALL
016986,000232: 24,2262 26762 CADR IMUSTALL
016987,000233:
016988,000234: 24,2263 12245 TCF ENDTEST1
016989,000235: 24,2264 37746 CA BIT8 # ZERO ALL ERASEABLE USED IN TEST
016990,000236: 24,2265 55777 TS ZERONDX
016991,000237: 24,2266 33650 CA GENPLAD
016992,000238: 24,2267 03240 TC ZEROING
016993,000239:
016994,000240: 24,2270 03346 TC NBPOSPL # ALIGN ANGLE COMPUTATION
016995,000241:
016996,000242: 24,2271 03101 TC POSGMBL # COARSE ALIGN THOSE GIMBALS NOW
016997,000243:
016998,000244: 24,2272 12247 TCF OPCHK
016999,000245: 24,2273 03126 TC FALNE # FINE ALIGN PLATFORM BY TORQUING GYROS
017000,000246:
017001,000247: 24,2274 05224 TC BANKCALL
017002,000248: 24,2275 26762 CADR IMUSTALL
017003,000249: 24,2276 12245 TCF ENDTEST1
017004,000250: 24,2277 37754 CA TWO
017005,000251: 24,2300 55672 CDUCHECK TS CDUNDX # THIS LOOP CHECKS FOR NO ERROR BETWEEN
017006,000252: 24,2301 51672 INDEX CDUNDX # DESIRED CDU ANGLES AND THE ACTUAL ANGLES
017007,000253: 24,2302 40400 CS THETAD
017008,000254: 24,2303 51672 INDEX CDUNDX
017009,000255: 24,2304 60032 AD CDUX
017010,000256: 24,2305 55551 TS STOREPL
017011,000257: 24,2306 11551 CCS STOREPL
017012,000258: 24,2307 02315 TC ERRMASK
017013,000259: 24,2310 02312 TC NOERR
017014,000260: 24,2311 02315 TC ERRMASK
017015,000261: 24,2312 11672 NOERR CCS CDUNDX
017016,000262: 24,2313 02300 TC CDUCHECK
017017,000263:
017018,000264: 24,2314 02321 TC LOADIC
017019,000265: 24,2315 73653 ERRMASK MASK LOWFOUR # ALLOW FIVE BIT ERRORS
017020,000266: 24,2316 10000 CCS A
017021,000267: 24,2317 02442 TC ALARMS
017022,000268: 24,2320 02312 TC NOERR
017023,000269: 24,2321 37755 LOADIC CA ONE
017024,000270: 24,2322 55673 TS RESULTCT
017025,000271: 24,2323 47755 CS ONE
017026,000272:
|
|
Page 396 |
017028,000274: 24,2324 55670 TS MASKREG # SETS UP AZIMUTH AND VERTICAL VECTORS FOR
017029,000275:
017030,000276: 24,2325 37761 CA ZERO
017031,000277: 24,2326 54037 TS PIPAX
017032,000278: 24,2327 54040 TS PIPAY
017033,000279: 24,2330 54041 TS PIPAZ
017034,000280:
017035,000281: 24,2331 37743 CA BIT11
017036,000282: 24,2332 55527 TS LENGTHOT # VECTOR IN PIPA COUNTERS
017037,000283: 24,2333 37755 CA ONE
017038,000284: 24,2334 03207 TC WAITLOOP
017039,000285: 24,2335 11676 CCS COUNTPL
017040,000286: 24,2336 03231 TC WAITLP2
017041,000287: 24,2337 33654 CA DEC56
017042,000288: 24,2340 03207 TC WAITLOOP
017043,000289: 24,2341 37754 OPCHK1 CA TWO
017044,000290: 24,2342 55541 OPCHK2 TS PIPINDEX
017045,000291: 24,2343 00004 INHINT
017046,000292: 24,2344 02773 TC CHECKG
017047,000293: 24,2345 00003 RELINT
017048,000294: 24,2346 37761 CA ZERO
017049,000295: 24,2347 51541 INDEX PIPINDEX
017050,000296: 24,2350 54037 TS PIPAX
017051,000297: 24,2351 03067 TC DATALD # LOAD PIPA DATA AND TIME IN DATAPL
017052,000298: 24,2352 57673 XCH RESULTCT
017053,000299: 24,2353 67753 AD FOUR
017054,000300:
017055,000301: 24,2354 55673 TS RESULTCT
017056,000302: 24,2355 11541 CCS PIPINDEX
017057,000303: 24,2356 02342 TC OPCHK2
017058,000304: 24,2357 47753 READOUT CS FOUR
017059,000305: 24,2360 61673 AD RESULTCT
017060,000306: 24,2361 55673 TS RESULTCT
017061,000307: 24,2362 22007 ZL
017062,000308: 24,2363 51673 INDEX RESULTCT
017063,000309: 24,2364 31626 CA DATAPL
017064,000310: 24,2365 22000 LXCH A
017065,000311: 24,2366 51673 INDEX RESULTCT
017066,000312: 24,2367 21572 DAS GENPL +1
017067,000313: 24,2370 31673 CA RESULTCT
017068,000314: 24,2371 71670 MASK MASKREG
017069,000315: 24,2372 10000 CCS A
017070,000316: 24,2373 02357 TC READOUT
017071,000317: 24,2374 34557 CA TEN
017072,000318: 24,2375 66301 AD THREE
017073,000319: 24,2376 55673 TS RESULTCT
017074,000320: 24,2377 40000 CS A
017075,000321: 24,2400 55670 TS MASKREG
017076,000322: 24,2401 11676 CCS COUNTPL
017077,000323: 24,2402 03231 TC WAITLP2
017078,000324:
017079,000325: 24,2403 03252 TC COMPUT
017080,000326:
|
|
Page 397 |
017082,000328: 24,2404 33641 RADCK CA V16N40S
017083,000329: 24,2405 04646 TC NVSBWAIT # OPERATOR WILL CHECK RADAR STATUS.IN LAB.
017084,000330: 24,2406 04611 TC FLASHON # SET RADAR OFF THEN PUT RESOLVER STANDARD
017085,000331: 24,2407 04464 TC ENDIDLE # ON TRUNNION AND SET TO +45 DEG.SHAFT WIL
017086,000332: 24,2410 02245 TC ENDTEST1
017087,000333: 24,2411 02412 TC +1 # AFTER SETTING RES STANDARD DO A V33
017088,000334: 24,2412 37761 CA ZERO
017089,000335: 24,2413 54424 TS TANG +1
017090,000336:
017091,000337: 24,2414 33655 CA 45DEG
017092,000338: 24,2415 54423 TS TANG
017093,000339: 24,2416 05224 DRIVRAD TC BANKCALL # IN SC WHEN RAD PRESENT DO V33 RIGHT AWAY
017094,000340: 24,2417 20247 CADR RRZERO # LGC WILL ATTEMPT TO DRIVE 45 DEG TRUNN.
017095,000341: 24,2420 05224 TC BANKCALL # TO MATCH STANDARD, AFTER ZEROING CDUS
017096,000342: 24,2421 26756 CADR RADSTALL
017097,000343: 24,2422 02245 TC ENDTEST1
017098,000344: 24,2423 06103 TC INTPRET
017099,000345: 24,2424 77624 CALL
017100,000346: 24,2425 20363 RRDESNB
017101,000347: 24,2426 05224 TC BANKCALL
017102,000348: 24,2427 26756 CADR RADSTALL # IF CDU FAILS TO AGREE WITH COMMAND TO
017103,000349: 24,2430 02442 TC ALARMS # 1 DEG GET ALARM HERE
017104,000350:
017105,000351: 24,2431 04611 TC FLASHON # OPERATOR WILL CHECK STATUS OF RADAR
017106,000352: 24,2432 04464 TC ENDIDLE # IN S/C DO V33 TO CONTINUE WITH SHAFT
017107,000353: 24,2433 02245 TC ENDTEST1 # TEST
017108,000354: 24,2434 02435 TC +1 # IN LAB TURN RADAR OFF CHANGE RES STANDAR
017109,000355: 24,2435 37761 CA ZERO # TO SHAFT AND SET FOR -45DEG.
017110,000356: 24,2436 54423 TS TANG # THEN DO A V33 IF WANT TO REPEAT CHECK
017111,000357: 24,2437 43655 CS 45DEG # DO A V34 TO TERMINATE
017112,000358: 24,2440 54424 TS TANG +1
017113,000359: 24,2441 02416 TC DRIVRAD
017114,000360:
017115,000361: 24,2442 56002 ALARMS XCH Q
017116,000362: 24,2443 55546 TS QPLACE
017117,000363: 24,2444 04744 TC ALARM
017118,000364: 24,2445 01411 OCT 1411
017119,000365: 24,2446 01546 TC QPLACE
017120,000366:
|
|
Page 398 |
017122,000368: 24,2447 06103 GYRSFTST TC INTPRET # START ADRESS FOR IRIG SF TEST
017123,000369: 24,2450 77624 CALL
017124,000370: 24,2451 30532 LATAZCHK # LOAD AZ AND LAT
017125,000371: 24,2452 77776 EXIT
017126,000372: 24,2453 33630 TESTCALL CAF V21N30E
017127,000373: 24,2454 04646 TC NVSBWAIT # LOAD + OR - 1 FOR + OR - X TEST (+00001)
017128,000374: 24,2455 04464 TC ENDIDLE # LOAD + OR - 2 FOR + OR - Y TEST
017129,000375: 24,2456 12245 TCF ENDTEST1 # LOAD + OR - 3 FOR + OR - Z TEST
017130,000376: 24,2457 02453 TC TESTCALL
017131,000377: 24,2460 56337 XCH DSPTEM1
017132,000378: 24,2461 55614 TS CALCDIR
017133,000379: 24,2462 00006 EXTEND # THIS ROUTINE LOOKS AT THE SIZE OF THE
017134,000380: 24,2463 62470 BZMF NEGSIZ # ENTRY MADE BY THE OPERATOR, IF HE DID NO
017135,000381: 24,2464 75357 SIZLOOK MASK NEG3 # T ENTER TEST NO THAT IS W/I PERMISSIBLE
017136,000382:
017137,000383: 24,2465 00006 EXTEND # RANGE- HE WILL BE ASKED TO LOAD AGAIN.
017138,000384: 24,2466 12472 BZF GUDENTRY # THIS IS CONSIDERED NECESSARY BECAUSE
017139,000385: 24,2467 02453 TC TESTCALL # OF FOLLOWING INDEXED TC WHICH COULD
017140,000386:
017141,000387: 24,2470 40000 NEGSIZ COM # SEND THE COMPUTER OFF INTO THE BOONDOCKS
017142,000388: 24,2471 02464 TC SIZLOOK # TO PLAY WITH ITSELF IF THE OPERATOR
017143,000389: 24,2472 31614 GUDENTRY CA CALCDIR # MAKES ABAD ENTRY******
017144,000390: 24,2473 67753 AD FOUR
017145,000391: 24,2474 50000 INDEX A
017146,000392: 24,2475 02476 TC +1
017147,000393: 24,2476 02453 TC TESTCALL
017148,000394: 24,2477 02505 TC +6 # C(A)=+00001 FOR -Z
017149,000395: 24,2500 02504 TC +4 # C(A)=+00002 FOR -Y
017150,000396: 24,2501 02503 TC +2 # C(A)=+00003 FOR -X
017151,000397: 24,2502 02476 TC -4 # C(A)=+00004 ERROR
017152,000398: 24,2503 02506 TC +3 # C(A)=+00005 FOR +X
017153,000399: 24,2504 02512 TC +6
017154,000400: 24,2505 02515 TC +10
017155,000401: 24,2506 37753 CAF FOUR
017156,000402: 24,2507 55544 TS POSITON # 4 IS FOR A.L. POSN 4 USED FOR X SF TEST
017157,000403: 24,2510 02517 TC +7
017158,000404: 24,2511 02517 TC +6
017159,000405: 24,2512 37754 CAF TWO
017160,000406:
017161,000407: 24,2513 55544 TS POSITON # +2 IS A.L. POS 2 USED FOR Y SF TEST
017162,000408: 24,2514 02517 TC +3
017163,000409: 24,2515 37755 CAF ONE
017164,000410: 24,2516 55544 TS POSITON # +1 IS A.L. POS 1 USED FOR Z SF TEST
017165,000411: 24,2517 55617 TS OPTNREG # C(K) = (4,2,1) FOR X,Y,Z
017166,000412: 24,2520 55621 TS SAVE +1
017167,000413: 24,2521 04713 TC FREEDSP
017168,000414: 24,2522 37761 CAF ZERO
017169,000415: 24,2523 55536 TS NBPOS # SET UP NB COORD TO Z NORTH, X UP
017170,000416: 24,2524 55622 TS SAVE +2 # INITIALIZE FOR EARTHR DESIGNATE USAGE
017171,000417: 24,2525 55563 TS TESTNO # INITIALIZE FOR TEST ABORT ROUTINE
017172,000418: 24,2526 55615 TS CDUFLAG # ZEROS FOR STRTWACH USE
017173,000419: 24,2527 33632 CAF SFCONST
017174,000420:
|
|
Page 399 |
017176,000422: 24,2530 55623 TS SFCONST1 # FOR DIVISION DURING CALCSFE
017177,000423:
017178,000424: 24,2531 05224 TC BANKCALL
017179,000425: 24,2532 26000 CADR IMUZERO
017180,000426: 24,2533 05224 TC BANKCALL
017181,000427: 24,2534 26762 CADR IMUSTALL
017182,000428: 24,2535 12245 TCF ENDTEST1
017183,000429: 24,2536 03346 TC NBPOSPL
017184,000430: 24,2537 03101 TC POSGMBL
017185,000431: 24,2540 12245 TCF ENDTEST1
017186,000432: 24,2541 03126 TC FALNE
017187,000433: 24,2542 05224 TC BANKCALL
017188,000434: 24,2543 31705 CADR REDYTORK
017189,000435: 24,2544 55552 WAITFIVE TS SOUTHDR
017190,000436: 24,2545 37750 CAF BIT6 # THIS SECTION CALLS FOR 2-32 MSEC WAITS
017191,000437: 24,2546 02561 TC DIRECTN -5
017192,000438: 24,2547 37750 ENABLE CAF BIT6
017193,000439: 24,2550 00006 EXTEND # ENABLE GYRO TORQUING LOOP BY TURNING
017194,000440: 24,2551 05014 WOR 14C # ON CAL MODULE RELAY
017195,000441:
017196,000442: 24,2552 00004 INHINT
017197,000443: 24,2553 47754 CS TWO # SETS UP EXEC SWITCH SO IMUPULSE WILL
017198,000444: 24,2554 70366 MASK IMODES33 # NOT TURN OFF GYRO TORQ ENABLE RELAY
017199,000445: 24,2555 67754 AD TWO
017200,000446: 24,2556 54366 TS IMODES33
017201,000447: 24,2557 37754 CAF TWO
017202,000448: 24,2560 55552 TS SOUTHDR
017203,000449: 24,2561 55527 TS LENGTHOT # 20 MSEC DELAY FOR GYRO LOOP STABILIZAT.
017204,000450: 24,2562 37755 CA ONE
017205,000451: 24,2563 03207 TC WAITLOOP
017206,000452: 24,2564 11676 CCS COUNTPL
017207,000453: 24,2565 03231 TC WAITLP2
017208,000454: 24,2566 05224 DIRECTN TC BANKCALL # TORQUING ROUTINE IN IMU PERFORMANCE
017209,000455: 24,2567 46520 CADR SILVER # BANK 3
017210,000456: 24,2570 11552 CCS SOUTHDR # A ONE FIRST TIME THROUGH, THEN ZERO
017211,000457: 24,2571 02544 TC WAITFIVE
017212,000458:
017213,000459: 24,2572 11615 STRTWACH CCS CDUFLAG # RETURNS HERE VIA QPLACE FROM SILVER
017214,000460: 24,2573 02654 TC CDUZOTST # BEEN CAUGHT AND CDU THROUGH ZERO IS
017215,000461: 24,2574 11621 CCS SAVE +1
017216,000462: 24,2575 02614 TC LOOKCDUP -4
017217,000463: 24,2576 02620 TC LOOKCDUP
017218,000464: 24,2577 37761 CORRECT CAF ZERO
017219,000465:
017220,000466: 24,2600 54356 TS LGYRO # RELEASES GYROS FOR IMUPULSE USAGE
017221,000467: 24,2601 05224 TC BANKCALL # EARTHRATE CORRECTION TO GYROS NOT EAST
017222,000468: 24,2602 30424 CADR EARTHR # OR WEST
017223,000469: 24,2603 37755 CAF ONE
017224,000470: 24,2604 54356 TS LGYRO # RESERVES GYROS FOR S.F. TEST TORQUING
017225,000471: 24,2605 55622 TS SAVE +2 # INITIALIZES TO INSURE 5.6 DEG OF TORQ)
017226,000472: 24,2606 27563 ADS TESTNO # INCR THE BURST COUNTER, WHICH IS USED TO
017227,000473:
|
|
Page 400 |
017229,000475: 24,2607 41563 CS TESTNO # COUNT THE NO. OF ITMES THE GYRO COUNTER
017230,000476: 24,2610 77760 MASK FIVE # IS LOADED, IF A TENTH LOAD IS REQUESTED
017231,000477:
017232,000478: 24,2611 00006 EXTEND # THE SFE IS TOO LARGE TO BE MEANINGFULL
017233,000479: 24,2612 12762 BZF STOPTEST # OR THE CDU,S ARE NOT WORKING.
017234,000480: 24,2613 02566 TC DIRECTN
017235,000481:
017236,000482: 24,2614 37761 CAF ZERO # ZEROS CDU REG WHICH WILL BE USED TO
017237,000483: 24,2615 55621 TS SAVE +1
017238,000484: 24,2616 51672 INDEX CDUNDX # MEASURE ANGLE.
017239,000485: 24,2617 54032 TS CDUX
017240,000486: 24,2620 00004 LOOKCDUP INHINT
017241,000487: 24,2621 37751 CAF BIT5
017242,000488: 24,2622 55624 STILLOOK TS TIMER
017243,000489: 24,2623 51672 INDEX CDUNDX # LOOKS FOR FIRST CDU PULSE AFTER TORQUING
017244,000490: 24,2624 10032 CCS CDUX # STARTS
017245,000491: 24,2625 02637 TC OUTPLUS # HERE IS PLUS PULSE
017246,000492: 24,2626 02631 TC TIMEWACH
017247,000493: 24,2627 02442 TC ALARMS # TTELL OPERATOR FIRST CDU PULSE WAS MISSD
017248,000494: 24,2630 02650 TC OUTNEG # HERE IS MINUS PULSE
017249,000495: 24,2631 11624 TIMEWACH CCS TIMER # WATCHES TIME IN INHINT SO COPS WILL NOT
017250,000496: 24,2632 02622 TC STILLOOK # CATCH US
017251,000497: 24,2633 00003 RELINT
017252,000498:
017253,000499: 24,2634 10067 CCS NEWJOB
017254,000500: 24,2635 05550 TC CHANG1
017255,000501:
017256,000502: 24,2636 02620 TC LOOKCDUP # KEEP WATCHING IF THE PULSE IS NOT HERE
017257,000503:
017258,000504: 24,2637 43631 OUTPLUS CS DESANGLE # -2047 CDU PULSES ADDED TO CDU REG SO
017259,000505: 24,2640 51672 INDEX CDUNDX # ZERO CROSSOVER CAN BE DETECTED
017260,000506: 24,2641 54032 TS CDUX
017261,000507: 24,2642 37755 LOADFLAG CAF ONE
017262,000508: 24,2643 55615 TS CDUFLAG
017263,000509: 24,2644 30047 CA GYROCTR # GYRO TORQ CMDS LEFT OUT OF FIRST 5.625
017264,000510: 24,2645 55620 TS SAVE # DEG COMMANDED WHEN CDU PULSE ARRIVED
017265,000511: 24,2646 00003 RELINT
017266,000512: 24,2647 02654 TC CDUZOTST
017267,000513:
017268,000514: 24,2650 33631 OUTNEG CA DESANGLE
017269,000515: 24,2651 51672 INDEX CDUNDX
017270,000516: 24,2652 54032 TS CDUX
017271,000517: 24,2653 02642 TC LOADFLAG
017272,000518:
017273,000519: 24,2654 51672 CDUZOTST INDEX CDUNDX
017274,000520: 24,2655 10032 CCS CDUX
017275,000521: 24,2656 02662 TC +4
017276,000522: 24,2657 02677 TC ENDWATCH
017277,000523: 24,2660 02662 TC +2
017278,000524: 24,2661 02677 TC ENDWATCH
017279,000525:
017280,000526: 24,2662 37744 CAF BIT10 # RAND WITH BIT 10 TO SEE IF STILL TORQ.
017281,000527: 24,2663 00006 EXTEND
017282,000528:
|
|
Page 401 |
017284,000530: 24,2664 02014 RAND 14C
017285,000531: 24,2665 10000 CCS A
017286,000532: 24,2666 02674 TC +6
017287,000533:
017288,000534: 24,2667 11622 CCS SAVE +2 # SEE IF 2.8DEG OR 5.6 DEG SINCE LAST
017289,000535: 24,2670 02672 TC +2 # EEARTHR USE, IF 2.8 DEG, DO 2.8 MORE
017290,000536: 24,2671 02577 TC CORRECT # THEN GO TO CORRECT
017291,000537: 24,2672 55622 TS SAVE +2
017292,000538:
017293,000539: 24,2673 02566 TC DIRECTN
017294,000540: 24,2674 10067 CCS NEWJOB
017295,000541: 24,2675 05550 TC CHANG1
017296,000542: 24,2676 02654 TC CDUZOTST
017297,000543:
017298,000544: 24,2677 00004 ENDWATCH INHINT # WWILL STOR GYROCTR AT END OF 2048 CDU
017299,000545: 24,2700 37761 CAF ZERO # PULSES AND STOP TORQ BY ZEROING REQUESTS
017300,000546: 24,2701 54356 TS LGYRO # RELEASE GYROS FOR OTHERS USAGE
017301,000547: 24,2702 56047 XCH GYROCTR
017302,000548: 24,2703 55621 TS SAVE +1 # AND STOPS TORQUING BY ZEROING TORQ
017303,000549: 24,2704 47754 CS TWO
017304,000550: 24,2705 70366 MASK IMODES33 # THIS TURNS OFF EXEC SWITCH SO THE GYRO
017305,000551: 24,2706 54366 TS IMODES33 # TORQ. ENABLE RELAY CAN BE TURNED OFF.
017306,000552: 24,2707 00003 RELINT
017307,000553: 24,2710 31620 CALCSFE CA SAVE # GYROCTR AT TEST START
017308,000554: 24,2711 00006 EXTEND
017309,000555: 24,2712 61621 SU SAVE +1 # GYROCTR AT TEST END
017310,000556: 24,2713 55622 TS SAVE +2
017311,000557: 24,2714 00006 EXTEND
017312,000558: 24,2715 62734 BZMF ARITH # SEE IF IT IS NEG OR ZERO,IF NEG,SFE IS +
017313,000559: 24,2716 73633 MASK SIZCHK
017314,000560: 24,2717 00006 EXTEND # THIS ROUTINE TESTS SAVE-(SAVE+1) TO SEE
017315,000561: 24,2720 12726 BZF NEGSFE # IF THE RESULT IS WITHIN PERMISSIBLE SIZE
017316,000562:
017317,000563: 24,2721 41622 CS SAVE +2 # AND DETERMINES POLARITY OF SFE USING THE
017318,000564: 24,2722 73633 MASK SIZCHK # PRESENCE OR ABSENCE OF BITS 12,13,14.
017319,000565: 24,2723 00006 EXTEND # IF BITS ARE PRESENT IN POSITIVE SAVE +2
017320,000566: 24,2724 12730 BZF POSSFE # THEN THE SFE MUST BE POS. IF DIFFERENCE
017321,000567: 24,2725 02762 TC STOPTEST # IS GREATER THAN 2047 PULSES FROM THE
017322,000568: 24,2726 31622 NEGSFE CAE SAVE +2 # IDEAL NO OF PULSES, THE SFE EXCEEDS
017323,000569: 24,2727 02734 TC ARITH # 15600 PPM, THE TEST IS NOT VALID AND
017324,000570:
017325,000571: # THEREFORE ABORTS AND TURNS ON PROGRAM ALARM
017326,000572: 24,2730 37735 POSSFE CAF POSMAX # POS SFE DEFINITION = IRIG SF IN SEC OF
017327,000573: 24,2731 00006 EXTEND # ARC PER PULSE IS GREATER THAN
017328,000574: 24,2732 61622 SU SAVE +2 # .61798095703125 SEC OF ARC/ PULSE
017329,000575: 24,2733 02735 TC ARITH +1
017330,000576:
017331,000577: 24,2734 40000 ARITH COM
017332,000578: 24,2735 22007 ZL
017333,000579: 24,2736 00006 EXTEND
017334,000580: 24,2737 11623 DV SFCONST1
017335,000581: 24,2740 54342 LOADIT TS DSPTEM2
|
|
Page 402 |
017337,000583: 24,2741 02742 TC DATADSP
017338,000584:
017339,000585: 24,2742 04621 DATADSP TC GRABDSP
017340,000586: 24,2743 04626 TC PREGBSY
017341,000587: 24,2744 31614 CA CALCDIR
017342,000588: 24,2745 54344 TS DSPTEM2 +2 # DISPLAYS TEST NO JUST PERFORMED
017343,000589: 24,2746 33636 CAF VB06N66 # R3 = TEST NO JUST PERFORMED
017344,000590: 24,2747 04646 TC NVSBWAIT
017345,000591: 24,2750 04611 TC FLASHON
017346,000592: 24,2751 04464 TC ENDIDLE # TO END TEST DO V34E
017347,000593: 24,2752 02754 TC +2
017348,000594: 24,2753 02453 TC TESTCALL # TO CONTINUE TEST DO V33E
017349,000595: 24,2754 05224 TC BANKCALL
017350,000596: 24,2755 26000 CADR IMUZERO
017351,000597:
017352,000598: 24,2756 05224 TC BANKCALL
017353,000599: 24,2757 26762 CADR IMUSTALL
017354,000600: 24,2760 12245 TCF ENDTEST1
017355,000601: 24,2761 12245 TCF ENDTEST1
017356,000602:
017357,000603: 24,2762 05224 STOPTEST TC BANKCALL
017358,000604: 24,2763 26000 CADR IMUZERO
017359,000605: 24,2764 05224 TC BANKCALL # CORRECT CDUCTRS AND TURN ON PROG ALARM
017360,000606: 24,2765 26762 CADR IMUSTALL # TO TELL OPERATOR LAST CDU PULSE WAS
017361,000607: 24,2766 12245 TCF ENDTEST1 # MISSED OR GYRO TORQ LOOP WAY OUT OF
017362,000608: 24,2767 37761 CAF ZERO # ALLOWABLE LIMITS.........
017363,000609: 24,2770 54356 TS LGYRO # **** RELEASE GYROS FOR OTHERS USAGE*****
017364,000610: 24,2771 02442 TC ALARMS
017365,000611: 24,2772 12245 TCF ENDTEST1
017366,000612:
|
|
Page 403 |
017368,000614: 24,2773 00006 CHECKG EXTEND # PIP PULSE CATCHING ROUTINE
017369,000615: 24,2774 23546 QXCH QPLACE # RECORDS TIME AT OCCURRENCE OF A DELTA V
017370,000616: 24,2775 00003 CHECKG1 RELINT # KEEPS CONTENT OF PIPA REG INTACT
017371,000617: 24,2776 10067 CCS NEWJOB
017372,000618: 24,2777 05550 TC CHANG1
017373,000619: 24,3000 00004 INHINT
017374,000620: 24,3001 37761 CAF ZERO
017375,000621: 24,3002 51541 INDEX PIPINDEX
017376,000622: 24,3003 56037 XCH PIPAX
017377,000623: 24,3004 55551 TS STOREPL
017378,000624: 24,3005 11551 CCS STOREPL
017379,000625: 24,3006 03012 TC CHECKP
017380,000626: 24,3007 03065 TC RESTOREA
017381,000627: 24,3010 03025 TC CHECKM
017382,000628: 24,3011 03065 TC RESTOREA
017383,000629: 24,3012 37750 CHECKP CAF BIT6 # LOOKS FOR ONE MORE PLUS PULSE
017384,000630: 24,3013 55540 TS PIPANO
017385,000631: 24,3014 51541 INDEX PIPINDEX
017386,000632: 24,3015 10037 CCS PIPAX
017387,000633:
017388,000634: 24,3016 03040 TC CHECKG3
017389,000635: 24,3017 03022 TC +3
017390,000636: 24,3020 03065 TC RESTOREA
017391,000637: 24,3021 03022 TC +1
017392,000638: 24,3022 11540 CCS PIPANO
017393,000639: 24,3023 03013 TC CHECKP +1
017394,000640: 24,3024 03065 TC RESTOREA
017395,000641: 24,3025 37750 CHECKM CAF BIT6 # LOOKS FOR ONE MORE MINUS PULSE
017396,000642: 24,3026 55540 TS PIPANO
017397,000643: 24,3027 51541 INDEX PIPINDEX
017398,000644: 24,3030 10037 CCS PIPAX
017399,000645: 24,3031 03065 TC RESTOREA
017400,000646: 24,3032 03035 TC +3
017401,000647: 24,3033 03040 TC CHECKG3
017402,000648: 24,3034 03035 TC +1
017403,000649: 24,3035 11540 CCS PIPANO
017404,000650: 24,3036 03026 TC CHECKM +1
017405,000651: 24,3037 03065 TC RESTOREA
017406,000652: 24,3040 05015 CHECKG3 TC FINETIME # TIME IN DOUBLE PRECISION LEFT IN MPAC
017407,000653:
017408,000654: 24,3041 52145 DXCH MPAC
017409,000655: 24,3042 37752 CAF BIT4
017410,000656: 24,3043 55540 CHECKG5 TS PIPANO
017411,000657:
017412,000658: 24,3044 51541 INDEX PIPINDEX
017413,000659: 24,3045 10037 CCS PIPAX
017414,000660: 24,3046 03052 TC +4
017415,000661: 24,3047 03065 TC RESTOREA
017416,000662: 24,3050 03052 TC +2
017417,000663: 24,3051 03065 TC RESTOREA
017418,000664: 24,3052 11540 CCS PIPANO
017419,000665: 24,3053 03043 TC CHECKG5
017420,000666:
|
|
Page 404 |
017422,000668: 24,3054 03057 NREAD TC RESTORE
017423,000669: 24,3055 55551 TS STOREPL
017424,000670:
017425,000671: 24,3056 01546 TC QPLACE
017426,000672: 24,3057 57551 RESTORE XCH STOREPL # A WILL CONTAIN PREVIOUS PIPA CNTR CONTEN
017427,000673: 24,3060 51541 INDEX PIPINDEX # STOREPL WILL CONTAIN ZERO
017428,000674: 24,3061 60037 AD PIPAX
017429,000675: 24,3062 51541 INDEX PIPINDEX
017430,000676: 24,3063 54037 TS PIPAX
017431,000677: 24,3064 00002 TC Q
017432,000678:
|
|
Page 405 |
017434,000680: 24,3065 03057 RESTOREA TC RESTORE
017435,000681: 24,3066 02775 TC CHECKG1
017436,000682: 24,3067 31551 DATALD CA STOREPL
017437,000683: 24,3070 51673 INDEX RESULTCT
017438,000684: 24,3071 55626 TS DATAPL
017439,000685: 24,3072 30144 CA MPAC
017440,000686: 24,3073 51673 INDEX RESULTCT
017441,000687: 24,3074 55627 TS DATAPL +1
017442,000688:
017443,000689: 24,3075 30145 CA MPAC +1
017444,000690: 24,3076 51673 INDEX RESULTCT
017445,000691: 24,3077 55630 TS DATAPL +2
017446,000692: 24,3100 00002 TC Q
017447,000693:
017448,000694:
017449,000695:
017450,000696: 24,3101 00006 POSGMBL EXTEND # COARSE ALIGNING SUBROUTINE
017451,000697: 24,3102 23546 QXCH QPLACE
017452,000698:
017453,000699: 24,3103 06103 TC INTPRET
017454,000700: 24,3104 77624 CALL
017455,000701: 24,3105 32722 CALCGA
017456,000702: 24,3106 77776 EXIT
017457,000703:
017458,000704: 24,3107 05224 TC BANKCALL
017459,000705: 24,3110 26065 CADR IMUCOARS
017460,000706: 24,3111 30075 CA FLAGWRD1
017461,000707: 24,3112 77746 MASK BIT8
017462,000708: 24,3113 10000 CCS A # L +1, OTHERWISE TO L +2.
017463,000709: 24,3114 03117 TC LOCK
017464,000710:
017465,000711: 24,3115 25546 INCR QPLACE
017466,000712: 24,3116 03121 TC +3
017467,000713: 24,3117 37754 LOCK CA TWO
017468,000714: 24,3120 55537 TS NDXCTR
017469,000715: 24,3121 05224 TC BANKCALL
017470,000716: 24,3122 26762 CADR IMUSTALL
017471,000717: 24,3123 12245 TCF ENDTEST1
017472,000718: 24,3124 01546 TC QPLACE
017473,000719: 24,3125 00401 GMLOCKCK OCT 00401
017474,000720:
|
|
Page 406 |
017476,000722: 24,3126 00006 FALNE EXTEND # TORQUES GYROS TO NULL OVT DIFFERENCE
017477,000723: 24,3127 23546 QXCH QPLACE # BETWEEN DESIRED SM ORIENTATION WITH RESP
017478,000724: 24,3130 05224 TC BANKCALL # TO NBASE AND ACTUAL
017479,000725: 24,3131 26000 CADR IMUZERO
017480,000726: 24,3132 05224 TC BANKCALL
017481,000727: 24,3133 26762 CADR IMUSTALL
017482,000728: 24,3134 12245 TCF ENDTEST1
017483,000729: 24,3135 05224 TC BANKCALL
017484,000730: 24,3136 26251 CADR IMUFINE
017485,000731: 24,3137 05224 TC BANKCALL
017486,000732: 24,3140 26762 CADR IMUSTALL
017487,000733: 24,3141 12245 TCF ENDTEST1
017488,000734: 24,3142 30032 FALNE1 CA CDUX
017489,000735: 24,3143 50110 INDEX FIXLOC
017490,000736:
017491,000737: 24,3144 54024 TS 24
017492,000738: 24,3145 30033 CA CDUY
017493,000739: 24,3146 50110 INDEX FIXLOC
017494,000740: 24,3147 54020 TS 20
017495,000741: 24,3150 30034 CA CDUZ
017496,000742: 24,3151 50110 INDEX FIXLOC
017497,000743: 24,3152 54022 TS 22
017498,000744: 24,3153 37751 CA BIT5
017499,000745: 24,3154 60110 AD FIXLOC
017500,000746: 24,3155 50110 INDEX FIXLOC
017501,000747: 24,3156 54050 TS S1
017502,000748: 24,3157 06103 TC INTPRET
017503,000749: 24,3160 64375 VLOAD MXV
017504,000750: 24,3161 02401 XSM
017505,000751: 24,3162 02445 STARAD
017506,000752: 24,3163 77772 VSL1
017507,000753: 24,3164 34041 STCALL 32D
017508,000754: 24,3165 32622 NBSM
017509,000755: 24,3166 26423 STOVL XDC
017510,000756: 24,3167 02407 YSM
017511,000757: 24,3170 76521 MXV VSL1
017512,000758: 24,3171 02445 STARAD
017513,000759: 24,3172 34041 STCALL 32D
017514,000760:
017515,000761: 24,3173 32622 NBSM
017516,000762: 24,3174 26431 STOVL YDC
017517,000763: 24,3175 02423 XDC
017518,000764: 24,3176 76435 VXV VSL1
017519,000765: 24,3177 02431 YDC
017520,000766: 24,3200 36437 STCALL ZDC
017521,000767: 24,3201 32472 CALCGTA
017522,000768: 24,3202 77776 EXIT
017523,000769: 24,3203 33652 CA OGCPL
017524,000770: 24,3204 05224 TC BANKCALL
017525,000771: 24,3205 26361 CADR IMUPULSE
017526,000772: 24,3206 01546 TC QPLACE
017527,000773:
|
|
Page 407 |
017529,000775: 24,3207 00006 WAITLOOP EXTEND # LOOPS IN X SEC INCREMENTS FOR NUMBER OF
017530,000776: 24,3210 23545 QXCH QPLAC
017531,000777: 24,3211 55676 TS COUNTPL # NUMBER PUT INTO LENGTHOT
017532,000778: 24,3212 11676 WAITLP1 CCS COUNTPL
017533,000779: 24,3213 03217 TC +4
017534,000780: 24,3214 01545 TC QPLAC
017535,000781: 24,3215 03217 TC +2
017536,000782: 24,3216 03211 TC WAITLP1 -1
017537,000783: 24,3217 00004 INHINT
017538,000784: 24,3220 31527 CAE LENGTHOT
017539,000785: 24,3221 05701 TC WAITLIST
017540,000786: 24,3222 E5,1400 EBANK= XSM
017541,000787: 24,3222 03235 50005 2CADR WAITLP3
017542,000788:
017543,000789: 24,3224 00003 RELINT
017544,000790: 24,3225 11676 CCS COUNTPL
017545,000791: 24,3226 01545 TC QPLAC
017546,000792: 24,3227 01545 TC QPLAC
017547,000793: 24,3230 13231 NOOP
017548,000794:
017549,000795: 24,3231 55676 WAITLP2 TS COUNTPL # ENTER HERE AFTER DOING CALLING JOB
017550,000796: 24,3232 33234 CAF WTLPCADR
017551,000797: 24,3233 05563 TC JOBSLEEP
017552,000798: 24,3234 51212 WTLPCADR CADR WAITLP1
017553,000799: 24,3235 33234 WAITLP3 CAF WTLPCADR
017554,000800: 24,3236 05567 TC JOBWAKE
017555,000801: 24,3237 05745 TC TASKOVER
017556,000802:
017557,000803:
017558,000804:
017559,000805: 24,3240 54001 ZEROING TS L
017560,000806: 24,3241 13243 TCF +2
017561,000807: 24,3242 55777 ZEROING1 TS ZERONDX
017562,000808: 24,3243 37761 CAF ZERO
017563,000809: 24,3244 50001 INDEX L
017564,000810: 24,3245 54000 TS 0
017565,000811: 24,3246 24001 INCR L
017566,000812: 24,3247 11777 CCS ZERONDX
017567,000813: 24,3250 13242 TCF ZEROING1
017568,000814: 24,3251 00002 TC Q
017569,000815: 24,3252 06103 COMPUT TC INTPRET # CALCULATE LENGTH OF GRAVITY VECTOR AS
017570,000816:
017571,000817: 24,3253 77170 AXT,1 AXT,2 # MEASURED BY ACCELEROMETERS
017572,000818: 24,3254 00026 22D
017573,000819: 24,3255 00012 10D
017574,000820: 24,3256 77731 SSP
017575,000821: 24,3257 00051 S1
017576,000822: 24,3260 00004 4
017577,000823: 24,3261 77731 SSP
017578,000824: 24,3262 00052 S2
|
|
Page 408 |
017580,000826: 24,3263 00004 4
017581,000827: 24,3264 44743 LOPDELOP DLOAD* DSU*
017582,000828:
017583,000829: 24,3265 75120 DATAPL +24D,2
017584,000830: 24,3266 02657 DATAPL +24D,1
017585,000831: 24,3267 41323 PDDL* DMP
017586,000832: 24,3270 75156 GENPL +24D,2
017587,000833: 24,3271 11644 DEC585
017588,000834: 24,3272 77671 DDV
017589,000835: 24,3273 55504 TIX,2 VDEF
017590,000836: 24,3274 51301 NEXT
017591,000837: 24,3275 47046 ABVAL RTB
017592,000838: 24,3276 33565 SGNAGREE
017593,000839: 24,3277 34343 STCALL DSPTEM2
017594,000840: 24,3300 51303 KODU
017595,000841: 24,3301 60006 NEXT PUSH TIX,1
017596,000842: 24,3302 51264 LOPDELOP
017597,000843: 24,3303 77776 KODU EXIT
017598,000844: 24,3304 04633 TC GRABWAIT
017599,000845: 24,3305 03600 TC SHOW
017600,000846: 24,3306 06103 TC INTPRET
017601,000847: 24,3307 41535 SLOAD PUSH
017602,000848: 24,3310 02630 DATAPL +1
017603,000849: 24,3311 41535 SLOAD PUSH
017604,000850: 24,3312 02634 DATAPL +5
017605,000851: 24,3313 55535 SLOAD VDEF
017606,000852:
017607,000853: 24,3314 02640 DATAPL +11
017608,000854: 24,3315 76456 UNIT VSL1
017609,000855: 24,3316 77606 PUSH
017610,000856: 24,3317 41535 SLOAD PUSH
017611,000857: 24,3320 02644 DATAPL +15
017612,000858: 24,3321 41535 SLOAD PUSH
017613,000859: 24,3322 02650 DATAPL +21
017614,000860: 24,3323 55535 SLOAD VDEF
017615,000861: 24,3324 02654 DATAPL +25
017616,000862: 24,3325 76456 UNIT VSL1
017617,000863: 24,3326 45325 PDDL DSU
017618,000864: 24,3327 02655 DATAPL +26
017619,000865: 24,3330 02641 DATAPL +12
017620,000866: 24,3331 77612 SL4
017621,000867: 24,3332 77652 SL3
017622,000868: 24,3333 26530 STOVL LENGTHOT
017623,000869: 24,3334 51435 VXV ABVAL
017624,000870: 24,3335 56205 DMP DDV
017625,000871: 24,3336 11647 ERUNITS
017626,000872: 24,3337 02530 LENGTHOT
017627,000873: 24,3340 77634 RTB
017628,000874: 24,3341 33565 SGNAGREE
017629,000875: 24,3342 00343 STORE DSPTEM2
017630,000876:
017631,000877: 24,3343 77776 EXIT
017632,000878: 24,3344 03600 TC SHOW
|
|
Page 409 |
017634,000880: 24,3345 12404 TCF RADCK
017635,000881: 24,3346 00006 NBPOSPL EXTEND # SETS UP AZIMUTH AND VERTICAL VECTORS FOR
017636,000882: 24,3347 23546 QXCH QPLACE # AXISGEN,RESULTS TO BE USED IN CALCGA TO
017637,000883: 24,3350 06103 TC INTPRET
017638,000884: 24,3351 54160 AXC,1 XSU,1 # AZIMUTH IN NB COORDS
017639,000885: 24,3352 51663 SCNBAZ
017640,000886: 24,3353 02536 NBPOS
017641,000887: 24,3354 77773 VLOAD*
017642,000888:
017643,000889: 24,3355 00001 0,1
017644,000890: 24,3356 02445 STORE STARAD
017645,000891:
017646,000892: 24,3357 54160 AXC,1 XSU,1 # VERTICAL IN NB COORDS
017647,000893: 24,3360 51675 SCNBVER
017648,000894: 24,3361 02536 NBPOS
017649,000895: 24,3362 77773 VLOAD*
017650,000896: 24,3363 00001 0,1
017651,000897: 24,3364 16453 STODL STARAD +6
017652,000898: 24,3365 33334 SCHZEROS
017653,000899: 24,3366 14007 STODL 6D
017654,000900: 24,3367 02507 AZIMUTH
017655,000901: 24,3370 57546 COS DCOMP
017656,000902: 24,3371 14011 STODL 8D
017657,000903: 24,3372 02507 AZIMUTH
017658,000904: 24,3373 77756 SIN
017659,000905: 24,3374 00013 STORE 10D # VERTICAL IN CER
017660,000906: 24,3375 77775 VLOAD
017661,000907: 24,3376 11676 SCNBVER
017662,000908: 24,3377 34015 STCALL 12D
017663,000909: 24,3400 33006 AXISGEN
017664,000910: 24,3401 77776 EXIT
017665,000911:
017666,000912: 24,3402 33642 SELPOSN CA DEC17
017667,000913: 24,3403 55777 TS ZERONDX
017668,000914: 24,3404 33662 CA XSMADR
017669,000915: 24,3405 03240 TC ZEROING
017670,000916:
017671,000917: 24,3406 51544 INDEX POSITON
017672,000918: 24,3407 03410 TC +1
017673,000919: 24,3410 03526 TC OPCHKPOS # OPCHK WILL PUT ZERO IN POSITON
017674,000920: 24,3411 03424 TC POSN1
017675,000921: 24,3412 03433 TC POSN2
017676,000922: 24,3413 03440 TC POSN3
017677,000923: 24,3414 03452 TC POSN4
017678,000924: 24,3415 03462 TC POSN5
017679,000925: 24,3416 03472 TC POSN6
017680,000926: 24,3417 03502 TC POSN7
017681,000927: 24,3420 03515 TC POSN8
017682,000928: 24,3421 03544 TC POSN9
017683,000929: 24,3422 03555 TC POSN10
017684,000930: 24,3423 03566 TC POSN11 # COMPASS POSITION
017685,000931:
|
|
Page 410 |
017687,000933: # (XXX.XX MERU) AND A VERTICAL TEST BY DV (XXX.XX MERU) EACH POSITION TELL
017688,000934: # HOW THE DISPLAYS ARE RELATED TO TTHE DRIFT COEFFICIENTS BEING MEASURED.
017689,000935: # NOTE THAT IT IS ILLEGAL TO RUN VERTICAL IN POS 6,4, OR 2 WITHOUT FIRST
017690,000936: # RUNNING HORIZONTAL OF POS 5,3, OR1. THIS IS BECAUSE THE HORIZ DRIFT CALC
017691,000937: # IN 1,3, OR 5 IS USED AS EAST DRIFFFT FOR VERTICAL TEST. THIS IS DONE BY
017692,000938: # THE MACHINE AUTOMATICALLY EXCEPT FOR VERTICAL POSITION 6 WHICH THE
017693,000939: # OPERATOR MUST DO. (SEE POSITION 6 BELOW)
017694,000940: 24,3424 37740 POSN1 CA HALF # X UP, Y SOUTH, Z EAST
017695,000941: 24,3425 55400 TS XSM
017696,000942: 24,3426 55410 TS YSM +2 # NBDY = DH
017697,000943: 24,3427 55420 TS ZSM +4
017698,000944: 24,3430 37761 NGUBGH CA ZERO
017699,000945: 24,3431 55541 TS PIPINDEX
017700,000946: 24,3432 01546 TC QPLACE
017701,000947:
017702,000948:
017703,000949: 24,3433 47740 POSN2 CS HALF # X DOWN, Y WEST, Z NORTH
017704,000950: 24,3434 55400 TS XSM
017705,000951: 24,3435 55412 TS YSM +4 # NBDZ=DH,NBDX-ADIAX=-DV
017706,000952: 24,3436 55416 TS ZSM +2
017707,000953: 24,3437 03430 TC NGUBGH
017708,000954:
017709,000955:
017710,000956: 24,3440 37740 POSN3 CA HALF # Z UP, Y WEST ,X NORTH
017711,000957: 24,3441 55414 TS ZSM
017712,000958: 24,3442 40000 COM # NBDX = -DH
017713,000959: 24,3443 55402 TS XSM +2
017714,000960: 24,3444 55412 TS YSM +4
017715,000961: 24,3445 37754 NSFLAGD CA TWO
017716,000962: 24,3446 55541 TS PIPINDEX
017717,000963: 24,3447 37761 NSBUGD CA ZERO
017718,000964: 24,3450 55576 TS DRIFTT
017719,000965: 24,3451 01546 TC QPLACE
017720,000966:
017721,000967:
017722,000968: 24,3452 37740 POSN4 CA HALF # Z DOWN, Y SOUTH ,X EAST
017723,000969: 24,3453 55404 TS XSM +4
017724,000970: 24,3454 55410 TS YSM +2
017725,000971: 24,3455 40000 COM # NBDY+SRAY=DH,NBDZ+ADIAZ=DV
017726,000972: 24,3456 55414 TS ZSM
017727,000973: 24,3457 37754 CA TWO
017728,000974: 24,3460 55541 TS PIPINDEX
017729,000975: 24,3461 01546 TC QPLACE
017730,000976:
017731,000977: 24,3462 37740 POSN5 CA HALF # Y UP, Z NORTH, X WEST
|
|
Page 411 |
017733,000979: 24,3463 55406 TS YSM
017734,000980: 24,3464 40000 COM # NBDZ-SRAZ=DH
017735,000981: 24,3465 55404 TS XSM +4
017736,000982: 24,3466 55416 TS ZSM +2
017737,000983: 24,3467 37755 CA ONE
017738,000984: 24,3470 55541 TS PIPINDEX
017739,000985: 24,3471 03447 TC NSBUGD
017740,000986:
017741,000987:
017742,000988:
017743,000989: # TO RUN POSITION 6 VERTICAL AFTER PIP TEST POS 6 IS DISPLAYED THE OPERATR
017744,000990: # MUST CALCULATE FROM POSN 2,5 -NBDZ-ADSRAZ (XXX.XX)MERU. WHEN P
017745,000991: # IP DATA FLASHES DO VERB 33 ENTER. THIS STARTS VERTICAL TEST. THEN THE
017746,000992: # DATA XXX.XX MERU AS CALCULATED MUST BE ENTERED INTO DRIFTT. IE VERB 21
017747,000993: # ENTER NOUN 01 ENTER LOCATION OF DRIFTT ENTER + (OR -) XXXXX ENTER
017748,000994: 24,3472 37740 POSN6 CA HALF # Y DOWN, Z EAST, X SOUTH
017749,000995: 24,3473 55402 TS XSM +2
017750,000996: 24,3474 55420 TS ZSM +4
017751,000997: 24,3475 40000 COM # NBDX +ADSRAX = DH, NBDY -ADIAY = -DV
017752,000998:
017753,000999: 24,3476 55406 TS YSM
017754,001000: 24,3477 37755 CA ONE
017755,001001: 24,3500 55541 TS PIPINDEX
017756,001002: 24,3501 01546 TC QPLACE
017757,001003:
017758,001004:
017759,001005: 24,3502 47740 POSN7 CS HALF # Z UP-EAST,Y UP-WEST,X NORTH.THIS POSITON
017760,001006: 24,3503 55402 TS XSM +2
017761,001007: 24,3504 33656 CA ROOT1/2
017762,001008: 24,3505 55406 TS YSM # NBDX - .707 ADSRAX = -DH
017763,001009: 24,3506 55414 TS ZSM
017764,001010: 24,3507 55420 TS ZSM +4
017765,001011: 24,3510 40000 COM
017766,001012: 24,3511 55412 TS YSM +4
017767,001013: 24,3512 06036 GEORGES TC FLAG1DWN # UNSET GIMBAL LOCK FLAG
017768,001014: 24,3513 00200 OCT 200
017769,001015: 24,3514 03447 TC NSBUGD
017770,001016:
017771,001017:
017772,001018: 24,3515 37740 POSN8 CA HALF # Z UP-SOUTH,Y UP-NORTH,X EAST.THIS POSITN
017773,001019: 24,3516 55404 TS XSM +4
017774,001020:
017775,001021: 24,3517 33656 CA ROOT1/2 # .707(-NBDZ-NBDY) +.5(ADIAZ-ADIAY)
017776,001022: 24,3520 55406 TS YSM # +.5(ADSRAY +ADSRAZ)=DH
017777,001023: 24,3521 55416 TS ZSM +2
017778,001024: 24,3522 55414 TS ZSM
017779,001025: 24,3523 40000 COM
017780,001026: 24,3524 55410 TS YSM +2
017781,001027: 24,3525 03447 TC NSBUGD
017782,001028:
|
|
Page 412 |
017784,001030: 24,3526 33657 OPCHKPOS CA ROOT1SQ # OG=+45DEG,IG=-45DEG,MG=+45DEG.
017785,001031: 24,3527 55400 TS XSM
017786,001032:
017787,001033: 24,3530 55410 TS YSM +2
017788,001034: 24,3531 55412 TS YSM +4
017789,001035: 24,3532 55414 TS ZSM
017790,001036: 24,3533 33656 CA ROOT1/2
017791,001037: 24,3534 55406 TS YSM
017792,001038: 24,3535 33661 CA ROOT3SQ
017793,001039: 24,3536 55402 TS XSM +2
017794,001040: 24,3537 55420 TS ZSM +4
017795,001041: 24,3540 43660 CS ROOT2SQ
017796,001042: 24,3541 55404 TS XSM +4
017797,001043: 24,3542 55416 TS ZSM +2
017798,001044: 24,3543 01546 TC QPLACE
017799,001045:
017800,001046: 24,3544 37740 POSN9 CA HALF # X UP EAST,Y UP WEST,Z SOUTH.THIS POSITON
017801,001047: 24,3545 55416 TS ZSM +2
017802,001048: 24,3546 33656 CA ROOT1/2 # -NBDZ +.707 SRAZ =DH
017803,001049: 24,3547 55400 TS XSM
017804,001050: 24,3550 55404 TS XSM +4
017805,001051: 24,3551 55406 TS YSM
017806,001052: 24,3552 40000 COM
017807,001053: 24,3553 55412 TS YSM +4
017808,001054: 24,3554 03447 TC NSBUGD
017809,001055:
017810,001056:
017811,001057: 24,3555 37740 POSN10 CA HALF # X UP NORTH, Y UP SOUTH,Z EAST.THIS POSITN
017812,001058: 24,3556 55420 TS ZSM +4
017813,001059: 24,3557 33656 CA ROOT1/2 # .707(NBDY -NBDX) +.5(ADIAY -ADIAX)
017814,001060: 24,3560 55400 TS XSM # +.5(ADSRAX) = DH
017815,001061: 24,3561 55406 TS YSM
017816,001062: 24,3562 55410 TS YSM +2
017817,001063: 24,3563 40000 COM
017818,001064: 24,3564 55402 TS XSM +2
017819,001065: 24,3565 03447 TC NSBUGD
017820,001066:
017821,001067:
017822,001068: 24,3566 05224 POSN11 TC BANKCALL # COMPASS POSITION
017823,001069: 24,3567 73100 CADR LOADXSM
017824,001070: 24,3570 01546 TC QPLACE
017825,001071:
017826,001072:
017827,001073: 24,3571 30342 SHOWLD CA DSPTEM2
017828,001074: 24,3572 55527 TS LENGTHOT
017829,001075: 24,3573 30343 CA DSPTEM2 +1
017830,001076: 24,3574 55536 TS NBPOS
017831,001077:
017832,001078: 24,3575 30344 CA DSPTEM2 +2
017833,001079:
|
|
Page 413 |
017835,001081: 24,3576 55544 TS POSITON
017836,001082: 24,3577 00002 TC Q
017837,001083:
017838,001084: 24,3600 00006 SHOW EXTEND
017839,001085: 24,3601 23546 QXCH QPLACE
017840,001086: 24,3602 31544 SHOW1 CA POSITON
017841,001087: 24,3603 54344 TS DSPTEM2 +2
017842,001088: 24,3604 33636 CA VB06N66
017843,001089:
017844,001090: 24,3605 04646 TC NVSBWAIT
017845,001091: 24,3606 04611 TC FLASHON
017846,001092: 24,3607 04464 TC ENDIDLE
017847,001093: 24,3610 02236 TC FINISH
017848,001094: 24,3611 01546 TC QPLACE
017849,001095: 24,3612 03571 TC SHOWLD
017850,001096: 24,3613 13602 TCF SHOW1
017851,001097:
017852,001098:
017853,001099: 24,3614 00006 LOADGTSM EXTEND # THIS LOADS XSM INTO GEOMATRX
017854,001100: 24,3615 23546 QXCH QPLACE
017855,001101: 24,3616 06103 TC INTPRET
017856,001102: 24,3617 77775 VLOAD
017857,001103: 24,3620 02401 XSM
017858,001104: 24,3621 26750 STOVL GEOMTRX
017859,001105: 24,3622 02407 YSM
017860,001106: 24,3623 26756 STOVL GEOMTRX +6
017861,001107: 24,3624 02415 ZSM
017862,001108: 24,3625 02764 STORE GEOMTRX +12D
017863,001109: 24,3626 77776 EXIT
017864,001110: 24,3627 01546 TC QPLACE
017865,001111:
|
|
Page 414 |
017867,001113: 24,3630 14C EQUALS 0014
017868,001114: 24,3630 02130 V21N30E OCT 02130
017869,001115: 24,3631 04000 DESANGLE DEC 2048 B-14
017870,001116: 24,3632 04143 SFCONST DEC .13107
017871,001117: 24,3633 34000 SIZCHK OCT 34000
017872,001118: 24,3634 00264 180DEC DEC 180 B-14
017873,001119: 24,3635 07626 3990DEC DEC 3990 B-14
017874,001120: 24,3636 00666 VB06N66 OCT 00666
017875,001121: 24,3637 01130 TESTTIME DEC 600 B-14
017876,001122: 24,3640 01620 V16N20S OCT 01620
017877,001123: 24,3641 01640 V16N40S OCT 01640
017878,001124: 24,3642 00021 DEC17 DEC 17 B-14
017879,001125: 24,3643 06200 00000 DEC585 2DEC 3200 B+14
017880,001126:
017881,001127: 24,3645 00400 DELYOFF OCT 00400
017882,001128: 24,3646 00024 35474 ERUNITS 2DEC 342844 B-28
017883,001129:
017884,001130: 24,3650 01506 GENPLAD GENADR AZIMUTH
017885,001131: 24,3651 02521 GYRODPL ECADR GYROD
017886,001132: 24,3652 02500 OGCPL ECADR OGC
017887,001133: 24,3653 77760 LOWFOUR OCT 77760
017888,001134: 24,3654 00070 DEC56 DEC 56 B-14
017889,001135: 24,3655 10000 45DEG OCT 10000
017890,001136: 24,3656 13241 ROOT1/2 DEC .353553
017891,001137: 24,3657 10000 ROOT1SQ DEC .250000
017892,001138: 24,3660 15520 ROOT2SQ DEC .426776
017893,001139: 24,3661 02260 ROOT3SQ DEC .073223
017894,001140: 24,3662 01400 XSMADR GENADR XSM
017895,001141:
017896,001142:
017897,001143: 24,3663 00000 00000 SCNBAZ 2DEC 0 B-28
017898,001144: 24,3665 00000 00000 2DEC 0 B-28
017899,001145: 24,3667 20000 00000 LABNBAZ 2DEC .5
017900,001146: 24,3671 00000 00000 2DEC 0 B-28
017901,001147: 24,3673 00000 00000 2DEC 0 B-28
017902,001148: 24,3675 20000 00000 SCNBVER 2DEC .5
017903,001149: 24,3677 00000 00000 2DEC 0 B-28
017904,001150: 24,3701 00000 00000 LABNBVER 2DEC 0 B-28
017905,001151: 24,3703 00000 00000 2DEC 0 B-28
017906,001152: 24,3705 57777 77777 2DEC -.5
017907,001153:
|
|
Page 415 |
017909,001155: 24,3707 00144 1SECX DEC 100 B-14
017910,001156: 24,3710 17127 16705 GEORGED 2DEC .47408845
017911,001157: 24,3712 07314 36223 2DEC .23125894
017912,001158: 24,3714 04521 31140 2DEC .14561689
017913,001159: 24,3716 75755 73521 GEORGEC 2DEC -.06360691
017914,001160: 24,3720 72476 54176 2DEC -.16806746
017915,001161: 24,3722 04771 03365 2DEC .15582939
017916,001162: 24,3724 75644 70661 GEORGEB 2DEC -.06806784
017917,001163: 24,3726 47762 75077 2DEC -.75079894
017918,001164: 24,3730 70023 73740 2DEC -.24878704
End of include-file IMU_PERFORMANCE_TESTS_2.agc. Parent file is MAIN.agc