Changeset 19519

Timestamp:

Sep 11, 2008, 3:10:59 PM (18 years ago)

Author:

eugene

Message:

adding debug code

File:

• trunk/psastro/src/psastroMosaicDistortion.c (modified) (6 diffs)

trunk/psastro/src/psastroMosaicDistortion.c

@@ -1 +1 @@
 # include "psastroInternal.h"
+# define DEBUG 0
 
-bool psastroMosaicDistortion (pmFPA *fpa, psMetadata *recipe) {
+bool psastroMosaicDistortion (pmFPA *fpa, psMetadata *recipe, int pass) {
 
     // fit a linear transformation from reference TP to observed FP coords
@@ -9 +10 @@
         return false;
     }
+
+    if (DEBUG && (pass == 0)) psastroDumpCorners ("corners.up.v1.dat", "corners.dn.v1.dat", fpa);
 
     // Correct the current reference star TP coordinates to the nearly-FP
@@ -21 +24 @@
     }
 
+    if (DEBUG && (pass == 0)) psastroDumpCorners ("corners.up.v2.dat", "corners.dn.v2.dat", fpa);
+
     if (!psastroMosaicDistortionFromGradients (fpa, recipe)) {
         psError(PSASTRO_ERR_UNKNOWN, false, "failed to fit the distortion field\n");
@@ -26 +31 @@
         return false;
     }
+
+    if (DEBUG && (pass == 0)) psastroDumpCorners ("corners.up.v3.dat", "corners.dn.v3.dat", fpa);
 
     if (!psastroMosaicCorrectDistortion (fpa, TPtoFP)) {
@@ -33 +40 @@
     }
         
+    if (DEBUG && (pass == 0)) psastroDumpCorners ("corners.up.v4.dat", "corners.dn.v4.dat", fpa);
+
     if (!psastroMosaicSetAstrom (fpa)) {
         psError(PSASTRO_ERR_UNKNOWN, false, "failed to apply mosaic distortion terms\n");
@@ -39 +48 @@
     }
 
+    if (DEBUG && (pass == 0)) psastroDumpCorners ("corners.up.v5.dat", "corners.dn.v5.dat", fpa);
+
     psFree (TPtoFP);
     return true;