Документ взят из кэша поисковой машины. Адрес оригинального документа : http://www.atnf.csiro.au/computing/software/gipsy/sub/epoco.dc2 Дата изменения: Thu Jan 23 17:11:06 1992 Дата индексирования: Fri Jan 16 00:08:46 2009 Кодировка:

Subroutine: EPOCO

Purpose: Transforms equatorial coordinates from one epoch
to another epoch.

File: skyco.c

Author: K.G. Begeman

Use: CALL EPOCO( RA1 , Input double precision
DEC1 , Input double precision
EPOCH1 , Input double precision
RA2 , Output double precision
DEC2 , Output double precision
EPOCH2 ) Input double precision

RA1 Input R.A. in degrees at EPOCH1.
DEC1 Input Dec. in degrees at EPOCH1.
EPOCH1 EPOCH1 in years for RA1 and DEC1.
RA2 Output R.A. in degrees at EPOCH2.
DEC2 Output Dec. in degrees at EPOCH2
EPOCH2 EPOCH2 in years for RA2 and DEC2.

Updates: Feb 5, 1990: KGB, Document created.