Changeset 35419

Timestamp:

Apr 19, 2013, 4:38:18 PM (13 years ago)

Author:

eugene

Message:

minor changes in test blocks

Location:

trunk/psastro/src

Files:

• psastroChipAstrom.c (modified) (1 diff)
• psastroChooseRefstars.c (modified) (2 diffs)

trunk/psastro/src/psastroChipAstrom.c

@@ -75 +75 @@
                 if (refstars == NULL) { continue; }
 
+# if (0)
+                static int Nchip = 0;
+                if (1) {
+                  // XXX test
+                  char filename[64];
+                  snprintf (filename, 64, "refstars.%02d.dat", Nchip);
+                  FILE *outfile = fopen (filename, "w");
+                  assert (outfile);
+                  for (int nn = 0; nn < refstars->n; nn++) {
+                    pmAstromObj *ref = refstars->data[nn];
+                    fprintf (outfile, "%lf %lf  %lf %lf  %lf %lf  %lf %lf\n", 
+                             ref->sky->r*PS_DEG_RAD, ref->sky->d*PS_DEG_RAD,
+                             ref->TP->x, ref->TP->y, 
+                             ref->FP->x, ref->FP->y, 
+                             ref->chip->x, ref->chip->y);
+                  }
+                  fclose (outfile);
+                }
+                if (1) {
+                  // XXX test
+                  char filename[64];
+                  snprintf (filename, 64, "rawstars.%02d.dat", Nchip);
+                  FILE *outfile = fopen (filename, "w");
+                  assert (outfile);
+                  for (int nn = 0; nn < gridrawstars->n; nn++) {
+                    pmAstromObj *ref = gridrawstars->data[nn];
+                    fprintf (outfile, "%lf %lf  %lf %lf  %lf %lf  %lf %lf\n", 
+                             ref->sky->r*PS_DEG_RAD, ref->sky->d*PS_DEG_RAD,
+                             ref->TP->x, ref->TP->y, 
+                             ref->FP->x, ref->FP->y, 
+                             ref->chip->x, ref->chip->y);
+                  }
+                  fclose (outfile);
+                  Nchip ++;
+                }
+# endif
+
                 // the absolute minimum number of stars is 4 (for order = 1)
                 if ((rawstars->n < 4) || (refstars->n < 4)) {

trunk/psastro/src/psastroChooseRefstars.c

@@ -107 +107 @@
 
                     if (ref->Mag < clampMagMin) {
-                        psWarning("Skipping refstar with abusrd magnintude %f ra: %f dec: %f\n",
+                        psWarning("Skipping refstar with abusrd magnitude %f ra: %f dec: %f\n",
                             ref->Mag, RAD_TO_DEG(ref->sky->r), RAD_TO_DEG(ref->sky->d));
                         goto skip;
@@ -131 +131 @@
 
 # if (0)
-                // XXX test
-                FILE *outfile = fopen ("refstars.dat", "w");
-                assert (outfile);
-                for (int nn = 0; nn < refstars->n; nn++) {
-                          pmAstromObj *ref = refstars->data[nn];
-                          fprintf (outfile, "%lf %lf\n", ref->sky->r*PS_DEG_RAD, ref->sky->d*PS_DEG_RAD);
+                if (1) {
+                  // test output block, not used in normal ops
+                  char filename[64];
+                  snprintf (filename, 64, "refstars.%02d.dat", Nchip);
+                  FILE *outfile = fopen (filename, "w");
+                  assert (outfile);
+                  for (int nn = 0; nn < refstars->n; nn++) {
+                    pmAstromObj *ref = refstars->data[nn];
+                    fprintf (outfile, "%lf %lf\n", ref->sky->r*PS_DEG_RAD, ref->sky->d*PS_DEG_RAD);
+                  }
+                  fclose (outfile);
                 }
-                fclose (outfile);
+                if (1) {
+                  // test output block, not used in normal ops
+                  char filename[64];
+                  snprintf (filename, 64, "refstars.%02d.dat", Nchip);
+                  FILE *outfile = fopen (filename, "w");
+                  assert (outfile);
+                  for (int nn = 0; nn < refstars->n; nn++) {
+                    pmAstromObj *ref = refstars->data[nn];
+                    fprintf (outfile, "%lf %lf  %lf %lf  %lf %lf\n", ref->sky->r*PS_DEG_RAD, ref->sky->d*PS_DEG_RAD, );
+                  }
+                  fclose (outfile);
+                }
 # endif