Changeset 7080 for trunk/Ohana/src/imclean/src/star_stats.c

Timestamp:

May 5, 2006, 5:44:26 PM (20 years ago)

Author:

eugene

Message:

big move: fits_ to gfits_; minor updates to relphot

File:

• trunk/Ohana/src/imclean/src/star_stats.c (modified) (1 diff)

trunk/Ohana/src/imclean/src/star_stats.c

@@ -62 +62 @@
   }
   
-  fits_modify (&header, "ZERO_PT", "%lf", 1, ZERO_POINT);
-  fits_modify (&header, "FWHM_X", "%lf", 1, FWHMx);
-  fits_modify (&header, "FWHM_Y", "%lf", 1, FWHMy);
-  fits_modify (&header, "ANGLE", "%lf", 1, angle);
-  fits_modify (&header, "APMIFIT", "%lf", 1, Ap);
-  fits_modify (&header, "dAPMIFIT", "%lf", 1, Ap2);
-  fits_modify (&header, "FSATUR", "%lf", 1, (saturate + ZERO_POINT));
-  fits_modify (&header, "FLIMIT", "%lf", 1, (complete + ZERO_POINT));
-  fits_modify (&header, "NSTARS", "%d", 1, N);
+  gfits_modify (&header, "ZERO_PT", "%lf", 1, ZERO_POINT);
+  gfits_modify (&header, "FWHM_X", "%lf", 1, FWHMx);
+  gfits_modify (&header, "FWHM_Y", "%lf", 1, FWHMy);
+  gfits_modify (&header, "ANGLE", "%lf", 1, angle);
+  gfits_modify (&header, "APMIFIT", "%lf", 1, Ap);
+  gfits_modify (&header, "dAPMIFIT", "%lf", 1, Ap2);
+  gfits_modify (&header, "FSATUR", "%lf", 1, (saturate + ZERO_POINT));
+  gfits_modify (&header, "FLIMIT", "%lf", 1, (complete + ZERO_POINT));
+  gfits_modify (&header, "NSTARS", "%d", 1, N);
   for (i = 1; i <= 9; i++) {
     sprintf (line, "TDOPHOT%1d\0", i);
-    fits_modify (&header, line, "%d", 1, n[i]);
+    gfits_modify (&header, line, "%d", 1, n[i]);
   }