// xyz unit vector to Pixels.
anbool tan_xyzarr2pixelxy(const tan_t* tan, const double* xyzpt, double *px, double *py) {
double iwx=0, iwy=0;
if (!tan_xyzarr2iwc(tan, xyzpt, &iwx, &iwy)) {
return FALSE;
}
tan_iwc2pixelxy(tan, iwx, iwy, px, py);
return TRUE;
}
anbool tpv_xyzarr2iwc(const tpv_t* tpv, const double* xyz,
double* iwcx, double* iwcy) {
return tan_xyzarr2iwc(&(tpv->wcstan), xyz, iwcx, iwcy);
}
anbool tan_radec2iwc(const tan_t* tan, double ra, double dec,
double* iwcx, double* iwcy) {
double xyz[3];
radecdeg2xyzarr(ra, dec, xyz);
return tan_xyzarr2iwc(tan, xyz, iwcx, iwcy);
}
anbool sip_xyzarr2iwc(const sip_t* sip, const double* xyz,
double* iwcx, double* iwcy) {
return tan_xyzarr2iwc(&(sip->wcstan), xyz, iwcx, iwcy);
}