このリポジトリは、Delphi Port of Planet EphemeridesデータベースVSOP2013として始まりました。時間とともに、以下を含めるようになりました。
主にギリシャ神話のキャラクター、西洋の伝統星座の図面を完成させました。図面(これはソフトウェアではありません)に合わせて、AIチャットボット(MS BingとGoogle Bard)を使用して、星座を含む神話とゼウス(ほとんどが主に空をどのように設計したかについてのストーリーを作成しました。
Constellation Myths(8ストーリー)を確認してください:https://github.com/omarreis/vsop2013/tree/master/constellations
4月23日:iOSとAndroid向けにリリースされたPlanetFun App v1.9。
Almanacモジュールを追加しました。これにより、さまざまな天体オブジェクトのエフェメリスの計算が可能になります。 VSOP87 Planetデータベースを追加しました。 H150およびナビゲータースターカタログ。
星座図面(2つの新しい空の背景が追加され、星座神話のギリシャ人の人物があります)
https://github.com/omarreis/vsop2013/tree/master/planetfunを参照してください
VSOP 2013(VariationsSéculairesdes OrbitesPlanétaires)は、G。Francou&J.-L。による高精度の惑星位置モデルです。サイモン - 2013年5月。
このレポは、元のFortranコードのDelphi Pascalポートが含まれています。
VSOP2013計算機械は、Chebyshev多項式を使用して、一度に9つの惑星の位置と速度を見つけます(9000年の範囲内)。
Win32、iOS、AndroidのD11.2でテストされました。テストはFiremonkey用ですが、VCLおよびコンソールアプリでも動作するはずです。
Fortranコードとデータファイルを備えたVSOP 2013オリジナルペーパーは、
https://ftp.imcce.fr/pub/ephem/planets/vsop2013/ephemerides/
vsop2013 readme:
https://ftp.imcce.fr/pub/ephem/planets/vsop2013/solution/readme.pdf
データファイルは、1番目の種類の係数のチェビシェフ多項式を含む大きい(400 MB)ASCIIテキストです。次のように、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
各ファイルは、32日間の間隔で17122年に分割されます。各間隔には978係数があり、1行あたり6のグループに配置されています。
ファイルヘッダーには、9つの惑星の係数へのインデックスの表が含まれています:水銀、金星、地球+月侵食、火星、木星、土星、天王星、ネプチューン、uto。
各惑星には、多くのチェビシェフ多項式項があります(惑星ごとに7〜14の項)。
結果は、位置と速度の2つの3Dベクトルです。
結果は、au(速度ではau/日)太陽中心の黄道座標(x、y、z)です。
FTPリポジトリには、Fortranコードが含まれています。
このDelphiポートでは、ファイル全体が高速アクセスのためにメモリテーブルに事前ロードされています。
オブジェクトT_VSOP2013_FILEはVSOP 2013マシンをカプセル化します。
日付と天文学の扱いに使用されるほとんどのアルゴリズムは、Jean Meeus(AA第1版と第2版)による「天文学アルゴリズム」の本からのものです。
一部の式は、USNO(AFCとマーク)による「コンピューター用のAlmanac for Computers」出版物からのものです。
月の位置計算では、理論ELP2000を使用します(AA第47章)。 ELP(エファメリドルネールパリシエンヌ)は、ミシェルチャップロントトゥーゼのジャン牧師によって開発された月の理論であり、局との長期にわたって開発されています。
Ah.moon.pasでの実装は、AndreasHörstemeierによってTMONコンポーネントから抽出されました。
http://www.hoerstemeier.com/moon.htmを参照してください
VSOPの古いバージョンは、Meeus Book:VSOP 87で説明されています。VSOP2013に似ており、精度が低いだけでなく、はるかに小さなデータフットプリントもあります。ほとんどのアプリケーションにとって十分に正確です。
VSOP87およびVSOP87/DEMOフォルダーを参照してください
https://github.com/omarreis/vsop2013/tree/master/vsop87
星位置計算。特定の時間の150の最も明るい星と道具の座標計算をリストします。
テストアプリのtesth150フォルダーを参照してください。
https://github.com/omarreis/vsop2013/tree/master/testh150stars
サンプルアプリはこのリポジトリに含まれています。
testVSOP2013はFiremonkeyアプリです。
それを使用するには、VSOP2013 FTPリポジトリからデータファイルの少なくとも1つをダウンロードする必要があります(現在のファイルは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:
このアプリをコンパイルして実行するには、次のようにする必要があります。
executables PlanetFun.exe、testVSOP2013.EXE、GRAVITYINTEGRATION.EXEおよびASSETSをインストールします。
最新リリースを入手:https://github.com/omarreis/vsop2013/releases
Microsoftストアでも入手できます。 「PlanetFun」を検索します。
Windowsアプリ。ニュートンのユニバーサル重力法則を使用して惑星の位置を統合し、VSOP2013と比較します。違いのチャート(残基)を示します。
https://github.com/omarreis/vsop2013/master/gravityintegrationを参照してください
1846年の惑星ネプチューンの発見に関連する数。
FBページ:https://www.facebook.com/vrtoolsoftware