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

Timestamp:

Feb 7, 2007, 5:52:32 PM (19 years ago)

Author:

jhoblitt

Message:

update psAbort() API

File:

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

trunk/psastro/src/psastroWCS.c

@@ -142 +142 @@
             fpa->toSky = toSky;
         } else {
-            if (fpa->toTPA == NULL) psAbort ("wcs", "projection defined, tangent-plane not defined");
-            if (fpa->fromTPA == NULL) psAbort ("wcs", "projection defined, tangent-plane not defined");
+            if (fpa->toTPA == NULL) psAbort("projection defined, tangent-plane not defined");
+            if (fpa->fromTPA == NULL) psAbort("projection defined, tangent-plane not defined");
 
             // adjust for common toSky for mosaic:
@@ -212 +212 @@
 
     // techinically, we can have a plate scale here (toTPA:dx,dy != 1)
-    if (!psPlaneDistortIsIdentity (toTPA)) psAbort ("psastro", "invalid TPA transformation");
+    if (!psPlaneDistortIsIdentity (toTPA)) psAbort("invalid TPA transformation");
     
     // XXX require toFPA->x->nX == toFPA->x->nY
@@ -395 +395 @@
     psMetadataAddF32 (header, PS_LIST_TAIL, "CDELT2",   PS_META_REPLACE, "", 1.0);
 
-    if (toFPA->x->nX != toFPA->x->nY) psAbort ("psastro", "mis-matched tangent plane orders (1)");
-    if (toFPA->x->nX != toFPA->y->nX) psAbort ("psastro", "mis-matched tangent plane orders (2)");
-    if (toFPA->x->nX != toFPA->y->nY) psAbort ("psastro", "mis-matched tangent plane orders (3)");
+    if (toFPA->x->nX != toFPA->x->nY) psAbort("mis-matched tangent plane orders (1)");
+    if (toFPA->x->nX != toFPA->y->nX) psAbort("mis-matched tangent plane orders (2)");
+    if (toFPA->x->nX != toFPA->y->nY) psAbort("mis-matched tangent plane orders (3)");
 
     switch (toFPA->x->nX) {
@@ -428 +428 @@
 
       case 0:
-        psAbort ("psastro", "invalid tangent plane order");
+        psAbort("invalid tangent plane order");
     }
     return true;
@@ -450 +450 @@
     psMetadataAddF32 (header, PS_LIST_TAIL, "CDELT2",   PS_META_REPLACE, "", toSky->Ys*DEG_RAD*plateScale);
 
-    if (toTP->x->nX != toTP->x->nY) psAbort ("psastro", "mis-matched tangent plane orders (1)");
-    if (toTP->x->nX != toTP->y->nX) psAbort ("psastro", "mis-matched tangent plane orders (2)");
-    if (toTP->x->nX != toTP->y->nY) psAbort ("psastro", "mis-matched tangent plane orders (3)");
+    if (toTP->x->nX != toTP->x->nY) psAbort("mis-matched tangent plane orders (1)");
+    if (toTP->x->nX != toTP->y->nX) psAbort("mis-matched tangent plane orders (2)");
+    if (toTP->x->nX != toTP->y->nY) psAbort("mis-matched tangent plane orders (3)");
 
     switch (toTP->x->nX) {
@@ -483 +483 @@
 
       case 0:
-        psAbort ("psastro", "invalid tangent plane order");
+        psAbort("invalid tangent plane order");
     }
     return header;
@@ -493 +493 @@
     psPlaneDistort *distort;
 
-    if (order < 1) psAbort ("psastro", "invalid order");
-    if (order > 3) psAbort ("psastro", "invalid order");
+    if (order < 1) psAbort("invalid order");
+    if (order > 3) psAbort("invalid order");
     
     // all coeffs and masks initially set to 0