Changeset 10855 for trunk/psastro/src/psastroChooseRefstars.c

Timestamp:

Dec 29, 2006, 8:36:33 AM (20 years ago)

Author:

eugene

Message:

extensive work to catch errors and clear leaks; implement mosaics

File:

• trunk/psastro/src/psastroChooseRefstars.c (modified) (3 diffs)

trunk/psastro/src/psastroChooseRefstars.c

@@ -56 +56 @@
                 psArray *refstars = psArrayAllocEmpty (100);
 
+                FILE *f = fopen ("refstars.dat", "w");
+
                 // select the reference objects within range of this readout
                 // project the reference objects to this chip
@@ -64 +66 @@
                     psPlaneTransformApply (ref->FP, fpa->fromTPA, ref->TP);
                     psPlaneTransformApply (ref->chip, chip->fromFPA, ref->FP);
+
+                    fprintf (f, "%d  %f %f  %f %f  %f %f  %f %f\n", i,
+                             ref->sky->r, ref->sky->d, 
+                             ref->TP->x, ref->TP->y, 
+                             ref->FP->x, ref->FP->y, 
+                             ref->chip->x, ref->chip->y);
 
                     // limit the X,Y range of the refs to the selected chip
@@ -75 +83 @@
                     psFree (ref);
                 }
+                fclose (f);
                 psTrace ("psastro", 4, "Added %ld refstars\n", refstars->n);