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

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

@@ -53 +53 @@
   if ((out = SelectBuffer (argv[2], OLDBUFFER, FALSE)) == NULL) {
     if ((out = SelectBuffer (argv[2], ANYBUFFER, TRUE)) == NULL) return (FALSE);
-    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 = in[0].bitpix;
@@ -60 +60 @@
     out[0].bscale = in[0].bscale;
     out[0].bzero  = in[0].bzero;
-    fits_copy_header (&in[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 (&in[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);
   } else {
     if ((out[0].header.Naxis[1] != Ny) || (out[0].header.Naxis[0] != Nx)) {