Changeset 10613 for trunk/psastro/src/psastroWCS.c

Timestamp:

Dec 10, 2006, 8:37:37 AM (19 years ago)

Author:

eugene

Message:

changed p_psProject,p_psDeproject to psProject,psDeproject

File:

• trunk/psastro/src/psastroWCS.c (modified) (2 diffs)

trunk/psastro/src/psastroWCS.c

@@ -138 +138 @@
         if (fpa->toSky == NULL) {
             // XXX for now, use the identity for TPA <--> FPA
-            fpa->toTangentPlane = psPlaneDistortIdentity (1);
-            fpa->fromTangentPlane = psPlaneDistortIdentity (1);
+            fpa->toTPA = psPlaneDistortIdentity (1);
+            fpa->fromTPA = psPlaneDistortIdentity (1);
             fpa->toSky = toSky;
         } else {
-            if (fpa->toTangentPlane == NULL) psAbort ("wcs", "projection defined, tangent-plane not defined");
-            if (fpa->fromTangentPlane == NULL) psAbort ("wcs", "projection defined, tangent-plane not defined");
+            if (fpa->toTPA == NULL) psAbort ("wcs", "projection defined, tangent-plane not defined");
+            if (fpa->fromTPA == NULL) psAbort ("wcs", "projection defined, tangent-plane not defined");
 
             // adjust for common toSky for mosaic:
@@ -154 +154 @@
         
             psPlaneTransformApply (fp, toFPA, chip); // find the focal-plane coordinate of this chip's 0,0 coordinate
-            p_psDeproject (sky, fp, toSky); // find the RA,DEC coord of the focal-plane coordinate
-            p_psProject (fp, sky, fpa->toSky); // find the focal-plane coord of this RA,DEC coord using the ref chip projection
+            psDeproject (sky, fp, toSky); // find the RA,DEC coord of the focal-plane coordinate
+            psProject (fp, sky, fpa->toSky); // find the focal-plane coord of this RA,DEC coord using the ref chip projection
 
             toFPA->x->coeff[0][0] = fp->x;