Changeset 7080 for trunk/Ohana/src/opihi/cmd.data/svd.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/svd.c (modified) (1 diff)

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

@@ -20 +20 @@
 
   /* U is Nx, Ny */
-  fits_free_matrix (&Mu[0].matrix);
-  fits_free_header (&Mu[0].header);
+  gfits_free_matrix (&Mu[0].matrix);
+  gfits_free_header (&Mu[0].header);
   Mu[0].bitpix = Ma[0].bitpix;
   Mu[0].unsign = Ma[0].unsign;
   Mu[0].bscale = Ma[0].bscale;
   Mu[0].bzero  = Ma[0].bzero;
-  fits_copy_header (&Ma[0].header, &Mu[0].header);
-  fits_create_matrix (&Mu[0].header, &Mu[0].matrix);
+  gfits_copy_header (&Ma[0].header, &Mu[0].header);
+  gfits_create_matrix (&Mu[0].header, &Mu[0].matrix);
   
   /* V is Nx, Nx */
-  fits_free_matrix (&Mv[0].matrix);
-  fits_free_header (&Mv[0].header);
+  gfits_free_matrix (&Mv[0].matrix);
+  gfits_free_header (&Mv[0].header);
   Mv[0].bitpix = Ma[0].bitpix;
   Mv[0].unsign = Ma[0].unsign;
   Mv[0].bscale = Ma[0].bscale;
   Mv[0].bzero  = Ma[0].bzero;
-  fits_copy_header (&Ma[0].header, &Mv[0].header);
-  fits_modify (&Mv[0].header, "NAXIS2", "%d", 1, Nx);
+  gfits_copy_header (&Ma[0].header, &Mv[0].header);
+  gfits_modify (&Mv[0].header, "NAXIS2", "%d", 1, Nx);
   Mv[0].header.Naxis[1] = Nx;
-  fits_create_matrix (&Mv[0].header, &Mv[0].matrix);
+  gfits_create_matrix (&Mv[0].header, &Mv[0].matrix);
 
   /* w is Nx */