Changeset 4398 for trunk/psphot/src/choose_psf_model.c

Timestamp:

Jun 25, 2005, 9:23:18 AM (21 years ago)

Author:

eugene

Message:

further cleanup, adding output functions

File:

• trunk/psphot/src/choose_psf_model.c (modified) (2 diffs)

trunk/psphot/src/choose_psf_model.c

@@ -7 +7 @@
     bool        status;
     char       *modelName;
-    char        key[64];
+    char        key[64], filename[64];
     pmPSF_Test *test  = NULL;
     psArray    *stars = NULL;
@@ -35 +35 @@
         tests->data[i] = pmPSF_TestModel (stars, modelName, RADIUS);
 
-        // dump psf test data to file:
-        {
-          sprintf (key, "metric.%d.dat", i);
-          FILE *f = fopen (key, "w");
-          test = tests->data[i];
-
-
-          for (int j = 0; j < test->sources->n; j++) {
-            psSource *source = test->sources->data[j];
-            psModel  *model  = test->modelPSF->data[j];     
-            float sky = 0;
-
-            if (model != NULL) sky = model->params->data.F32[0];
-
-            fprintf (f, "%3d %6.1f %6.1f  %7.4f %7.4f  %8.4f\n", 
-                     j, source->moments->x, source->moments->y,
-                     test->metric->data.F64[j], test->fitMag->data.F64[j], sky);
-          }
-          fclose (f);
-        }
+        sprintf (filename, "metric.%d.dat", i);
+        DumpPSFTestData (tests->data[i], filename);
     }