Changeset 7054 for trunk/Ohana/src/libfits/matrix/F_convert_format.c

Timestamp:

May 3, 2006, 12:01:09 PM (20 years ago)

Author:

eugene

Message:

converted fits_ to gfits_

File:

• trunk/Ohana/src/libfits/matrix/F_convert_format.c (modified) (2 diffs)

trunk/Ohana/src/libfits/matrix/F_convert_format.c

@@ -29 +29 @@
 
 /*********************** fits convert format ***********************************/
-int fits_convert_format (Header *header, Matrix *matrix, int outBitpix, double outScale, double outZero, int outUnsign) {
+int gfits_convert_format (Header *header, Matrix *matrix, int outBitpix, double outScale, double outZero, int outUnsign) {
 
   unsigned long i, nbytes, Npixels;
@@ -49 +49 @@
   matrix[0].bzero  = header[0].bzero  = outZero;
   matrix[0].unsign = header[0].unsign = outUnsign;
-  matrix[0].size   = fits_matrix_size (header);
-  fits_modify (header, "BITPIX", "%d", 1, outBitpix);
-  fits_modify (header, "BSCALE", "%lf", 1, outScale);
-  fits_modify (header, "BZERO",  "%lf", 1, outZero);
-  fits_modify (header, "UNSIGN", "%t", 1, outUnsign);
+  matrix[0].size   = gfits_matrix_size (header);
+  gfits_modify (header, "BITPIX", "%d", 1, outBitpix);
+  gfits_modify (header, "BSCALE", "%lf", 1, outScale);
+  gfits_modify (header, "BZERO",  "%lf", 1, outZero);
+  gfits_modify (header, "UNSIGN", "%t", 1, outUnsign);
 
   Npixels          = header[0].Naxis[0]*header[0].Naxis[1];