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

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

@@ -32 +32 @@
 
   /* free up output space */
-  fits_free_matrix (&Ore[0].matrix);
-  fits_free_header (&Ore[0].header);
-  fits_free_matrix (&Oim[0].matrix);
-  fits_free_header (&Oim[0].header);
+  gfits_free_matrix (&Ore[0].matrix);
+  gfits_free_header (&Ore[0].header);
+  gfits_free_matrix (&Oim[0].matrix);
+  gfits_free_header (&Oim[0].header);
 
   /* get image dimensions, check value */
@@ -74 +74 @@
 
   /* fix up output headers (real) */
-  fits_copy_header (&Ire[0].header, &Ore[0].header);
-  fits_modify (&Ore[0].header, "NAXIS1", "%d", 1, Nx);
-  fits_modify (&Ore[0].header, "NAXIS2", "%d", 1, Ny);
+  gfits_copy_header (&Ire[0].header, &Ore[0].header);
+  gfits_modify (&Ore[0].header, "NAXIS1", "%d", 1, Nx);
+  gfits_modify (&Ore[0].header, "NAXIS2", "%d", 1, Ny);
   Ore[0].header.Naxis[0] = Nx;
   Ore[0].header.Naxis[1] = Ny;
@@ -83 +83 @@
   Ore[0].bscale = Ire[0].bscale;
   Ore[0].bzero  = Ire[0].bzero;
-  fits_create_matrix (&Ore[0].header, &Ore[0].matrix);
+  gfits_create_matrix (&Ore[0].header, &Ore[0].matrix);
 
   /* fix up output headers (imaginary) */
-  fits_copy_header (&Ire[0].header, &Oim[0].header);
-  fits_modify (&Oim[0].header, "NAXIS1", "%d", 1, Nx);
-  fits_modify (&Oim[0].header, "NAXIS2", "%d", 1, Ny);
+  gfits_copy_header (&Ire[0].header, &Oim[0].header);
+  gfits_modify (&Oim[0].header, "NAXIS1", "%d", 1, Nx);
+  gfits_modify (&Oim[0].header, "NAXIS2", "%d", 1, Ny);
   Oim[0].header.Naxis[0] = Nx;
   Oim[0].header.Naxis[1] = Ny;
@@ -95 +95 @@
   Oim[0].bscale = Ire[0].bscale;
   Oim[0].bzero  = Ire[0].bzero;
-  fits_create_matrix (&Oim[0].header, &Oim[0].matrix);
+  gfits_create_matrix (&Oim[0].header, &Oim[0].matrix);
 
   /* move data from working space to output buffers */