ura404.m

球面天文学（岁差、章动）和天体力学（行星星历表）的原始计算公式、算法和程序。matlab编译通过。主要包括：公历/儒略历转换为儒略日

function an=ura404
%First date in file = 625296.50
%Number of records = 16731.0
%Days per record = 131.0
%      Julian Years      Lon    Lat    Rad
% -3000.0 to  -2499.7:   0.35   0.06   0.42 
% -2499.7 to  -1999.7:   0.50   0.06   0.38 
% -1999.7 to  -1499.7:   0.39   0.07   0.34 
% -1499.7 to   -999.8:   0.34   0.06   0.30 
%  -999.8 to   -499.8:   0.35   0.05   0.32 
%  -499.8 to      0.2:   0.32   0.05   0.27 
%     0.2 to    500.2:   0.26   0.04   0.25 
%   500.2 to   1000.1:   0.28   0.04   0.25 
%  1000.1 to   1500.1:   0.26   0.06   0.31 
%  1500.1 to   2000.1:   0.33   0.05   0.24 
%  2000.1 to   2500.0:   0.32   0.06   0.26 
%  2500.0 to   3000.0:   0.34   0.06   0.32 
%  3000.0 to   3000.4:  0.406  0.035  0.172 

tabl=[ 21.56000,-4652.06828,154246324.90417,1130486.05080,330.11531,-3020.20235,-8.03769,-122.02019,212.45130,254.23866,25.39758,60.08296,6949.85053,51951.42606,-1834.66531,44481.91144,-3267.45825,10776.65972,-628.05388,532.83011,-16.80583,-30.05544,1420.33767,2007.21040,592.32842,1541.61732,-163.55984,121.14134,114.74969,-16.04944,...
 0.06069,0.00725,-0.16861,0.28785,0.07399,-0.09680,0.19936,-0.41620,0.02922,0.07398,0.17272,0.05602,1.65461,-0.68278,-2.18745,-0.85327,0.52467,-0.30863,0.01598,0.30017,-0.04190,-0.03288,-0.02013,0.02257,-0.54883,-0.22701,-0.09257,-0.03921,0.02644,0.04667,0.24773,-0.16562,44242.85814,-223163.54065,123776.84417,-206375.74884,70472.73820,-27456.55173,4065.74401,13202.39154,...
 -3260.72648,802.50579,-153.13236,-503.81026,30.17812,-31.91893,-65.14719,77.78417,-37.38185,19.13337,-3.14043,-0.21147,0.27143,0.17424,0.04458,0.10976,-0.41841,-0.21887,-0.09194,-0.02303,...
 0.02896,0.10044,0.01385,0.01723,-0.01126,-0.09318,-57.95890,29.69059,-46.41390,3.07177,0.42494,2.33678,-3.09621,0.05256,-0.02134,-0.35202,-0.44475,-0.83135,1318.18265,25605.86848,-9168.38371,18917.31507,-5145.74480,2130.77612,-485.25920,-438.44867,19.97802,-33.14800,-23383.91826,-45133.19122,-18520.80729,-26549.95198,-2276.70124,-2974.01604,603.23665,306.87616,...
 -87.73070,-32.49134,549975.14525,261920.31896,526261.09735,362619.26839,150616.68873,164643.90808,9550.02662,27381.83042,-1065.89047,1024.20231,-66.63822,-44.75169,-92.10532,-20.26930,-313205.95341,1462242.64616,112982.53079,1865690.41965,308844.30901,639864.93227,89716.32843,10378.80773,4395.08428,-14565.35913,-3016.07754,-19348.64612,3838.36899,-9813.42713,6883.58821,-6064.92588,2740.47455,-176.29547,241.91895,268.44181,...
 -6.13397,17.92503,-0.01377,-0.08742,387.51915,257.03872,152.81792,221.56197,-22.94836,29.56640,-2.27801,4.72805,...
 -6.03420,-0.36763,0.00667,0.00443,-0.01405,0.04658,-0.06533,-0.01966,0.10738,0.00443,0.02889,0.01056,0.00900,-0.02206,0.00013,0.05281,0.03035,0.34793,0.19460,2.47360,0.18189,-0.83895,0.24983,15.32050,0.46010,2.79643,-0.45793,0.96707,-0.31226,0.51911,...
 0.04071,0.39399,0.00038,0.03854,0.22446,0.13630,-0.04357,0.03635,0.00202,-0.04502,-0.00458,-0.03884,1.32597,3.40849,-1.67839,-0.95411,-1.00116,-0.72744,-0.22484,-0.27682,-0.18069,0.00405,-0.01000,0.27523,-0.07038,-0.01051,-0.09064,0.08518,0.02083,-0.25406,0.17745,-0.00944,0.21326,0.20454,18.84894,-7.64400,0.62670,-11.02728,...
 8.91329,20.67190,0.17757,-0.15471,-0.11385,-0.46057,6.23014,-14.46025,2.30012,-2.22677,5.16823,-1.64235,-274.58413,833.33247,-191.26241,269.90157,-17.25965,9.11368,-261.65136,-18274.45858,-2553.83872,-10039.10490,-508.52567,336.18172,14.88587,421.35954,...
 162.43462,544.92580,-0.44246,0.23216,-0.29024,-0.13057,-1.58438,0.34032,-0.31604,-0.01166,-0.07112,0.05721,-0.10813,0.01064,-0.05413,0.06705,-0.41582,-0.47725,0.31031,0.08605,0.00409,0.02373,0.08092,0.06247,-0.01026,0.05863,...
 -0.00238,0.02948,0.00117,0.02714,0.01720,0.18261,-0.04067,0.88639,-0.15502,-0.96383,-0.05307,-0.17319,-0.00486,-0.02373,-0.14748,-0.11884,0.07798,-0.00358,0.01104,0.00805,0.15099,-0.03453,0.01846,0.03459,...
 0.02197,0.07012,-0.43677,-1.87445,1.35202,2.28294,-0.03592,0.07679,0.16427,0.03014,0.02472,0.05549,...
 -0.04985,0.05874,0.35361,0.01144,-0.57400,1.34898,0.00265,0.01540,0.00951,0.08159,-0.00435,0.34759,-0.12413,-0.49848,-0.77075,-2.73810,-31.77702,12.16042,-14.87605,11.98287,12.69358,1.31307,-8.22911,-21.47437,...
 -0.24051,-0.38332,-0.01162,-0.03175,0.00556,0.02454,-0.02297,-0.01654,0.00707,0.04828,-0.00309,0.17381,-0.00500,-0.07579,0.02008,0.05356,0.00702,0.01133,-0.00237,-0.00612,0.18551,0.22799,-0.14194,-0.08593,0.00002,-0.01049,-0.17363,-0.13986,0.00078,-0.06993,...
 -0.00430,-0.07795,-0.03232,-4.13170,0.00311,0.05356,-0.17324,-0.15505,-0.00590,-0.06608,0.04257,-0.04571,0.00501,0.02141,-0.00037,0.07845,-0.00381,-0.03417,0.01834,0.03349,0.07994,0.15297,-0.82299,0.24672,0.51764,0.96379,...
 0.01729,0.02489,-0.08581,0.13252,0.00538,0.01995,-0.00148,-0.02261,0.00534,0.01565,-0.07518,-0.28114,0.22386,0.39023,-0.00864,0.00964,-0.01923,-0.02426,-0.00112,0.00923,-0.00685,0.02450,0.26733,-0.99972,-0.82005,0.13725,...
 0.01520,-0.00790,0.00358,0.00751,-0.00648,-0.00605,-0.04966,-0.04633,0.06394,-0.01965,0.50185,0.40553,-0.25809,0.28853,...
 0.52545,-3.41675,-0.00347,-0.11848,0.02945,-0.01061,-0.04160,-0.03519,-0.03234,-0.81852,-0.02156,-0.00841,0.00029,0.00020,-0.02281,-0.00364,0.04738,-0.04504,-0.19161,0.37225,0.05765,0.11987,0.00050,0.02012,-0.03806,0.39498,0.29982,0.00886,0.01671,53.04042,-0.04160,-0.38856,-0.00174,-0.01773,-0.47661,-0.32010,-0.01088,-0.16231,-0.01584,-0.00144,0.06659,0.12734,0.04884,0.02236,0.00146,0.06030,-0.20660,-0.03982,0.15091,1.24562,...
 -0.01303,-0.22426,-0.01518,-0.03922,-0.00043,-0.00047,0.02451,0.04437,...
 0.02380,-0.00189,-0.00640,-0.07114,-0.00320,-0.02491,-0.00829,0.07284,0.02846,-0.28034,-0.00268,0.00256,-0.43420,0.39645,-0.31053,1.25916,-0.00371,-0.00651,-0.00096,0.02762,-0.00067,-0.02503,-0.01517,0.03748];
 
 tabb=[ 0.00000,107.91527,83.39404,-124.29804,-7.73277,-3.99442,-0.08328,-1.74251,-9.05659,-22.88559,-2.30655,-4.40259,-470.94604,-3648.43408,326.28960,-2972.91303,337.37285,-650.33570,57.18479,-18.29130,1.13897,2.70158,-13.64388,-71.88619,7.36408,-43.79994,6.57463,-5.81111,-0.06451,0.73379,...
 0.00574,-0.01635,0.00074,-0.01496,-0.00418,0.00647,-0.00407,0.00548,0.00002,0.00187,-0.00591,0.00557,0.32568,-0.01574,0.19347,-0.01705,0.00173,0.02384,-0.00248,-0.00103,0.00227,0.00146,0.00307,-0.00040,0.03886,0.01987,0.00546,0.00345,0.00134,-0.00609,-0.01502,-0.01569,-10080.59325,10806.67752,-14013.76861,9928.38683,-6540.83480,2084.91597,-1093.05006,-305.34266,-9.04558,-110.32310,9.26094,-3.93195,...
 0.25552,0.50327,-13.12170,-4.19317,-4.50857,-3.37626,...
 -0.26850,-0.36028,-0.00357,0.05862,-0.00828,0.00926,-0.01515,-0.03687,-0.00224,-0.00802,-0.00225,-0.00158,-0.00022,-0.00044,-0.00281,0.00371,2.28259,-4.29888,1.74622,-2.13604,0.37023,-0.37022,0.00886,0.07081,0.01669,0.00056,-0.02020,0.01586,-4255.31929,5978.03267,-7264.48027,1884.12585,-2353.93882,-1593.23001,17.57205,-498.54139,...
 33.28704,-13.79498,-38416.64883,-13774.09664,-32822.03952,-3983.42726,-7538.09822,1906.66915,-221.24439,512.77046,32.26101,12.46483,142710.47871,-96584.83892,145395.05981,-86630.96423,48202.96749,-23596.77676,5286.16967,-1626.44031,-16.53568,95.15428,-15.19472,5.69207,-6.72181,7.28683,9515.16142,-166495.49381,5588.84271,-146260.29445,2023.55881,-30687.22422,243.64741,971.58076,390.73247,-236.13754,-2684.56349,739.81087,-597.39429,474.89313,-631.69166,213.04947,-204.89515,-33.09139,-17.78004,-22.21866,...
 0.61083,-1.41177,-0.00070,-0.00501,-58.24552,25.27978,-36.39386,0.36376,-2.21030,-6.46685,-0.58473,-0.09357,0.12829,-0.94855,0.00042,0.00048,0.00411,0.00101,0.00249,-0.00865,0.00223,0.00293,0.00041,-0.00042,...
 0.00104,-0.00086,0.00126,-0.00380,0.00906,-0.02253,0.05998,-0.10318,0.00004,-0.03225,0.14303,-0.05273,...
 0.32683,0.09386,-0.17053,0.60847,-0.06190,0.28166,...
 0.06411,0.05289,0.01138,0.00128,-0.00930,0.00272,0.00037,0.00215,...
 0.00004,0.00050,0.00114,-0.00217,0.05358,-0.06413,-0.00124,0.03842,0.01006,0.22479,0.00412,0.04040,...
 0.01708,0.02164,0.02484,-0.02463,-0.00103,0.02633,-0.01303,-0.03214,0.03613,0.02205,-0.02677,-0.02522,-0.00293,0.03130,-1.87255,-2.50308,-1.53715,0.36859,...
 -0.17829,-1.12095,-0.05652,-0.00786,-0.06992,0.07279,-2.95896,0.55138,-0.61498,-0.11008,...
 -0.87790,-0.50965,119.73553,-35.18217,44.78683,-4.22438,...
 1.95723,0.58033,-4077.02379,-353.39110,-2781.63273,-75.23318,...
 -312.50478,-23.86495,24.59887,32.56837,...
 120.09593,-51.00495,0.09737,0.09111,0.04799,-0.05029,0.08351,-0.33726,0.03158,-0.06435,...
 -0.00523,-0.01736,0.00751,-0.01757,-0.00406,-0.01198,0.16402,-0.10986,-0.02024,0.07205,-0.00440,-0.00072,-0.00465,0.00310,-0.00121,-0.00121,...