next up previous
Next: SCOSPOS_R2SGF - convert Up: Description of the Previous: Description of the

SCOSPOS_ADTOXY - convert (RA,Dec) to (X,Y)

      SUBROUTINE SCOSPOS_ADTOXY ( ALPHA, DELTA, DTSYS__TRAN, 
     :  PTSYS__TRAN, DEQIN__TRAN, PEPCH__TRAN, PRMS__MO, 
     :  DISTR__TC, RACEN__TC, DECEN__TC, PLTCF__TC, X, Y, STATUS )

   ALPHA  =  DOUBLE PRECISION (Given)
      Right Ascension in the mean, desired system specified in the
      housekeeping file (radians).
   DELTA  =  DOUBLE PRECISION (Given)
      Declination in the mean, desired system specified in the
      housekeeping file (radians).
   DTSYS__TRAN = CHARACTER*12 (Given)
      Desired time system, 'B' or 'J'.
   PTSYS__TRAN = CHARACTER*12 (Given)
      Plate time system, 'B' or 'J'
   DEQIN__TRAN = DOUBLE PRECISION (Given)
      Desired equinox.
   PEPCH__TRAN = DOUBLE PRECISION (Given)
      Plate epoch.
   PRMS__MO(35) = DOUBLE PRECISION (Given)
      Array for converting mean to observed coordinates.
   DISTR__TC = DOUBLE PRECISION (Given)
      Distortion coefficient.
   RACEN__TC = DOUBLE PRECISION (Given)
      Right Ascension of the plate centre (radians).
   DECEN__TC = DOUBLE PRECISION (Given)
      Declination of the plate centre (radians).
   PLTCF__TC(6) = DOUBLE PRECISION (Given)
      Transform coefficients: RA,dec to x,y.
   X  =  DOUBLE PRECISION (Returned)
      Plate X position in the coordinate system used by SuperCOSMOS
      (0.01 micron).
   Y  =  DOUBLE PRECISION (Returned)
      Plate Y position in the coordinate system used by SuperCOSMOS
      (0.01 micron).
   STATUS = INTEGER (Given and Returned)
      The global status.



SuperCOSMOS development
Tue Aug 20 12:05:06 BST 1996