interface raDecToInst
subroutine raDecToInstScalar(raDeg, decDeg, scAttitude&
, timeStamp, detX, detY, thetaArcsec, phi)
real(double), intent(in) :: raDeg,&
decDeg
type(SpacecraftAttitudeType), intent(in) :: scAttitude
real(double), intent(in) :: timeStamp
real(single) , optional, intent(out) :: detX,&
detY
real(double) , optional, intent(out) :: thetaArcsec,&
phi
end subroutine raDecToInstScalar
subroutine raDecToInstVector(raDeg, decDeg, scAttitude&
, timeStamp, detX, detY, thetaArcsec, phi)
real(double), intent(in) :: raDeg(:),&
decDeg(size(raDeg))
type(SpacecraftAttitudeType), intent(in) :: scAttitude
real(double), intent(in) :: timeStamp
real(single) , optional, intent(out) :: detX(size(raDeg)),&
detY(size(raDeg))
real(double) , optional, intent(out) :: thetaArcsec(size(raDeg)),&
phi(size(raDeg))
end subroutine raDecToInstVector
end interface
This subroutine converts from celestial coordinates to instrument-centric coordinates, in either the DETX/Y (the same, up to a scalar multiple, as the CAMCOORD2 system) or TELCOORD systems, depending on which of the optional variables ,
,
and
the caller has supplied.
NOTE this subroutine requires the cal to have been set to the correct instrument before the call.