Source Code

016182,000002: ## Copyright: Public domain. 016183,000003: ## Filename: IMU_PERFORMANCE_TESTS_2.agc 016184,000004: ## Purpose: Part of the source code for Solarium build 55. This 016185,000005: ## is for the Command Module's (CM) Apollo Guidance 016186,000006: ## Computer (AGC), for Apollo 6. 016187,000007: ## Assembler: yaYUL --block1 016188,000008: ## Contact: Jim Lawton <jim DOT lawton AT gmail DOT com> 016189,000009: ## Website: www.ibiblio.org/apollo/index.html 016190,000010: ## Page Scans: www.ibiblio.org/apollo/ScansForConversion/Solarium055/ 016191,000011: ## Mod history: 2009-10-04 JL Created. 016192,000012: ## 2009-10-30 JL Fixed filename comment. 016193,000013: ## 2016-08-20 RSB Typos. 016194,000014: ## 2016-08-23 RSB More of the same. 016195,000015: ## 2016-12-28 RSB Proofed comment text using octopus/ProoferComments, 016196,000016: ## and fixed errors found. 016197,000017:

Page 426

016199,000019: 
016200,000020: 34,6000                                           SETLOC   70000                                 
016201,000021: 
016202,000022: 34,6000           05654        MISALIGN           TC       BANKCALL                              
016203,000023: 34,6001           25331                           CADR     OGCZERO                               
016204,000024: 34,6002           03302                           TC       GRABDSP                               
016205,000025: 34,6003           03310                           TC       PREGBSY                               
016206,000026: 34,6004           33533                           CAF      11DEC                                 
016207,000027: 34,6005           51311                           TS       PTS                                   
016208,000028: 34,6006           35501                           CAF      ZERO                                  
016209,000029: 34,6007           51312                           TS       PTS        +1                         
016210,000030: 34,6010           51224        BBB                TS       NDXCTR                                
016211,000031: 34,6011           21224                           INDEX    NDXCTR                                
016212,000032: 34,6012           41204                           CS       GENPL      +68D                       
016213,000033: 34,6013           21224                           INDEX    NDXCTR                                
016214,000034: 34,6014           61212                           AD       GENPL      +74D                       
016215,000035: 34,6015           21224                           INDEX    NDXCTR                                
016216,000036: 34,6016           51212                           TS       GENPL      +74D                       
016217,000037: 34,6017           36235                           CAF      63DEC                                 
016218,000038: 34,6020           61224                           AD       NDXCTR                                
016219,000039: 34,6021           10000                           CCS      A                                     
016220,000040: 34,6022           44473                           CS       THREE                                 
016221,000041: 34,6023           61224                           AD       NDXCTR                                
016222,000042: 34,6024           06010                           TC       BBB                                   
016223,000043: 34,6025           51224        CCCC               TS       NDXCTR                                
016224,000044: 34,6026           04000                           TC       INTPRET                               
016225,000045: 34,6027           73576                           LXA,1    0                                     
016226,000046: 34,6030           01225                                    NDXCTR                                
016227,000047: 34,6031           44175                           DMOVE*   1                                     
016228,000048: 34,6032           66776                           DSU                                            
016229,000049: 34,6033           02421                                    GENPL      +72D,1                     
016230,000050: 34,6034           01101                                    GENPL                                 
016231,000051: 34,6035           36421                           STORE    GENPL      +72D,1                     
016232,000052: 34,6036           77576                           EXIT     0                                     
016233,000053: 34,6037           41224                           CS       NDXCTR                                
016234,000054: 34,6040           66236                           AD       69DEC                                 
016235,000055: 34,6041           10000                           CCS      A                                     
016236,000056: 34,6042           34473                           CAF      THREE                                 
016237,000057: 34,6043           61224                           AD       NDXCTR                                
016238,000058: 34,6044           06025                           TC       CCCC                                  
016239,000059: 34,6045           51100                           TS       GENPL                                 
016240,000060: 34,6046           51101                           TS       GENPL      +1                         
016241,000061: 34,6047           51312                           TS       RUN                                   
016242,000062: 34,6050           34473                           CAF      THREE                                 
016243,000063: 34,6051           51224        DDDD               TS       NDXCTR                                
016244,000064: 34,6052           04000                           TC       INTPRET                               
016245,000065: 34,6053           73576                           LXA,1    0                                     
016246,000066: 34,6054           01225                                    NDXCTR                                
016247,000067: 34,6055           66376                           DSU*     0                                     
016248,000068: 34,6056           02421                                    GENPL      +72D,1                     
016249,000069: 34,6057           02405                                    GENPL      +66D,1                     
016250,000070: 34,6060           47575                           NOLOD    1                                     

Page 427

016252,000072: 34,6061           56740                           TSRT     DAD*                                  
016253,000073: 34,6062           00002                                    1                                     
016254,000074: 34,6063           02405                                    GENPL      +66D,1                     
016255,000075: 34,6064           36421                           STORE    GENPL      +72D,1                     
016256,000076: 34,6065           47575                           NOLOD    1                                     
016257,000077: 34,6066           63742                           TSLT     DAD                                   
016258,000078: 34,6067           00003                                    2                                     
016259,000079: 34,6070           01521                                    OGC                                   
016260,000080: 34,6071           33521                           STORE    OGC                                   
016261,000081: 34,6072           44174                           DMOVE*   2                                     
016262,000082: 34,6073           63643                           TSLT     DSQ                                   
016263,000083: 34,6074           70776                           DAD                                            
016264,000084: 34,6075           02421                                    GENPL      +72D,1                     
016265,000085: 34,6076           00005                                    4                                     
016266,000086: 34,6077           01525                                    MGC                                   
016267,000087: 34,6100           33525                           STORE    MGC                                   
016268,000088: 34,6101           77576                           EXIT     0                                     
016269,000089: 34,6102           41312                           CS       RUN                                   
016270,000090: 34,6103           40000                           COM                                            
016271,000091: 34,6104           61224                           AD       NDXCTR                                
016272,000092: 34,6105           40000                           COM                                            
016273,000093: 34,6106           66235                           AD       63DEC                                 
016274,000094: 34,6107           10000                           CCS      A                                     
016275,000095: 34,6110           34475                           CAF      SIX                                   
016276,000096: 34,6111           61224                           AD       NDXCTR                                
016277,000097: 34,6112           06051                           TC       DDDD                                  
016278,000098: 34,6113           61312                           AD       RUN                                   
016279,000099: 34,6114           51224        EEEE               TS       NDXCTR                                
016280,000100: 34,6115           21224                           INDEX    NDXCTR                                
016281,000101: 34,6116           41113                           CS       GENPL      +11D                       
016282,000102: 34,6117           40000                           COM                                            
016283,000103: 34,6120           51572                           TS       TEMDELV                               
016284,000104: 34,6121           35501                           CAF      ZERO                                  
016285,000105: 34,6122           51573                           TS       TEMDELV    +1                         
016286,000106: 34,6123           04000                           TC       INTPRET                               
016287,000107: 34,6124           71576                           LXC,1    0                                     
016288,000108: 34,6125           01225                                    NDXCTR                                
016289,000109: 34,6126           45176                           DMOVE    0                                     
016290,000110: 34,6127           77777                                    -                                     
016291,000111: 34,6130           47574                           NOLOD    2                                     
016292,000112: 34,6131           63706                           TSLT     BDDV                                  
016293,000113: 34,6132           70776                           DAD                                            
016294,000114: 34,6133           00006                                    5                                     
016295,000115: 34,6134           01573                                    TEMDELV                               
016296,000116: 34,6135           01523                                    IGC                                   
016297,000117: 34,6136           33523                           STORE    IGC                                   
016298,000118: 34,6137           63775                           TSLT     1                                     
016299,000119: 34,6140           61776                           BDDV                                           
016300,000120: 34,6141           77777                                    -                                     
016301,000121: 34,6142           00004                                    3                                     

Page 428

016303,000123: 34,6143           01573                                    TEMDELV                               
016304,000124: 34,6144           44174                           DMOVE*   2                                     
016305,000125: 34,6145           63722                           TSLT     DMP                                   
016306,000126: 34,6146           70776                           DAD                                            
016307,000127: 34,6147           02223                                    GENPL      +9D,1                      
016308,000128: 34,6150           00005                                    4                                     
016309,000129: 34,6151           77777                                    -                                     
016310,000130: 34,6152           01101                                    GENPL                                 
016311,000131: 34,6153           33101                           STORE    GENPL                                 
016312,000132: 34,6154           77576                           EXIT     0                                     
016313,000133: 34,6155           41224                           CS       NDXCTR                                
016314,000134: 34,6156           66235                           AD       63DEC                                 
016315,000135: 34,6157           61312                           AD       RUN                                   
016316,000136: 34,6160           64341                           AD       NEG3                                  
016317,000137: 34,6161           10000                           CCS      A                                     
016318,000138: 34,6162           34475                           CAF      SIX                                   
016319,000139: 34,6163           61224                           AD       NDXCTR                                
016320,000140: 34,6164           06114                           TC       EEEE                                  
016321,000141: 34,6165           04000                           TC       INTPRET                               
016322,000142: 34,6166           64776                           DMP      0                                     
016323,000143: 34,6167           01521                                    OGC                                   
016324,000144: 34,6170           01101                                    GENPL                                 
016325,000145: 34,6171           64775                           DMP      1                                     
016326,000146: 34,6172           66776                           DSU                                            
016327,000147: 34,6173           01525                                    MGC                                   
016328,000148: 34,6174           01523                                    IGC                                   
016329,000149: 34,6175           51175                           DSQ      1                                     
016330,000150: 34,6176           56776                           TSRT                                           
016331,000151: 34,6177           01521                                    OGC                                   
016332,000152: 34,6200           00002                                    1                                     
016333,000153: 34,6201           63774                           TSLT     2                                     
016334,000154: 34,6202           64732                           DMP      DSU                                   
016335,000155: 34,6203           61722                           BDDV     DMP                                   
016336,000156: 34,6204           01312                                    PTS                                   
016337,000157: 34,6205           00012                                    11                                    
016338,000158: 34,6206           01525                                    MGC                                   
016339,000159: 34,6207           77777                                    -                                     
016340,000160: 34,6210           77777                                    -                                     
016341,000161: 34,6211           30234                                    K                                     
016342,000162: 34,6212           32622                           STORE    DSPTEM2                               
016343,000163: 34,6213           77576                           EXIT     0                                     
016344,000164: 34,6214           05654                           TC       BANKCALL                              
016345,000165: 34,6215           14000                           CADR     FLASHON                               
016346,000166: 34,6216           37730                           CAF      V06N66E                               
016347,000167: 34,6217           03100                           TC       NVSUB                                 
016348,000168: 34,6220           03315                           TC       PRENVBSY                              
016349,000169: 34,6221           03136                           TC       ENDIDLE                               
016350,000170: 34,6222           06237                           TC       ENDTEST1                              
016351,000171: 34,6223           34473                           CAF      THREE                                 
016352,000172: 34,6224           51312                           TS       RUN                                   

Page 429

016354,000174: 34,6225           05654                           TC       BANKCALL                              
016355,000175: 34,6226           25331                           CADR     OGCZERO                               
016356,000176: 34,6227           35501                           CAF      ZERO                                  
016357,000177: 34,6230           51100                           TS       GENPL                                 
016358,000178: 34,6231           51101                           TS       GENPL      +1                         
016359,000179: 34,6232           06051                           TC       DDDD                                  
016360,000180: 
016361,000181: 
016362,000182: 
016363,000183: 34,6233           02321 00000  K                  2DEC     1.233      E3         B-14            
016364,000184: 34,6235           00077        63DEC              DEC      63         B-14                       
016365,000185: 34,6236           00105        69DEC              DEC      69         B-14                       
016366,000186: 
016367,000187: 
016368,000188: 
016369,000189: 34,6237           05654        ENDTEST1           TC       BANKCALL                              
016370,000190: 34,6240           25406                           CADR     ENDTEST                               
016371,000191: 

Page 430

016373,000193: 
016374,000194: 34,6241           05706        FINDNAVB           TC       MAKECADR                              
016375,000195: 34,6242           51573                           TS       RETAA                                 
016376,000196: 34,6243           05654                           TC       BANKCALL                              
016377,000197: 34,6244           30453                           CADR     MKRELEAS                              
016378,000198: 34,6245           34516                           CAF      ONE                                   
016379,000199: 34,6246           50616                           TS       DSPTEM1                               
016380,000200: 34,6247           37731                           CAF      V01N30E                               #  MARK ON TARGET 1
016381,000201: 34,6250           03100                           TC       NVSUB                                 
016382,000202: 34,6251           03315                           TC       PRENVBSY                              
016383,000203: 34,6252           34516                           CAF      ONE                                   
016384,000204: 34,6253           05654                           TC       BANKCALL                              
016385,000205: 34,6254           30406                           CADR     SXTMARK                               
016386,000206: 34,6255           05654                           TC       BANKCALL                              
016387,000207: 34,6256           30327                           CADR     OPTSTALL                              
016388,000208: 34,6257           06237                           TC       ENDTEST1                              
016389,000209: 34,6260           20735                           INDEX    MARKSTAT                              
016390,000210: 34,6261           40000                           CS       0                                     
016391,000211: 34,6262           40000                           CS       A                                     
016392,000212: 34,6263           51302                           TS       VACADR                                #  TIME OF MARK
016393,000213: 34,6264           20735                           INDEX    MARKSTAT                              
016394,000214: 34,6265           40001                           CS       1                                     
016395,000215: 34,6266           40000                           CS       A                                     
016396,000216: 34,6267           51303                           TS       VACADR     +1                         
016397,000217: 34,6270           40735                           CS       MARKSTAT                              
016398,000218: 34,6271           51304                           TS       MKSTAT1                               
016399,000219: 34,6272           05654                           TC       BANKCALL                              
016400,000220: 34,6273           30453                           CADR     MKRELEAS                              
016401,000221: 34,6274           35503                           CAF      TWO                                   
016402,000222: 34,6275           50616                           TS       DSPTEM1                               
016403,000223: 34,6276           37731                           CAF      V01N30E                               #  MARK ON TARGET 4
016404,000224: 34,6277           03100                           TC       NVSUB                                 
016405,000225: 34,6300           03315                           TC       PRENVBSY                              
016406,000226: 34,6301           34516                           CAF      ONE                                   
016407,000227: 34,6302           05654                           TC       BANKCALL                              
016408,000228: 34,6303           30406                           CADR     SXTMARK                               
016409,000229: 34,6304           11305                           CCS      COAROFIN                              #  COARSE ALIGN OR FINE ALIGN MARKS
016410,000230: 34,6305           06374                           TC       CLGNMARK                              
016411,000231: 34,6306           41304                           CS       MKSTAT1                               
016412,000232: 34,6307           65503                           AD       TWO                                   
016413,000233: 34,6310           20067                           INDEX    FIXLOC                                
016414,000234: 34,6311           50050                           TS       S1                                    #  BASE ADDRESS GIMBAL ANGLES
016415,000235: 34,6312           04000                           TC       INTPRET                               #  OPT-NB-SM    TARGET 1
016416,000236: 34,6313           73576                           LXA,1    0                                     
016417,000237: 34,6314           01305                                    MKSTAT1                               
016418,000238: 34,6315           76776                           ITC      0                                     
016419,000239: 34,6316           04733                                    SXTNB                                 
016420,000240: 34,6317           44775                           VSLT     1                                     
016421,000241: 34,6320           76776                           ITC                                            
016422,000242: 34,6321           00041                                    STARM                                 
016423,000243: 34,6322           00001                                    0                                     

Page 431

016425,000245: 34,6323           04524                                    NBSM                                  
016426,000246: 34,6324           47576                           NOLOD    0                                     
016427,000247: 34,6325           33403                           STORE    STARAD                                
016428,000248: 34,6326           45176                           DMOVE    0                                     
016429,000249: 34,6327           01303                                    VACADR                                
016430,000250: 34,6330           33175                           STORE    TMARK                                 
016431,000251: 34,6331           77576                           EXIT     0                                     
016432,000252: 
016433,000253: 34,6332           04000        EARRTCOM           TC       INTPRET                               #  COMPENSATE BETWEEN FINE ALIGN MARKS
016434,000254: 34,6333           76776                           ITC      0                                     
016435,000255: 34,6334           30613                                    EARTHR                                
016436,000256: 34,6335           76776                           ITC      0                                     
016437,000257: 34,6336           30634                                    OUTGYR                                
016438,000258: 34,6337           77576                           EXIT     0                                     
016439,000259: 34,6340           05654                           TC       BANKCALL                              
016440,000260: 34,6341           30331                           CADR     IMUSTALL                              
016441,000261: 34,6342           06237                           TC       ENDTEST1                              
016442,000262: 34,6343           10734                           CCS      OPTCADR                               
016443,000263: 34,6344           06347                           TC       +3                                    
016444,000264: 34,6345           06332                           TC       EARRTCOM                              
016445,000265: 34,6346           06347                           TC       +1                                    
016446,000266: 34,6347           05654                           TC       BANKCALL                              
016447,000267: 34,6350           30327                           CADR     OPTSTALL                              
016448,000268: 34,6351           06237                           TC       ENDTEST1                              
016449,000269: 34,6352           35503                           CAF      TWO                                   
016450,000270: 34,6353           60735                           AD       MARKSTAT                              
016451,000271: 34,6354           20067                           INDEX    FIXLOC                                
016452,000272: 34,6355           50050                           TS       S1                                    #  BASE ADDRESS GIMBAL ANGLES
016453,000273: 34,6356           04000                           TC       INTPRET                               #  OPT-NB-SM    TARGET 4
016454,000274: 34,6357           71576                           LXC,1    0                                     
016455,000275: 34,6360           00736                                    MARKSTAT                              
016456,000276: 34,6361           76776                           ITC      0                                     
016457,000277: 34,6362           04733                                    SXTNB                                 
016458,000278: 34,6363           44775                           VSLT     1                                     
016459,000279: 34,6364           76776                           ITC                                            
016460,000280: 34,6365           00041                                    STARM                                 
016461,000281: 34,6366           00001                                    0                                     
016462,000282: 34,6367           04524                                    NBSM                                  
016463,000283: 34,6370           47576                           NOLOD    0                                     
016464,000284: 34,6371           33411                           STORE    STARAD     +6                         
016465,000285: 34,6372           76776                           ITC      0                                     
016466,000286: 34,6373           30421                                    MATXDET                               
016467,000287: 
016468,000288: 34,6374           04000        CLGNMARK           TC       INTPRET                               #  OPT-NB       TARGET 1
016469,000289: 34,6375           73576                           LXA,1    0                                     
016470,000290: 34,6376           01305                                    MKSTAT1                               
016471,000291: 34,6377           76776                           ITC      0                                     
016472,000292: 34,6400           04733                                    SXTNB                                 
016473,000293: 34,6401           75176                           VMOVE    0                                     
016474,000294: 34,6402           00041                                    STARM                                 

Page 432

016476,000296: 34,6403           33403                           STORE    STARAD                                
016477,000297: 34,6404           77576                           EXIT     0                                     
016478,000298: 34,6405           05654                           TC       BANKCALL                              
016479,000299: 34,6406           30327                           CADR     OPTSTALL                              
016480,000300: 34,6407           06237                           TC       ENDTEST1                              
016481,000301: 34,6410           04000                           TC       INTPRET                               #  OPT-NB       TARGET 4
016482,000302: 34,6411           71576                           LXC,1    0                                     
016483,000303: 34,6412           00736                                    MARKSTAT                              
016484,000304: 34,6413           76776                           ITC      0                                     
016485,000305: 34,6414           04733                                    SXTNB                                 
016486,000306: 34,6415           75176                           VMOVE    0                                     
016487,000307: 34,6416           00041                                    STARM                                 
016488,000308: 34,6417           33411                           STORE    STARAD     +6                         
016489,000309: 
016490,000310: 34,6420           75176        MATXDET            VMOVE    0                                     #  CALCULATE TRANSFORMATION MATRIX
016491,000311: 34,6421           01101                                    TAR1POS                               
016492,000312: 34,6422           32007                           STORE    6                                     
016493,000313: 34,6423           75176                           VMOVE    0                                     
016494,000314: 34,6424           01107                                    TAR1POS    +6                         
016495,000315: 34,6425           32015                           STORE    12D                                   
016496,000316: 34,6426           76776                           ITC      0                                     
016497,000317: 34,6427           04761                                    AXISGEN                               
016498,000318: 34,6430           75176                           VMOVE    0                                     
016499,000319: 34,6431           01477                                    XDC                                   
016500,000320: 34,6432           33403                           STORE    STARAD                                
016501,000321: 34,6433           75176                           VMOVE    0                                     
016502,000322: 34,6434           01505                                    YDC                                   
016503,000323: 34,6435           33411                           STORE    STARAD     +6                         
016504,000324: 34,6436           75176                           VMOVE    0                                     
016505,000325: 34,6437           01513                                    ZDC                                   
016506,000326: 34,6440           33417                           STORE    STARAD     +12D                       
016507,000327: 34,6441           77576                           EXIT     0                                     
016508,000328: 34,6442           31573                           XCH      RETAA                                 
016509,000329: 34,6443           05723                           TC       BANKJUMP                              
016510,000330: 

Page 433

016512,000332: 
016513,000333: 34,6444           05706        PUTPOSX            TC       MAKECADR                              
016514,000334: 34,6445           51573                           TS       RETAA                                 
016515,000335: 34,6446           04000                           TC       INTPRET                               
016516,000336: 34,6447           76776                           ITC      0                                     
016517,000337: 34,6450           04644                                    CALCGA                                
016518,000338: 34,6451           77576                           EXIT     0                                     
016519,000339: 34,6452           05654                           TC       BANKCALL                              
016520,000340: 34,6453           30104                           CADR     IMUCOARS                              #  INITIATE COARSE ALIGN MODE
016521,000341: 34,6454           05654                           TC       BANKCALL                              
016522,000342: 34,6455           30331                           CADR     IMUSTALL                              #  WAIT FOR IMUCOARS COMPLETION
016523,000343: 34,6456           06237                           TC       ENDTEST1                              
016524,000344: 34,6457           31573                           XCH      RETAA                                 
016525,000345: 34,6460           05723                           TC       BANKJUMP                              
016526,000346: 
016527,000347: 
016528,000348: 
016529,000349: 34,6461           05706        SMDCALC            TC       MAKECADR                              
016530,000350: 34,6462           51573                           TS       RETAA                                 
016531,000351: 34,6463           04000                           TC       INTPRET                               
016532,000352: 34,6464           52775                           MXV      1                                     
016533,000353: 34,6465           44776                           VSLT                                           
016534,000354: 34,6466           01425                                    XSM                                   
016535,000355: 34,6467           01403                                    STARAD                                
016536,000356: 34,6470           00002                                    1                                     
016537,000357: 34,6471           33477                           STORE    XDC                                   
016538,000358: 34,6472           52775                           MXV      1                                     
016539,000359: 34,6473           44776                           VSLT                                           
016540,000360: 34,6474           01433                                    YSM                                   
016541,000361: 34,6475           01403                                    STARAD                                
016542,000362: 34,6476           00002                                    1                                     
016543,000363: 34,6477           33505                           STORE    YDC                                   
016544,000364: 34,6500           41775                           VXV      1                                     
016545,000365: 34,6501           44776                           VSLT                                           
016546,000366: 34,6502           01477                                    XDC                                   
016547,000367: 34,6503           01505                                    YDC                                   
016548,000368: 34,6504           00002                                    1                                     
016549,000369: 34,6505           33513                           STORE    ZDC                                   
016550,000370: 34,6506           76776                           ITC      0                                     
016551,000371: 34,6507           04353                                    CALCGTA                               
016552,000372: 34,6510           76776                           ITC      0                                     
016553,000373: 34,6511           30634                                    OUTGYR                                
016554,000374: 34,6512           77576                           EXIT     0                                     
016555,000375: 34,6513           31573                           XCH      RETAA                                 
016556,000376: 34,6514           05723                           TC       BANKJUMP                              
016557,000377: 

Page 434

016559,000379: 
016560,000380: 34,6515           05706        LATAZCHK           TC       MAKECADR                              
016561,000381: 34,6516           51573                           TS       RETAA                                 
016562,000382: 34,6517           04000                           TC       INTPRET                               #  CHECK LATITUDE AND NAVBASE AZIMUTH
016563,000383: 34,6520           63776                           TSLT     0                                     
016564,000384: 34,6521           01315                                    LATITUDE                              
016565,000385: 34,6522           00003                                    2                                     
016566,000386: 34,6523           32620                           STORE    DSPTEM1    +1                         
016567,000387: 34,6524           45175                           DMOVE    1                                     
016568,000388: 34,6525           76575                           RTB      EXIT                                  
016569,000389: 34,6526           01317                                    AZIMUTH                               
016570,000390: 34,6527           20325                                    1STO2S                                
016571,000391: 34,6530           30115                           XCH      MPAC                                  
016572,000392: 34,6531           50616                           TS       DSPTEM1                               
016573,000393: 34,6532           05654                           TC       BANKCALL                              
016574,000394: 34,6533           25153                           CADR     LATAZCK1                              
016575,000395: 
016576,000396: 34,6534           04000                           TC       INTPRET                               
016577,000397: 34,6535           43175                           SMOVE    1                                     
016578,000398: 34,6536           76576                           RTB                                            
016579,000399: 34,6537           00617                                    DSPTEM1                               
016580,000400: 34,6540           20304                                    CDULOGIC                              
016581,000401: 34,6541           33317                           STORE    AZIMUTH                               
016582,000402: 34,6542           43175                           SMOVE    1                                     
016583,000403: 34,6543           56776                           TSRT                                           
016584,000404: 34,6544           00620                                    DSPTEM1    +1                         
016585,000405: 34,6545           00003                                    2                                     
016586,000406: 34,6546           33315                           STORE    LATITUDE                              
016587,000407: 34,6547           77576                           EXIT     0                                     
016588,000408: 34,6550           31573                           XCH      RETAA                                 
016589,000409: 34,6551           05723                           TC       BANKJUMP                              
016590,000410: 

Page 435

016592,000412: 
016593,000413: 34,6552           04000        TARGSM             TC       INTPRET                               
016594,000414: 34,6553           76776                           ITC      0                                     
016595,000415: 34,6554           31755                                    ERTHRVEN                              
016596,000416: 34,6555           76776                           ITC      0                                     
016597,000417: 34,6556           03475                                    PROCTARG                              
016598,000418: 34,6557           75176                           VMOVE    0                                     
016599,000419: 34,6560           01403                                    TARGET1                               
016600,000420: 34,6561           33101                           STORE    TAR1POS                               
016601,000421: 34,6562           75176                           VMOVE    0                                     
016602,000422: 34,6563           01411                                    TARGET1    +6                         
016603,000423: 34,6564           33107                           STORE    TAR1POS    +6                         
016604,000424: 34,6565           76776                           ITC      0                                     
016605,000425: 34,6566           03446                                    MAKEXSM                               
016606,000426: 34,6567           77576                           EXIT     0                                     
016607,000427: 34,6570           05654                           TC       BANKCALL                              
016608,000428: 34,6571           24050                           CADR     POSLOAD                               
016609,000429: 

Page 436

016611,000431: 
016612,000432: 34,6572           76576        ALGNINIT           RTB      0                                     
016613,000433: 34,6573           20271                                    ZEROVAC                               
016614,000434: 34,6574           45176                           DMOVE    0                                     
016615,000435: 34,6575           05174                                    ZERODP                                
016616,000436: 34,6576           55175                           COS      1                                     
016617,000437: 34,6577           47176                           COMP                                           
016618,000438: 34,6600           01315                                    LATITUDE                              
016619,000439: 34,6601           57175                           SIN      1                                     
016620,000440: 34,6602           41166                           VDEF     VXSC                                  #  (SIN,-COS,0)
016621,000441: 34,6603           01315                                    LATITUDE                              
016622,000442: 34,6604           31733                                    OMEG/MS                               
016623,000443: 34,6605           33177                           STORE    VMARK                                 
016624,000444: 34,6606           76576                           RTB      0                                     
016625,000445: 34,6607           20253                                    LOADTIME                              
016626,000446: 34,6610           33175                           STORE    TMARK                                 
016627,000447: 34,6611           40576                           ITCQ     0                                     
016628,000448: 

Page 437

016630,000450: 
016631,000451: 34,6612           76576        EARTHR             RTB      0                                     
016632,000452: 34,6613           20253                                    LOADTIME                              
016633,000453: 34,6614           32051                           STORE    S1                                    
016634,000454: 34,6615           47573                           NOLOD    3                                     
016635,000455: 34,6616           66716                           DSU      TSLT                                  
016636,000456: 34,6617           75652                           VXSC     MXV                                   
016637,000457: 34,6620           50776                           VAD                                            
016638,000458: 34,6621           01175                                    TMARK                                 
016639,000459: 34,6622           00013                                    10D                                   
016640,000460: 34,6623           01177                                    VMARK                                 
016641,000461: 34,6624           01425                                    XSM                                   
016642,000462: 34,6625           01521                                    OGC                                   
016643,000463: 34,6626           33521                           STORE    OGC                                   
016644,000464: 34,6627           45176                           DMOVE    0                                     
016645,000465: 34,6630           00051                                    S1                                    
016646,000466: 34,6631           33175                           STORE    TMARK                                 
016647,000467: 34,6632           40576                           ITCQ     0                                     
016648,000468: 

Page 438

016650,000470: 
016651,000471: 34,6633           75575        OUTGYR             AXT,1    1                                     
016652,000472: 34,6634           55561                           AST,1    AXT,2                                 
016653,000473: 34,6635           00007                                    6                                     
016654,000474: 34,6636           00003                                    2                                     
016655,000475: 34,6637           00001                                    0                                     
016656,000476: 34,6640           56376        OUTGYR1            TSRT*    0                                     
016657,000477: 34,6641           03255                                    OGC        +6,1                       
016658,000478: 34,6642           00022                                    8D,2                                  
016659,000479: 34,6643           36505                           STORE    GYROD      +6,1                       
016660,000480: 34,6644           63375                           TSLT*    1                                     
016661,000481: 34,6645           65376                           BDSU*                                          
016662,000482: 34,6646           02505                                    GYROD      +6,1                       
016663,000483: 34,6647           00022                                    8D,2                                  
016664,000484: 34,6650           03255                                    OGC        +6,1                       
016665,000485: 34,6651           37255                           STORE    OGC        +6,1                       
016666,000486: 34,6652           51576                           TIX,1    0                                     
016667,000487: 34,6653           30641                                    OUTGYR1                               
016668,000488: 34,6654           75575                           AXT,1    1                                     
016669,000489: 34,6655           76401                           RTB      ITCQ                                  
016670,000490: 34,6656           01235                                    GYROD                                 
016671,000491: 34,6657           20376                                    PULSEIMU                              
016672,000492: 
016673,000493: 
016674,000494: 
016675,000495: 
016676,000496: 
016677,000497: 
016678,000498: 34,6660           05706        STORRSLT           TC       MAKECADR                              
016679,000499: 34,6661           51573                           TS       RETAA                                 
016680,000500: 34,6662           04000                           TC       INTPRET                               
016681,000501: 34,6663           71576                           LXC,1    0                                     
016682,000502: 34,6664           01225                                    NDXCTR                                
016683,000503: 34,6665           47574                           NOLOD    2                                     
016684,000504: 34,6666           63722                           TSLT     DMP                                   
016685,000505: 34,6667           76576                           RTB                                            
016686,000506: 34,6670           00011                                    8D                                    
016687,000507: 34,6671           31735                                    SCALFTR                               
016688,000508: 34,6672           20404                                    SGNAGREE                              
016689,000509: 34,6673           36201                           STORE    GENPL,1                               
016690,000510: 34,6674           77576                           EXIT     0                                     
016691,000511: 34,6675           31230                           XCH      STOREPL                               
016692,000512: 34,6676           21224                           INDEX    NDXCTR                                
016693,000513: 34,6677           51102                           TS       GENPL      +2                         
016694,000514: 34,6700           41224                           CS       NDXCTR                                
016695,000515: 34,6701           61307                           AD       MAXPTS2                               
016696,000516: 34,6702           10000                           CCS      A                                     
016697,000517: 34,6703           34473                           CAF      THREE                                 
016698,000518: 34,6704           61224                           AD       NDXCTR                                
016699,000519: 34,6705           06711                           TC       +4                                    
016700,000520: 34,6706           11313                           CCS      EROPTN                                

Page 439

016702,000522: 34,6707           06237                           TC       ENDTEST1                              
016703,000523: 34,6710           06000                           TC       MISALIGN                              
016704,000524: 

Page 440

016706,000526: 
016707,000527: 34,6711           51224                           TS       NDXCTR                                
016708,000528: 34,6712           31573                           XCH      RETAA                                 
016709,000529: 34,6713           05723                           TC       BANKJUMP                              
016710,000530: 

Page 441

016712,000532: 
016713,000533: 34,6714           75575        TJLAL              AXT,1    1                                     
016714,000534: 34,6715           55576                           AST,1                                          
016715,000535: 34,6716           00007                                    6                                     
016716,000536: 34,6717           00003                                    2                                     
016717,000537: 34,6720           66375        TJLAL1             DSU*     1                                     
016718,000538: 34,6721           64740                           DMP      DAD*                                  
016719,000539: 34,6722           02017                                    DELVX      +6,1                       
016720,000540: 34,6723           02245                                    FILDELX    +6,1                       
016721,000541: 34,6724           31751                                    VRECTC3                               
016722,000542: 34,6725           02245                                    FILDELX    +6,1                       
016723,000543: 34,6726           36245                           STORE    FILDELX    +6,1                       
016724,000544: 34,6727           51576                           TIX,1    0                                     
016725,000545: 34,6730           30721                                    TJLAL1                                
016726,000546: 34,6731           40576                           ITCQ     0                                     
016727,000547: 

Page 442

016729,000549: 
016730,000550: 34,6732           35503        FALNE1             CAF      TWO                                   
016731,000551: 34,6733           67740                           AD       FLNDX                                 
016732,000552: 34,6734           20067                           INDEX    FIXLOC                                
016733,000553: 34,6735           50050                           TS       S1                                    
016734,000554: 34,6736           04000                           TC       INTPRET                               
016735,000555: 34,6737           52775                           MXV      1                                     
016736,000556: 34,6740           44772                           VSLT     ITC                                   
016737,000557: 34,6741           01425                                    XSM                                   
016738,000558: 34,6742           01403                                    STARAD                                
016739,000559: 34,6743           00002                                    1                                     
016740,000560: 34,6744           04524                                    NBSM                                  
016741,000561: 34,6745           47576                           NOLOD    0                                     
016742,000562: 34,6746           33477                           STORE    XDC                                   
016743,000563: 34,6747           52775                           MXV      1                                     
016744,000564: 34,6750           44772                           VSLT     ITC                                   
016745,000565: 34,6751           01433                                    YSM                                   
016746,000566: 34,6752           01403                                    STARAD                                
016747,000567: 34,6753           00002                                    1                                     
016748,000568: 34,6754           04524                                    NBSM                                  
016749,000569: 34,6755           47576                           NOLOD    0                                     
016750,000570: 34,6756           33505                           STORE    YDC                                   
016751,000571: 34,6757           41775                           VXV      1                                     
016752,000572: 34,6760           44776                           VSLT                                           
016753,000573: 34,6761           01477                                    XDC                                   
016754,000574: 34,6762           01505                                    YDC                                   
016755,000575: 34,6763           00002                                    1                                     
016756,000576: 34,6764           33513                           STORE    ZDC                                   
016757,000577: 34,6765           76776                           ITC      0                                     
016758,000578: 34,6766           04353                                    CALCGTA                               
016759,000579: 34,6767           76776                           ITC      0                                     
016760,000580: 34,6770           30634                                    OUTGYR                                
016761,000581: 34,6771           77576                           EXIT     0                                     
016762,000582: 34,6772           05654                           TC       BANKCALL                              
016763,000583: 34,6773           30331                           CADR     IMUSTALL                              
016764,000584: 34,6774           06237                           TC       ENDTEST1                              
016765,000585: 34,6775           05654                           TC       BANKCALL                              
016766,000586: 34,6776           24600                           CADR     FALNED                                
016767,000587: 

Page 443

016769,000589: 
016770,000590: 34,6777           47575        VERTRECT           NOLOD    1                                     
016771,000591: 34,7000           51622                           VXM      VSLT                                  
016772,000592: 34,7001           01425                                    XSM                                   
016773,000593: 34,7002           00002                                    1                                     
016774,000594: 34,7003           32001                           STORE    0                                     
016775,000595: 34,7004           45176                           DMOVE    0                                     
016776,000596: 34,7005           00043                                    VAC        +2                         
016777,000597: 34,7006           47176                           COMP     0                                     
016778,000598: 34,7007           00045                                    VAC        +4                         
016779,000599: 34,7010           43175                           SMOVE    1                                     
016780,000600: 34,7011           41176                           VDEF                                           
016781,000601: 34,7012           05174                                    ZERODP                                
016782,000602: 34,7013           47575                           NOLOD    1                                     
016783,000603: 34,7014           75622                           VXSC     VSLT                                  
016784,000604: 34,7015           31737                                    INTCON1                               
016785,000605: 34,7016           00002                                    1                                     
016786,000606: 34,7017           74773                           VSU      3                                     
016787,000607: 34,7020           71766                           BOV      VXSC                                  
016788,000608: 34,7021           44642                           VSLT     VAD                                   
016789,000609: 34,7022           52642                           MXV      VAD                                   
016790,000610: 34,7023           00001                                    0                                     
016791,000611: 34,7024           00023                                    18D                                   
016792,000612: 34,7025           31037                                    ERECTND                               
016793,000613: 34,7026           31737                                    INTCON1                               
016794,000614: 34,7027           00002                                    1                                     
016795,000615: 34,7030           77777                                    -                                     
016796,000616: 34,7031           01425                                    XSM                                   
016797,000617: 34,7032           01521                                    OGC                                   
016798,000618: 34,7033           33521                           STORE    OGC                                   
016799,000619: 34,7034           75176                           VMOVE    0                                     
016800,000620: 34,7035           32023                           STORE    18D                                   
016801,000621: 34,7036           40576        ERECTND            ITCQ     0                                     
016802,000622: 

Page 444

016804,000624: 
016805,000625: 34,7037           21223        POSNJUMP           INDEX    POSITON                               
016806,000626: 34,7040           07041                           TC       +1                                    
016807,000627: 34,7041           06237                           TC       ENDTEST1                              
016808,000628: 34,7042           07050                           TC       POS1                                  
016809,000629: 34,7043           07055                           TC       POS2                                  
016810,000630: 34,7044           07075                           TC       POS3                                  
016811,000631: 34,7045           07121                           TC       POS4                                  
016812,000632: 34,7046           05654                           TC       BANKCALL                              
016813,000633: 34,7047           24076                           CADR     POSNRETN                              
016814,000634: 
016815,000635: 34,7050           44516        POS1               CS       ONE                                   
016816,000636: 34,7051           51226                           TS       PIPNDX                                
016817,000637: 34,7052           45503                           CS       TWO                                   
016818,000638: 34,7053           51227                           TS       PIPNDX     +1                         
016819,000639: 34,7054           07046                           TC       POS1       -2                         
016820,000640: 
016821,000641: 
016822,000642: 
016823,000643: 34,7055           04000        POS2               TC       INTPRET                               
016824,000644: 34,7056           75175                           VMOVE    1                                     
016825,000645: 34,7057           47176                           COMP                                           
016826,000646: 34,7060           01425                                    XSM                                   
016827,000647: 34,7061           75176                           VMOVE    0                                     
016828,000648: 34,7062           01441                                    ZSM                                   
016829,000649: 34,7063           33425                           STORE    XSM                                   
016830,000650: 34,7064           75176                           VMOVE    0                                     
016831,000651: 34,7065           77777                                    -                                     
016832,000652: 34,7066           33441                           STORE    ZSM                                   
016833,000653: 34,7067           77576                           EXIT     0                                     
016834,000654: 34,7070           45501                           CS       ZERO                                  
016835,000655: 34,7071           51226                           TS       PIPNDX                                
016836,000656: 34,7072           44516                           CS       ONE                                   
016837,000657: 34,7073           51227                           TS       PIPNDX     +1                         
016838,000658: 34,7074           07046                           TC       POS1       -2                         
016839,000659: 
016840,000660: 
016841,000661: 
016842,000662: 34,7075           04000        POS3               TC       INTPRET                               
016843,000663: 34,7076           75176                           VMOVE    0                                     
016844,000664: 34,7077           01425                                    XSM                                   
016845,000665: 34,7100           75176                           VMOVE    0                                     
016846,000666: 34,7101           01441                                    ZSM                                   
016847,000667: 34,7102           75176                           VMOVE    0                                     
016848,000668: 34,7103           01433                                    YSM                                   
016849,000669: 34,7104           33441                           STORE    ZSM                                   
016850,000670: 34,7105           75176                           VMOVE    0                                     
016851,000671: 34,7106           77777                                    -                                     
016852,000672: 34,7107           33425                           STORE    XSM                                   
016853,000673: 34,7110           75176                           VMOVE    0                                     
016854,000674: 34,7111           77777                                    -                                     

Page 445

016856,000676: 34,7112           33433                           STORE    YSM                                   
016857,000677: 34,7113           77576                           EXIT     0                                     
016858,000678: 34,7114           45501                           CS       ZERO                                  
016859,000679: 34,7115           51226                           TS       PIPNDX                                
016860,000680: 34,7116           45503                           CS       TWO                                   
016861,000681: 34,7117           51227                           TS       PIPNDX     +1                         
016862,000682: 34,7120           07046                           TC       POS1       -2                         
016863,000683: 

Page 446

016865,000685: 
016866,000686: 34,7121           04000        POS4               TC       INTPRET                               
016867,000687: 34,7122           41775                           VXV      1                                     
016868,000688: 34,7123           73176                           UNIT                                           
016869,000689: 34,7124           01433                                    YSM                                   
016870,000690: 34,7125           01441                                    ZSM                                   
016871,000691: 34,7126           33425                           STORE    XSM                                   
016872,000692: 34,7127           77576                           EXIT     0                                     
016873,000693: 34,7130           07046                           TC       POS1       -2                         
016874,000694: 
016875,000695: 
016876,000696: 
016877,000697: 34,7131           37741        NBPOSPL            CAF      MTRXLD                                
016878,000698: 34,7132           50034                           TS       OVCTR                                 #  ZERO STARAD
016879,000699: 34,7133           35501                           CAF      ZERO                                  
016880,000700: 34,7134           20034                           INDEX    OVCTR                                 
016881,000701: 34,7135           51402                           TS       STARAD                                
016882,000702: 34,7136           10034                           CCS      OVCTR                                 
016883,000703: 34,7137           07132                           TC       NBPOSPL    +1                         
016884,000704: 
016885,000705: 34,7140           04000                           TC       INTPRET                               #  SETS UP AZIMUTH AND VERTICAL VECTORS
016886,000706: 34,7141           76576                           RTB      0                                     #  FOR AXISGEN,RESULTS TO BE USED IN CALCGA
016887,000707: 34,7142           20271                                    ZEROVAC                               #  TO COMPUTE COARSE ALIGN ANGLES
016888,000708: 34,7143           53575                           AXC,1    1                                     
016889,000709: 34,7144           57557                           XSU,1    VMOVE*                                
016890,000710: 34,7145           31671                                    SCNBAZ                                
016891,000711: 34,7146           01232                                    NBPOS                                 
016892,000712: 34,7147           00001                                    0,1                                   
016893,000713: 34,7150           33403                           STORE    STARAD                                #  AZIMUTH IN NB COORDS
016894,000714: 34,7151           53575                           AXC,1    1                                     
016895,000715: 34,7152           57557                           XSU,1    VMOVE*                                
016896,000716: 34,7153           31711                                    SCNBVER                               
016897,000717: 34,7154           01232                                    NBPOS                                 
016898,000718: 34,7155           00001                                    0,1                                   
016899,000719: 34,7156           33411                           STORE    STARAD     +6                         #  VERTICAL IN NB COORDS
016900,000720: 34,7157           55175                           COS      1                                     
016901,000721: 34,7160           47176                           COMP                                           
016902,000722: 34,7161           01317                                    AZIMUTH                               
016903,000723: 34,7162           32011                           STORE    8D                                    
016904,000724: 
016905,000725: 34,7163           57176                           SIN      0                                     
016906,000726: 34,7164           01317                                    AZIMUTH                               
016907,000727: 34,7165           32013                           STORE    10D                                   #  AZIMUTH IN CER
016908,000728: 34,7166           75176                           VMOVE    0                                     
016909,000729: 34,7167           31717                                    LABNBVER                              
016910,000730: 34,7170           32015                           STORE    12D                                   #   VERTICAL IN CER
016911,000731: 34,7171           76776                           ITC      0                                     
016912,000732: 34,7172           04761                                    AXISGEN                               
016913,000733: 
016914,000734: 34,7173           75176                           VMOVE    0                                     
016915,000735: 34,7174           01477                                    XDC                                   

Page 447

016917,000737: 34,7175           33403                           STORE    STARAD                                
016918,000738: 
016919,000739: 34,7176           75176                           VMOVE    0                                     
016920,000740: 34,7177           01505                                    YDC                                   
016921,000741: 34,7200           33411                           STORE    STARAD     +6                         
016922,000742: 
016923,000743: 34,7201           75176                           VMOVE    0                                     
016924,000744: 34,7202           01513                                    ZDC                                   
016925,000745: 34,7203           33417                           STORE    STARAD     +12D                       
016926,000746: 34,7204           77576                           EXIT     0                                     
016927,000747: 34,7205           05654                           TC       BANKCALL                              
016928,000748: 34,7206           25513                           CADR     POSSET                                
016929,000749: 

Page 448

016931,000751: 
016932,000752: 34,7207           11232        RESULTS            CCS      TESTNDX                               
016933,000753: 34,7210           07241                           TC       CDUCALC                               
016934,000754: 34,7211           07260                           TC       PIPCALC                               
016935,000755: 34,7212           07241                           TC       CDUCALC                               
016936,000756: 34,7213           41246        SFCALC             CS       DATAPL     +4                         
016937,000757: 34,7214           61252                           AD       DATAPL     +8D                        
016938,000758: 34,7215           51242                           TS       DATAPL                                
016939,000759: 
016940,000760: 34,7216           04000                           TC       INTPRET                               
016941,000761: 34,7217           54775                           TSU      1                                     
016942,000762: 34,7220           63631                           TSLT     ROUND                                 
016943,000763: 34,7221           01254                                    DATAPL     +9D                        
016944,000764: 34,7222           01250                                    DATAPL     +5                         
016945,000765: 34,7223           00017                                    14D                                   
016946,000766: 34,7224           43174                           SMOVE    2                                     
016947,000767: 34,7225           64712                           DMP      DDV                                   
016948,000768: 34,7226           76576                           RTB                                            
016949,000769: 34,7227           01243                                    DATAPL                                
016950,000770: 34,7230           31743                                    DC585                                 
016951,000771: 34,7231           00001                                    0                                     
016952,000772: 34,7232           20404                                    SGNAGREE                              
016953,000773: 34,7233           32622                           STORE    DSPTEM2                               
016954,000774: 34,7234           77576                           EXIT     0                                     
016955,000775: 34,7235           03302                           TC       GRABDSP                               
016956,000776: 34,7236           03310                           TC       PREGBSY                               
016957,000777: 34,7237           05654                           TC       BANKCALL                              
016958,000778: 34,7240           25256                           CADR     FINISH                                
016959,000779: 

Page 449

016961,000781: 
016962,000782: 34,7241           04000        CDUCALC            TC       INTPRET                               
016963,000783: 34,7242           66774                           DSU      2                                     
016964,000784: 34,7243           61722                           BDDV     DMP                                   
016965,000785: 34,7244           76576                           RTB                                            
016966,000786: 34,7245           01245                                    DATAPL     +2                         
016967,000787: 34,7246           01243                                    DATAPL                                
016968,000788: 34,7247           01215                                    GENPL      +76D                       
016969,000789: 34,7250           31745                                    ERUNITS                               #  2DEC.66666
016970,000790: 34,7251           20404                                    SGNAGREE                              
016971,000791: 34,7252           32622                           STORE    DSPTEM2                               
016972,000792: 34,7253           77576                           EXIT     0                                     
016973,000793: 
016974,000794: 34,7254           03302                           TC       GRABDSP                               
016975,000795: 34,7255           03310                           TC       PREGBSY                               
016976,000796: 34,7256           05654                           TC       BANKCALL                              
016977,000797: 34,7257           25256                           CADR     FINISH                                
016978,000798: 

Page 450

016980,000800: 
016981,000801: 34,7260           04000        PIPCALC            TC       INTPRET                               
016982,000802: 34,7261           76576                           RTB      0                                     
016983,000803: 34,7262           20265                                    FRESHPD                               
016984,000804: 34,7263           54775                           TSU      1                                     
016985,000805: 34,7264           63631                           TSLT     ROUND                                 
016986,000806: 34,7265           01105                                    GENPL      +4                         
016987,000807: 34,7266           01244                                    DATAPL     +1                         
016988,000808: 34,7267           00014                                    11D                                   
016989,000809: 34,7270           51176                           DSQ      0                                     
016990,000810: 34,7271           00001                                    0                                     #  T1(2) IN 2,3
016991,000811: 34,7272           64775                           DMP      1                                     
016992,000812: 34,7273           41176                           VDEF                                           
016993,000813: 34,7274           00001                                    0                                     
016994,000814: 34,7275           00003                                    2                                     
016995,000815: 34,7276           33132                           STORE    GENPL      +25D                       
016996,000816: 34,7277           54775                           TSU      1                                     
016997,000817: 34,7300           63631                           TSLT     ROUND                                 
016998,000818: 34,7301           01112                                    GENPL      +9D                        
016999,000819: 34,7302           01244                                    DATAPL     +1                         
017000,000820: 34,7303           00014                                    11D                                   
017001,000821: 34,7304           51176                           DSQ      0                                     
017002,000822: 34,7305           00001                                    0                                     
017003,000823: 34,7306           64775                           DMP      1                                     #  T2(2) IN 6
017004,000824: 34,7307           41176                           VDEF                                           
017005,000825: 34,7310           00001                                    0                                     
017006,000826: 34,7311           00003                                    2                                     
017007,000827: 34,7312           33140                           STORE    GENPL      +31D                       
017008,000828: 34,7313           54775                           TSU      1                                     
017009,000829: 34,7314           63631                           TSLT     ROUND                                 
017010,000830: 34,7315           01117                                    GENPL      +14D                       
017011,000831: 34,7316           01244                                    DATAPL     +1D                        
017012,000832: 34,7317           00014                                    11D                                   
017013,000833: 34,7320           51176                           DSQ      0                                     
017014,000834: 34,7321           00001                                    0                                     
017015,000835: 34,7322           64775                           DMP      1                                     
017016,000836: 34,7323           41176                           VDEF                                           
017017,000837: 34,7324           00001                                    0                                     
017018,000838: 34,7325           00003                                    2                                     
017019,000839: 34,7326           33146                           STORE    GENPL      +37D                       
017020,000840: 34,7327           41775                           VXV      1                                     
017021,000841: 34,7330           42776                           DOT                                            
017022,000842: 34,7331           01140                                    GENPL      +31D                       
017023,000843: 34,7332           01146                                    GENPL      +37D                       
017024,000844: 34,7333           01132                                    GENPL      +25D                       
017025,000845: 34,7334           33156                           STORE    GENPL      +45D                       #  D2
017026,000846: 34,7335           45176                           DMOVE    0                                     
017027,000847: 34,7336           01110                                    GENPL      +7                         
017028,000848: 34,7337           33132                           STORE    GENPL      +25D                       
017029,000849: 34,7340           45176                           DMOVE    0                                     
017030,000850: 34,7341           01115                                    GENPL      +12D                       

Page 451

017032,000852: 34,7342           33140                           STORE    GENPL      +31D                       
017033,000853: 34,7343           45176                           DMOVE    0                                     
017034,000854: 34,7344           01122                                    GENPL      +17D                       
017035,000855: 34,7345           33146                           STORE    GENPL      +37D                       
017036,000856: 34,7346           41774                           VXV      2                                     
017037,000857: 34,7347           42712                           DOT      DDV                                   
017038,000858: 34,7350           64771                           DMP      RTB                                   
017039,000859: 34,7351           01140                                    GENPL      +31D                       
017040,000860: 34,7352           01146                                    GENPL      +37D                       
017041,000861: 34,7353           01132                                    GENPL      +25D                       
017042,000862: 34,7354           01156                                    GENPL      +45D                       
017043,000863: 34,7355           31747                                    ERUNITS2                              
017044,000864: 34,7356           20404                                    SGNAGREE                              
017045,000865: 34,7357           32622                           STORE    DSPTEM2                               
017046,000866: 34,7360           77576                           EXIT     0                                     
017047,000867: 34,7361           03302                           TC       GRABDSP                               
017048,000868: 34,7362           03310                           TC       PREGBSY                               
017049,000869: 34,7363           05654                           TC       BANKCALL                              
017050,000870: 34,7364           25256                           CADR     FINISH                                
017051,000871: 

Page 452

017053,000873: 
017054,000874: 34,7365           04000        CHKCALC            TC       INTPRET                               
017055,000875: 34,7366           76575                           RTB      1                                     
017056,000876: 34,7367           76576                           RTB                                            
017057,000877: 34,7370           20271                                    ZEROVAC                               
017058,000878: 34,7371           20265                                    FRESHPD                               
017059,000879: 34,7372           54775                           TSU      1                                     
017060,000880: 34,7373           63631                           TSLT     ROUND                                 
017061,000881: 34,7374           01264                                    DATAPL     +17D                       
017062,000882: 34,7375           01245                                    DATAPL     +2                         
017063,000883: 34,7376           00015                                    12D                                   
017064,000884: 34,7377           66774                           DSU      2                                     
017065,000885: 34,7400           63722                           TSLT     DMP                                   
017066,000886: 34,7401           62776                           DDV                                            
017067,000887: 34,7402           01262                                    DATAPL     +15D                       
017068,000888: 34,7403           01243                                    DATAPL                                
017069,000889: 34,7404           00015                                    12D                                   
017070,000890: 34,7405           31743                                    DC585                                 #  GZ IN 0,1
017071,000891: 34,7406           54775                           TSU      1                                     
017072,000892: 34,7407           63631                           TSLT     ROUND                                 
017073,000893: 34,7410           01271                                    DATAPL     +22D                       
017074,000894: 34,7411           01252                                    DATAPL     +7                         
017075,000895: 34,7412           00015                                    12D                                   
017076,000896: 34,7413           66774                           DSU      2                                     
017077,000897: 34,7414           63722                           TSLT     DMP                                   
017078,000898: 34,7415           62776                           DDV                                            
017079,000899: 34,7416           01267                                    DATAPL     +20D                       
017080,000900: 34,7417           01250                                    DATAPL     +5                         
017081,000901: 34,7420           00015                                    12D                                   
017082,000902: 34,7421           31743                                    DC585                                 #  GY IN 2,3
017083,000903: 34,7422           54775                           TSU      1                                     
017084,000904: 34,7423           63631                           TSLT     ROUND                                 
017085,000905: 34,7424           01276                                    DATAPL     +27D                       
017086,000906: 34,7425           01257                                    DATAPL     +12D                       
017087,000907: 34,7426           00015                                    12D                                   
017088,000908: 34,7427           33216                           STORE    TESTTIME                              
017089,000909: 34,7430           66774                           DSU      2                                     
017090,000910: 34,7431           63722                           TSLT     DMP                                   
017091,000911: 34,7432           62603                           DDV      VDEF                                  
017092,000912: 34,7433           01274                                    DATAPL     +25D                       
017093,000913: 34,7434           01255                                    DATAPL     +10D                       
017094,000914: 34,7435           00015                                    12D                                   
017095,000915: 34,7436           31743                                    DC585                                 
017096,000916: 34,7437           01216                                    TESTTIME                              #  G IN 0,1,2,3,4,5
017097,000917: 34,7440           71175                           ABVAL    1                                     
017098,000918: 34,7441           63771                           TSLT     RTB                                   
017099,000919: 34,7442           00001                                    0                                     
017100,000920: 34,7443           00002                                    1                                     
017101,000921: 34,7444           20404                                    SGNAGREE                              
017102,000922: 34,7445           32622                           STORE    DSPTEM2                               
017103,000923: 34,7446           77576                           EXIT     0                                     

Page 453

017105,000925: 34,7447           03302                           TC       GRABDSP                               
017106,000926: 34,7450           03310                           TC       PREGBSY                               
017107,000927: 34,7451           05654                           TC       BANKCALL                              
017108,000928: 34,7452           25205                           CADR     SHOW                                  
017109,000929: 
017110,000930: 34,7453           04000                           TC       INTPRET                               
017111,000931: 34,7454           45176                           DMOVE    0                                     
017112,000932: 34,7455           01303                                    DATAPL     +32D                       
017113,000933: 34,7456           45176                           DMOVE    0                                     
017114,000934: 34,7457           01301                                    DATAPL     +30D                       
017115,000935: 34,7460           45174                           DMOVE    2                                     
017116,000936: 34,7461           41153                           VDEF     UNIT                                  
017117,000937: 34,7462           44776                           VSLT                                           
017118,000938: 34,7463           01255                                    DATAPL     +10D                       
017119,000939: 34,7464           00002                                    1                                     #  V1 IN 6,7,8,9,10,11
017120,000940: 34,7465           45176                           DMOVE    0                                     
017121,000941: 34,7466           01307                                    DATAPL     +36D                       
017122,000942: 34,7467           45176                           DMOVE    0                                     
017123,000943: 34,7470           01305                                    DATAPL     +34D                       
017124,000944: 34,7471           45174                           DMOVE    2                                     
017125,000945: 34,7472           41153                           VDEF     UNIT                                  
017126,000946: 34,7473           44776                           VSLT                                           
017127,000947: 34,7474           01274                                    DATAPL     +25D                       
017128,000948: 34,7475           00002                                    1                                     #  V2 IN 12,13,14,15,1 ,17
017129,000949: 
017130,000950: 34,7476           41773                           VXV      3                                     
017131,000951: 34,7477           71116                           ABVAL    TSLT                                  
017132,000952: 34,7500           62722                           DDV      DMP                                   
017133,000953: 34,7501           76576                           RTB                                            
017134,000954: 34,7502           00007                                    6                                     
017135,000955: 34,7503           00015                                    12D                                   
017136,000956: 34,7504           00002                                    1                                     
017137,000957: 34,7505           01216                                    TESTTIME                              
017138,000958: 34,7506           31753                                    ERUNITS1                              
017139,000959: 34,7507           20404                                    SGNAGREE                              
017140,000960: 34,7510           32622                           STORE    DSPTEM2                               
017141,000961: 34,7511           77576                           EXIT     0                                     
017142,000962: 
017143,000963: 34,7512           05654                           TC       BANKCALL                              
017144,000964: 34,7513           25205                           CADR     SHOW                                  
017145,000965: 34,7514           06237                           TC       ENDTEST1                              
017146,000966: 

Page 454

017148,000968: 
017149,000969: 34,7515           05706        STOPHOR            TC       MAKECADR                              
017150,000970: 34,7516           51573                           TS       RETAA                                 
017151,000971: 34,7517           04000                           TC       INTPRET                               
017152,000972: 34,7520           76776                           ITC      0                                     
017153,000973: 34,7521           30613                                    EARTHR                                
017154,000974: 34,7522           76776                           ITC      0                                     
017155,000975: 34,7523           30634                                    OUTGYR                                
017156,000976: 34,7524           77576                           EXIT     0                                     
017157,000977: 34,7525           05654                           TC       BANKCALL                              
017158,000978: 34,7526           30331                           CADR     IMUSTALL                              
017159,000979: 34,7527           06237                           TC       ENDTEST1                              
017160,000980: 34,7530           31573                           XCH      RETAA                                 
017161,000981: 34,7531           05723                           TC       BANKJUMP                              
017162,000982: 

Page 455

017164,000984: 
017165,000985: 34,7532           05706        SCRINTP            TC       MAKECADR                              
017166,000986: 34,7533           51573                           TS       RETAA                                 
017167,000987: 34,7534           04000                           TC       INTPRET                               
017168,000988: 34,7535           47575                           NOLOD    1                                     
017169,000989: 34,7536           54776                           TSU                                            
017170,000990: 34,7537           01250                                    DATAPL     +5                         
017171,000991: 34,7540           32001                           STORE    0                                     #  T1:T0
017172,000992: 
017173,000993: 34,7541           47575                           NOLOD    1                                     
017174,000994: 34,7542           60776                           TAD                                            
017175,000995: 34,7543           01250                                    DATAPL     +5                         
017176,000996: 34,7544           33250                           STORE    DATAPL     +5                         #  TN
017177,000997: 
017178,000998: 34,7545           77174                           TMOVE    2                                     
017179,000999: 34,7546           63631                           TSLT     ROUND                                 
017180,001000: 34,7547           64742                           DMP      DAD                                   
017181,001001: 34,7550           00001                                    0                                     
017182,001002: 34,7551           00015                                    12D                                   
017183,001003: 34,7552           01101                                    GENPL                                 
017184,001004: 34,7553           01103                                    GENPL      +2                         
017185,001005: 34,7554           33103                           STORE    GENPL      +2                         
017186,001006: 34,7555           77576                           EXIT     0                                     
017187,001007: 
017188,001008: 34,7556           11220                           CCS      COUNTPL                               
017189,001009: 34,7557           07574                           TC       SUMSUM1                               
017190,001010: 
017191,001011: 34,7560           04000                           TC       INTPRET                               
017192,001012: 34,7561           71576                           LXC,1    0                                     
017193,001013: 34,7562           01225                                    RESULTCT                              #  FIRST=4
017194,001014: 34,7563           77176                           TMOVE    0                                     #  SECOND=9
017195,001015: 34,7564           01250                                    DATAPL     +5                         
017196,001016: 34,7565           36201                           STORE    GENPL,1                               
017197,001017: 34,7566           45176                           DMOVE    0                                     
017198,001018: 34,7567           01103                                    GENPL      +2                         
017199,001019: 34,7570           36207                           STORE    GENPL      +3,1                       
017200,001020: 34,7571           77576                           EXIT     0                                     
017201,001021: 34,7572           31573                           XCH      RETAA                                 
017202,001022: 34,7573           05723                           TC       BANKJUMP                              
017203,001023: 
017204,001024: 
017205,001025: 
017206,001026: 34,7574           05654        SUMSUM1            TC       BANKCALL                              
017207,001027: 34,7575           25456                           CADR     SUMSUM                                
017208,001028: 

Page 456

017210,001030: 
017211,001031: 34,7576           04000        FALNED1            TC       INTPRET                               
017212,001032: 34,7577           76776                           ITC      0                                     
017213,001033: 34,7600           30573                                    ALGNINIT                              
017214,001034: 34,7601           77576                           EXIT     0                                     
017215,001035: 34,7602           11232                           CCS      TESTNDX                               
017216,001036: 34,7603           07666                           TC       LABTEST1                              
017217,001037: 34,7604           07606                           TC       +2                                    
017218,001038: 34,7605           07606                           TC       +1                                    
017219,001039: 34,7606           05654                           TC       BANKCALL                              
017220,001040: 34,7607           25331                           CADR     OGCZERO                               
017221,001041: 34,7610           05654                           TC       BANKCALL                              
017222,001042: 34,7611           25343                           CADR     FLTRZERO                              
017223,001043: 34,7612           34510        FRECT              CAF      BIT7                                  
017224,001044: 34,7613           51230                           TS       STOREPL                               
017225,001045: 34,7614           35501                           CAF      ZERO                                  #  VERTICAL ERECTION BY NULLING PIPAS
017226,001046: 34,7615           50044                           TS       PIPAX                                 
017227,001047: 34,7616           50045                           TS       PIPAY                                 
017228,001048: 34,7617           50046                           TS       PIPAZ                                 
017229,001049: 34,7620           33232        WARTNEW            CAF      TEN                                   #  CALL A SPADE A SPADE...HOMER
017230,001050: 34,7621           51220                           TS       COUNTPL                               
017231,001051: 34,7622           20017                           INHINT                                         
017232,001052: 34,7623           33562                           CAF      50DEC                                 
017233,001053: 34,7624           02173                           TC       WAITLIST                              
017234,001054: 34,7625           71631                           CADR     WARTNEW1                              
017235,001055: 34,7626           37630                           CAF      WART2ADR                              
017236,001056: 34,7627           02127                           TC       JOBSLEEP                              
017237,001057: 34,7630           71634        WART2ADR           CADR     WART2NEW                              
017238,001058: 34,7631           37630        WARTNEW1           CAF      WART2ADR                              
017239,001059: 34,7632           02060                           TC       JOBWAKE                               
017240,001060: 34,7633           02256                           TC       TASKOVER                              
017241,001061: 34,7634           04000        WART2NEW           TC       INTPRET                               
017242,001062: 34,7635           76576                           RTB      0                                     
017243,001063: 34,7636           20346                                    READPIPS                              
017244,001064: 34,7637           33002                           STORE    DELVX                                 
017245,001065: 34,7640           76776                           ITC      0                                     
017246,001066: 34,7641           30715                                    TJLAL                                 
017247,001067: 34,7642           77576                           EXIT     0                                     
017248,001068: 34,7643           11220                           CCS      COUNTPL                               
017249,001069: 34,7644           07621                           TC       WARTNEW    +1                         
017250,001070: 34,7645           04000                           TC       INTPRET                               
017251,001071: 34,7646           75175                           VMOVE    1                                     
017252,001072: 34,7647           76776                           ITC                                            
017253,001073: 34,7650           01115                                    FILDELX                               
017254,001074: 34,7651           31000                                    VERTRECT                              
017255,001075: 34,7652           76776                           ITC      0                                     
017256,001076: 34,7653           30613                                    EARTHR                                
017257,001077: 34,7654           76776                           ITC      0                                     
017258,001078: 34,7655           30634                                    OUTGYR                                
017259,001079: 34,7656           77576                           EXIT     0                                     
017260,001080: 34,7657           05654                           TC       BANKCALL                              

Page 457

017262,001082: 34,7660           30331                           CADR     IMUSTALL                              
017263,001083: 34,7661           06237                           TC       ENDTEST1                              
017264,001084: 
017265,001085: 34,7662           11230                           CCS      STOREPL                               
017266,001086: 34,7663           07613                           TC       FRECT      +1                         
017267,001087: 34,7664           05654                           TC       BANKCALL                              
017268,001088: 34,7665           24721                           CADR     TSTJUMP                               
017269,001089: 
017270,001090: 
017271,001091: 
017272,001092: 34,7666           05654        LABTEST1           TC       BANKCALL                              
017273,001093: 34,7667           24751                           CADR     LABTEST                               
017274,001094: 

Page 458

017276,001096: 
017277,001097: 34,7670           67222 51710  SCNBAZ             2DEC     -.27232                               #  AZIMUTH OF NB IS ERAD IN AS Z AXIS EAST
017278,001098: 34,7672           00000 00000                     2DEC     0          B-28                       
017279,001099: 34,7674           15327 37747                     2DEC     .4194335                              
017280,001100: 34,7676           00000 00000  LABNBAZ            2DEC     0          B-28                       
017281,001101: 34,7700           00000 00000                     2DEC     0          B-28                       
017282,001102: 34,7702           20000 00000                     2DEC     .5                                    
017283,001103: 34,7704           00000 00000  LABNBAZ1           2DEC     0          B-28                       
017284,001104: 34,7706           00000 00000                     2DEC     0          B-28                       
017285,001105: 34,7710           15327 37747  SCNBVER            2DEC     .4194335                              
017286,001106: 34,7712           00000 00000                     2DEC     0          B-28                       
017287,001107: 34,7714           10555 26067                     2DEC     .27232                                
017288,001108: 34,7716           20000 00000  LABNBVER           2DEC     .5                                    
017289,001109: 34,7720           00000 00000                     2DEC     0          B-28                       
017290,001110: 34,7722           00000 00000                     2DEC     0          B-28                       
017291,001111: 34,7724           00000 00000  LBNBVER1           2DEC     0          B-28                       
017292,001112: 34,7726           57777 77777                     2DEC     -.5                                   
017293,001113: 34,7730           00666        V06N66E            OCT      00666                                 
017294,001114: 34,7731           00130        V01N30E            OCT      00130                                 
017295,001115: 34,7732           03711 33265  OMEG/MS            2DEC     .12169524                             
017296,001116: 34,7734           24365 30244  SCALFTR            2DEC     .64                                   
017297,001117: 34,7736           24000        INTCON1            DEC      40         B+8                        
017298,001118: 34,7737           00000                           DEC      0          B-14                       
017299,001119: 34,7740           01100        FLNDX              ADRES    GENPL                                 
017300,001120: 34,7741           00021        MTRXLD             DEC      17         B-14                       
017301,001121: 34,7742           01111 00000  DC585              2DEC     585        B+14                       
017302,001122: 34,7744           00406 36355  ERUNITS            2DEC     4308205    B-28                       #  CONSTANT CORRECTED FOR SIDEREAL RATE
017303,001123: 34,7746           00002 12725  ERUNITS2           2DEC     38357      B-28                       
017304,001124: 34,7750           03146 14632  VRECTC3            2DEC     .1                                    

Page 459

017306,001126: 34,7752           00051 33163  ERUNITS1           2DEC     685683     B-28                       
017307,001127: 

Page 460

017309,001129: 
017310,001130: 34,7754           76576        ERTHRVEN           RTB      0                                     
017311,001131: 34,7755           20271                                    ZEROVAC                               
017312,001132: 34,7756           55176                           COS      0                                     
017313,001133: 34,7757           01315                                    LATITUDE                              
017314,001134: 34,7760           45176                           DMOVE    0                                     
017315,001135: 34,7761           05174                                    ZERODP                                
017316,001136: 34,7762           57175                           SIN      1                                     
017317,001137: 34,7763           41166                           VDEF     VXSC                                  
017318,001138: 34,7764           01315                                    LATITUDE                              
017319,001139: 34,7765           31733                                    OMEG/MS                               
017320,001140: 34,7766           33177                           STORE    VMARK                                 
017321,001141: 34,7767           40576                           ITCQ     0                                     

End of include-file IMU_PERFORMANCE_TESTS_2.agc.  Parent file is MAIN.agc