vsop2013
v2.1
Этот репозиторий начался как база данных Delphi of Planet Ephemerides VSOP2013. Со временем это стало включать:
Завершенные рисунки западных созвездий, в основном персонажей из греческой мифологии. Чтобы перейти с чертежами (это не в программном обеспечении), я использовал ботов в чате ИИ (MS Bing и Google Bard), чтобы создать истории о мифах, связанных с созвездиями, и о том, как Зевс - в основном - разработал небо.
Проверьте мифы о созвездии (8 этажей): https://github.com/omarreis/vsop2013/tree/master/constellations
Апрель/23: App Planetfun v1.9 выпущено для iOS и Android.
Добавлен модуль Almanac, который позволяет вычислять эфемериды для различных небесных объектов. Добавлена база данных планеты VSOP87. Каталоги H150 и Navigator Star.
Чертежи созвездий (добавлены два новых неба фона, с созвездием мифических греческих фигур)
См. Https://github.com/omarreis/vsop2013/tree/master/planetfun
VSOP 2013 (Variations Séculaires des Orbite Planétaires) является моделью высокой точной планетарной позиции G. Francou & J.-L. Саймон - май 2013 года.
Этот репо содержит порт Delphi Pascal Original Fortran Code.
Расчет VSOP2013 Machinery использует полиномы Chebyshev, чтобы найти положение и скорость 9 планет за раз (в диапазоне 9000 лет).
Протестировано с D11.2 для Win32, iOS и Android. Тесты предназначены для FireMonkey, но должны работать с VCL и Console App.
VSOP 2013 Оригинальная статья с кодом FORTRAN и файлами данных можно найти по адресу:
https://ftp.imcce.fr/pub/ephem/planets/vsop2013/ephemerides/
Vsop2013 readme:
https://ftp.imcce.fr/pub/ephem/planets/vsop2013/solution/readme.pdf
Файлы данных имеют большой (400 МБ) текст ASCII, содержащий полином ChebyShev 1 -й доброй коэффициенты . Он организован в 6 файлах, охватывая всего 9000 -летний период, следующим образом:
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 планет: Меркурий, Венера, Земля+Луна Барисентер, Марс, Юпитер, Сатурн, Уран, Нептун и Плутон.
Каждая планета имеет ряд полиномиальных терминов Chebyshev (от 7 до 14 терминов на планету).
Результатами являются два 3D -вектора: положение и скорость.
Результаты находятся в AU (AU/день для скоростей) Гелиоцентрические эклиптические координаты (x, y, z).
Репозиторий FTP содержит код Fortran:
В этом порте Delphi весь файл предварительно загружен в таблицы памяти для быстрого доступа.
Object T_VSOP2013_FILE ENCAPSULATIGE VSOP 2013 MACHINERY:
Большинство алгоритмов, используемых для борьбы с датами и астрономией, взяты из книги «Астрономические алгоритмы» Жана Мией (AA 1 -е и 2 -е издания)
Некоторые формулы взяты из публикации «Almanac для компьютеров» USNO (помеченная AFC).
Расчеты положения луны Используйте теорию ELP2000 (AA Глава 47). ELP (Ephéméride Lunaire Parisienne)-это лунная теория, разработанная Жаном Чапронтом, Мишель Чапронт-Тузе, на Бюро DES Londitudes.
Реализация в ah.moon.pas была извлечена из компонента Tmoon Andreas Hörstemeier.
См. http://www.hoerstemeier.com/moon.htm
Старая версия VSOP описана в книге Meeus: VSOP 87 она похожа на VSOP 2013, с более низкой точностью, но также и гораздо меньшим следствием данных. Это достаточно точнее для большинства приложений.
См. Папки 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 (текущий файл 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
