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

SCOSPOS_READHK - read transform coeffs etc. from the housekeeping file

      SUBROUTINE SCOSPOS_READHK ( HSEKP, HKLUN, DTSYS__TRAN, 
     :  PTSYS__TRAN, DEQIN__TRAN, PEPCH__TRAN, BAKCF__TC, 
     :  PLTCF__TC, DISTR__TC, RACEN__TC, DECEN__TC, PRMS__MO, 
     :  STATUS )

   HSEKP  =  CHARACTER*(*) (Given)
      The name of the ASCII listing of the housekeeping file.
   HKLUN  = INTEGER (Given)
      Fortran logical unit number
   DTSYS__TRAN = CHARACTER*(*) (returned)
      Desired time system.
   PTSYS__TRAN = CHARACTER*(*) (returned)
      Plate time system.
   DEQIN__TRAN = DOUBLE PRECISION (returned)
      Desired equinox.
   PEPCH__TRAN = DOUBLE PRECISION (returned)
      Plate epoch.
   BAKCF__TC(*) = DOUBLE PRECISION (returned)
      Transform coefficients: x,y to RA,dec.
   PLTCF__TC(*) = DOUBLE PRECISION (returned)
      Transform coefficients: RA,dec to x,y.
   DISTR__TC = DOUBLE PRECISION (returned)
      Distortion coefficient.
   RACEN__TC = DOUBLE PRECISION (returned)
      Right Ascension of the plate centre (radians).
   DECEN__TC = DOUBLE PRECISION (returned)
      Declination of the plate centre (radians).
   PRMS__MO(*) = DOUBLE PRECISION (returned)
      array for converting mean to observed coordinates
   STATUS = INTEGER (Given and Returned)
      The global status.



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