jup404.m

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

function an=jup404

%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.64   0.09   0.40 
% -2499.7 to  -1999.7:   0.70   0.09   0.45 
% -1999.7 to  -1499.7:   0.44   0.08   0.32 
% -1499.7 to   -999.8:   0.42   0.07   0.32 
%  -999.8 to   -499.8:   0.55   0.06   0.34 
%  -499.8 to      0.2:   0.43   0.06   0.31 
%     0.2 to    500.2:   0.56   0.07   0.32 
%   500.2 to   1000.1:   0.49   0.06   0.41 
%  1000.1 to   1500.1:   0.48   0.06   0.38 
%  1500.1 to   2000.1:   0.56   0.06   0.38 
%  2000.1 to   2500.0:   0.63   0.08   0.33 
%  2500.0 to   3000.0:   0.70   0.09   0.36 
%  3000.0 to   3000.4:  0.526  0.023  0.190 

tabl=[ 153429.13855,130818.16897,18120.42948,-8463.12663,-5058.91447,1092566021.02148,123671.25097,-5.43364,12.06012,30428.31077,-74667.61443,46848.16236,-66373.44474,24312.54264,-26045.64766,18353.92564,-4022.13679,4037.97936,10059.82468,...
      -4622.55896,1383.21617,-187.25468,-1171.66028,-0.00062,-0.21713,-1198.83945,1178.62445,-1492.07393,153.07155,-245.57966,-391.94010,82.26400,-40.92104,3.72520,10.57242,-0.04720,-0.04448,-0.04329,-0.06043,-0.03905,0.15712,-0.05644,-0.00129,-0.00342,0.02473,0.00434,-0.01862,0.00431,-0.03993,-0.03159,-0.15982,-0.09928,0.04430,-0.00357,0.31312,...
 -0.01346,-0.00180,-0.09107,0.01215,0.02485,0.01024,27.29869,2.70896,12.91956,19.21726,-6.91384,5.12954,-1.07533,-1.71691,-0.01423,0.03121,-32.48652,-26.13483,46.78162,-62.02701,94.96809,81.73791,-20.13673,131.05065,-0.00798,0.01786,13.99591,16.87756,-8.51726,21.59490,-14.28833,-9.45530,7.73954,-6.53078,...
 0.03175,-0.04295,3.06742,-0.11838,1.03630,0.94004,-0.14085,0.14434,-0.03363,0.00993,-0.00007,-0.02748,26.01507,-7.37178,16.96955,6.24203,-0.40481,3.72456,-0.53597,-0.14938,37.82081,26.15887,-2.82115,78.26478,-63.39155,-5.52419,13.11482,-43.54977,15.64940,6.67505,-10.25616,-7.39672,-12.37441,12.24417,8.54922,9.68451,-0.03658,-0.00963,1.65523,0.43093,0.32023,0.71365,...
 -0.12226,0.03759,0.10388,0.47212,-0.02791,0.09929,-0.04116,-0.03125,-0.10240,-0.23199,-0.03524,-0.13625, 7.52726,6.86314,0.01239,13.46530,-5.22256,1.56116,-0.15925,-1.19571,3.26302,0.06097,-0.14444,-0.20301,1.93822,-80.12566,0.98665,-7.52986,3.86703,-2.43028,0.64180,0.78351,0.00190,-0.00633,-0.00321,-0.04403,...
 0.19018,0.14335,0.10315,0.53154,-0.00062,-0.00464,-0.00109,0.02150,1.19993,47.21638,-24.56067,25.06332,-7.50751,-6.36250,1.39443,-1.23806,0.04951,0.02176,0.02802,-0.01665,-0.10698,-0.13635,73.54797,-52.34968,74.98754,86.56283,...
 -69.01463,44.56866,0.04387,-0.05925,-0.03732,-0.03264,0.00967,0.02143,10.59429,26.48226,34.03470,3.96160,4.15919,-20.22616,-5.25903,-3.40177,0.05111,-0.06788,0.06497,1.21024,-0.29607,0.49991,-0.06055,-0.03464,0.02950,0.16429,0.00722,-0.90806,-0.02161,0.00902,-0.00261,0.00077,0.00434,-0.29231,0.00456,0.04781,1.33214,-2.62015,0.79761,-0.81850,0.06371,0.00119,...
 0.03049,-0.03553,0.02373,-0.01411,-189.06132,-169.17940,5.27464,-227.72664,83.72511,-12.04794,0.23965,23.75496,-3.43532,-0.34276,-1.35880,0.45053,-0.34298,-0.11441,-0.16328,0.07423,481.48150,79.82461,453.82764,941.94205,-635.83924,397.29087,-81.54066,-417.22420,...
 149.91822,10.53490,-0.13210,0.36740,0.33777,0.15893,-2562.04968,2442.77844,-2602.66709,2838.87348,723.50715,-1284.58208,-4557.23362,-4514.61100,-8960.81693,4663.55087,-4947.61530,19377.42027,-0.16786,-0.19514,0.32100,0.91502,4.96600,-1.11836,307.38057,175.14618,16.02093,444.42376,...
 -219.80047,62.39286,-18.14266,-52.23698,0.02111,0.00469,-20.97409,-34.48296,-2.03906,-27.07560,3.73818,-3.00599,0.24112,0.41430, -0.03552,0.00394,-0.00217,0.02307,0.03686,0.00510,34.46537,10.23293,9.99520,28.88781,-11.31210,3.52646,-0.48062,-2.93641,-0.00987,-0.05310,-38.39539,...
 0.04568,-31.73684,-1.83151,-24.97332,-1.71244,0.33498,7.03899,-4.15247,200.43434,-0.00800,0.04462,37.83113,-13.40661,9.49434,-35.41588,-14.72767,-3.84674,-0.31412,3.97734,...
 0.02908,-0.00353,1.89935,-14.31774,7.77051,-7.08945,1.90915,1.78908,-0.41445,0.30506,-14.43121,7.30707,-11.97842,-17.64121,13.38962,-7.20982,-5.23362,2.11364,-0.45605,4.08835,...
 1.42683,0.24838,-0.00605,0.03199,-0.17609,-1.43091,0.32444,-0.51371,0.06182,0.03733,0.00696,-0.13438,4.67581,4.42379,-1.52602,4.20659,-1.31757,-0.72910,1.29012,0.97780,2.25895,...
 -0.85306,1.74120,-5.09507,0.28107,-0.05040,0.05508,-0.06349,-0.00061,0.48249,-2.37749,1.78180,-1.67423,-0.35618,0.05789,-0.35287,0.56252,-0.66584,0.61979,4.84016,-4.64462,17.48002,0.40982,-4.19214,-1.55252,-1.87505,...
 -0.31070,0.15554,-0.00034,0.11102,0.01116,-0.04166,9.27689,-4.32090,6.84888,1.78741,-0.09306,1.68391,-0.27482,-0.04197,-7.83068,37.71086,-37.53346,7.18559,0.74427,-24.29751,10.87837,1.35503,0.00998,-0.03395,...
 -133.52206,-150.11329,4.27494,-173.79469,150.87961,-356.29181,-330.17873,-426.29809,-607.98186,126.35464,-299.69623,556.41055,-0.00342,0.04411,44.65946,42.07312,85.71397,5.95130,...
 24.98064,-41.20026,-14.05970,-10.46101,-2.24038,2.89211,0.06175,0.08128,0.00705,0.01939,-1.08361,-0.08213,-0.20868,-0.36268,-4.96489,-2.05966,-6.16586,3.65514,-3.12555,12.20821,-1.11236,-1.73772,-1.34045,-0.22774,...
 -0.08639,0.27355,-0.07700,1.06260,-0.46013,0.31916,-0.04969,-0.09488,-1.54000,0.04949,-0.07616,-0.95933,0.93303,3.43183,-0.82917,-0.82042,-0.68158,0.17083, 0.06942,0.17491,-0.02699,-0.01051,0.00657,0.03063,-0.52595,...
 0.84035,-0.88323,-0.70188,0.60928,-0.48179,0.38290,0.04482,0.26456,-0.32369,-0.00615,0.03218,-0.32943,0.14675,-0.10782,-0.09036,-0.58003,0.72888,-0.46654,1.17977,0.00222,0.01541,-0.19226,-0.07770,-0.01829,-0.05070,-1.75385,-1.32969,0.52361,-1.36036,...
 0.67222,1.34612,6.96841,-29.24025,-23.76900,-39.91647,-41.01215,-2.23638,-18.81024,20.77095,-0.68592,-2.26212,-1.14065,-0.76493, -0.18044,0.15193,-0.20669,-0.44387,0.25697,-0.17880,-0.53097,0.43181,-0.35187,0.71934,-0.14962,0.09220,-0.05031,-0.03924,...
 0.06571,0.29487,0.05170,0.36847,0.02754,-0.00411,-0.08313,-0.16907,0.10273,-0.07315,-0.02312,0.04912,-0.01062,-0.02713,0.03806,0.13401,-1.79865,-2.04540,-2.69965,-0.65706,...
 -1.17916,0.79292,0.02415,0.14001,-0.01767,0.04209,0.05212,-0.01795,0.01285,0.04028,0.01075,0.05533,0.02323,-0.00864,-0.04691,0.03128,0.00548,0.02254,0.00011,0.12033];
 
tabb=[ 548.59659,594.29629,219.97664,59.71822,23.62157,40.77732,227.07380,0.00293,-0.00745,-307.33226,-347.92807,-309.49383,-428.18929, -96.59506,-191.36254,2.11014,-34.44145,2.23085,6.77110,-5.43468,-0.28391,0.28355,-1.81690,0.00036,0.00078,-1.83259,1.17464,-2.66976,-0.92339,...
 -0.23645,-1.20623,0.25248,-0.04958,0.00064,0.03599,-0.00079,0.00004,-0.00005,-0.00010, -0.00024,0.00051,0.00001,0.00005,0.00015,0.00010,0.00017,-0.00004,0.00113,-0.00011,0.00021,0.00087,0.00120,-0.00114,-0.00881,-0.00020,...
 -0.00005,0.00009,0.00005,0.00007,0.00002,-0.00033,-0.00554,-0.32274,0.23695,-0.11184, 0.04050,0.09929,-0.02189,0.00305,-0.00142,-0.00055,0.66623,0.34590,0.74913,-0.23202,...
 -1.08316,-1.40407,1.72287,-0.07604,0.00024,0.00004,0.03592,0.91143,-1.11848,-0.17473, 0.91500,-1.34912,0.85229,0.69029,-0.00019,0.00075,0.03615,0.30768,-0.08733,0.12016, -0.01716,-0.01138,0.00021,0.00004,0.00531,0.00098,-0.14354,-0.02364,-0.05559,-0.07561,...
 0.01419,-0.01141,0.00014,0.00218,-0.36564,0.13498,-0.13283,-0.11462,0.23741,0.14960,-0.23173,0.25148,0.00763,-0.05987,-0.00857,0.20312,-0.29399,0.34831,...
 -1.33166,-0.46808,-0.00027,0.00046,0.15729,0.01367,0.04093,0.07447,-0.01598,0.00785,0.00583,0.00324,0.00053,0.00160,-0.00030,0.00043,-0.00208,0.00334,-0.00316,0.00136,0.23086,0.05711,0.19558,0.05897,0.01070,0.05021,-0.00818,-0.02242,0.06301,-0.26483,0.66177,0.02125,0.13477,0.19376,-0.36520,0.83588,-0.69848,-0.00877,...
 0.01626,-0.23878,-0.00373,0.00044,0.00008,-0.00004,-0.00374,-0.00283,0.01104,-0.00619, 0.00004,0.00015,0.00026,0.00013,0.04630,-0.11815,0.00773,0.03796,-0.05172,0.00149,0.00444,-0.01493,-0.00064,-0.00044,-0.00033,0.00002,-0.00012,0.00284,-0.15622,-0.92158,-0.82690,-1.52101,...
 -0.55934,0.69375,-0.00171,0.00031,0.00129,-0.00013,-0.00024,-0.00083,0.66101,-0.21764,-0.43967,0.30157, 0.53389,1.59141,1.94286,0.14146,-0.00064,-0.00006,0.21850,-0.02912,0.08594,0.08734, -0.01678,0.01629,0.00133,0.00562,0.00128,-0.00025,-0.00005,0.00027,0.00032,0.00001,...
 0.00037,0.00042,0.00070,0.00003,0.00275,-0.13096,0.02329,-0.05582,...
 0.00405,-0.00251,0.01316,-0.01165,0.00279,-0.00374,-39.62783,20.91467,-28.97236,3.77560,-3.30029,0.11472,-0.48216,1.05814,-0.21607,-0.03055,-0.64162,-0.57355,-0.05861,-0.18592, -0.12207,-0.06279,-38.55325,-125.74207,-47.22357,41.75842,...
 -119.38841,18.88515,-11.04830,-50.98851,16.64895,1.76553,0.09474,0.03714,0.02593,0.07967,-1187.61854,-1094.91786,-1011.21939,-1102.25998,...
 -575.88672,-107.84860,-890.58889,-807.06589,971.78461,-1287.24560,-4601.44669,-849.54329,-0.00904,0.06233,-0.19456,-0.05521,-0.36915,...