Changeset 7080 for trunk/Ohana/src/opihi/cmd.data/spline_apply.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/opihi/cmd.data/spline_apply.c (modified) (2 diffs)

trunk/Ohana/src/opihi/cmd.data/spline_apply.c

@@ -34 +34 @@
 
   /* create an output matrix buffer with desired nx, ny */
-  fits_free_matrix (&out[0].matrix);
-  fits_free_header (&out[0].header);
+  gfits_free_matrix (&out[0].matrix);
+  gfits_free_header (&out[0].header);
 
   out[0].bitpix = y1[0].bitpix;
@@ -41 +41 @@
   out[0].bscale = y1[0].bscale;
   out[0].bzero  = y1[0].bzero;
-  fits_copy_header (&y1[0].header, &out[0].header);
-  fits_modify (&out[0].header, "NAXIS1", "%d", 1, nx);
-  fits_modify (&out[0].header, "NAXIS2", "%d", 1, ny);
+  gfits_copy_header (&y1[0].header, &out[0].header);
+  gfits_modify (&out[0].header, "NAXIS1", "%d", 1, nx);
+  gfits_modify (&out[0].header, "NAXIS2", "%d", 1, ny);
 
   out[0].header.Naxis[0] = nx;
   out[0].header.Naxis[1] = ny;
-  fits_create_matrix (&out[0].header, &out[0].matrix);
+  gfits_create_matrix (&out[0].header, &out[0].matrix);
   if ((y1[0].file[0] != '*') && (y1[0].file[0] != '(')) {
     sprintf (out[0].file, "*%s", y1[0].file);