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 Linden Sims.
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: GAP: ASSEMBLE REVISION 56 OF AGC PROGRAM ZERLINA BY ZOROASTER 9:12 OCT. 21,1970Note that the date is the date of the printout, not the date of the program revision. |
016769,000002: ## Copyright: Public domain.
016770,000003: ## Filename: IMU_PERFORMANCE_TESTS_2.agc
016771,000004: ## Purpose: A log section of Zerlina 56, the final revision of
016772,000005: ## Don Eyles's offline development program for the variable
016773,000006: ## guidance period servicer. It also includes a new P66 with LPD
016774,000007: ## (Landing Point Designator) capability, based on an idea of John
016775,000008: ## Young's. Neither of these advanced features were actually flown,
016776,000009: ## but Zerlina was also the birthplace of other big improvements to
016777,000010: ## Luminary including the terrain model and new (Luminary 1E)
016778,000011: ## analog display programs. Zerlina was branched off of Luminary 145,
016779,000012: ## and revision 56 includes all changes up to and including Luminary
016780,000013: ## 183. It is therefore quite close to the Apollo 14 program,
016781,000014: ## Luminary 178, where not modified with new features.
016782,000015: ## Reference: pp. 378-386
016783,000016: ## Assembler: yaYUL
016784,000017: ## Contact: Ron Burkey <info@sandroid.org>.
016785,000018: ## Website: www.ibiblio.org/apollo/index.html
016786,000019: ## Mod history: 2017-07-28 MAS Created from Luminary 210.
016787,000020: ## 2017-08-22 RSB Transcribed.
016788,000021:
Page 378 |
016790,000023: # NAME- IMU PERFORMANCE TESTS 2
016791,000024:
016792,000025: # DATE- MARCH 20,1967
016793,000026:
016794,000027: # BY- SYSTEM TEST GROUP 864-6900 EXT. 1274
016795,000028:
016796,000029: # MODNO.- ZERO
016797,000030:
016798,000031: # FUNCTIONAL DESCRIPTION
016799,000032:
016800,000033: # POSITIONING ROUTINES FOR THE IMU PERFORMANCE TESTS AS WELL AS SOME OF
016801,000034: # THE TESTS THEMSELVES. FOR A DESCRIPTION OF THESE SUBROUTINES AND THE
016802,000035: # OPERATING PROCEDURES (TYPICALLY) SEE STG MEMO 685.THEORETICAL REF.E-1973
016803,000036:
016804,000037: 33,2031 BANK 33
016805,000038: 37,2000 SETLOC IMU2
016806,000039: 37,2000 BANK
016807,000040: 37,2002 E5,1416 EBANK= POSITON
016808,000041: 37,2002 COUNT* $$/P07
016809,000042:
016810,000043: 37,2002 05322 REDO TC NEWMODEX
016811,000044: 37,2003 00007 MM 07 B-14
016812,000045:
016813,000046: 37,2004 02325 GEOIMUTT TC IMUZERR
016814,000047: 37,2005 34755 IMUBACK CA ZERO
016815,000048: 37,2006 55414 TS NDXCTR
016816,000049: 37,2007 55440 TS TORQNDX
016817,000050: 37,2010 55441 TS TORQNDX +1
016818,000051: 37,2011 55576 TS OVFLOWCK
016819,000052: 37,2012 34361 NBPOSPL CA DEC17
016820,000053: 37,2013 55571 TS ZERONDX
016821,000054: 37,2014 32476 CA XNBADR
016822,000055: 37,2015 02367 TC ZEROING
016823,000056: 37,2016 34736 CA HALF
016824,000057: 37,2017 55664 TS XNB
016825,000058: 37,2020 06051 GUESS TC INTPRET
016826,000059: 37,2021 62545 LATAZCHK DLOAD SL2
016827,000060: 37,2022 02403 LATITUDE
016828,000061: 37,2023 15046 STODL DSPTEM1 +1
016829,000062: 37,2024 02401 AZIMUTH
016830,000063: 37,2025 77434 RTB EXIT
016831,000064: 37,2026 21576 1STO2S
016832,000065: 37,2027 56154 XCH MPAC
016833,000066: 37,2030 55044 TS DSPTEM1
016834,000067: 37,2031 32473 CAF VN0641
016835,000068: 37,2032 04616 TC BANKCALL
016836,000069: 37,2033 20477 CADR GOFLASH
016837,000070: 37,2034 02270 TC ENDTEST1
016838,000071: 37,2035 02037 TC +2
016839,000072: 37,2036 02031 TC -5
016840,000073:
Page 379 |
016842,000075: 37,2037 06051 TC INTPRET
016843,000076: 37,2040 47135 SLOAD RTB
016844,000077: 37,2041 01045 DSPTEM1
016845,000078: 37,2042 21560 CDULOGIC
016846,000079: 37,2043 02401 STORE AZIMUTH
016847,000080: 37,2044 60535 SLOAD SR2
016848,000081: 37,2045 01046 DSPTEM1 +1
016849,000082: 37,2046 02403 STORE LATITUDE
016850,000083: 37,2047 57546 COS DCOMP
016851,000084: 37,2050 77752 SL1
016852,000085: 37,2051 16437 STODL WANGI
016853,000086: 37,2052 02403 LATITUDE
016854,000087: 37,2053 72556 SIN SL1
016855,000088: 37,2054 16435 STODL WANGO
016856,000089: 37,2055 02401 AZIMUTH
016857,000090: 37,2056 73406 PUSH SIN
016858,000091: 37,2057 02675 STORE YNB +2
016859,000092: 37,2060 16705 STODL ZNB +4
016860,000093: 37,2061 77746 COS
016861,000094: 37,2062 02677 STORE YNB +4
016862,000095: 37,2063 77676 DCOMP
016863,000096: 37,2064 36703 POSGMBL STCALL ZNB +2
016864,000097: 37,2065 47351 CALCGA
016865,000098: 37,2066 77776 EXIT
016866,000099: 37,2067 04616 TC BANKCALL
016867,000100: 37,2070 16745 CADR IMUCOARS
016868,000101: 37,2071 34736 CAF BIT14 # IF BIT14 SET, GIMBAL LOCK
016869,000102: 37,2072 70077 MASK FLAGWRD3
016870,000103: 37,2073 00006 EXTEND
016871,000104: 37,2074 12076 BZF +2
016872,000105: 37,2075 25414 INCR NDXCTR # +1 IF IN GIMBAL LOCK,OTHERWISE 0
016873,000106: 37,2076 05527 TC DOWNFLAG
016874,000107: 37,2077 00056 ADRES GLOKFAIL # RESET GIMBAL LOCK FLAG
016875,000108: 37,2100 02315 TC IMUSLLLG
016876,000109: 37,2101 11414 CCS NDXCTR # IF ONE GO AND DO A PIPA TEST ONLY
016877,000110: 37,2102 02126 TC PIPACHK # ALIGN AND MEASURE VERTICAL PIPA RATE
016878,000111: 37,2103 02320 TC FINIMUDD
016879,000112: 37,2104 00006 EXTEND
016880,000113: 37,2105 31575 DCA PERFDLAY
016881,000114: 37,2106 05310 TC LONGCALL # DELAY WHILE SUSPENSION STABILIZES
016882,000115: 37,2107 E5,1416 EBANK= POSITON
016883,000116: 37,2107 02113 76065 2CADR GOESTIMS
016884,000117:
016885,000118: 37,2111 32116 CA ESTICADR
016886,000119: 37,2112 05133 TC JOBSLEEP
016887,000120: 37,2113 32116 GOESTIMS CA ESTICADR
016888,000121: 37,2114 05137 TC JOBWAKE
016889,000122: 37,2115 05272 TC TASKOVER
016890,000123: 37,2116 76500 ESTICADR CADR ESTIMS
016891,000124: 37,2117 34755 TORQUE CA ZERO
016892,000125:
Page 380 |
016894,000127: 37,2120 55047 TS DSPTEM2
016895,000128: 37,2121 31504 CA DRIFTI
016896,000129: 37,2122 55050 TS DSPTEM2 +1
016897,000130: 37,2123 51416 INDEX POSITON
016898,000131: 37,2124 55420 TS SOUTHDR -1
016899,000132: 37,2125 02457 TC SHOW
016900,000133:
016901,000134: 37,2126 51414 PIPACHK INDEX NDXCTR # PIPA TEST
016902,000135: 37,2127 02130 TC +1
016903,000136: 37,2130 02447 TC EARTHR*
016904,000137: 37,2131 34361 CA DEC17 # ALLOW PIP COUNTER TO OVERFLOW 17 TIMES
016905,000138: 37,2132 55476 TS DATAPL +4 # IN THE ALLOTED TIME INTERVAL
016906,000139: 37,2133 32474 CA DEC58
016907,000140: 37,2134 55412 TS LENGTHOT
016908,000141: 37,2135 34753 CA ONE
016909,000142: 37,2136 55537 TS RESULTCT
016910,000143: 37,2137 34755 CA ZERO
016911,000144: 37,2140 51415 INDEX PIPINDEX
016912,000145: 37,2141 54037 TS PIPAX
016913,000146: 37,2142 55472 TS DATAPL
016914,000147: 37,2143 02332 TC CHECKG
016915,000148: 37,2144 00004 INHINT
016916,000149: 37,2145 34752 CAF TWO
016917,000150: 37,2146 05204 TC TWIDDLE
016918,000151: 37,2147 E5,1642 EBANK= XSM
016919,000152: 37,2147 02151 ADRES PIPATASK
016920,000153: 37,2150 05155 TC ENDOFJOB
016921,000154:
016922,000155:
016923,000156: 37,2151 00006 PIPATASK EXTEND
016924,000157: 37,2152 27412 DIM LENGTHOT
016925,000158: 37,2153 31412 CA LENGTHOT
016926,000159: 37,2154 00006 EXTEND
016927,000160: 37,2155 62161 BZMF STARTPIP
016928,000161: 37,2156 34742 CAF BIT10
016929,000162: 37,2157 05204 TC TWIDDLE
016930,000163: 37,2160 E5,1642 EBANK= XSM
016931,000164: 37,2160 02151 ADRES PIPATASK
016932,000165: 37,2161 34736 STARTPIP CAF PRIO20
016933,000166: 37,2162 05105 TC FINDVAC
016934,000167: 37,2163 E5,1642 EBANK= XSM
016935,000168: 37,2163 02166 76065 2CADR PIPJOBB
016936,000169:
016937,000170: 37,2165 05272 TC TASKOVER
016938,000171:
016939,000172: 37,2166 51414 PIPJOBB INDEX NDXCTR
016940,000173: 37,2167 02170 TC +1
016941,000174: 37,2170 02447 TC EARTHR*
016942,000175: 37,2171 31412 CA LENGTHOT
Page 381 |
016944,000177: 37,2172 00006 EXTEND
016945,000178: 37,2173 62175 BZMF +2
016946,000179: 37,2174 05155 TC ENDOFJOB
016947,000180:
016948,000181: 37,2175 34756 CA FIVE
016949,000182: 37,2176 55537 TS RESULTCT
016950,000183: 37,2177 02332 TC CHECKG
016951,000184: 37,2200 11473 CCS DATAPL +1
016952,000185: 37,2201 02205 TC +4
016953,000186: 37,2202 05706 TC CCSHOLE
016954,000187: 37,2203 41476 CS DATAPL +4
016955,000188: 37,2204 55476 TS DATAPL +4
016956,000189: 37,2205 00006 EXTEND
016957,000190: 37,2206 41473 DCS DATAPL
016958,000191: 37,2207 21477 DAS DATAPL +4
016959,000192:
016960,000193: 37,2210 06051 TC INTPRET
016961,000194: 37,2211 45345 DLOAD DSU
016962,000195: 37,2212 02501 DATAPL +6
016963,000196: 37,2213 02475 DATAPL +2
016964,000197: 37,2214 45044 BPL CALL
016965,000198: 37,2215 76217 AINGOTN
016966,000199: 37,2216 76275 OVERFFIX
016967,000200: 37,2217 56325 AINGOTN PDDL DDV
016968,000201: 37,2220 02477 DATAPL +4
016969,000202: 37,2221 47075 DMPR RTB
016970,000203: 37,2222 37056 DEC585 # DEC585 HAS BEEN REDEFINED FOR LEM
016971,000204: 37,2223 21574 SGNAGREE
016972,000205: 37,2224 01050 STORE DSPTEM2
016973,000206: 37,2225 77776 EXIT
016974,000207: 37,2226 11414 CCS NDXCTR
016975,000208: 37,2227 02301 TC COAALIGN # TAKE PLATFORM OUT OF GIMBAL LOCK
016976,000209: 37,2230 02457 TC SHOW
016977,000210: 37,2231 32471 VERTDRFT CA 3990DEC # ABOUT 1 HOUR VERTICAL DRIFT TEST
016978,000211: 37,2232 55412 TS LENGTHOT
016979,000212: 37,2233 51416 INDEX POSITON
016980,000213: 37,2234 41417 CS SOUTHDR -2
016981,000214: 37,2235 55442 TS DRIFTT
016982,000215: 37,2236 11415 CCS PIPINDEX # OFFSET PLATFORM TO MISS PIP DEAD-ZONES
016983,000216: 37,2237 12245 TCF PON4 # Z UP IN POS 4
016984,000217: 37,2240 44747 PON2 CS BIT5 # X UP
016985,000218: 37,2241 27565 ADS ERCOMP +2
016986,000219: 37,2242 34747 CA BIT5
016987,000220: 37,2243 27567 ADS ERCOMP +4
016988,000221: 37,2244 12251 TCF PON
016989,000222: 37,2245 44747 PON4 CS BIT5
016990,000223: 37,2246 27565 ADS ERCOMP +2
016991,000224: 37,2247 34747 CA BIT5
016992,000225: 37,2250 27563 ADS ERCOMP
016993,000226: 37,2251 02447 PON TC EARTHR*
016994,000227:
Page 382 |
016996,000229: 37,2252 34755 CA ZERO # ALLOW ONLY SOUTH GYRO EARTH RATE COMPENS
016997,000230: 37,2253 55404 TS ERVECTOR
016998,000231: 37,2254 55405 TS ERVECTOR +1
016999,000232: 37,2255 34733 GUESS1 CAF POSMAX
017000,000233: 37,2256 55440 TS TORQNDX
017001,000234: 37,2257 55441 TS TORQNDX +1
017002,000235: 37,2260 30032 CA CDUX
017003,000236: 37,2261 55413 TS LOSVEC
017004,000237: 37,2262 02500 TC ESTIMS
017005,000238: 37,2263 31502 VALMIS CA DRIFTO
017006,000239: 37,2264 55050 TS DSPTEM2 +1
017007,000240: 37,2265 34755 CA ZERO
017008,000241: 37,2266 55047 TS DSPTEM2
017009,000242: 37,2267 02457 TC SHOW
017010,000243:
017011,000244: 37,2270 05527 ENDTEST1 TC DOWNFLAG
017012,000245: 37,2271 00007 ADRES IMUSE
017013,000246: 37,2272 44755 CS ZERO
017014,000247: 37,2273 05325 TC NEWMODEA
017015,000248: 37,2274 05503 TC ENDEXT
017016,000249:
Page 383 |
017018,000251: 37,2275 43215 OVERFFIX DAD DAD
017019,000252: 37,2276 06526 DPPOSMAX
017020,000253: 37,2277 37064 ONEDPP
017021,000254: 37,2300 77616 RVQ
017022,000255:
017023,000256: 37,2301 00006 COAALIGN EXTEND # COARSE ALIGN SUBROUTINE
017024,000257: 37,2302 23571 QXCH ZERONDX
017025,000258: 37,2303 34755 CA ZERO
017026,000259: 37,2304 54321 TS THETAD
017027,000260: 37,2305 54322 TS THETAD +1
017028,000261: 37,2306 54323 TS THETAD +2
017029,000262: 37,2307 04616 TC BANKCALL
017030,000263: 37,2310 16745 CADR IMUCOARS
017031,000264: 37,2311 04616 ALIGNCOA TC BANKCALL
017032,000265: 37,2312 17715 CADR IMUSTALL
017033,000266: 37,2313 03047 TC SOMERR2
017034,000267: 37,2314 01571 TC ZERONDX
017035,000268:
017036,000269:
017037,000270: 37,2315 00006 IMUSLLLG EXTEND
017038,000271: 37,2316 23571 QXCH ZERONDX
017039,000272: 37,2317 02311 TC ALIGNCOA
017040,000273:
017041,000274: 37,2320 00006 FINIMUDD EXTEND
017042,000275: 37,2321 23571 QXCH ZERONDX
017043,000276: 37,2322 04616 TC BANKCALL
017044,000277: 37,2323 17155 CADR IMUFINE
017045,000278: 37,2324 02311 TC ALIGNCOA
017046,000279:
017047,000280: 37,2325 00006 IMUZERR EXTEND
017048,000281: 37,2326 23571 QXCH ZERONDX
017049,000282: 37,2327 04616 TC BANKCALL
017050,000283: 37,2330 16661 CADR IMUZERO
017051,000284: 37,2331 02311 TC ALIGNCOA
017052,000285:
017053,000286:
017054,000287: 37,2332 00006 CHECKG EXTEND # PIP PULSE CATCHING ROUTINE
017055,000288: 37,2333 23417 QXCH QPLACE
017056,000289: 37,2334 02342 TC +6
017057,000290: 37,2335 00003 CHECKG1 RELINT
017058,000291: 37,2336 30067 CA NEWJOB
017059,000292: 37,2337 00006 EXTEND
017060,000293: 37,2340 62346 BZMF +6
017061,000294: 37,2341 05122 TC CHANG1
017062,000295: 37,2342 00004 INHINT
017063,000296: 37,2343 51415 INDEX PIPINDEX
017064,000297: 37,2344 40037 CS PIPAX
017065,000298: 37,2345 55571 TS ZERONDX
017066,000299: 37,2346 00004 INHINT
017067,000300:
Page 384 |
017069,000302: 37,2347 51415 INDEX PIPINDEX
017070,000303: 37,2350 30037 CA PIPAX
017071,000304: 37,2351 61571 AD ZERONDX
017072,000305: 37,2352 00006 EXTEND
017073,000306: 37,2353 12335 BZF CHECKG1
017074,000307: 37,2354 51415 INDEX PIPINDEX
017075,000308: 37,2355 30037 CA PIPAX
017076,000309: 37,2356 51537 INDEX RESULTCT
017077,000310: 37,2357 55472 TS DATAPL
017078,000311: 37,2360 04102 TC FINETIME
017079,000312: 37,2361 51537 INDEX RESULTCT
017080,000313: 37,2362 55473 TS DATAPL +1
017081,000314: 37,2363 51537 INDEX RESULTCT
017082,000315: 37,2364 23474 LXCH DATAPL +2
017083,000316: 37,2365 00003 RELINT
017084,000317: 37,2366 01417 ENDCHKG TC QPLACE
017085,000318:
017086,000319:
017087,000320: 37,2367 54001 ZEROING TS L
017088,000321: 37,2370 12372 TCF +2
017089,000322: 37,2371 55571 ZEROING1 TS ZERONDX
017090,000323: 37,2372 34755 CAF ZERO
017091,000324: 37,2373 50001 INDEX L
017092,000325: 37,2374 54000 TS 0
017093,000326: 37,2375 24001 INCR L
017094,000327: 37,2376 11571 CCS ZERONDX
017095,000328: 37,2377 12371 TCF ZEROING1
017096,000329: 37,2400 00002 TC Q
017097,000330:
Page 385 |
017099,000332: 37,2401 65345 ERTHRVSE DLOAD PDDL
017100,000333: 37,2402 37057 SCHZEROS # PD24 = (SIN -COS 0)(OMEG/MS)
017101,000334: 37,2403 02403 LATITUDE
017102,000335: 37,2404 57546 COS DCOMP
017103,000336: 37,2405 73525 PDDL SIN
017104,000337: 37,2406 02403 LATITUDE
017105,000338: 37,2407 74266 VDEF VXSC
017106,000339: 37,2410 36001 OMEG/MS
017107,000340: 37,2411 02405 STORE ERVECTOR
017108,000341: 37,2412 77634 RTB
017109,000342: 37,2413 21555 LOADTIME
017110,000343: 37,2414 26433 STOVL TMARK
017111,000344: 37,2415 37057 SCHZEROS
017112,000345: 37,2416 02564 STORE ERCOMP
017113,000346: 37,2417 77616 RVQ
017114,000347:
017115,000348: 37,2420 47020 EARTHR ITA RTB
017116,000349: 37,2421 00051 S2
017117,000350: 37,2422 21555 LOADTIME
017118,000351: 37,2423 02431 STORE TEMPTIME
017119,000352: 37,2424 51025 DSU BPL
017120,000353: 37,2425 02433 TMARK
017121,000354: 37,2426 76431 ERTHR
017122,000355: 37,2427 77624 CALL
017123,000356: 37,2430 76275 OVERFFIX
017124,000357: 37,2431 74261 ERTHR SL VXSC
017125,000358: 37,2432 20212 9D
017126,000359: 37,2433 02405 ERVECTOR
017127,000360: 37,2434 53321 MXV VAD
017128,000361: 37,2435 02643 XSM
017129,000362: 37,2436 02564 ERCOMP
017130,000363: 37,2437 16564 STODL ERCOMP
017131,000364: 37,2440 02431 TEMPTIME
017132,000365: 37,2441 02433 STORE TMARK
017133,000366: 37,2442 47170 AXT,1 RTB
017134,000367: 37,2443 02563 ECADR ERCOMP
017135,000368: 37,2444 21667 PULSEIMU
017136,000369: 37,2445 77650 GOTO
017137,000370: 37,2446 00051 S2
017138,000371:
017139,000372: 37,2447 00006 EARTHR* EXTEND
017140,000373: 37,2450 23420 QXCH QPLACES
017141,000374: 37,2451 06051 TC INTPRET
017142,000375: 37,2452 77624 CALL
017143,000376: 37,2453 76420 EARTHR
017144,000377: 37,2454 77776 EXIT
017145,000378: 37,2455 02315 TC IMUSLLLG
017146,000379: 37,2456 01420 TC QPLACES
017147,000380:
017148,000381: 37,2457 00006 SHOW EXTEND
017149,000382:
Page 386 |
017151,000384: 37,2460 23417 QXCH QPLACE
017152,000385: 37,2461 31416 SHOW1 CA POSITON
017153,000386: 37,2462 55051 TS DSPTEM2 +2
017154,000387: 37,2463 32472 CA VB06N98
017155,000388: 37,2464 04616 TC BANKCALL
017156,000389: 37,2465 20477 CADR GOFLASH
017157,000390: 37,2466 02270 TC ENDTEST1 # V 34
017158,000391: 37,2467 01417 TC QPLACE # V33
017159,000392: 37,2470 12461 TCF SHOW1
017160,000393:
017161,000394: 37,2471 07626 3990DEC DEC 3990 B-14
017162,000395: 37,2472 01542 VB06N98 VN 0698
017163,000396: 37,2473 01451 VN0641 VN 0641
017164,000397: 37,2474 4361 DEC17 = ND1
017165,000398: 37,2474 00072 DEC58 DEC 58 B-14
017166,000399: 37,2475 02737 OGCPL ECADR OGC
017167,000400: 37,2476 4777 1SECX = 1SEC
017168,000401: 37,2476 01664 XNBADR GENADR XNB
017169,000402: 37,2477 01642 XSMADR GENADR XSM
017170,000403: 4102 BLOCK 2
017171,000404: 4102 COUNT* $$/P07
017172,000405: 4102 00004 FINETIME INHINT # RETURNS WITH INTERRUPT INHIBITED
017173,000406: 4103 00006 EXTEND
017174,000407: 4104 00004 READ LOSCALAR
017175,000408: 4105 54001 TS L
017176,000409: 4106 00006 EXTEND
017177,000410: 4107 06004 RXOR LOSCALAR
017178,000411: 4110 00006 EXTEND
017179,000412: 4111 14115 BZF +4
017180,000413: 4112 00006 EXTEND
017181,000414: 4113 00004 READ LOSCALAR
017182,000415: 4114 54001 TS L
017183,000416: 4115 44733 +4 CS POSMAX
017184,000417: 4116 60001 AD L
017185,000418: 4117 00006 EXTEND
017186,000419: 4120 14103 BZF FINETIME +1
017187,000420: 4121 00006 EXTEND
017188,000421: 4122 00003 READ HISCALAR
017189,000422: 4123 00002 TC Q
017190,000423:
End of include-file IMU_PERFORMANCE_TESTS_2.agc. Parent file is MAIN.agc