Портал "Русская Профессиональная Астрология"
Astrologer.ru - Фундаментальная Астрология StarGate.Ru - Популярная Астрология Консультационная Служба

Личная консультация у профессионального астролога


Subject: Re: Первичные дирекции Date : 22 May 1997 07:47 GMT From : Albert R. Timashev (arta@infopro.spb.su) To : Benjamin Leznik (leznik@slip.net)
Привет еще раз! BL> Большая просьба к тем, кто может поделиться со мной формулами BL> пересчета эклиптических координат планет в экваториальные Все просто. Лови исходник на Паскале: Procedure Ecliptic2Equator ( Beta, Gamma : Double; Var Alpha, Delta : Double ); Begin Delta := ArcSin ( Cos ( Obliquity ) * Sin ( Beta ) + + Sin ( Obliquity ) * Cos ( Beta ) * Sin ( Gamma ) ); Alpha := ArcTan2 ( Cos ( Obliquity ) * Sin ( Gamma ) - Sin ( Obliquity ) * Tan ( Beta ) , Cos ( Gamma ) ); End ; Где Obliquity - наклон экватора к эклиптике. На 2000 год составляет 23,43929 градусов. С уважением, Альберт Тимашев


Правила Подписка по электронной почте Зарегистрироваться   Вернуться к списку сообщений Отсортировать по темам Архив Форума Редактор картинок   Предыдущее сообщение Создать новое сообщение Ответить Следующее сообщение

Астрологическая Консультационная Служба портала Русская Профессиональная Астрология

Участник Rambler's Top100 TopList