Source Code
These source code files have been transcribed or otherwise adapted from
digitized images of a hardcopy from the private collection of
Don Eyles. The digitization was performed by archive.org, and
transcription was performed by a team of volunteers.
Note that the page images
presented online are of reduced quality, and that the original
high-quality images are available at archive.org.
Report any conversion errors or legibility problems in page images to info@sandroid.org.
Notations on the program listing read, in part:473423A YUL SYSTEM FOR BLK2: REVISION 12 of PROGRAM AURORA BY DAP GROUP NOV 10, 1966Note that the date is the date of the printout, not the date of the program revision. |
019573,000002: ## Copyright: Public domain.
019574,000003: ## Filename: IMU_PERFORMANCE_TESTS_2.agc
019575,000004: ## Purpose: Part of the source code for Aurora (revision 12).
019576,000005: ## Assembler: yaYUL
019577,000006: ## Contact: Hartmuth Gutsche<hgutsche@xplornet.com>.
019578,000007: ## Website: https://www.ibiblio.org/apollo.
019579,000008: ## Pages: 475-499
019580,000009: ## Mod history: 2016-09-20 JL Created.
019581,000010: ## 2016-09-27 HG start transcription from scans
019582,000011: ## 2016-10-12 HG fix operator TEHTAD -> THETAD
019583,000012: ## TORQDNX -> TORQNDX
019584,000013: ## INODES33 -> IMODES33
019585,000014: ## YSM =4 -> YSM +4
019586,000015: ## instruction CA DRIFTT -> TS DRIFTT
019587,000016: ## constant 2DEC 32844 B-28 -> 2DEC 342844 B-28
019588,000017: ## 2016-10-16 HG fix label NBOSPL -> NBPOSPL
019589,000018: ## JUMLOAD -> JUMPLOAD
019590,000019: ## WAILP3 -> WAITLP3
019591,000020: ## fix operand CHECKCG -> CHECKG
019592,000021: ## WAITPL2 -> WAITLP2
019593,000022: ## WAITLP -> WAITLP1
019594,000023: ## 2016-10-18 HG fix operand REULTCT -> RESULTCT
019595,000024: ## 2016-12-08 RSB Proofed comments with octopus/ProoferComments
019596,000025: ## and fixed the errors found.
019597,000026:
019598,000027: ## This source code has been transcribed or otherwise adapted from
019599,000028: ## digitized images of a hardcopy from the private collection of
019600,000029: ## Don Eyles. The digitization was performed by archive.org.
019601,000030:
019602,000031: ## Notations on the hardcopy document read, in part:
019603,000032:
019604,000033: ## 473423A YUL SYSTEM FOR BLK2: REVISION 12 of PROGRAM AURORA BY DAP GROUP
019605,000034: ## NOV 10, 1966
019606,000035:
019607,000036: ## [Note that this is the date the hardcopy was made, not the
019608,000037: ## date of the program revision or the assembly.]
019609,000038:
019610,000039: ## The scan images (with suitable reduction in storage size and consequent
019611,000040: ## reduction in image quality) are available online at
019612,000041: ## https://www.ibiblio.org/apollo.
019613,000042: ## The original high-quality digital images are available at archive.org:
019614,000043: ## https://archive.org/details/aurora00dapg
019615,000044:
Page 475 |
019617,000046: 17,2000 BANK 17
019618,000047: 17,2000 E5,1400 EBANK= XSM
019619,000048:
019620,000049:
019621,000050:
019622,000051: 17,2000 37665 IMUTEST CA ZERO
019623,000052: 17,2001 55576 TS DRIFTT
019624,000053: 17,2002 55742 TS GEOCOMPS
019625,000054: 17,2003 33626 CAF 1SECX
019626,000055: 17,2004 55744 TS 1SECXT
019627,000056: 17,2005 06000 GEOIMUTT TC INTPRET # OPTIMUM COMPASS COMES IN HERE
019628,000057: 17,2006 77634 CALL
019629,000058: 17,2007 30530 LATAZCHK
019630,000059: 17,2010 77776 EXIT
019631,000060: 17,2011 37657 CA ONE
019632,000061: 17,2012 55544 TS POSITON
019633,000062:
019634,000063: 17,2013 54340 TS DSPTEM2 +2
019635,000064: 17,2014 54400 TS THETAD
019636,000065: 17,2015 54401 TS THETAD +1
019637,000066: 17,2016 54402 TS THETAD +2
019638,000067: 17,2017 04063 TC BANKCALL
019639,000068: 17,2020 26000 CADR IMUZERO
019640,000069: 17,2021 04063 TC BANKCALL
019641,000070: 17,2022 26716 CADR IMUSTALL
019642,000071: 17,2023 12243 TCF ENDTEST1
019643,000072: 17,2024 37665 IMUBACK CA ZERO
019644,000073: 17,2025 54337 TS DSPTEM2 +1
019645,000074: 17,2026 55537 TS NDXCTR
019646,000075: 17,2027 55574 TS TORQNDX
019647,000076: 17,2030 55575 TS TORQNDX +1
019648,000077: 17,2031 33660 CAF TESTTIME
019649,000078: 17,2032 54336 TS DSPTEM2
019650,000079: 17,2033 04063 TC BANKCALL # ISS RETURNS IN COARSE ALIGN MODE TO
019651,000080: 17,2034 26055 CADR IMUCOARS # ENABLE OPERATOR TO DECIDE WHAT TO DO
019652,000081: # ABOUT GIMBAL LOCK
019653,000082: 17,2035 03567 TC SHOWLD
019654,000083: 17,2036 03576 TC SHOW
019655,000084:
019656,000085:
019657,000086:
019658,000087: 17,2037 04063 TC BANKCALL
019659,000088: 17,2040 26716 CADR IMUSTALL
019660,000089: 17,2041 02243 TC ENDTEST1
019661,000090: 17,2042 03344 TC NBPOSPL
019662,000091: 17,2043 03077 TC POSGMBL
019663,000092: 17,2044 02106 TC PIPACHK # IF MGA IS 60DEG+ PROG WILL STAY IN COARS
019664,000093: # ALIGN AND MEASURE VERITCAL PIPA RATE
019665,000094: 17,2045 03124 TC FALNE
019666,000095: 17,2046 04063 TC BANKCALL
019667,000096:
Page 476 |
019669,000098: 17,2047 26716 CADR IMUSTALL
019670,000099: 17,2050 12243 TCF ENDTEST1
019671,000100: 17,2051 11742 CCS GEOCOMPS
019672,000101: 17,2052 02072 TC JUMPLOAD
019673,000102: 17,2053 06000 GUESS TC INTPRET # CALCULATE -COS LATITUDE AND SIN LATITUDE
019674,000103: 17,2054 71545 DLOAD COS # FOR ESTIMATE
019675,000104: 17,2055 01511 LATITUDE
019676,000105: 17,2056 72476 DCOMP SL1
019677,000106: 17,2057 07573 STODL WANGI
019678,000107: 17,2060 01511 LATITUDE
019679,000108: 17,2061 72556 SIN SL1
019680,000109: 17,2062 23571 STOVL WANGO # LOAD TRANSITION MATRIX INTO ERASABLE
019681,000110: 17,2063 37630 GEORGED
019682,000111: 17,2064 23721 STOVL TRANSM1
019683,000112: 17,2065 37636 GEORGEC
019684,000113: 17,2066 23727 STOVL TRANSM1 +6
019685,000114: 17,2067 37644 GEORGEB
019686,000115: 17,2070 01735 STORE TRANSM1 +12D
019687,000116: 17,2071 77776 EXIT
019688,000117: 17,2072 03612 JUMPLOAD TC LOADGTSM
019689,000118: 17,2073 04063 TC BANKCALL
019690,000119: 17,2074 42000 CADR ESTIMS
019691,000120: 17,2075 04614 TORQUE TC PHASCHNG # FILTER TORQUES PLTFM AND SETS UP ERATE
019692,000121: 17,2076 00000 OCT 00000
019693,000122: 17,2077 37665 CA ZERO
019694,000123: 17,2100 54336 TS DSPTEM2
019695,000124: 17,2101 31640 CA DRIFTI
019696,000125: 17,2102 54337 TS DSPTEM2 +1
019697,000126: 17,2103 51544 INDEX POSITON
019698,000127: 17,2104 55551 TS SOUTHDR -1
019699,000128: 17,2105 03576 TC SHOW
019700,000129:
019701,000130: 17,2106 51537 PIPACHK INDEX NDXCTR # TORQUE PLATFORM TO CORRECT LEVELING ERR
019702,000131: 17,2107 02110 TC +1 # IN PREPARATION TO MEASURING VERTICAL
019703,000132: 17,2110 04063 TC BANKCALL # PIPA OUTPUT PULSE RATE
019704,000133: 17,2111 30422 CADR EARTHR
019705,000134:
019706,000135: 17,2112 33663 CA DEC17 # ALLOW PIP COUNTER TO OVERFLOW 17 TIMES
019707,000136: 17,2113 55632 TS DATAPL +4
019708,000137: 17,2114 37646 CA BIT10 # IN THE ALLOTED TIME INTERVAL
019709,000138: 17,2115 55527 TS LENGTHOT
019710,000139: 17,2116 37657 CA ONE
019711,000140: 17,2117 55673 TS RESULTCT
019712,000141: 17,2120 37665 CA ZERO # ZERO PIPA COUNTER INITIALLY
019713,000142: 17,2121 51541 INDEX PIPINDEX
019714,000143: 17,2122 54037 TS PIPAX
019715,000144: 17,2123 55626 TS DATAPL
019716,000145: 17,2124 33675 CA DEC56 # LOOP 56 TIMES 5.12 SEC "ACH. EACH INCR.
019717,000146: 17,2125 03205 TC WAITLOOP # WILL ALSO CORRECT EARTH RATE
019718,000147: 17,2126 00004 INHINT
019719,000148:
Page 477 |
019721,000150: 17,2127 02771 TC CHECKG
019722,000151: 17,2130 00003 RELINT
019723,000152: 17,2131 03065 TC DATALD
019724,000153: 17,2132 37664 CA FIVE
019725,000154: 17,2133 55673 TS RESULTCT
019726,000155: 17,2134 51537 INDEX NDXCTR
019727,000156: 17,2135 02136 TC +1
019728,000157: 17,2136 04063 TC BANKCALL
019729,000158: 17,2137 30422 CADR EARTHR
019730,000159: 17,2140 11676 CCS COUNTPL
019731,000160: 17,2141 03227 TC WAITLP2
019732,000161: 17,2142 11627 CCS DATAPL +1
019733,000162: 17,2143 02147 TC +4
019734,000163: 17,2144 05464 TC CCSHOLE
019735,000164: 17,2145 41632 CS DATAPL +4
019736,000165: 17,2146 55632 TS DATAPL +4
019737,000166: 17,2147 00006 EXTEND
019738,000167: 17,2150 41627 DCS DATAPL
019739,000168: 17,2151 21633 DAS DATAPL +4
019740,000169:
019741,000170: 17,2152 06000 TC INTPRET
019742,000171: 17,2153 45345 DLOAD DSU
019743,000172: 17,2154 01635 DATAPL +6
019744,000173: 17,2155 01631 DATAPL +2
019745,000174: 17,2156 56325 PDDL DDV
019746,000175: 17,2157 01633 DATAPL +4
019747,000176: 17,2160 41325 PDDL DMP
019748,000177: 17,2161 37665 DEC585 # DEC585 HAS BEEN REDEFINED FOR LEM
019749,000178: 17,2162 77624 RTB
019750,000179: 17,2163 33406 SGNAGREE
019751,000180: 17,2164 00337 STORE DSPTEM2
019752,000181: 17,2165 77776 EXIT
019753,000182: 17,2166 03576 TC SHOW
019754,000183: 17,2167 33656 VERTDRFT CA 3990DEC # NUMBER OF SECONDS TO SPEND ESTIMATING
019755,000184: 17,2170 55527 TS LENGTHOT
019756,000185: 17,2171 04063 TC BANKCALL # THIS WILL CORRECT FOR EARTH RATE DURING
019757,000186: 17,2172 30422 CADR EARTHR # TIME SPENT IN SHOW ABOVE*
019758,000187: 17,2173 30032 CA CDUX # STOORE AXIS FOR LAB CALC OF DRIFT
019759,000188: 17,2174 55530 TS LOSVEC
019760,000189: 17,2175 51544 INDEX POSITON
019761,000190: 17,2176 41550 CS SOUTHDR -2
019762,000191: 17,2177 55576 TS DRIFTT
019763,000192: 17,2200 03612 TC LOADGTSM
019764,000193: 17,2201 37665 CA ZERO # ALLOW ONLY SOUTH GYRO EARTH RATE COMPENS
019765,000194: 17,2202 55400 TS XSM
019766,000195: 17,2203 55401 TS XSM +1
019767,000196: 17,2204 55404 TS XSM +4
019768,000197: 17,2205 55405 TS XSM +5
019769,000198: 17,2206 55406 TS YSM
019770,000199: 17,2207 55407 TS YSM +1
019771,000200:
Page 478 |
019773,000202: 17,2210 55412 TS YSM +4
019774,000203: 17,2211 55413 TS YSM +5
019775,000204: 17,2212 55414 TS ZSM
019776,000205: 17,2213 55415 TS ZSM +1
019777,000206: 17,2214 55420 TS ZSM +4
019778,000207: 17,2215 55421 TS ZSM +5
019779,000208: 17,2216 37637 GUESS1 CAF POSMAX
019780,000209: 17,2217 55574 TS TORQNDX
019781,000210: 17,2220 55575 TS TORQNDX +1
019782,000211: 17,2221 04063 TC BANKCALL
019783,000212: 17,2222 42000 CADR ESTIMS
019784,000213: 17,2223 04614 VALMIS TC PHASCHNG
019785,000214: 17,2224 00000 OCT 00000
019786,000215: 17,2225 31636 CA DRIFTO
019787,000216: 17,2226 54337 TS DSPTEM2 +1
019788,000217: 17,2227 30032 CA CDUX # STORE OG ANGLE FOR LAB CALC OF DRIFT**
019789,000218: 17,2230 55531 TS LOSVEC +1
019790,000219: 17,2231 37665 CA ZERO
019791,000220: 17,2232 54336 TS DSPTEM2
019792,000221: 17,2233 03576 TC SHOW
019793,000222:
019794,000223:
019795,000224:
019796,000225: 17,2234 37657 FINISH CA ONE
019797,000226: 17,2235 61544 AD POSITON
019798,000227: 17,2236 54340 TS DSPTEM2 +2
019799,000228: 17,2237 37656 CA TWO
019800,000229: 17,2240 55546 TS QPLACE
019801,000230: 17,2241 04063 TC BANKCALL
019802,000231: 17,2242 22343 CADR TSELECT -6
019803,000232: 17,2243 04063 ENDTEST1 TC BANKCALL
019804,000233: 17,2244 30745 CADR ENDTEST
019805,000234:
Page 479 |
019807,000236: 17,2245 33666 OPCHK CAF DELYOFF # AUTOMATIC TEST FOR SYSTEM OPERATION
019808,000237: 17,2246 00006 EXTEND
019809,000238: 17,2247 02030 RAND 30 # CHECK TO SEE IF IMU IS ON
019810,000239: 17,2250 10000 CCS A
019811,000240: 17,2251 02440 TC ALARMS
019812,000241: 17,2252 33661 CAF V16N20S
019813,000242: 17,2253 05332 TC NVSBWAIT
019814,000243:
019815,000244: 17,2254 05401 TC FREEDSP
019816,000245: 17,2255 04063 TC BANKCALL
019817,000246: 17,2256 26000 CADR IMUZERO
019818,000247: 17,2257 04063 TC BANKCALL
019819,000248: 17,2260 26716 CADR IMUSTALL
019820,000249:
019821,000250: 17,2261 12243 TCF ENDTEST1
019822,000251: 17,2262 37650 CA BIT8 # ZERO ALL ERASEABLE USED IN TEST
019823,000252: 17,2263 55776 TS ZERONDX
019824,000253: 17,2264 33671 CA GENPLAD
019825,000254: 17,2265 03236 TC ZEROING
019826,000255: 17,2266 03344 TC NBPOSPL # ALIGN ANGLE COMPUTATION
019827,000256:
019828,000257: 17,2267 03077 TC POSGMBL # COARSE ALIGN THOSE GIMBALS NOW
019829,000258:
019830,000259: 17,2270 12245 TCF OPCHK
019831,000260: 17,2271 03124 TC FALNE # FINE ALIGN PLATFORM BY TORQUING GYROS
019832,000261:
019833,000262: 17,2272 04063 TC BANKCALL
019834,000263: 17,2273 26716 CADR IMUSTALL
019835,000264: 17,2274 12243 TCF ENDTEST1
019836,000265: 17,2275 37656 CA TWO
019837,000266: 17,2276 55672 CDUCHECK TS CDUNDX # THIS LOOP CHECKS FOR NO ERROR BETWEEN
019838,000267: 17,2277 51672 INDEX CDUNDX # DESIRED CDU ANGLES AND THE ACTUAL ANGLES
019839,000268: 17,2300 40400 CS THETAD
019840,000269: 17,2301 51672 INDEX CDUNDX
019841,000270: 17,2302 60032 AD CDUX
019842,000271: 17,2303 55551 TS STOREPL
019843,000272: 17,2304 11551 CCS STOREPL
019844,000273: 17,2305 02313 TC ERRMASK
019845,000274: 17,2306 02310 TC NOERR
019846,000275: 17,2307 02313 TC ERRMASK
019847,000276: 17,2310 11672 NOERR CCS CDUNDX
019848,000277: 17,2311 02276 TC CDUCHECK
019849,000278: 17,2312 02317 TC LOADIC
019850,000279: 17,2313 73674 ERRMASK MASK LOWFOUR # ALLOW FIVE BIT ERRORS
019851,000280: 17,2314 10000 CCS A
019852,000281: 17,2315 02440 TC ALARMS
019853,000282: 17,2316 02310 TC NOERR
019854,000283: 17,2317 37657 LOADIC CA ONE
019855,000284: 17,2320 55673 TS RESULTCT
019856,000285: 17,2321 47657 CS ONE
019857,000286:
Page 480 |
019859,000288: 17,2322 55670 TS MASKREG # SETS UP AZIMUTH AND VERTICAL VECTORS FOR
019860,000289:
019861,000290: 17,2323 37665 CA ZERO
019862,000291: 17,2324 54037 TS PIPAX
019863,000292: 17,2325 54040 TS PIPAY
019864,000293: 17,2326 54041 TS PIPAZ
019865,000294:
019866,000295: 17,2327 37645 CA BIT11
019867,000296: 17,2330 55527 TS LENGTHOT # VECTOR IN PIPA COUNTERS
019868,000297: 17,2331 37657 CA ONE
019869,000298: 17,2332 03205 TC WAITLOOP
019870,000299: 17,2333 11676 CCS COUNTPL
019871,000300: 17,2334 03227 TC WAITLP2
019872,000301: 17,2335 33675 CA DEC56
019873,000302: 17,2336 03205 TC WAITLOOP
019874,000303: 17,2337 37656 OPCHK1 CA TWO
019875,000304: 17,2340 55541 OPCHK2 TS PIPINDEX
019876,000305: 17,2341 00004 INHINT
019877,000306: 17,2342 02771 TC CHECKG
019878,000307: 17,2343 00003 RELINT
019879,000308: 17,2344 37665 CA ZERO
019880,000309: 17,2345 51541 INDEX PIPINDEX
019881,000310: 17,2346 54037 TS PIPAX
019882,000311: 17,2347 03065 TC DATALD # LOAD PIPA DATA AND TIME IN DATAPL
019883,000312: 17,2350 57673 XCH RESULTCT
019884,000313: 17,2351 67655 AD FOUR
019885,000314: 17,2352 55673 TS RESULTCT
019886,000315: 17,2353 11541 CCS PIPINDEX
019887,000316: 17,2354 02340 TC OPCHK2
019888,000317: 17,2355 47655 READOUT CS FOUR
019889,000318: 17,2356 61673 AD RESULTCT
019890,000319: 17,2357 55673 TS RESULTCT
019891,000320: 17,2360 22007 ZL
019892,000321: 17,2361 51673 INDEX RESULTCT
019893,000322: 17,2362 31626 CA DATAPL
019894,000323: 17,2363 22000 LXCH A
019895,000324: 17,2364 51673 INDEX RESULTCT
019896,000325: 17,2365 21572 DAS GENPL +1
019897,000326: 17,2366 31673 CA RESULTCT
019898,000327: 17,2367 71670 MASK MASKREG
019899,000328: 17,2370 10000 CCS A
019900,000329: 17,2371 02355 TC READOUT
019901,000330: 17,2372 37661 CA TEN
019902,000331: 17,2373 66165 AD THREE
019903,000332: 17,2374 55673 TS RESULTCT
019904,000333: 17,2375 40000 CS A
019905,000334: 17,2376 55670 TS MASKREG
019906,000335: 17,2377 11676 CCS COUNTPL
019907,000336: 17,2400 03227 TC WAITLP2
019908,000337: 17,2401 03250 TC COMPUT
019909,000338:
Page 481 |
019911,000340: 17,2402 33662 RADCK CA V16N40S
019912,000341: 17,2403 05332 TC NVSBWAIT # OPERATOR WILL CHECK RADAR STATUS.IN LAB.
019913,000342: 17,2404 05274 TC FLASHON # SET RADAR OFF THEN PUT RESOLVER STANDARD
019914,000343: 17,2405 05140 TC ENDIDLE # ON TRUNNION AND SET TO +45 DEG.SHAFT WIL
019915,000344: 17,2406 02243 TC ENDTEST1
019916,000345: 17,2407 02410 TC +1 # AFTER SETTING RES STANDARD DO A V33
019917,000346: 17,2410 37665 CA ZERO
019918,000347: 17,2411 54424 TS TANG +1
019919,000348: 17,2412 33676 CA 45DEG
019920,000349: 17,2413 54423 TS TANG
019921,000350: 17,2414 04063 DRIVRAD TC BANKCALL # IN SC WHEN RAD PRESENT DO V33 RIGHT AWAY
019922,000351: 17,2415 20247 CADR RRZERO # LGC WILL ATTEMPT TO DRIVE 45 DEG TRUNN.
019923,000352: 17,2416 04063 TC BANKCALL # TO MATCH STANDARD, AFTER ZEROING CDUS
019924,000353: 17,2417 26712 CADR RADSTALL
019925,000354: 17,2420 02243 TC ENDTEST1
019926,000355: 17,2421 06000 TC INTPRET
019927,000356: 17,2422 77634 CALL
019928,000357: 17,2423 20363 RRDESNB
019929,000358: 17,2424 04063 TC BANKCALL
019930,000359: 17,2425 26712 CADR RADSTALL # IF CDU FAILS TO AGREE WITH COMMAND TO
019931,000360: 17,2426 02440 TC ALARMS # 1 DEG GET ALARM HERE
019932,000361:
019933,000362: 17,2427 05274 TC FLASHON # OPERATOR WILL CHECK STATUS OF RADAR
019934,000363: 17,2430 05140 TC ENDIDLE # IN S/C DO V33 TO CONTINUE WITH SHAFT
019935,000364: 17,2431 02243 TC ENDTEST1 # TEST
019936,000365: 17,2432 02433 TC +1 # IN LAB TURN RADAR OFF CHANGE RES STANDAR
019937,000366: 17,2433 37665 CA ZERO # TO SHAFT AND SET FOR -45DEG.
019938,000367: 17,2434 54423 TS TANG # THEN DO A V33 IF WANT TO REPEAT CHECK
019939,000368: 17,2435 43676 CS 45DEG # DO A V34 TO TERMINATE
019940,000369: 17,2436 54424 TS TANG +1
019941,000370: 17,2437 02414 TC DRIVRAD
019942,000371: 17,2440 56002 ALARMS XCH Q
019943,000372: 17,2441 55546 TS QPLACE
019944,000373: 17,2442 05413 TC ALARM
019945,000374: 17,2443 01411 OCT 1411
019946,000375: 17,2444 01546 TC QPLACE
019947,000376:
Page 482 |
019949,000378: 17,2445 06000 GYRSFTST TC INTPRET # START ADRESS FOR IRIG SF TEST
019950,000379: 17,2446 77634 CALL
019951,000380: 17,2447 30530 LATAZCHK # LOAD AZ AND LAT
019952,000381: 17,2450 77776 EXIT
019953,000382: 17,2451 33651 TESTCALL CAF V21N30E
019954,000383: 17,2452 05332 TC NVSBWAIT # LOAD + OR - 1 FOR + OR - X TEST (+00001)
019955,000384: 17,2453 05140 TC ENDIDLE # LOAD + OR - 2 FOR + OR - Y TEST
019956,000385: 17,2454 12243 TCF ENDTEST1 # LOAD + OR - 3 FOR + OR - Z TEST
019957,000386: 17,2455 02451 TC TESTCALL
019958,000387: 17,2456 56333 XCH DSPTEM1
019959,000388: 17,2457 55614 TS CALCDIR
019960,000389: 17,2460 00006 EXTEND # THIS ROUTINE LOOKS AT THE SIZE OF THE
019961,000390: 17,2461 62466 BZMF NEGSIZ # ENTRY MADE BY THE OPERATOR, IF HE DID NO
019962,000391: 17,2462 77671 SIZLOOK MASK NEG3 # T ENTER TEST NO THAT IS W/I PERMISSIBLE
019963,000392: 17,2463 00006 EXTEND # RANGE- HE WILL BE ASKED TO LOAD AGAIN.
019964,000393: 17,2464 12470 BZF GUDENTRY # THIS IS CONSIDERED NECESSARY BECAUSE
019965,000394: 17,2465 02451 TC TESTCALL # OF FOLLOWING INDEXED TC WHICH COULD
019966,000395:
019967,000396: 17,2466 40000 NEGSIZ COM # SEND THE COMPUTER OFF INTO THE BOONDOCKS
019968,000397: 17,2467 02462 TC SIZLOOK # TO PLAY WITH ITSELF IF THE OPERATOR
019969,000398: 17,2470 31614 GUDENTRY CA CALCDIR # MAKES ABAD ENTRY******
019970,000399: 17,2471 67655 AD FOUR
019971,000400: 17,2472 50000 INDEX A
019972,000401: 17,2473 02474 TC +1
019973,000402: 17,2474 02451 TC TESTCALL
019974,000403: 17,2475 02503 TC +6 # C(A)=+00001 FOR -Z
019975,000404: 17,2476 02502 TC +4 # C(A)=+00002 FOR -Y
019976,000405: 17,2477 02501 TC +2 # C(A)=+00003 FOR -X
019977,000406: 17,2500 02474 TC -4 # C(A)=+00004 ERROR
019978,000407: 17,2501 02504 TC +3 # C(A)=+00005 FOR +X
019979,000408: 17,2502 02510 TC +6
019980,000409: 17,2503 02513 TC +10
019981,000410: 17,2504 37655 CAF FOUR
019982,000411: 17,2505 55544 TS POSITON # 4 IS FOR A.L. POSN 4 USED FOR X SF TEST
019983,000412: 17,2506 02515 TC +7
019984,000413: 17,2507 02515 TC +6
019985,000414: 17,2510 37656 CAF TWO
019986,000415: 17,2511 55544 TS POSITON # +2 IS A.L. POS 2 USED FOR Y SF TEST
019987,000416: 17,2512 02515 TC +3
019988,000417: 17,2513 37657 CAF ONE
019989,000418: 17,2514 55544 TS POSITON # +1 IS A.L. POS 1 USED FOR Z SF TEST
019990,000419: 17,2515 55617 TS OPTNREG # C(K) = (4,2,1) FOR X,Y,Z
019991,000420: 17,2516 55621 TS SAVE +1
019992,000421: 17,2517 05401 TC FREEDSP
019993,000422: 17,2520 37665 CAF ZERO
019994,000423: 17,2521 55536 TS NBPOS # SET UP NB COORD TO Z NORTH, X UP
019995,000424: 17,2522 55622 TS SAVE +2 # INITIALIZE FOR EARTHR DESIGNATE USAGE
019996,000425: 17,2523 55563 TS TESTNO # INITIALIZE FOR TEST ABORT ROUTINE
019997,000426: 17,2524 55615 TS CDUFLAG # ZEROS FOR STRTWACH USE
019998,000427: 17,2525 33653 CAF SFCONST
019999,000428:
Page 483 |
020001,000430: 17,2526 55623 TS SFCONST1 # FOR DIVISION DURING CALCFSE
020002,000431:
020003,000432: 17,2527 04063 TC BANKCALL
020004,000433: 17,2530 26000 CADR IMUZERO
020005,000434: 17,2531 04063 TC BANKCALL
020006,000435: 17,2532 26716 CADR IMUSTALL
020007,000436: 17,2533 12243 TCF ENDTEST1
020008,000437: 17,2534 03344 TC NBPOSPL
020009,000438: 17,2535 03077 TC POSGMBL
020010,000439: 17,2536 12243 TCF ENDTEST1
020011,000440: 17,2537 03124 TC FALNE
020012,000441: 17,2540 04063 TC BANKCALL
020013,000442: 17,2541 31703 CADR REDYTORK
020014,000443: 17,2542 55552 WAITFIVE TS SOUTHDR
020015,000444: 17,2543 37652 CAF BIT6 # THIS SECTION CALLS FOR 2-32 MSEC WAITS
020016,000445: 17,2544 02557 TC DIRECTN -5
020017,000446: 17,2545 37652 ENABLE CAF BIT6
020018,000447: 17,2546 00006 EXTEND # ENABLE GYRO TORQUING LOOP BY TURNING
020019,000448: 17,2547 05014 WOR 14C # ON CAL MODULE RELAY
020020,000449:
020021,000450: 17,2550 00004 INHINT
020022,000451: 17,2551 47656 CS TWO # SETS UP EXEC SWITCH SO IMUPULSE WILL
020023,000452: 17,2552 70370 MASK IMODES33 # NOT TURN OFF GYRO TORQ ENABLE RELAY
020024,000453: 17,2553 67656 AD TWO
020025,000454: 17,2554 54370 TS IMODES33
020026,000455: 17,2555 37656 CAF TWO
020027,000456: 17,2556 55552 TS SOUTHDR
020028,000457: 17,2557 55527 TS LENGTHOT # 20 MSEC DELAY FOR GYRO LOOP STABILIZAT.
020029,000458: 17,2560 37657 CA ONE
020030,000459: 17,2561 03205 TC WAITLOOP
020031,000460: 17,2562 11676 CCS COUNTPL
020032,000461: 17,2563 03227 TC WAITLP2
020033,000462: 17,2564 04063 DIRECTN TC BANKCALL # TORQUING ROUTINE IN IMU PERFORMANCE
020034,000463: 17,2565 34520 CADR SILVER # BANK 3
020035,000464: 17,2566 11552 CCS SOUTHDR # A ONE FIRST TIME THROUGH, THEN ZERO
020036,000465: 17,2567 02542 TC WAITFIVE
020037,000466:
020038,000467: 17,2570 11615 STRTWACH CCS CDUFLAG # RETURNS HERE VIA QPLACE FROM SILVER
020039,000468: 17,2571 02652 TC CDUZOTST # BEEN CAUGHT AND CDU THROUGH ZERO IS
020040,000469: 17,2572 11621 CCS SAVE +1
020041,000470: 17,2573 02612 TC LOOKCDUP -4
020042,000471: 17,2574 02616 TC LOOKCDUP
020043,000472: 17,2575 37665 CORRECT CAF ZERO
020044,000473: 17,2576 54357 TS LGYRO # RELEASES GYROS FOR IMUPULSE USAGE
020045,000474: 17,2577 04063 TC BANKCALL # EARTHRATE CORRECTION TO GYROS NOT EAST
020046,000475: 17,2600 30422 CADR EARTHR # OR WEST
020047,000476: 17,2601 37657 CAF ONE
020048,000477: 17,2602 54357 TS LGYRO # RESERVES GYROS FOR S.F. TEST TORQUING
020049,000478: 17,2603 55622 TS SAVE +2 # INITIALIZES TO INSURE 5.6 DEG OF TORQ)
020050,000479: 17,2604 27563 ADS TESTNO # INCR THE BURST COUNTER, WHICH IS USED TO
020051,000480:
Page 484 |
020053,000482: 17,2605 41563 CS TESTNO # COUNT THE NO. OF ITMES THE GYRO COUNTER
020054,000483: 17,2606 77664 MASK FIVE # IS LOADED, IF A TENTH LOAD IS REQUESTED
020055,000484: 17,2607 00006 EXTEND # THE SFE IS TOO LARGE TO BE MEANINGFULL
020056,000485: 17,2610 12760 BZF STOPTEST # OR THE CDU,S ARE NOT WORKING.
020057,000486: 17,2611 02564 TC DIRECTN
020058,000487:
020059,000488: 17,2612 37665 CAF ZERO # ZEROS CDU REG WHICH WILL BE USED TO
020060,000489: 17,2613 55621 TS SAVE +1
020061,000490: 17,2614 51672 INDEX CDUNDX # MEASURE ANGLE.
020062,000491: 17,2615 54032 TS CDUX
020063,000492: 17,2616 00004 LOOKCDUP INHINT
020064,000493: 17,2617 37653 CAF BIT5
020065,000494: 17,2620 55624 STILLOOK TS TIMER
020066,000495: 17,2621 51672 INDEX CDUNDX # LOOKS FOR FIRST CDU PULSE AFTER TORQUING
020067,000496: 17,2622 10032 CCS CDUX # STARTS
020068,000497: 17,2623 02635 TC OUTPLUS # HERE IS PLUS PULSE
020069,000498: 17,2624 02627 TC TIMEWACH
020070,000499: 17,2625 02440 TC ALARMS # TTELL OPERATOR FIRST CDU PULSE WAS MISSD
020071,000500: 17,2626 02646 TC OUTNEG # HERE IS MINUS PULSE
020072,000501: 17,2627 11624 TIMEWACH CCS TIMER # WATCHES TIME IN INHINT SO COPS WILL NOT
020073,000502: 17,2630 02620 TC STILLOOK # CATCH US
020074,000503: 17,2631 00003 RELINT
020075,000504:
020076,000505: 17,2632 10067 CCS NEWJOB
020077,000506: 17,2633 04404 TC CHANG1
020078,000507: 17,2634 02616 TC LOOKCDUP # KEEP WATCHING IF THE PULSE IS NOT HERE
020079,000508:
020080,000509: 17,2635 43652 OUTPLUS CS DESANGLE # -2047 CDU PULSES ADDED TO CDU REG SO
020081,000510: 17,2636 51672 INDEX CDUNDX # ZERO CROSSOVER CAN BE DETECTED
020082,000511: 17,2637 54032 TS CDUX
020083,000512: 17,2640 37657 LOADFLAG CAF ONE
020084,000513: 17,2641 55615 TS CDUFLAG
020085,000514: 17,2642 30047 CA GYROCTR # GYRO TORQ CMDS LEFT OUT OF FIRST 5.625
020086,000515: 17,2643 55620 TS SAVE # DEG COMMANDED WHEN CDU PULSE ARRIVED
020087,000516: 17,2644 00003 RELINT
020088,000517: 17,2645 02652 TC CDUZOTST
020089,000518:
020090,000519: 17,2646 33652 OUTNEG CA DESANGLE
020091,000520: 17,2647 51672 INDEX CDUNDX
020092,000521: 17,2650 54032 TS CDUX
020093,000522: 17,2651 02640 TC LOADFLAG
020094,000523:
020095,000524: 17,2652 51672 CDUZOTST INDEX CDUNDX
020096,000525: 17,2653 10032 CCS CDUX
020097,000526: 17,2654 02660 TC +4
020098,000527: 17,2655 02675 TC ENDWATCH
020099,000528: 17,2656 02660 TC +2
020100,000529: 17,2657 02675 TC ENDWATCH
020101,000530: 17,2660 37646 CAF BIT10 # RAND WITH BIT 10 TO SEE IF STILL TORQ.
020102,000531: 17,2661 00006 EXTEND
020103,000532:
Page 485 |
020105,000534: 17,2662 02014 RAND 14C
020106,000535: 17,2663 10000 CCS A
020107,000536: 17,2664 02672 TC +6
020108,000537:
020109,000538: 17,2665 11622 CCS SAVE +2 # SEE IF 2.8DEG OR 5.6 DEG SINCE LAST
020110,000539: 17,2666 02670 TC +2 # EEARTHR USE, IF 2.8 DEG, DO 2.8 MORE
020111,000540: 17,2667 02575 TC CORRECT # THEN GO TO CORRECT
020112,000541: 17,2670 55622 TS SAVE +2
020113,000542: 17,2671 02564 TC DIRECTN
020114,000543: 17,2672 10067 CCS NEWJOB
020115,000544: 17,2673 04404 TC CHANG1
020116,000545: 17,2674 02652 TC CDUZOTST
020117,000546:
020118,000547: 17,2675 00004 ENDWATCH INHINT # WWILL STOR GYROCTR AT END OF 2048 CDU
020119,000548: 17,2676 37665 CAF ZERO # PULSES AND STOP TORQ BY ZEROING REQUESTS
020120,000549: 17,2677 54357 TS LGYRO # RELEASE GYROS FOR OTHERS USAGE
020121,000550: 17,2700 56047 XCH GYROCTR
020122,000551: 17,2701 55621 TS SAVE +1 # AND STOPS TORQUING BY ZEROING TORQ
020123,000552: 17,2702 47656 CS TWO
020124,000553: 17,2703 70370 MASK IMODES33 # THIS TURNS OFF EXEC SWITCH SO THE GYRO
020125,000554: 17,2704 54370 TS IMODES33 # TORQ. ENABLE RELAY CAN BE TURNED OFF.
020126,000555: 17,2705 00003 RELINT
020127,000556: 17,2706 31620 CALCSFE CA SAVE # GYROCTR AT TEST START
020128,000557: 17,2707 00006 EXTEND
020129,000558: 17,2710 61621 SU SAVE +1 # GYROCTR AT TEST END
020130,000559: 17,2711 55622 TS SAVE +2
020131,000560: 17,2712 00006 EXTEND
020132,000561: 17,2713 62732 BZMF ARITH # SEE IF IT IS NEG OR ZERO,IF NEG,SFE IS +
020133,000562: 17,2714 73654 MASK SIZCHK
020134,000563: 17,2715 00006 EXTEND # THIS ROUTINE TESTS SAVE-(SAVE+1) TO SEE
020135,000564: 17,2716 12724 BZF NEGSFE # IF THE RESULT IS WITHIN PERMISSIBLE SIZE
020136,000565: 17,2717 41622 CS SAVE +2 # AND DETERMINES POLARITY OF SFE USING THE
020137,000566: 17,2720 73654 MASK SIZCHK # PRESENCE OR ABSENCE OF BITS 12,13,14.
020138,000567: 17,2721 00006 EXTEND # IF BITS ARE PRESENT IN POSITIVE SAVE +2
020139,000568: 17,2722 12726 BZF POSSFE # THEN THE SFE MUST BE POS. IF DIFFERENCE
020140,000569: 17,2723 02760 TC STOPTEST # IS GREATER THAN 2047 PULSES FROM THE
020141,000570: 17,2724 31622 NEGSFE CAE SAVE +2 # IDEAL NO OF PULSES, THE SFE EXCEEDS
020142,000571: 17,2725 02732 TC ARITH # 15600 PPM, THE TEST IS NOT VALID AND
020143,000572:
020144,000573: # THEREFORE ABORTS AND TURNS ON PROGRAM ALARM
020145,000574: 17,2726 37637 POSSFE CAF POSMAX # POS SFE DEFINITION = IRIG SF IN SEC OF
020146,000575: 17,2727 00006 EXTEND # ARC PER PULSE IS GREATER THAN
020147,000576: 17,2730 61622 SU SAVE +2 # .61798095703125 SEC OF ARC/ PULSE
020148,000577: 17,2731 02733 TC ARITH +1
020149,000578:
020150,000579: 17,2732 40000 ARITH COM
020151,000580: 17,2733 22007 ZL
020152,000581: 17,2734 00006 EXTEND
020153,000582: 17,2735 11623 DV SFCONST1
020154,000583: 17,2736 54336 LOADIT TS DSPTEM2
020155,000584:
Page 486 |
020157,000586: 17,2737 02740 TC DATADSP
020158,000587:
020159,000588: 17,2740 05304 DATADSP TC GRABDSP
020160,000589: 17,2741 05312 TC PREGBSY
020161,000590: 17,2742 31614 CA CALCDIR
020162,000591: 17,2743 54340 TS DSPTEM2 +2 # DISPLAYS TEST NO JUST PERFORMED
020163,000592: 17,2744 33657 CAF VB06N66 # R3 = TEST NO JUST PERFORMED
020164,000593: 17,2745 05332 TC NVSBWAIT
020165,000594: 17,2746 05274 TC FLASHON
020166,000595: 17,2747 05140 TC ENDIDLE # TO END TEST DO V34E
020167,000596: 17,2750 02752 TC +2
020168,000597: 17,2751 02451 TC TESTCALL # TO CONTINUE TEST DO V33E
020169,000598: 17,2752 04063 TC BANKCALL
020170,000599: 17,2753 26000 CADR IMUZERO
020171,000600: 17,2754 04063 TC BANKCALL
020172,000601: 17,2755 26716 CADR IMUSTALL
020173,000602: 17,2756 12243 TCF ENDTEST1
020174,000603: 17,2757 12243 TCF ENDTEST1
020175,000604:
020176,000605: 17,2760 04063 STOPTEST TC BANKCALL
020177,000606: 17,2761 26000 CADR IMUZERO
020178,000607: 17,2762 04063 TC BANKCALL # CORRECT CDUCTRS AND TURN ON PROG ALARM
020179,000608: 17,2763 26716 CADR IMUSTALL # TO TELL OPERATOR LAST CDU PULSE WAS
020180,000609: 17,2764 12243 TCF ENDTEST1 # MISSED OR GYRO TORQ LOOP WAY OUT OF
020181,000610: 17,2765 37665 CAF ZERO # ALLOWABLE LIMITS.........
020182,000611: 17,2766 54357 TS LGYRO # **** RELEASE GYROS FOR OTHERS USAGE*****
020183,000612: 17,2767 02440 TC ALARMS
020184,000613: 17,2770 12243 TCF ENDTEST1
020185,000614:
Page 487 |
020187,000616: 17,2771 00006 CHECKG EXTEND # PIP PULSE CATCHING ROUTINE
020188,000617: 17,2772 23546 QXCH QPLACE # RECORDS TIME AT OCCURRENCE OF A DELTA V
020189,000618: 17,2773 00003 CHECKG1 RELINT # KEEPS CONTENT OF PIPA REG INTACT
020190,000619: 17,2774 10067 CCS NEWJOB
020191,000620: 17,2775 04404 TC CHANG1
020192,000621: 17,2776 00004 INHINT
020193,000622: 17,2777 37665 CAF ZERO
020194,000623: 17,3000 51541 INDEX PIPINDEX
020195,000624: 17,3001 56037 XCH PIPAX
020196,000625: 17,3002 55551 TS STOREPL
020197,000626: 17,3003 11551 CCS STOREPL
020198,000627: 17,3004 03010 TC CHECKP
020199,000628: 17,3005 03063 TC RESTOREA
020200,000629: 17,3006 03023 TC CHECKM
020201,000630: 17,3007 03063 TC RESTOREA
020202,000631: 17,3010 37652 CHECKP CAF BIT6 # LOOKS FOR ONE MORE PLUS PULSE
020203,000632: 17,3011 55540 TS PIPANO
020204,000633: 17,3012 51541 INDEX PIPINDEX
020205,000634: 17,3013 10037 CCS PIPAX
020206,000635: 17,3014 03036 TC CHECKG3
020207,000636: 17,3015 03020 TC +3
020208,000637: 17,3016 03063 TC RESTOREA
020209,000638: 17,3017 03020 TC +1
020210,000639: 17,3020 11540 CCS PIPANO
020211,000640: 17,3021 03011 TC CHECKP +1
020212,000641: 17,3022 03063 TC RESTOREA
020213,000642: 17,3023 37652 CHECKM CAF BIT6 # LOOKS FOR ONE MORE MINUS PULSE
020214,000643: 17,3024 55540 TS PIPANO
020215,000644: 17,3025 51541 INDEX PIPINDEX
020216,000645: 17,3026 10037 CCS PIPAX
020217,000646: 17,3027 03063 TC RESTOREA
020218,000647: 17,3030 03033 TC +3
020219,000648: 17,3031 03036 TC CHECKG3
020220,000649: 17,3032 03033 TC +1
020221,000650: 17,3033 11540 CCS PIPANO
020222,000651: 17,3034 03024 TC CHECKM +1
020223,000652: 17,3035 03063 TC RESTOREA
020224,000653: 17,3036 05470 CHECKG3 TC FINETIME # TIME IN DOUBLE PRECISION LEFT IN MPAC
020225,000654:
020226,000655: 17,3037 52141 DXCH MPAC
020227,000656: 17,3040 37654 CAF BIT4
020228,000657: 17,3041 55540 CHECKG5 TS PIPANO
020229,000658: 17,3042 51541 INDEX PIPINDEX
020230,000659: 17,3043 10037 CCS PIPAX
020231,000660: 17,3044 03050 TC +4
020232,000661: 17,3045 03063 TC RESTOREA
020233,000662: 17,3046 03050 TC +2
020234,000663: 17,3047 03063 TC RESTOREA
020235,000664: 17,3050 11540 CCS PIPANO
020236,000665: 17,3051 03041 TC CHECKG5
020237,000666:
Page 488 |
020239,000668: 17,3052 03055 NREAD TC RESTORE
020240,000669: 17,3053 55551 TS STOREPL
020241,000670: 17,3054 01546 TC QPLACE
020242,000671: 17,3055 57551 RESTORE XCH STOREPL # A WILL CONTAIN PREVIOUS PIPA CNTR CONTEN
020243,000672: 17,3056 51541 INDEX PIPINDEX # STOREPL WILL CONTAIN ZERO
020244,000673: 17,3057 60037 AD PIPAX
020245,000674: 17,3060 51541 INDEX PIPINDEX
020246,000675: 17,3061 54037 TS PIPAX
020247,000676: 17,3062 00002 TC Q
020248,000677:
Page 489 |
020250,000679: 17,3063 03055 RESTOREA TC RESTORE
020251,000680: 17,3064 02773 TC CHECKG1
020252,000681: 17,3065 31551 DATALD CA STOREPL
020253,000682: 17,3066 51673 INDEX RESULTCT
020254,000683: 17,3067 55626 TS DATAPL
020255,000684: 17,3070 30140 CA MPAC
020256,000685: 17,3071 51673 INDEX RESULTCT
020257,000686: 17,3072 55627 TS DATAPL +1
020258,000687: 17,3073 30141 CA MPAC +1
020259,000688: 17,3074 51673 INDEX RESULTCT
020260,000689: 17,3075 55630 TS DATAPL +2
020261,000690: 17,3076 00002 TC Q
020262,000691:
020263,000692:
020264,000693:
020265,000694:
020266,000695:
020267,000696: 17,3077 00006 POSGMBL EXTEND # COARSE ALIGNING SUBROUTINE
020268,000697: 17,3100 23546 QXCH QPLACE
020269,000698:
020270,000699: 17,3101 06000 TC INTPRET
020271,000700: 17,3102 77634 CALL
020272,000701: 17,3103 32615 CALCGA
020273,000702: 17,3104 77776 EXIT
020274,000703:
020275,000704: 17,3105 04063 TC BANKCALL
020276,000705: 17,3106 26055 CADR IMUCOARS
020277,000706: 17,3107 33123 CA GMLOCKCK # IF FAILREG CONTAINS 401 WILL RETURN TO
020278,000707: 17,3110 71363 MASK FAILREG
020279,000708: 17,3111 10000 CCS A # L +1, OTHERWISE TO L +2.
020280,000709: 17,3112 03115 TC LOCK
020281,000710: 17,3113 25546 INCR QPLACE
020282,000711: 17,3114 03117 TC +3
020283,000712: 17,3115 37656 LOCK CA TWO
020284,000713: 17,3116 55537 TS NDXCTR
020285,000714: 17,3117 04063 TC BANKCALL
020286,000715: 17,3120 26716 CADR IMUSTALL
020287,000716: 17,3121 12243 TCF ENDTEST1
020288,000717: 17,3122 01546 TC QPLACE
020289,000718: 17,3123 00401 GMLOCKCK OCT 00401
020290,000719:
Page 490 |
020292,000721: 17,3124 00006 FALNE EXTEND # TORQUES GYROS TO NULL OVT DIFFERENCE
020293,000722: 17,3125 23546 QXCH QPLACE # BETWEEN DESIRED SM ORIENTATION WITH RESP
020294,000723: 17,3126 04063 TC BANKCALL # TO NBASE AND ACTUAL
020295,000724: 17,3127 26000 CADR IMUZERO
020296,000725: 17,3130 04063 TC BANKCALL
020297,000726: 17,3131 26716 CADR IMUSTALL
020298,000727: 17,3132 12243 TCF ENDTEST1
020299,000728: 17,3133 04063 TC BANKCALL
020300,000729: 17,3134 26227 CADR IMUFINE
020301,000730: 17,3135 04063 TC BANKCALL
020302,000731: 17,3136 26716 CADR IMUSTALL
020303,000732: 17,3137 12243 TCF ENDTEST1
020304,000733: 17,3140 30032 FALNE1 CA CDUX
020305,000734: 17,3141 50104 INDEX FIXLOC
020306,000735: 17,3142 54024 TS 24
020307,000736: 17,3143 30033 CA CDUY
020308,000737: 17,3144 50104 INDEX FIXLOC
020309,000738: 17,3145 54020 TS 20
020310,000739: 17,3146 30034 CA CDUZ
020311,000740: 17,3147 50104 INDEX FIXLOC
020312,000741: 17,3150 54022 TS 22
020313,000742: 17,3151 37653 CA BIT5
020314,000743: 17,3152 60104 AD FIXLOC
020315,000744: 17,3153 50104 INDEX FIXLOC
020316,000745: 17,3154 54050 TS S1
020317,000746: 17,3155 06000 TC INTPRET
020318,000747: 17,3156 64375 VLOAD MXV
020319,000748: 17,3157 01401 XSM
020320,000749: 17,3160 01445 STARAD
020321,000750: 17,3161 77772 VSL1
020322,000751: 17,3162 36041 STCALL 32D
020323,000752: 17,3163 32517 NBSM
020324,000753: 17,3164 23423 STOVL XDC
020325,000754: 17,3165 01407 YSM
020326,000755: 17,3166 76521 MXV VSL1
020327,000756: 17,3167 01445 STARAD
020328,000757: 17,3170 36041 STCALL 32D
020329,000758: 17,3171 32517 NBSM
020330,000759: 17,3172 23431 STOVL YDC
020331,000760: 17,3173 01423 XDC
020332,000761: 17,3174 76435 VXV VSL1
020333,000762: 17,3175 01431 YDC
020334,000763: 17,3176 37437 STCALL ZDC
020335,000764: 17,3177 32367 CALCGTA
020336,000765: 17,3200 77776 EXIT
020337,000766: 17,3201 33673 CA OGCPL
020338,000767: 17,3202 04063 TC BANKCALL
020339,000768: 17,3203 26317 CADR IMUPULSE
020340,000769: 17,3204 01546 TC QPLACE
020341,000770:
Page 491 |
020343,000772: 17,3205 00006 WAITLOOP EXTEND # LOOPS IN X SEC INCREMENTS FOR NUMBER OF
020344,000773: 17,3206 23545 QXCH QPLAC
020345,000774: 17,3207 55676 TS COUNTPL # NUMBER PUT INTO LENGTHOT
020346,000775: 17,3210 11676 WAITLP1 CCS COUNTPL
020347,000776: 17,3211 03215 TC +4
020348,000777: 17,3212 01545 TC QPLAC
020349,000778: 17,3213 03215 TC +2
020350,000779: 17,3214 03207 TC WAITLP1 -1
020351,000780: 17,3215 00004 INHINT
020352,000781: 17,3216 31527 CAE LENGTHOT
020353,000782: 17,3217 04536 TC WAITLIST
020354,000783: 17,3220 03233 36005 2CADR WAITLP3
020355,000784: 17,3222 00003 RELINT
020356,000785: 17,3223 11676 CCS COUNTPL
020357,000786: 17,3224 01545 TC QPLAC
020358,000787: 17,3225 01545 TC QPLAC
020359,000788: 17,3226 13227 NOOP
020360,000789: 17,3227 55676 WAITLP2 TS COUNTPL # ENTER HERE AFTER DOING CALLING JOB
020361,000790: 17,3230 33232 CAF WTLPCADR
020362,000791: 17,3231 04416 TC JOBSLEEP
020363,000792: 17,3232 37210 WTLPCADR CADR WAITLP1
020364,000793: 17,3233 33232 WAITLP3 CAF WTLPCADR
020365,000794: 17,3234 04422 TC JOBWAKE
020366,000795: 17,3235 04602 TC TASKOVER
020367,000796:
020368,000797:
020369,000798:
020370,000799:
020371,000800:
020372,000801: 17,3236 54001 ZEROING TS L
020373,000802: 17,3237 13241 TCF +2
020374,000803: 17,3240 55776 ZEROING1 TS ZERONDX
020375,000804: 17,3241 37665 CAF ZERO
020376,000805: 17,3242 50001 INDEX L
020377,000806: 17,3243 54000 TS 0
020378,000807: 17,3244 24001 INCR L
020379,000808: 17,3245 11776 CCS ZERONDX
020380,000809: 17,3246 13240 TCF ZEROING1
020381,000810: 17,3247 00002 TC Q
020382,000811: 17,3250 06000 COMPUT TC INTPRET # CALCULATE LENGTH OF GRAVITY VECTOR AS
020383,000812: 17,3251 77170 AXT,1 AXT,2 # MEASURED BY ACCELEROMETERS
020384,000813: 17,3252 00026 22D
020385,000814: 17,3253 00012 10D
020386,000815: 17,3254 77731 SSP
020387,000816: 17,3255 00051 S1
020388,000817: 17,3256 00004 4
020389,000818: 17,3257 77731 SSP
020390,000819: 17,3260 00052 S2
020391,000820: 17,3261 00004 4
020392,000821:
Page 492 |
020394,000823: 17,3262 44743 LOPDELOP DLOAD* DSU*
020395,000824: 17,3263 76120 DATAPL +24D,2
020396,000825: 17,3264 01657 DATAPL +24D,1
020397,000826: 17,3265 41323 PDDL* DMP
020398,000827: 17,3266 76156 GENPL +24D,2
020399,000828: 17,3267 37665 DEC585
020400,000829: 17,3270 77671 DDV
020401,000830: 17,3271 55504 TIX,2 VDEF
020402,000831: 17,3272 37277 NEXT
020403,000832: 17,3273 45046 ABVAL RTB
020404,000833: 17,3274 33406 SGNAGREE
020405,000834: 17,3275 36337 STCALL DSPTEM2
020406,000835: 17,3276 37301 KODU
020407,000836: 17,3277 60006 NEXT PUSH TIX,1
020408,000837: 17,3300 37262 LOPDELOP
020409,000838: 17,3301 77776 KODU EXIT
020410,000839: 17,3302 05317 TC GRABWAIT
020411,000840: 17,3303 03576 TC SHOW
020412,000841: 17,3304 06000 TC INTPRET
020413,000842: 17,3305 41535 SLOAD PUSH
020414,000843: 17,3306 01630 DATAPL +1
020415,000844: 17,3307 41535 SLOAD PUSH
020416,000845: 17,3310 01634 DATAPL +5
020417,000846: 17,3311 55535 SLOAD VDEF
020418,000847: 17,3312 01640 DATAPL +11
020419,000848: 17,3313 76456 UNIT VSL1
020420,000849: 17,3314 77606 PUSH
020421,000850: 17,3315 41535 SLOAD PUSH
020422,000851: 17,3316 01644 DATAPL +15
020423,000852: 17,3317 41535 SLOAD PUSH
020424,000853: 17,3320 01650 DATAPL +21
020425,000854: 17,3321 55535 SLOAD VDEF
020426,000855: 17,3322 01654 DATAPL +25
020427,000856: 17,3323 76456 UNIT VSL1
020428,000857: 17,3324 45325 PDDL DSU
020429,000858: 17,3325 01655 DATAPL +26
020430,000859: 17,3326 01641 DATAPL +12
020431,000860: 17,3327 77612 SL4
020432,000861: 17,3330 77652 SL3
020433,000862: 17,3331 23530 STOVL LENGTHOT
020434,000863: 17,3332 51435 VXV ABVAL
020435,000864: 17,3333 56205 DMP DDV
020436,000865: 17,3334 37670 ERUNITS
020437,000866: 17,3335 01530 LENGTHOT
020438,000867: 17,3336 77624 RTB
020439,000868: 17,3337 33406 SGNAGREE
020440,000869: 17,3340 00337 STORE DSPTEM2
020441,000870: 17,3341 77776 EXIT
020442,000871: 17,3342 03576 TC SHOW
020443,000872: 17,3343 12402 TCF RADCK
020444,000873:
Page 493 |
020446,000875: 17,3344 00006 NBPOSPL EXTEND # SETS UP AZIMUTH AND VERTICAL VECTORS FOR
020447,000876: 17,3345 23546 QXCH QPLACE # AXISGEN,RESULTS TO BE USED IN CALCGA TO
020448,000877: 17,3346 06000 TC INTPRET
020449,000878: 17,3347 54160 AXC,1 XSU,1 # AZIMUTH IN NB COORDS
020450,000879: 17,3350 37704 SCNBAZ
020451,000880: 17,3351 01536 NBPOS
020452,000881: 17,3352 77773 VLOAD*
020453,000882: 17,3353 00001 0,1
020454,000883: 17,3354 01445 STORE STARAD
020455,000884:
020456,000885: 17,3355 54160 AXC,1 XSU,1 # VERITCAL IN NB COORDS
020457,000886: 17,3356 37716 SCNBVER
020458,000887: 17,3357 01536 NBPOS
020459,000888: 17,3360 77773 VLOAD*
020460,000889: 17,3361 00001 0,1
020461,000890: 17,3362 07453 STODL STARAD +6
020462,000891: 17,3363 33042 ZERODP
020463,000892: 17,3364 06007 STODL 6D
020464,000893: 17,3365 01507 AZIMUTH
020465,000894: 17,3366 57546 COS DCOMP
020466,000895: 17,3367 06011 STODL 8D
020467,000896: 17,3370 01507 AZIMUTH
020468,000897: 17,3371 77756 SIN
020469,000898: 17,3372 00013 STORE 10D # VERTICAL IN CER
020470,000899: 17,3373 77775 VLOAD
020471,000900: 17,3374 37717 SCNBVER
020472,000901: 17,3375 36015 STCALL 12D
020473,000902: 17,3376 32677 AXISGEN
020474,000903: 17,3377 77776 EXIT
020475,000904:
020476,000905: 17,3400 33663 SELPOSN CA DEC17
020477,000906: 17,3401 55776 TS ZERONDX
020478,000907: 17,3402 33703 CA XSMADR
020479,000908: 17,3403 03236 TC ZEROING
020480,000909:
020481,000910: 17,3404 51544 INDEX POSITON
020482,000911: 17,3405 03406 TC +1
020483,000912: 17,3406 03524 TC OPCHKPOS # OPCHK WILL PUT ZERO IN POSITON
020484,000913: 17,3407 03422 TC POSN1
020485,000914: 17,3410 03431 TC POSN2
020486,000915: 17,3411 03436 TC POSN3
020487,000916: 17,3412 03450 TC POSN4
020488,000917: 17,3413 03460 TC POSN5
020489,000918: 17,3414 03470 TC POSN6
020490,000919: 17,3415 03500 TC POSN7
020491,000920: 17,3416 03513 TC POSN8
020492,000921: 17,3417 03542 TC POSN9
020493,000922: 17,3420 03553 TC POSN10
020494,000923:
020495,000924: 17,3421 03564 TC POSN11 # COMPASS POSITION
020496,000925:
Page 494 |
020498,000927: # WE WILL DENOTE THE FLASHING DISPLAY OF A HORIZONTAL TEST BY DH
020499,000928: # (XXX.XX MERU) AND A VERTICAL TEST BY DV (XXX.XX MERU) EACH POSITION TELL
020500,000929: # HOW THE DISPLAYS ARE RELATED TO TTHE DRIFT COEFFICIENTS BEING MEASURED.
020501,000930: # NOTE THAT IT IS ILLEGAL TO RUN VERTICAL IN POS 6,4, OR 2 WITHOUT FIRST
020502,000931: # RUNNING HORIZONTAL OF POS 5,3, OR1. THIS IS BECAUSE THE HORIZ DRIFT CALC
020503,000932: # IN 1,3, OR 5 IS USED AS EAST DRIFFFT FOR VERTICAL TEST. THIS IS DONE BY
020504,000933: # THE MACHINE AUTOMATICALLY EXCEPT FOR VERTICAL POSITION 6 WHICH THE
020505,000934: # OPERATOR MUST DO. (SEE POSITION 6 BELOW)
020506,000935: 17,3422 37642 POSN1 CA HALF # X UP, Y SOUTH, Z EAST
020507,000936: 17,3423 55400 TS XSM
020508,000937: 17,3424 55410 TS YSM +2 # NBDY = DH
020509,000938: 17,3425 55420 TS ZSM +4
020510,000939: 17,3426 37665 NGUBGH CA ZERO
020511,000940: 17,3427 55541 TS PIPINDEX
020512,000941: 17,3430 01546 TC QPLACE
020513,000942:
020514,000943:
020515,000944:
020516,000945: 17,3431 47642 POSN2 CS HALF # X DOWN, Y WEST, Z NORTH
020517,000946: 17,3432 55400 TS XSM
020518,000947: 17,3433 55412 TS YSM +4 # NBDZ =DH ,NBDX -ADIAX= -DV
020519,000948: 17,3434 55416 TS ZSM +2
020520,000949: 17,3435 03426 TC NGUBGH
020521,000950:
020522,000951:
020523,000952:
020524,000953: 17,3436 37642 POSN3 CA HALF # Z UP, Y WEST ,X NORTH
020525,000954: 17,3437 55414 TS ZSM
020526,000955: 17,3440 40000 COM # NBDX = -DH
020527,000956: 17,3441 55402 TS XSM +2
020528,000957: 17,3442 55412 TS YSM +4
020529,000958: 17,3443 37656 NSFLAGD CA TWO
020530,000959: 17,3444 55541 TS PIPINDEX
020531,000960: 17,3445 37665 NSBUGD CA ZERO
020532,000961: 17,3446 55576 TS DRIFTT
020533,000962: 17,3447 01546 TC QPLACE
020534,000963:
020535,000964:
020536,000965:
020537,000966: 17,3450 47642 POSN4 CS HALF # Y SOUTH, X EAST, Z DOWN
020538,000967: 17,3451 55414 TS ZSM # NBDY +ADSRAY=DH
020539,000968: 17,3452 40000 COM # NBDZ +ADIAZ =DV
020540,000969: 17,3453 55410 TS YSM +2
020541,000970: 17,3454 55404 TS XSM +4
020542,000971: 17,3455 37656 CA TWO
020543,000972: 17,3456 55541 TS PIPINDEX
020544,000973: 17,3457 01546 TC QPLACE
020545,000974:
Page 495 |
020547,000976: 17,3460 37642 POSN5 CA HALF # Y UP, Z NORTH, X WEST
020548,000977: 17,3461 55406 TS YSM
020549,000978: 17,3462 40000 COM # NBDZ-ADSRAZ =DH
020550,000979: 17,3463 55404 TS XSM +4
020551,000980: 17,3464 55416 TS ZSM +2
020552,000981: 17,3465 37657 CA ONE
020553,000982: 17,3466 55541 TS PIPINDEX
020554,000983: 17,3467 03445 TC NSBUGD
020555,000984:
020556,000985:
020557,000986:
020558,000987: # TO RUN POSITION 6 VERTICAL AFTER PIP TEST POS 6 IS DISPLAYED THE OPERATR
020559,000988: # MUST CALCULATE FROM 2.5 -NBDZ-ADSRAZ (XXX.XX)MERU. WHEN PI
020560,000989: # IP DATA FLASHES DO VERB 33 ENTER. THIS STARTS VERTICAL TEST. THEN THE
020561,000990: # DATA XXX.XX MERU AS CALCULATED MUST BE ENTERED INTO DRIFTT. IE VERB 21
020562,000991: # ENTER NOUN 01 ENTER LOCATION OF DRIFTT ENTER + (OR -) XXXXX ENTER
020563,000992: 17,3470 37642 POSN6 CA HALF # Y DOWN, Z EAST, X SOUTH
020564,000993: 17,3471 55402 TS XSM +2
020565,000994: 17,3472 55420 TS ZSM +4
020566,000995: 17,3473 40000 COM # NBDX +ADSRAX = DH, NBDY -ADIAY = -DV
020567,000996: 17,3474 55406 TS YSM
020568,000997: 17,3475 37657 CA ONE
020569,000998: 17,3476 55541 TS PIPINDEX
020570,000999: 17,3477 01546 TC QPLACE
020571,001000:
020572,001001:
020573,001002:
020574,001003: 17,3500 47642 POSN7 CS HALF # Z UP-EAST,Y UP-WEST,X NORTH.THIS POSITON
020575,001004: 17,3501 55402 TS XSM +2
020576,001005: 17,3502 33677 CA ROOT1/2
020577,001006: 17,3503 55406 TS YSM # NBDX - .707 ADSRAX = -DH
020578,001007: 17,3504 55414 TS ZSM
020579,001008: 17,3505 55420 TS ZSM +4
020580,001009: 17,3506 40000 COM
020581,001010: 17,3507 55412 TS YSM +4
020582,001011: 17,3510 37665 GEORGES CA ZERO
020583,001012: 17,3511 55363 TS FAILREG
020584,001013: 17,3512 03445 TC NSBUGD
020585,001014:
020586,001015:
020587,001016:
020588,001017: 17,3513 37642 POSN8 CA HALF # Z UP-SOUTH,Y UP-NORTH,X EAST.THIS POSITN
020589,001018: 17,3514 55404 TS XSM +4
020590,001019: 17,3515 33677 CA ROOT1/2 # .707(-NBDZ-NBDY) +.5(ADIAZ-ADIAY)
020591,001020: 17,3516 55406 TS YSM # +.5(ADSRAY +ADSRAZ)=DH
020592,001021: 17,3517 55416 TS ZSM +2
020593,001022: 17,3520 55414 TS ZSM
020594,001023: 17,3521 40000 COM
020595,001024: 17,3522 55410 TS YSM +2
020596,001025: 17,3523 03445 TC NSBUGD
020597,001026:
Page 496 |
020599,001028: 17,3524 33700 OPCHKPOS CA ROOT1SQ # OG=+45DEG,IG=-45DEG,MG=+45DEG.
020600,001029: 17,3525 55400 TS XSM
020601,001030: 17,3526 55410 TS YSM +2
020602,001031: 17,3527 55412 TS YSM +4
020603,001032: 17,3530 55414 TS ZSM
020604,001033: 17,3531 33677 CA ROOT1/2
020605,001034: 17,3532 55406 TS YSM
020606,001035: 17,3533 33702 CA ROOT3SQ
020607,001036: 17,3534 55402 TS XSM +2
020608,001037: 17,3535 55420 TS ZSM +4
020609,001038: 17,3536 43701 CS ROOT2SQ
020610,001039: 17,3537 55404 TS XSM +4
020611,001040: 17,3540 55416 TS ZSM +2
020612,001041: 17,3541 01546 TC QPLACE
020613,001042:
020614,001043: 17,3542 37642 POSN9 CA HALF # X UP EAST,Y UP WEST,Z SOUTH.THIS POSITON
020615,001044: 17,3543 55416 TS ZSM +2
020616,001045: 17,3544 33677 CA ROOT1/2 # -NBDZ +.707 SRAZ =DH
020617,001046: 17,3545 55400 TS XSM
020618,001047: 17,3546 55404 TS XSM +4
020619,001048: 17,3547 55406 TS YSM
020620,001049: 17,3550 40000 COM
020621,001050: 17,3551 55412 TS YSM +4
020622,001051: 17,3552 03445 TC NSBUGD
020623,001052:
020624,001053:
020625,001054:
020626,001055: 17,3553 37642 POSN10 CA HALF # X UP NORTH, Y UP SOUTH,Z EAST.THIS POSITN
020627,001056: 17,3554 55420 TS ZSM +4
020628,001057: 17,3555 33677 CA ROOT1/2 # .707(NBDY -NBDX) +.5(ADIAY -ADIAX)
020629,001058: 17,3556 55400 TS XSM # +.5(ADSRAX) = DH
020630,001059: 17,3557 55406 TS YSM
020631,001060: 17,3560 55410 TS YSM +2
020632,001061: 17,3561 40000 COM
020633,001062: 17,3562 55402 TS XSM +2
020634,001063: 17,3563 03445 TC NSBUGD
020635,001064:
020636,001065:
020637,001066:
020638,001067: 17,3564 04063 POSN11 TC BANKCALL # COMPASS POSITION
020639,001068: 17,3565 43107 CADR LOADXSM
020640,001069: 17,3566 01546 TC QPLACE
020641,001070:
020642,001071:
020643,001072:
020644,001073: 17,3567 30336 SHOWLD CA DSPTEM2
020645,001074: 17,3570 55527 TS LENGTHOT
020646,001075: 17,3571 30337 CA DSPTEM2 +1
020647,001076: 17,3572 55536 TS NBPOS
020648,001077: 17,3573 30340 CA DSPTEM2 +2
020649,001078:
Page 497 |
020651,001080: 17,3574 55544 TS POSITON
020652,001081: 17,3575 00002 TC Q
020653,001082:
020654,001083: 17,3576 00006 SHOW EXTEND
020655,001084: 17,3577 23546 QXCH QPLACE
020656,001085: 17,3600 31544 SHOW1 CA POSITON
020657,001086: 17,3601 54340 TS DSPTEM2 +2
020658,001087: 17,3602 33657 CA VB06N66
020659,001088: 17,3603 05332 TC NVSBWAIT
020660,001089: 17,3604 05274 TC FLASHON
020661,001090: 17,3605 05140 TC ENDIDLE
020662,001091: 17,3606 02234 TC FINISH
020663,001092: 17,3607 01546 TC QPLACE
020664,001093: 17,3610 03567 TC SHOWLD
020665,001094: 17,3611 13600 TCF SHOW1
020666,001095:
020667,001096:
020668,001097:
020669,001098: 17,3612 00006 LOADGTSM EXTEND # THIS LOADS XSM INTO GEOMATRX
020670,001099: 17,3613 23546 QXCH QPLACE
020671,001100: 17,3614 06000 TC INTPRET
020672,001101: 17,3615 77775 VLOAD
020673,001102: 17,3616 01401 XSM
020674,001103: 17,3617 23750 STOVL GEOMTRX
020675,001104: 17,3620 01407 YSM
020676,001105: 17,3621 23756 STOVL GEOMTRX +6
020677,001106: 17,3622 01415 ZSM
020678,001107: 17,3623 01764 STORE GEOMTRX +12D
020679,001108: 17,3624 77776 EXIT
020680,001109: 17,3625 01546 TC QPLACE
020681,001110:
Page 498 |
020683,001112: 17,3626 00144 1SECX DEC 100 B-14
020684,001113: 17,3627 17127 16705 GEORGED 2DEC .47408845
020685,001114: 17,3631 07314 36223 2DEC .23125894
020686,001115: 17,3633 04521 31140 2DEC .14561689
020687,001116: 17,3635 75755 73521 GEORGEC 2DEC -.06360691
020688,001117: 17,3637 72476 54176 2DEC -.16806746
020689,001118: 17,3641 04771 03365 2DEC .15582939
020690,001119: 17,3643 75644 70661 GEORGEB 2DEC -.06806784
020691,001120: 17,3645 47762 75077 2DEC -.75079894
020692,001121: 17,3647 70023 73740 2DEC -.24878704
020693,001122: 17,3651 14C EQUALS 0014
020694,001123: 17,3651 02130 V21N30E OCT 02130
020695,001124: 17,3652 04000 DESANGLE DEC 2048 B-14
020696,001125: 17,3653 04143 SFCONST DEC .13107
020697,001126: 17,3654 34000 SIZCHK OCT 34000
020698,001127: 17,3655 00264 180DEC DEC 180 B-14
020699,001128: 17,3656 07626 3990DEC DEC 3990 B-14
020700,001129: 17,3657 00666 VB06N66 OCT 00666
020701,001130: 17,3660 01130 TESTTIME DEC 600 B-14
020702,001131: 17,3661 01620 V16N20S OCT 01620
020703,001132: 17,3662 01640 V16N40S OCT 01640
020704,001133: 17,3663 00021 DEC17 DEC 17 B-14
020705,001134: 17,3664 06200 00000 DEC585 2DEC 3200 B+14
020706,001135: 17,3666 00400 DELYOFF OCT 00400
020707,001136: 17,3667 00024 35474 ERUNITS 2DEC 342844 B-28
020708,001137: 17,3671 01506 GENPLAD GENADR AZIMUTH
020709,001138: 17,3672 02521 GYRODPL ECADR GYROD
020710,001139: 17,3673 02500 OGCPL ECADR OGC
020711,001140: 17,3674 77760 LOWFOUR OCT 77760
020712,001141: 17,3675 00070 DEC56 DEC 56 B-14
020713,001142: 17,3676 10000 45DEG OCT 10000
020714,001143: 17,3677 13241 ROOT1/2 DEC .353553
020715,001144: 17,3700 10000 ROOT1SQ DEC .250000
020716,001145: 17,3701 15520 ROOT2SQ DEC .426776
020717,001146: 17,3702 02260 ROOT3SQ DEC .073223
020718,001147: 17,3703 01400 XSMADR GENADR XSM
020719,001148:
Page 499 |
020721,001150: 17,3704 00000 00000 SCNBAZ 2DEC 0 B-28
020722,001151: 17,3706 00000 00000 2DEC 0 B-28
020723,001152: 17,3710 20000 00000 LABNBAZ 2DEC .5
020724,001153: 17,3712 00000 00000 2DEC 0 B-28
020725,001154: 17,3714 00000 00000 2DEC 0 B-28
020726,001155: 17,3716 20000 00000 SCNBVER 2DEC .5
020727,001156: 17,3720 00000 00000 2DEC 0 B-28
020728,001157: 17,3722 00000 00000 LABNBVER 2DEC 0 B-28
020729,001158: 17,3724 00000 00000 2DEC 0 B-28
020730,001159: 17,3726 57777 77777 2DEC -.5
020731,001160: 17,3730 ENDIMUS2 =
End of include-file IMU_PERFORMANCE_TESTS_2.agc. Parent file is MAIN.agc