該存儲庫最初是Planet Esphemerides數據庫VSOP2013的Delphi港口。隨著時間的流逝,它加劇了:
完整的西方傳統星座的圖紙,主要是希臘神話中的角色。為了使用圖紙(這不在軟件中),我使用了AI聊天機器人(MS Bing和Google Bard)來創建有關涉及星座的神話的故事,以及宙斯(大多數)如何設計天空。
檢查星座神話(8個故事):https://github.com/omarreis/vsop2013/tree/master/master/constellations
4月23日:PlanetFun App v1.9為iOS和Android發布。
添加了年鑑模塊,該模塊允許計算各種天體對象的臨時模塊。添加了VSOP87行星數據庫。 H150和導航星目錄。
星座圖(添加了兩個新的天空背景,帶有神話般的希臘人物)
請參閱https://github.com/omarreis/vsop2013/tree/master/planetfun
VSOP 2013(變化séculairesdes orbitesplanétaire)是G. Francou&J.-L。的高精度行星位置模型。西蒙 - 2013年5月。
該倉庫包含原始Fortran代碼的Delphi Pascal端口。
VSOP2013計算機械使用Chebyshev多項式一次(在9000年內)一次找到9個行星的位置和速度。
用D11.2測試Win32,iOS和Android。測試適用於FireMonKey,但也應使用VCL和Console應用程序。
VSOP 2013原始紙張帶有fortran代碼和數據文件,請參見:
https://ftp.imcce.fr/pub/ephem/planets/vsop2013/ephemerides/
vsop2013 readme:
https://ftp.imcce.fr/pub/ephem/planets/vsop2013/solution/solution/readme.pdf
數據文件是大型(400 MB)ASCII文本,其中包含第一類係數的Chebyshev多項式。它在6個文件中組織,總共涵蓋了9,000年的期限,如下所示:
range file
-4500 to -3000 VSOP2013.m4000
-3000 to -1500 VSOP2013.m2000
-1500 to 0 VSOP2013.m1000
0 to +1500 VSOP2013.p1000
+1500 to +3000 VSOP2013.p2000
+3000 to +4500 VSOP2013.p4000
每個文件分為17122,間隔32天。每個間隔具有978個係數,每行分為6組。
文件標頭包含9個行星係數的索引表:水星,金星,地球+月球baricenter,火星,木星,土星,天王星,海王星和冥王星。
每個星球都有許多Chebyshev多項式項(每個星球的7至14個術語之間)。
結果是兩個3D向量:位置和速度。
結果在Au(速度)中以heliipentric Ecliptic坐標(X,Y,Z)。
FTP存儲庫包含FORTRAN代碼:
在此Delphi端口中,將整個文件預先加載到內存表中以進行快速訪問。
對象T_VSOP2013_FILE封裝VSOP 2013機械:
用於處理日期和天文學的大多數算法來自Jean Meeus(AA第一和第二版)的《天文學算法》一書。
一些公式來自USNO(標記為AFC)的“計算機年鑑”出版物。
月球位置計算使用理論ELP2000(AA第47章)。 ELP(ÉphémérideLunaireParisienne)是由Jean Chapront,Michelle Chapront-Touzé開發的月球理論,該理論是在縱火局的。
AndreasHörstemeier從TMOON組件中提取了Ah.moon.pas中的實現。
請參閱http://www.hoerstemeier.com/moon.htm
Meeus Book:VSOP 87中描述了VSOP的較舊版本,它與VSOP 2013相似,其精度較低,但數據足跡也較小。對於大多數應用程序,它已經足夠精確。
請參閱VSOP87和VSOP87/演示文件夾
https://github.com/omarreis/vsop2013/tree/master/vsop87
恆星位置計算。列出給定時間的150個最亮的恆星和實現坐標計算。
有關測試應用程序,請參見Testh150文件夾。
https://github.com/omarreis/vsop2013/tree/master/testh150stars
示例應用程序包含在此存儲庫中:
TestVSOP2013是一個FireMonKey應用。
要使用它,您必須從VSOP2013 FTP存儲庫中下載至少一個數據文件(當前文件為vsop2013.p2000)

我沒有測試原始fortran代碼,因此我在原始文件vsop2013_ctl-1.txt上使用了結果。
Test of Delphi implementation of VSOP2013
==========================================
from VSOP2013_ctl.txt ( original results file)
JUPITER JD2405730.5 X: -5.392780445602 ua Y: -0.805698954496 ua Z : 0.124332318817 ua
X': 0.001019284060 ua/d Y': -0.007116469431 ua/d Z': 0.000005921462 ua/d
from TestVSOP2013 ( code in this repo )
Jupiter jde2405730.5 x: -5.39278044560243 ua y: -0.80569895449564 ua z: 0.12433231881710 ua
sx: 0.00101928405984 ua/d sy: -0.00711646943146 ua/d sz: 0.00000592146220 ua/d
from https://ssd.jpl.nasa.gov/horizons.cgi ( Nasa Horizons. used Jupiter Center and Sun Center)
Jupiter jd2405730.5 (A.D. 1874-Jul-26 00:00:00.0000 TDB )
X =-5.392781657192185E+00 Y =-8.056977928944861E-01 Z = 1.243323711175276E-01
VX= 1.019554845438113E-03 VY=-7.116569436623840E-03 VZ= 5.921987272194194E-06

Planet Fun是4D中的太陽系模擬。使用“天文算法”中描述的計算方法將9條行星,太陽,月亮,恆星定位。
實施一台年鑑(太陽,月亮,9個行星和150星的位置計算器)
原始碼:
PlanetFun Readme:
為了編譯和運行此應用,您需要:
安裝可執行文件planetfun.exe,testvsop2013.exe,gravityIntegration.exe和資產。
獲取最新版本:https://github.com/omarreis/vsop2013/releases
也在Microsoft商店中可用。搜索“ PlanetFun”。
Windows應用程序。使用牛頓的普遍重力法整合行星位置,並與VSOP2013進行比較。顯示區別圖(殘基)。
請參閱https://github.com/omarreis/vsop2013/tree/master/gravityintegration
1846年,與發現海王星的發現有關的數字。
FB頁面:https://www.facebook.com/vrtoolsoftware