Changeset 7080 for trunk/Ohana/src/imregister/imphot/rtext.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/imregister/imphot/rtext.c (modified) (3 diffs)

trunk/Ohana/src/imregister/imphot/rtext.c

@@ -10 +10 @@
   /* check that file size makes sense */
   Nimage = 0;
-  fits_scan (&db[0].header, "NIMAGES", "%d", 1, &Nimage);
+  gfits_scan (&db[0].header, "NIMAGES", "%d", 1, &Nimage);
   if (stat (db[0].filename, &filestatus) == -1) {
     if (VERBOSE) fprintf (stderr, "ERROR: failed to get status of image catalog\n");
@@ -28 +28 @@
   /* create a dummy set of table information */
   /* (original table has NAXIS = 2, change to 0) */
-  fits_modify (&db[0].header, "NAXIS", "%d", 1, 0);
-  fits_create_matrix (&db[0].header, &db[0].matrix);
-  fits_table_mkheader_Image (&db[0].theader);
+  gfits_modify (&db[0].header, "NAXIS", "%d", 1, 0);
+  gfits_create_matrix (&db[0].header, &db[0].matrix);
+  gfits_table_mkheader_Image (&db[0].theader);
   db[0].ftable.header = &db[0].theader;
 
@@ -41 +41 @@
   } 
   db[0].ftable.buffer = (char *) image;
-  fits_modify (&db[0].theader, "NAXIS2", "%d", 1, Nimage);
+  gfits_modify (&db[0].theader, "NAXIS2", "%d", 1, Nimage);
   db[0].theader.Naxis[1] = Nimage;
-  db[0].ftable.size = fits_matrix_size (&db[0].theader);
+  db[0].ftable.size = gfits_matrix_size (&db[0].theader);
   
   return (TRUE);