Source Code

These source-code files are part of a reconstructed copy of Luminary 173, the second (unflown) release of the Apollo 14 Lunar Module (LM) Apollo Guidance Computer (AGC) software.

The reconstruction began with reconstructed source code for Luminary 178. Changes between revision 173 and 178 were backed out, as described by Luminary memo 167 (revision 1). The reconstruction was verified by matching memory-bank checksums to those listed in drawing 2021152N. Note that page numbers in the reconstructed code match those for the baseline log section mentioned in each file's changelog; the page numbers for a real Luminary 173 listing would be different.

Comments from the original source code are prefixed with a single '#' symbol, whereas comments added later are prefixed by "##" or "###". Report any errors noted by creating an issue report at the Virtual AGC project's GitHub repository.

001505,000002:                                                                                                  ## Copyright:   Public domain.
001506,000003:                                                                                                  ## Filename:    CONTROLLED_CONSTANTS.agc
001507,000004:                                                                                                  ## Purpose:     A section of Luminary revision 173.
001508,000005:                                                                                                  ##              It is part of the reconstructed source code for the second
001509,000006:                                                                                                  ##              (unflown) release of the flight software for the Lunar
001510,000007:                                                                                                  ##              Module's (LM) Apollo Guidance Computer (AGC) for Apollo 14.
001511,000008:                                                                                                  ##              The code has been recreated from a reconstructed copy of
001512,000009:                                                                                                  ##              Luminary 178, as well as Luminary memo 167 (revision 1).
001513,000010:                                                                                                  ##              It has been adapted such that the resulting bugger words
001514,000011:                                                                                                  ##              exactly match those specified for Luminary 173 in NASA
001515,000012:                                                                                                  ##              drawing 2021152N, which gives relatively high confidence
001516,000013:                                                                                                  ##              that the reconstruction is correct.
001517,000014:                                                                                                  ## Reference:   pp. 38-54
001518,000015:                                                                                                  ## Assembler:   yaYUL
001519,000016:                                                                                                  ## Contact:     Ron Burkey <info@sandroid.org>.
001520,000017:                                                                                                  ## Website:     www.ibiblio.org/apollo/index.html
001521,000018:                                                                                                  ## Mod history: 2019-09-18 MAS  Created from Luminary 178. Gave THROTLAG
001522,000019:                                                                                                  ##                              its original value of 0.2s. Changed K1VAL
001523,000020:                                                                                                  ##                              back to 124.55 B-23.
001524,000021:                                                                                                  ##              2019-09-21 MAS  Restored the original landing analog displays
001525,000022:                                                                                                  ##                              constants from Luminary 131.
001526,000023:                                                                                                  ##              2021-05-30 ABS  DEC -> DEC* for extended address fields.
001527,000024: 

Page 38

001529,000026:                                                                                                  #  DPS AND APS ENGINE PARAMETERS
001530,000027: 
001531,000028: 36,2000                                           SETLOC   P40S                                  
001532,000029: 36,2000                                           BANK                                           
001533,000030: 36,2000                                           COUNT*   $$/P40                                
001534,000031: 
001535,000032:                                                                                                  #  *** THE ORDER OF THE FOLLOWING SIX CONSTANTS MUST NOT BE CHANGED ***
001536,000033: 
001537,000034: 36,2000           01056 37167  FDPS               2DEC     4.3670     B-7                        #  9817.5 LBS FORCE IN NEWTONS
001538,000035: 
001539,000036: 36,2002           00457 03250  MDOTDPS            2DEC     0.1480     B-3                        #  32.62 LBS/SEC IN KGS/CS.
001540,000037: 
001541,000038: 36,2004           77777 77731  DTDECAY            2DEC     -38        B-28                       #  40 PERCENT FTP-DPS TAILOFF FOR P40
001542,000039: 
001543,000040: 36,2006           00307 11040  FAPS               2DEC     1.5569     B-7                        #  3500 LBS FORCE IN NEWTONS
001544,000041: 
001545,000042: 36,2010           00151 05214  MDOTAPS            2DEC     0.05135    B-3                        #  11.32 LBS/SEC IN KGS/CS
001546,000043: 
001547,000044: 36,2012           77777 77755  ATDECAY            2DEC     -18        B-28                       #  618 LB-SEC  TAILOFF FOR APS
001548,000045: 
001549,000046:                                                                                                  #  ************************************************************************
001550,000047: 
001551,000048: 36,2014           00003 00000  100PCTTO           2DEC     24         B-17                       #  100 PERCENT FTP-DPS TAILOFF FOR P70
001552,000049: 
001553,000050:                                                                                                  #  ************************************************************************
001554,000051: 
001555,000052: 36,2016           00026 30605  FRCS4              2DEC     0.17792    B-7                        #  400 LBS FORCE IN NEWTONS
001556,000053: 
001557,000054: 36,2020           00013 14303  FRCS2              2DEC     0.08896    B-7                        #  200 LBS FORCE IN NEWTONS
001558,000055: 
001559,000056: 27,2000                                           SETLOC   P40S1                                 
001560,000057: 27,2000                                           BANK                                           
001561,000058: 27,2000                                           COUNT*   $$/P40                                
001562,000059: 
001563,000060:                                                                                                  #  *** APS IMPULSE DATA FOR P42 *******************************************
001564,000061: 
001565,000062: 27,2000           00000 07622  K1VAL              2DEC     124.55     B-23                       #  2800 LB-SEC
001566,000063: 
001567,000064: 27,2002           00000 00762  K2VAL              2DEC     31.138     B-24                       #  700  LB-SEC
001568,000065: 
001569,000066: 27,2004           00030 35104  K3VAL              2DEC     1.5569     B-10                       #  FAPS ( 3500 LBS THRUST)
001570,000067: 
001571,000068:                                                                                                  #  ************************************************************************
001572,000069: 
001573,000070: 27,2006           00016 36237  S40.136            2DEC     .4671      B-9                        #  .4671 M NEWTONS (DPS)
001574,000071: 
001575,000072: 27,2010           35711 35663  S40.136_           2DEC     .4671      B+1                        #  S40.136 SHIFTED LEFT 10.
001576,000073: 
001577,000074: 27,2000                                           SETLOC   ASENT1                                

Page 39

001579,000076: 27,2000                                           BANK                                           
001580,000077: 27,2012                                           COUNT*   $$/P70                                
001581,000078: 
001582,000079: 27,2012           03631 23146  (1/DV)A            2DEC     15.20      B-7                        #  2 SECONDS WORTH OF INITIAL ASCENT
001583,000080: 
001584,000081:                                                                                                  #  STAGE ACCELERATION -- INVERTED (M/CS)
001585,000082:                                                                                                  #  1) PREDICATED ON A LIFTOFF MASS OF
001586,000083:                                                                                                  #     4869.9 KG (SNA-8-D-027 7/11/68)
001587,000084:                                                                                                  #  2) PREDICATED ON A CONTRIBUTION TO VEH-
001588,000085:                                                                                                  #     ICLE ACCELERATION FROM RCS THRUSTERS
001589,000086:                                                                                                  #     EQUIV. TO 1 JET ON CONTINUOUSLY.
001590,000087: 27,2014           33226 14632  K(1/DV)            2DEC     436.70     B-9                        #  DPS ENGINE THRUST IN NEWTONS / 100 CS.
001591,000088: 
001592,000089: 27,2016           05306 15503  (AT)A              2DEC     3.2883     E-4        B9              #  INITIAL ASC. STG. ACCELERATION ** M/CS.
001593,000090: 
001594,000091:                                                                                                  #  ASSUMPTIONS SAME AS FOR (1/DV)A.
001595,000092: 27,2020           26337 30000  (TBUP)A            2DEC     91902      B-17                       #  ESTIMATED BURN-UP TIME OF THE ASCENT STG
001596,000093: 
001597,000094:                                                                                                  #  ASSUMPTIONS SAME AS FOR (1/DV)A WITH THE
001598,000095:                                                                                                  #  ADDITIONAL ASSUMPTION THAT NET MASS-FLOW
001599,000096:                                                                                                  #  RATE = 5.299 KG/SEC = 5.135 (APS) +
001600,000097:                                                                                                  #  .164 (1 RCS JET).
001601,000098: 30,2000                                           SETLOC   ASENT                                 
001602,000099: 30,2000                                           BANK                                           
001603,000100: 30,2000                                           COUNT*   $$/ASENT                              
001604,000101: 30,2000           02445 00274  AT/RCS             2DEC     .0000785   B+10                       #  4 JETS IN A DRY LEM
001605,000102: 
001606,000103: 33,2000                                           SETLOC   SERVICES                              
001607,000104: 33,2000                                           BANK                                           
001608,000105: 33,2000                                           COUNT*   $$/SERV                               
001609,000106: 
001610,000107:                                                                                                  #  *** THE ORDER OF THE FOLLOWING TWO CONSTANTS MUST NOT BE CHANGED *******
001611,000108: 
001612,000109: 33,2000           41545        APSVEX             DEC      -3030      E-2        B-5             #  9942 FT/SEC IN M/CS.
001613,000110: 33,2001           42341        DPSVEX             DEC*     -2.95588868 E+1        B-05*           #          VE (DPS) +2.95588868E+ 3
001614,000111:                                                                                                  #  ************************************************************************
001615,000112: 
001616,000113: 31,2000                                           SETLOC   F2DPS*31                              
001617,000114: 31,2000                                           BANK                                           
001618,000115: 31,2000                                           COUNT*   $$/F2DPS                              
001619,000116: 
001620,000117: 31,2000           00222 33316  TRIMACCL           2DEC*    +3.50132708 E-5        B+08*           #          A (T)    +3.50132708E- 1
001621,000118: 

Page 40

001623,000120:                                                                                                  #  THROTTLING AND THRUST DETECTION PARAMETERS
001624,000121: 
001625,000122: 36,2000                                           SETLOC   P40S                                  
001626,000123: 36,2000                                           BANK                                           
001627,000124: 36,2022                                           COUNT*   $$/P40                                
001628,000125: 
001629,000126: 36,2022           00030        THRESH1            DEC      24         B-14                       
001630,000127: 
001631,000128: 36,2023           00014        THRESH3            DEC      12         B-14                       
001632,000129: 
001633,000130: 36,2024     4737               HIRTHROT           =        BIT13                                 
001634,000131: 
001635,000132:    6000                                           SETLOC   FFTAG5                                
001636,000133:    6000                                           BANK                                           
001637,000134:    6000                                           COUNT*   $$/P40                                
001638,000135: 
001639,000136:    6000           00464        THRESH2            DEC      308        B-14                       
001640,000137: 
001641,000138: 31,2000                                           SETLOC   FTHROT                                
001642,000139: 31,2000                                           BANK                                           
001643,000140: 31,2002                                           COUNT*   $$/THROT                              
001644,000141: 
001645,000142: 31,2002           07401        FMAXODD            DEC      +3841      B-14                       #  FSAT          +4.81454413 E+ 4
001646,000143: 
001647,000144: 31,2003           06613        FMAXPOS            DEC      +3467      B-14                       #  FMAX          +4.34546769 E+ 4
001648,000145: 
001649,000146: 31,2004           00024        THROTLAG           DEC      +20        B-14                       #  TAU (TH)      +1.99999999 E-1
001650,000147: 31,2005           00307 17534  SCALEFAC           2DEC*    +7.97959872 E+2        B-16*           #  BITPERF       +7.97959872E- 2
001651,000148: 
001652,000149: 32,2000                                           SETLOC   F2DPS*32                              
001653,000150: 32,2000                                           BANK                                           
001654,000151: 32,2000                                           COUNT*   $$/F2DPS                              
001655,000152: 
001656,000153: 32,2000           00044        DPSTHRSH           DEC      36         B-14                       #  (THRESH1 + THRESH3 FOR P63)
001657,000154: 

Page 41

001659,000156:                                                                                                  #  LM HARDWARE-RELATED PARAMETERS
001660,000157: 
001661,000158: 25,2000                                           SETLOC   RADARUPT                              
001662,000159: 25,2000                                           BANK                                           
001663,000160: 25,2000                                           COUNT*   $$/RRUPT                              
001664,000161: 
001665,000162: 25,2000           47777        LVELBIAS           DEC      -12288     B-14                       #  LANDING RADAR BIAS FOR 153.6 KC.
001666,000163: 
001667,000164: 25,2001           00001 01150  RDOTBIAS           2DEC     17000      B-28                       #  BIAS COUNT FOR RR RANGE RATE.
001668,000165: 
001669,000166: 32,2000                                           SETLOC   LRS22                                 
001670,000167: 32,2000                                           BANK                                           
001671,000168: 32,2001                                           COUNT*   $$/LRS22                              
001672,000169: 
001673,000170: 32,2001           70123 40702  RDOTCONV           2DEC     -.0019135344 B7                         #  CONVERTS RR RDOT READING TO M/CS AT 2(7)
001674,000171: 
001675,000172: 32,2003           13337 10776  RANGCONV           2DEC     2.859024   B-3                        #  CONVERTS RR RANGE READING TO M. AT 2(-29
001676,000173: 
001677,000174: 33,2000                                           SETLOC   SERVICES                              
001678,000175: 33,2000                                           BANK                                           
001679,000176: 33,2002                                           COUNT*   $$/SERV                               
001680,000177: 
001681,000178: 33,2002           51102 42414  HBEAMNB            2DEC     -0.7147168647                            #  POS 1 ALT BEAM IN NAV BASE COORDINATES
001682,000179: 
001683,000180: 33,2004           75522 46002                     2DEC     -0.0731086602                            
001684,000181: 
001685,000182: 33,2006           51573 62362                     2DEC     -0.6955824372                            
001686,000183: 
001687,000184: 
001688,000185: 33,2010           62770 40667  VZBEAMNB           2DEC     -0.4067366430                            #  POS 1 VZ  BEAM
001689,000186: 
001690,000187: 33,2012           03034 21031                     2DEC     +0.0954915028                            
001691,000188: 
001692,000189: 33,2014           35045 21077                     2DEC     +0.9085409600                            
001693,000190: 
001694,000191: 
001695,000192: 33,2016           00000 00000  VYBEAMNB           2DEC     +0.0                                  #  POS 1 VY  BEAM
001696,000193: 
001697,000194: 33,2020           37646 07712                     2DEC     +0.9945218954                            
001698,000195: 
001699,000196: 33,2022           74517 54765                     2DEC     -0.1045284632                            
001700,000197: 
001701,000198: 
001702,000199: 33,2024           35167 20727  VXBEAMNB           2DEC     +0.9135454576                            #  POS 1 VX  BEAM
001703,000200: 
001704,000201: 33,2026           01270 22313                     2DEC     +0.0425155563                            
001705,000202: 
001706,000203: 33,2030           14743 16747                     2DEC     +0.4045084971                            
001707,000204: 
001708,000205: 

Page 42

001710,000207: 33,2032           42001 62422                     2DEC     -0.9374036070                            #  POS 2 ALT BEAM
001711,000208: 
001712,000209: 33,2034           76653 63102                     2DEC     -0.0364014993                            
001713,000210: 
001714,000211: 33,2036           64725 63461                     2DEC     -0.3463371311                            
001715,000212: 
001716,000213: 
001717,000214: 33,2040           00000 00000                     2DEC     +0.0                                  #  POS 2 VZ  BEAM
001718,000215: 
001719,000216: 33,2042           03260 23012                     2DEC     +0.1045284632                            
001720,000217: 
001721,000218: 33,2044           37646 07712                     2DEC     +0.9945218954                            
001722,000219: 
001723,000220: 
001724,000221: 33,2046           00000 00000                     2DEC     +0.0                                  #  POS 2 VY  BEAM
001725,000222: 
001726,000223: 33,2050           37646 07712                     2DEC     +0.9945218954                            
001727,000224: 
001728,000225: 33,2052           74517 54765                     2DEC     -0.1045284632                            
001729,000226: 
001730,000227: 
001731,000228: 33,2054           37777 37777                     2DEC     +0.9999999999                            #  POS 2 VX  BEAM
001732,000229: 
001733,000230: 33,2056           00000 00000                     2DEC     +0.0                                  
001734,000231: 
001735,000232: 33,2060           00000 00000                     2DEC     +0.0                                  
001736,000233: 
001737,000234: 
001738,000235: 33,2062           65363 64451  HSCAL              2DEC     -.3288792                             #  SCALES 1.079 FT/BIT TO 2(22)M.
001739,000236: 
001740,000237:                                                                                                  #  ***** THE SEQUENCE OF THE FOLLOWING CONSTANTS MUST BE PRESERVED ********
001741,000238: 
001742,000239: 33,2064           21241 03216  VZSCAL             2DEC     +.5410829105                            #  SCALES .8668 FT/SEC/BIT TO 2(18) M/CS.
001743,000240: 
001744,000241: 33,2066           30153 23101  VYSCAL             2DEC     +.7565672446                            #  SCALES 1.212 FT/SEC/BIT TO 2(18) M/CS.
001745,000242: 
001746,000243: 33,2070           63105 61733  VXSCAL             2DEC     -.4020043770                            #  SCALES -.644 FT/SEC/BIT TO 2(18) M/CS.
001747,000244: 
001748,000245: 
001749,000246:                                                                                                  #  ************************************************************************
001750,000247: 
001751,000248: 33,2072           01507        KPIP               DEC      .0512                                 #  SCALES DELV TO UNITS OF 2(5) M/CS.
001752,000249: 33,2073           00321 26706  KPIP1              2DEC     .0128                                 #  SCALES DELV TO UNITS OF 2(7) M/CS.
001753,000250: 

Page 43

001755,000252: 33,2075           00150 33343  KPIP2              2DEC     .0064                                 #  SCALES DELV TO UNITS OF 2(8) M/CS.
001756,000253: 
001757,000254: 33,2077           02630 25010  ALTCONV            2DEC     1.399078846 B-4                        #  CONVERTS M*2(-24) TO BIT UNITS *2(-28).
001758,000255: 33,2101           24402 26003  ARCONV1            2DEC     656.167979 B-10                       #  CONV. ALTRATE COMP. TO BIT UNITS<
001759,000256: 
001760,000257: 21,2000                                           SETLOC   R10                                   
001761,000258: 21,2000                                           BANK                                           
001762,000259: 21,2000                                           COUNT*   $$/R10                                
001763,000260: 
001764,000261: 21,2000           24402        ARCONV             OCT      24402                                 #  656.1679798B-10 CONV ALTRATE TO BIT UNIT
001765,000262: 
001766,000263: 21,2001           01551        ARTOA              DEC      .1066098   B-1                        #  .25/2.345 B-1 4X/SEC CYCLE RATE.
001767,000264: 
001768,000265: 21,2002           21357        ARTOA2             DEC      .0021322   B8                         #  (.5)/(2.345)(100)
001769,000266: 
001770,000267: 21,2003           22316        VELCONV            OCT      22316                                 #  588.914 B-10 CONV VEL. TO BIT UNITS.
001771,000268: 
001772,000269: 21,2004           01507        KPIP1(5)           DEC      .0512                                 #  SCALES DELV TO M/CS*2(-5).
001773,000270: 
001774,000271: 21,2005           00547        MAXVBITS           OCT      00547                                 #  MAX. DISPLAYED VELOCITY 199.9989 FT/SEC.
001775,000272: 
001776,000273: 
001777,000274: 20,2000                                           SETLOC   DAPS3                                 
001778,000275: 20,2000                                           BANK                                           
001779,000276: 20,2000                                           COUNT*   $$/DAPAO                              
001780,000277: 
001781,000278: 20,2000           01150        TORKJET1           DEC      .03757                                #  550 / .2 SCALED AT (+16) 64 / 180
001782,000279: 

Page 44

001784,000281:                                                                                                  #  PARAMETERS RELATING TO MASS, INERTIA, AND VEHICLE DIMENSTIONS
001785,000282: 
001786,000283: 
001787,000284: 05,2000                                           SETLOC   FRANDRES                              
001788,000285: 05,2000                                           BANK                                           
001789,000286: 05,2000                                           COUNT*   $$/START                              
001790,000287: 
001791,000288: 05,2000           02357        FULLAPS            DEC      5050       B-16                       #  NOMINAL FULL ASCENT MASS -- 2(16) KG.
001792,000289: 
001793,000290: 01,2000                                           SETLOC   LOADDAP1                              
001794,000291: 01,2000                                           BANK                                           
001795,000292: 01,2000                                           COUNT*   $$/R03                                
001796,000293: 
001797,000294: 01,2000           76466        MINLMD             DEC      -2850      B-16                       #  MIN. DESCENT STAGE MASS -- 2(16) KG.
001798,000295: 
001799,000296: 01,2001           76731        MINMINLM           DEC      -2200      B-16                       #  MIN ASCENT STAGE MASS -- 2(16) KG.
001800,000297: 
001801,000298: 01,2002     4741               MINCSM             =        BIT11                                 #  MIN CSM MASS (OK FOR 1/ACCS) = 9050 LBS
001802,000299: 
001803,000300: 20,2000                                           SETLOC   DAPS3                                 
001804,000301: 20,2000                                           BANK                                           
001805,000302: 20,2001                                           COUNT*   $$/DAPAO                              
001806,000303: 
001807,000304: 20,2001           01046        LOASCENT           DEC      2200       B-16                       #  MIN ASCENT LEM MASS -- 2(16) KG.
001808,000305: 
001809,000306: 20,2002           10117        HIDESCNT           DEC      16700      B-16                       #  MAX DESCENT LEM MASS -- 2(16) KG.
001810,000307: 20,2003           00666        LODESCNT           DEC      1750       B-16                       #  MIN DESCENT STAGE (ALONE) -- 2(16) KG
001811,000308: 

Page 45

001813,000310:                                                                                                  #  PHYSICAL CONSTANTS ( TIME - INVARIANT )
001814,000311: 
001815,000312: 37,2000                                           SETLOC   IMU2                                  
001816,000313: 37,2000                                           BANK                                           
001817,000314: 37,2000                                           COUNT*   $$/P07                                
001818,000315: 
001819,000316: 37,2000           07623 26552  OMEG/MS            2DEC     .24339048                             
001820,000317: 
001821,000318: 22,2000                                           SETLOC   R30LOC                                
001822,000319: 22,2000                                           BANK                                           
001823,000320: 22,2000                                           COUNT*   $$/R30                                
001824,000321: 
001825,000322:                                                                                                  #  *** THE ORDER OF THE FOLLOWING TWO CONSTANTS MUST BE PRESERVED *********
001826,000323: 
001827,000324: 22,2000           27533 07571  1/RTMUM            2DEC*    .45162595  E-4        B14*            
001828,000325: 
001829,000326: 22,2002           25004 06702  1/RTMUE            2DEC*    .50087529  E-5        B17*            
001830,000327: 
001831,000328:                                                                                                  #  ************************************************************************
001832,000329: 
001833,000330: 27,2000                                           SETLOC   P40S1                                 
001834,000331: 27,2000                                           BANK                                           
001835,000332: 27,2022                                           COUNT*   $$/S40.9                              
001836,000333: 
001837,000334: 27,2022           55340 61710  EARTHMU            2DEC*    -3.986032  E10        B-36*           #  M(3)/CS(2)
001838,000335: 
001839,000336: 27,2000                                           SETLOC   ASENT1                                
001840,000337: 27,2000                                           BANK                                           
001841,000338: 27,2024                                           COUNT*   $$/P12                                
001842,000339: 
001843,000340: 27,2024           00072 16206  MUM(-37)           2DEC*    4.9027780  E8         B-37*           
001844,000341: 
001845,000342: 27,2026           00344 24331  MOONRATE           2DEC*    .26616994890062991 E-7        B+19*           #  RAD/CS.
001846,000343: 
001847,000344: 33,2000                                           SETLOC   SERVICES                              
001848,000345: 33,2000                                           BANK                                           
001849,000346: 33,2103                                           COUNT*   $$/SERV                               
001850,000347: 
001851,000348:                                                                                                  #  *** THE ORDER OF THE FOLLOWING TWO CONSTANTS MUST BE PRESERVED *********
001852,000349: 
001853,000350: 33,2103           61377 55754  -MUDT              2DEC*    -7.9720645 E+12       B-44*           
001854,000351: 33,2105           77644 65556  -MUDT1             2DEC*    -9.8055560 E+10       B-44*           
001855,000352:                                                                                                  #  ************************************************************************
001856,000353: 

Page 46

001858,000355: 33,2107           64453 55670  -MUDTMUN           2DEC*    -9.8055560 E+10       B-38*           
001859,000356: 33,2111           00002 11777  RESQ               2DEC*    40.6809913 E12        B-58*           
001860,000357: 
001861,000358: 33,2113           01023 37155  20J                2DEC     3.24692010 E-2                        
001862,000359: 
001863,000360: 33,2115           00065 06244  2J                 2DEC     3.24692010 E-3                        
001864,000361: 
001865,000362: 14,2000                                           SETLOC   P50S1                                 
001866,000363: 14,2000                                           BANK                                           
001867,000364: 14,2000                                           COUNT*   $$/LOSAM                              
001868,000365: 
001869,000366: 14,2000           26723 00450  RSUBEM             2DEC     384402000  B-29                       
001870,000367: 
001871,000368: 14,2002           00065 01265  RSUBM              2DEC     1738090    B-29                       
001872,000369: 
001873,000370: 14,2004           00302 24533  RSUBE              2DEC     6378166    B-29                       
001874,000371: 
001875,000372: 14,2006           00052 04047  ROE                2DEC     .00257125                             
001876,000373: 
001877,000374: 04,2000                                           SETLOC   CONICS1                               
001878,000375: 04,2000                                           BANK                                           
001879,000376: 04,2000                                           COUNT*   $$/LT-LG                              
001880,000377: 
001881,000378: 04,2000           00302 17755  ERAD               2DEC     6373338    B-29                       #  PAD RADIUS
001882,000379: 
001883,000380: 04,2002           00065 01265  504RM              2DEC     1738090    B-29                       #  METERS B-29 (EQUATORIAL MOON RADIUS)
001884,000381: 
001885,000382: 04,2000                                           SETLOC   CONICS1                               
001886,000383: 04,2000                                           BANK                                           
001887,000384: 04,2004                                           COUNT*   $$/CONIC                              
001888,000385: 
001889,000386:                                                                                                  #  *** THE ORDER OF THE FOLLOWING CONSTANTS MUST BE PRESERVED *************
001890,000387: 
001891,000388: 04,2004           22437 16067  MUTABLE            2DEC*    3.986032   E10        B-36*           #  MUE
001892,000389: 
001893,000390: 04,2006           15625 21042                     2DEC*    .25087606  E-10       B+34*           #  1/MUE
001894,000391: 
001895,000392: 04,2010           30276 04773                     2DEC*    1.99650495 E5         B-18*           #  SQRT(MUE)
001896,000393: 
001897,000394: 04,2012           25004 06702                     2DEC*    .50087529  E-5        B+17*           #  1/SQRT(MUE)
001898,000395: 
001899,000396: 
001900,000397: 
001901,000398: 04,2014           16471 01352                     2DEC*    4.902778   E8         B-30*           #  MUM
001902,000399: 
001903,000400: 04,2016           21412 20500                     2DEC*    .203966    E-8        B+28*           #  1/MUM
001904,000401: 
001905,000402: 04,2020           25477 03367                     2DEC*    2.21422176 E4         B-15*           #  SQRT(MUM)
001906,000403: 
001907,000404: 04,2022           27533 07571                     2DEC*    .45162595  E-4        B+14*           #  1/SQRT(MUM)
001908,000405: 
001909,000406:                                                                                                  #  ************************************************************************

Page 47

001911,000408: 13,2000                                           SETLOC   INTINIT                               
001912,000409: 13,2000                                           BANK                                           
001913,000410: 13,2000                                           COUNT*   $$/INTIN                              
001914,000411: 
001915,000412: 13,2000           07112 06620  OMEGMOON           2DEC*    2.66169947 E-8        B+23*           
001916,000413: 
001917,000414: 13,2000                                           SETLOC   ORBITAL2                              
001918,000415: 13,2000                                           BANK                                           
001919,000416: 13,2002                                           COUNT*   $$/ORBIT                              
001920,000417: 
001921,000418:                                                                                                  #  *** THE ORDER OF THE FOLLOWING CONSTANTS MUST NOT BE CHANGED ***********
001922,000419: 
001923,000420: 13,2002           27446 14620                     2DEC*    1.32715445 E16        B-54*           #  S
001924,000421: 
001925,000422: 13,2004           16471 01352  MUM                2DEC*    4.9027780  E8         B-30*           #  M
001926,000423: 
001927,000424: 13,2006           22437 16067  MUEARTH            2DEC*    3.986032   E10        B-36*           
001928,000425: 
001929,000426: 13,2010           00000 00000                     2DEC     0          B-28                       
001930,000427: 
001931,000428: 13,2012           02302 24736  J4REQ/J3           2DEC*    .4991607391 E7         B-26*           
001932,000429: 
001933,000430: 13,2014           77651 76237                     2DEC     -176236.02 B-25                       
001934,000431: 
001935,000432: 13,2016           77776 53032  2J3RE/J2           2DEC*    -.1355426363 E5         B-27*           
001936,000433: 
001937,000434: 13,2020           10407 05344                     2DEC*    .3067493316 E18        B-60*           
001938,000435: 
001939,000436: 13,2022           13710 35320  J2REQSQ            2DEC*    1.75501139 E21        B-72*           
001940,000437: 
001941,000438: 13,2024           12160 12124  3J22R2MU           2DEC*    9.20479048 E16        B-58*           
001942,000439: 
001943,000440:                                                                                                  #  ************************************************************************
001944,000441: 
001945,000442: 27,2000                                           SETLOC   TOF-FF1                               
001946,000443: 27,2000                                           BANK                                           
001947,000444: 27,2030                                           COUNT*   $$/TFF                                
001948,000445: 
001949,000446: 27,2030           24775 30424  1/RTMU             2DEC*    .5005750271 E-5        B17*            #  MODIFIED EARTH MU
001950,000447: 
001951,000448: 42,2000                                           SETLOC   SBAND                                 
001952,000449: 42,2000                                           BANK                                           
001953,000450: 42,2000                                           COUNT*   $$/R05                                
001954,000451: 
001955,000452: 42,2000           26723 00450  REMDIST            2DEC     384402000  B-29                       #  MEAN DISTANCE BETWEEN EARTH AND MOON.
001956,000453: 

Page 48

001958,000455:                                                                                                  #  PHYSICAL CONSTANTS (TIME - VARIANT)
001959,000456: 
001960,000457: 14,2000                                           SETLOC   STARTAB                               
001961,000458: 14,2000                                           BANK                                           
001962,000459: 14,2010                                           COUNT*   $$/STARS                              
001963,000460: 
001964,000461: 14,2010           15263 14526                     2DEC     +.8343989109 B-1                        #  STAR 37       X
001965,000462: 
001966,000463: 14,2012           74131 63662                     2DEC     -.2390600205 B-1                        #  STAR 37       Y
001967,000464: 
001968,000465: 14,2014           70033 66576                     2DEC     -.4966173214 B-1                        #  STAR 37       Z
001969,000466: 
001970,000467: 14,2016           15015 01060                     2DEC     +.8140910890 B-1                        #  STAR 36       X
001971,000468: 
001972,000469: 14,2020           67070 77733                     2DEC     -.5555422636 B-1                        #  STAR 36       Y
001973,000470: 
001974,000471: 14,2022           02552 02515                     2DEC     +.1691995627 B-1                        #  STAR 36       Z
001975,000472: 
001976,000473: 14,2024           07210 17302                     2DEC     +.4541602263 B-1                        #  STAR 35       X
001977,000474: 
001978,000475: 14,2026           67277 54722                     2DEC     -.5391353124 B-1                        #  STAR 35       Y
001979,000476: 
001980,000477: 14,2030           13262 14226                     2DEC     +.7092754074 B-1                        #  STAR 35       Z
001981,000478: 
001982,000479: 14,2032           05100 14770                     2DEC     +.3203620343 B-1                        #  STAR 34       X
001983,000480: 
001984,000481: 14,2034           70716 63142                     2DEC     -.4435303001 B-1                        #  STAR 34       Y
001985,000482: 
001986,000483: 14,2036           62466 74737                     2DEC     -.8370478121 B-1                        #  STAR 34       Z
001987,000484: 
001988,000485: 14,2040           10653 31305                     2DEC     +.5522208574 B-1                        #  STAR 33       X
001989,000486: 
001990,000487: 14,2042           63236 44502                     2DEC     -.7931952248 B-1                        #  STAR 33       Y
001991,000488: 
001992,000489: 14,2044           73711 44272                     2DEC     -.2566972144 B-1                        #  STAR 33       Z
001993,000490: 
001994,000491: 14,2046           07206 14007                     2DEC     +.4539032479 B-1                        #  STAR 32       X
001995,000492: 
001996,000493: 14,2050           61750 65323                     2DEC     -.8778479991 B-1                        #  STAR 32       Y
001997,000494: 
001998,000495: 14,2052           02343 35410                     2DEC     +.1528225504 B-1                        #  STAR 32       Z
001999,000496: 
002000,000497: 14,2054           03241 11616                     2DEC     +.2071906196 B-1                        #  STAR 31       X
002001,000498: 
002002,000499: 14,2056           62031 41460                     2DEC     -.8719421540 B-1                        #  STAR 31       Y
002003,000500: 
002004,000501: 14,2060           70715 76442                     2DEC     -.4436089799 B-1                        #  STAR 31       Z
002005,000502: 
002006,000503: 14,2062           01746 04017                     2DEC     +.1218415406 B-1                        #  STAR 30       X
002007,000504: 
002008,000505: 14,2064           63532 44700                     2DEC     -.7702450672 B-1                        #  STAR 30       Y
002009,000506: 

Page 49

002011,000508: 14,2066           12010 06310                     2DEC     +.6260009387 B-1                        #  STAR 30       Z
002012,000509: 
002013,000510: 14,2070           76150 62332                     2DEC     -.1122343912 B-1                        #  STAR 29       X
002014,000511: 
002015,000512: 14,2072           60371 66347                     2DEC     -.9695188377 B-1                        #  STAR 29       Y
002016,000513: 
002017,000514: 14,2074           03370 06667                     2DEC     +.2177995974 B-1                        #  STAR 29       Z
002018,000515: 
002019,000516: 14,2076           76126 53632                     2DEC     -.1144569328 B-1                        #  STAR 28       X
002020,000517: 
002021,000518: 14,2100           72436 70326                     2DEC     -.3399947346 B-1                        #  STAR 28       Y
002022,000519: 
002023,000520: 14,2102           61041 51225                     2DEC     -.9334362275 B-1                        #  STAR 28       Z
002024,000521: 
002025,000522: 14,2104           72301 44526                     2DEC     -.3514226152 B-1                        #  STAR 27       X
002026,000523: 
002027,000524: 14,2106           62640 61020                     2DEC     -.8241537737 B-1                        #  STAR 27       Y
002028,000525: 
002029,000526: 14,2110           70711 57555                     2DEC     -.4441539178 B-1                        #  STAR 27       Z
002030,000527: 
002031,000528: 14,2112           67365 45532                     2DEC     -.5325711148 B-1                        #  STAR 26       X
002032,000529: 
002033,000530: 14,2114           64425 40516                     2DEC     -.7161840263 B-1                        #  STAR 26       Y
002034,000531: 
002035,000532: 14,2116           07157 00567                     2DEC     +.4510526000 B-1                        #  STAR 26       Z
002036,000533: 
002037,000534: 14,2120           63330 51176                     2DEC     -.7860975319 B-1                        #  STAR 25       X
002038,000535: 
002039,000536: 14,2122           67513 77771                     2DEC     -.5219727016 B-1                        #  STAR 25       Y
002040,000537: 
002041,000538: 14,2124           05227 37143                     2DEC     +.3310516106 B-1                        #  STAR 25       Z
002042,000539: 
002043,000540: 14,2126           64756 42240                     2DEC     -.6896884364 B-1                        #  STAR 24       X
002044,000541: 
002045,000542: 14,2130           71234 63041                     2DEC     -.4183842954 B-1                        #  STAR 24       Y
002046,000543: 
002047,000544: 14,2132           66426 60103                     2DEC     -.5910029120 B-1                        #  STAR 24       Z
002048,000545: 
002049,000546: 14,2134           66546 66454                     2DEC     -.5812126603 B-1                        #  STAR 23       X
002050,000547: 
002051,000548: 14,2136           73257 67711                     2DEC     -.2910465457 B-1                        #  STAR 23       Y
002052,000549: 
002053,000550: 14,2140           14121 11310                     2DEC     +.7599235169 B-1                        #  STAR 23       Z
002054,000551: 
002055,000552: 14,2142           61250 64612                     2DEC     -.9169129501 B-1                        #  STAR 22       X
002056,000553: 
002057,000554: 14,2144           72311 53514                     2DEC     -.3504194263 B-1                        #  STAR 22       Y
002058,000555: 
002059,000556: 14,2146           74743 55251                     2DEC     -.1909891817 B-1                        #  STAR 22       Z
002060,000557: 

Page 50

002062,000559: 14,2150           70607 46251                     2DEC     -.4522463508 B-1                        #  STAR 21       X
002063,000560: 
002064,000561: 14,2152           77152 67164                     2DEC     -.0494719393 B-1                        #  STAR 21       Y
002065,000562: 
002066,000563: 14,2154           61600 73424                     2DEC     -.8905199410 B-1                        #  STAR 21       Z
002067,000564: 
002068,000565: 14,2156           60605 51271                     2DEC     -.9524789319 B-1                        #  STAR 20       X
002069,000566: 
002070,000567: 14,2160           77030 43666                     2DEC     -.0595555999 B-1                        #  STAR 20       Y
002071,000568: 
002072,000569: 14,2162           73160 72671                     2DEC     -.2987256513 B-1                        #  STAR 20       Z
002073,000570: 
002074,000571: 14,2164           60431 40244                     2DEC     -.9656970164 B-1                        #  STAR 19       X
002075,000572: 
002076,000573: 14,2166           00655 03043                     2DEC     +.0523798707 B-1                        #  STAR 19       Y
002077,000574: 
002078,000575: 14,2170           04043 20031                     2DEC     +.2543336816 B-1                        #  STAR 19       Z
002079,000576: 
002080,000577: 14,2172           62163 44553                     2DEC     -.8609439465 B-1                        #  STAR 18       X
002081,000578: 
002082,000579: 14,2174           07324 15316                     2DEC     +.4634300302 B-1                        #  STAR 18       Y
002083,000580: 
002084,000581: 14,2176           03266 20674                     2DEC     +.2097811430 B-1                        #  STAR 18       Z
002085,000582: 
002086,000583: 14,2200           63470 50263                     2DEC     -.7743822014 B-1                        #  STAR 17       X
002087,000584: 
002088,000585: 14,2202           11656 26664                     2DEC     +.6150774086 B-1                        #  STAR 17       Y
002089,000586: 
002090,000587: 14,2204           75500 63126                     2DEC     -.1483643740 B-1                        #  STAR 17       Z
002091,000588: 
002092,000589: 14,2206           70426 67766                     2DEC     -.4659729684 B-1                        #  STAR 16       X
002093,000590: 
002094,000591: 14,2210           07506 25305                     2DEC     +.4773764969 B-1                        #  STAR 16       Y
002095,000592: 
002096,000593: 14,2212           13726 31410                     2DEC     +.7449703838 B-1                        #  STAR 16       Z
002097,000594: 
002098,000595: 14,2214           72160 45226                     2DEC     -.3613079259 B-1                        #  STAR 15       X
002099,000596: 
002100,000597: 14,2216           11143 20062                     2DEC     +.5746463708 B-1                        #  STAR 15       Y
002101,000598: 
002102,000599: 14,2220           64200 54164                     2DEC     -.7343283537 B-1                        #  STAR 15       Z
002103,000600: 
002104,000601: 14,2222           71320 52744                     2DEC     -.4120676148 B-1                        #  STAR 14       X
002105,000602: 
002106,000603: 14,2224           16401 26465                     2DEC     +.9064582964 B-1                        #  STAR 14       Y
002107,000604: 
002108,000605: 14,2226           01364 30204                     2DEC     +.0923776901 B-1                        #  STAR 14       Z
002109,000606: 
002110,000607: 14,2230           75052 77025                     2DEC     -.1822546265 B-1                        #  STAR 13       X
002111,000608: 

Page 51

002113,000610: 14,2232           17030 04652                     2DEC     +.9404481198 B-1                        #  STAR 13       Y
002114,000611: 
002115,000612: 14,2234           73321 51514                     2DEC     -.2869504922 B-1                        #  STAR 13       Z
002116,000613: 
002117,000614: 14,2236           77007 70532                     2DEC     -.0615513667 B-1                        #  STAR 12       X
002118,000615: 
002119,000616: 14,2240           11514 36162                     2DEC     +.6031426337 B-1                        #  STAR 12       Y
002120,000617: 
002121,000618: 14,2242           63215 50542                     2DEC     -.7952549230 B-1                        #  STAR 12       Z
002122,000619: 
002123,000620: 14,2244           02141 34546                     2DEC     +.1369502971 B-1                        #  STAR 11       X
002124,000621: 
002125,000622: 14,2246           12716 02026                     2DEC     +.6814042795 B-1                        #  STAR 11       Y
002126,000623: 
002127,000624: 14,2250           13401 34315                     2DEC     +.7189804058 B-1                        #  STAR 11       Z
002128,000625: 
002129,000626: 14,2252           03156 02376                     2DEC     +.2009372589 B-1                        #  STAR 10       X
002130,000627: 
002131,000628: 14,2254           17402 26132                     2DEC     +.9690787331 B-1                        #  STAR 10       Y
002132,000629: 
002133,000630: 14,2256           75552 70755                     2DEC     -.1432153163 B-1                        #  STAR 10       Z
002134,000631: 
002135,000632: 14,2260           05467 12453                     2DEC     +.3505042402 B-1                        #  STAR 9        X
002136,000633: 
002137,000634: 14,2262           16221 03071                     2DEC     +.8927120666 B-1                        #  STAR 9        Y
002138,000635: 
002139,000636: 14,2264           04420 03530                     2DEC     +.2832171316 B-1                        #  STAR 9        Z
002140,000637: 
002141,000638: 14,2266           06441 32064                     2DEC     +.4103778920 B-1                        #  STAR 8        X
002142,000639: 
002143,000640: 14,2270           07767 00316                     2DEC     +.4989028983 B-1                        #  STAR 8        Y
002144,000641: 
002145,000642: 14,2272           14155 10512                     2DEC     +.7633386428 B-1                        #  STAR 8        Z
002146,000643: 
002147,000644: 14,2274           13177 16474                     2DEC     +.7030586868 B-1                        #  STAR 7        X
002148,000645: 
002149,000646: 14,2276           13245 32202                     2DEC     +.7077417542 B-1                        #  STAR 7        Y
002150,000647: 
002151,000648: 14,2300           01070 04747                     2DEC     +.0693548283 B-1                        #  STAR 7        Z
002152,000649: 
002153,000650: 14,2302           10560 10564                     2DEC     +.5449551668 B-1                        #  STAR 6        X
002154,000651: 
002155,000652: 14,2304           10403 00211                     2DEC     +.5316172328 B-1                        #  STAR 6        Y
002156,000653: 
002157,000654: 14,2306           65500 54764                     2DEC     -.6483879887 B-1                        #  STAR 6        Z
002158,000655: 
002159,000656: 14,2310           00152 17317                     2DEC     +.0129982160 B-1                        #  STAR 5        X
002160,000657: 
002161,000658: 14,2312           00077 36650                     2DEC     +.0078080287 B-1                        #  STAR 5        Y
002162,000659: 

Page 52

002164,000661: 14,2314           17777 01672                     2DEC     +.9998850339 B-1                        #  STAR 5        Z
002165,000662: 
002166,000663: 14,2316           07674 32337                     2DEC     +.4918000631 B-1                        #  STAR 4        X
002167,000664: 
002168,000665: 14,2320           03417 04547                     2DEC     +.2205989850 B-1                        #  STAR 4        Y
002169,000666: 
002170,000667: 14,2322           62413 74137                     2DEC     -.8422997006 B-1                        #  STAR 4        Z
002171,000668: 
002172,000669: 14,2324           07507 11400                     2DEC     +.4774532337 B-1                        #  STAR 3        X
002173,000670: 
002174,000671: 14,2326           01674 02073                     2DEC     +.1167072881 B-1                        #  STAR 3        Y
002175,000672: 
002176,000673: 14,2330           15736 05654                     2DEC     +.8708718726 B-1                        #  STAR 3        Z
002177,000674: 
002178,000675: 14,2332           16745 15337                     2DEC     +.9342553544 B-1                        #  STAR 2        X
002179,000676: 
002180,000677: 14,2334           02617 02736                     2DEC     +.1737172460 B-1                        #  STAR 2        Y
002181,000678: 
002182,000679: 14,2336           73010 70171                     2DEC     -.3114309732 B-1                        #  STAR 2        Z
002183,000680: 
002184,000681: 14,2340           15776 17053                     2DEC     +.8748133997 B-1                        #  STAR 1        X
002185,000682: 
002186,000683: 14,2342           00327 12164                     2DEC     +.0262841262 B-1                        #  STAR 1        Y
002187,000684: 
002188,000685: 14,2344           07572 33172                     2DEC     +.4837464836 B-1                        #  STAR 1        Z
002189,000686: 
002190,000687: 14,2346           15637        CATLOG             DEC      7071       B-14                       
002191,000688:                                                                                                  #  ************************************************************************
002192,000689: 
002193,000690: 
002194,000691: 05,2000                                           SETLOC   EPHEM1                                
002195,000692: 05,2000                                           BANK                                           
002196,000693: 05,2001                                           COUNT*   $$/EPHEM                              
002197,000694: 
002198,000695: 05,2001           20000 00000  KONMAT             2DEC     1.0        B-1                        #         *************
002199,000696: 
002200,000697: 05,2003           00000 00000                     2DEC     0          B-28                       #                     *
002201,000698: 
002202,000699: 05,2005           00000 00000                     2DEC     0          B-28                       #                     *
002203,000700: 
002204,000701: 05,2007           00000 00000                     2DEC     0          B-28                       #                     *
002205,000702: 
002206,000703: 05,2011           16533 32505                     2DEC*    .91746     B-1*                       #  K1 COS (OBL)
002207,000704: 
002208,000705: 05,2013           77333 56446                     2DEC*    -.035711   B-1*                       #  K2 SIN (OBL) SIN (IM)
002209,000706: 
002210,000707: 05,2015           00000 00000                     2DEC     0          B-28                       #                     *
002211,000708: 
002212,000709: 05,2017           06273 03275                     2DEC*    .39784     B-1*                       #  K3 SIN (OBL)
002213,000710: 

Page 53

002215,000712: 05,2021           01242 24467                     2DEC*    .082354    B-1*                       #  K4 COS (OBL) SIN (IM)
002216,000713: 
002217,000714: 05,2023           00020 17260  CSTODAY            2DEC     8640000    B-33                       #                     * NOTE           *
002218,000715: 
002219,000716: 05,2025           00002        RCB-13             OCT      00002                                 #                     * TABLES CONTAIN *
002220,000717: 05,2026           00000                           OCT      00000                                 #                     * CONSTANTS FOR  *
002221,000718: 05,2027           22572 27267  RATESP             2DEC*    .03660099  B+4*                       #  LOMR
002222,000719: 
002223,000720: 05,2031           01315 26251                     2DEC*    .00273780  B+4*                       #  LOSR
002224,000721: 
002225,000722: 05,2033           77731 55144                     2DEC*    -.00014720 B+4*                       #  LONR
002226,000723: 
002227,000724: 05,2035           05456 01204                     2DEC     .174685017                            #  LOMO
002228,000725: 
002229,000726: 05,2037           10611 15113                     2DEC     .274011893                            #  LOSO
002230,000727: 
002231,000728: 05,2041           35656 15121                     2DEC     .932520213                            #  LONO
002232,000729: 
002233,000730: 05,2043           01076 16550  VAL67              2DEC*    .017531111 B+1*                       #  AMOD
002234,000731: 
002235,000732: 05,2045           70645 74553                     2DEC     -.224249436                            #  AARG
002236,000733: 
002237,000734: 05,2047           02245 06475                     2DEC*    .036291713 B+1*                       #  1/27
002238,000735: 
002239,000736: 05,2051           00162 05550                     2DEC*    .003484442 B+1*                       #  BMOD
002240,000737: 
002241,000738: 05,2053           01671 37406                     2DEC     .058226609                            #  BARG
002242,000739: 
002243,000740: 05,2055           01000 00000                     2DEC     .031250000                            #  1/32
002244,000741: 
002245,000742: 05,2057           00256 24654                     2DEC*    .005329930 B+1*                       #  CMOD
002246,000743: 
002247,000744: 05,2061           77523 76354                     2DEC     -.010500980                            #  CARG
002248,000745: 
002249,000746: 05,2063           00131 26730                     2DEC*    .002737925 B+1*                       #  1/365
002250,000747: 
002251,000748:                                                                                                  #  ************************************************************************
002252,000749: 
002253,000750: 
002254,000751: 26,2000                                           SETLOC   PLANTIN2                              
002255,000752: 26,2000                                           BANK                                           
002256,000753: 26,2000                                           COUNT*   $$/LUROT                              
002257,000754: 
002258,000755: 26,2000           17775 02052  COSI               2DEC*    9.996417320 E-1        B-1*            #  COS (5521.5 SEC.)
002259,000756: 
002260,000757: 26,2002           00333 10374  SINI               2DEC*    2.676579050 E-2        B-1*            #  SIN (5521.5 SEC.)
002261,000758: 
002262,000759: 26,2004           77665 42175  NODDOT             2DEC*    -1.703706159 E-11       B28*            #  REV/CSEC
002263,000760: 
002264,000761: 26,2006           22211 00636  FDOT               2DEC*    4.253263471 E-9        B27*            #  REV/CSEC
002265,000762: 

Page 54

002267,000764: 26,2010           77777 77767  BDOT               2DEC*    -1.145530402 E-16       B28*            #  REV/CSEC
002268,000765: 
002269,000766: 26,2012           35656 15077  NODIO              2DEC*    9.325201471 E-1        B               #  REV
002270,000767: 
002271,000768: 26,2014           07577 35124  FSUBO              2DEC*    2.421820916 E-1        B               #  REV
002272,000769: 
002273,000770: 26,2016           02052 35411  BSUBO              2DEC*    6.511977813 E-2        B               #  REV
002274,000771: 
002275,000772: 26,2020           37116 32631  WEARTH             2DEC*    1.160576171 E-7        B23*            #  REV/CSEC
002276,000773: 
002277,000774: 26,2022           30611 04040  AZO                2DEC*    7.739945637 E-1        B               #  REVS
002278,000775: 

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