Changeset 7080 for trunk/Ohana/src/getstar

Timestamp:

May 5, 2006, 5:44:26 PM (20 years ago)

Author:

eugene

Message:

big move: fits_ to gfits_; minor updates to relphot

Location:

trunk/Ohana/src/getstar/src

Files:

• Shutdown.c (modified) (1 diff)
• mkcatalog.c (modified) (7 diffs)

trunk/Ohana/src/getstar/src/Shutdown.c

@@ -22 +22 @@
 
   SetProtect (TRUE);
-  fits_db_close (db);
+  gfits_db_close (db);
   fprintf (stderr, "ERROR: getstar halted\n");
   exit (1);

trunk/Ohana/src/getstar/src/mkcatalog.c

@@ -33 +33 @@
   }
 
-  fits_init_header (&catalog[0].header);
+  gfits_init_header (&catalog[0].header);
 
   if (catalog[0].catmode == DVO_MODE_RAW) {
@@ -43 +43 @@
   }
 
-  fits_create_header (&catalog[0].header);
+  gfits_create_header (&catalog[0].header);
   
   if (catalog[0].catmode == DVO_MODE_SPLIT) {
@@ -52 +52 @@
     /* define measure catalog file */
     ALLOCATE (catalog[0].measure_catalog, Catalog, 1);
-    fits_init_header (&catalog[0].measure_catalog[0].header);
-    fits_create_header (&catalog[0].measure_catalog[0].header);
+    gfits_init_header (&catalog[0].measure_catalog[0].header);
+    gfits_create_header (&catalog[0].measure_catalog[0].header);
     ALLOCATE (catalog[0].measure_catalog[0].filename, char, length);
     sprintf (catalog[0].measure_catalog[0].filename, "%s/%s.cpm", path, root);
@@ -62 +62 @@
     }
     file = filebasename (catalog[0].measure_catalog[0].filename);
-    fits_modify (&catalog[0].header, "MEASURE", "%s", 1, file);
+    gfits_modify (&catalog[0].header, "MEASURE", "%s", 1, file);
     free (file);
 
     /* define missing catalog file */
     ALLOCATE (catalog[0].missing_catalog, Catalog, 1);
-    fits_init_header (&catalog[0].missing_catalog[0].header);
-    fits_create_header (&catalog[0].missing_catalog[0].header);
+    gfits_init_header (&catalog[0].missing_catalog[0].header);
+    gfits_create_header (&catalog[0].missing_catalog[0].header);
     ALLOCATE (catalog[0].missing_catalog[0].filename, char, length);
     sprintf (catalog[0].missing_catalog[0].filename, "%s/%s.cpn", path, root);
@@ -76 +76 @@
     }
     file = filebasename (catalog[0].missing_catalog[0].filename);
-    fits_modify (&catalog[0].header, "MISSING", "%s", 1, file);
+    gfits_modify (&catalog[0].header, "MISSING", "%s", 1, file);
     free (file);
 
     /* define secfilt catalog file */
     ALLOCATE (catalog[0].secfilt_catalog, Catalog, 1);
-    fits_init_header (&catalog[0].secfilt_catalog[0].header);
-    fits_create_header (&catalog[0].secfilt_catalog[0].header);
+    gfits_init_header (&catalog[0].secfilt_catalog[0].header);
+    gfits_create_header (&catalog[0].secfilt_catalog[0].header);
     ALLOCATE (catalog[0].secfilt_catalog[0].filename, char, length);
     sprintf (catalog[0].secfilt_catalog[0].filename, "%s/%s.cps", path, root);
@@ -90 +90 @@
     }
     file = filebasename (catalog[0].secfilt_catalog[0].filename);
-    fits_modify (&catalog[0].header, "SECFILT", "%s", 1, file);
+    gfits_modify (&catalog[0].header, "SECFILT", "%s", 1, file);
     free (file);
     free (path);
@@ -109 +109 @@
 
   /* write RA,DEC range in header */
-  fits_modify (&catalog[0].header, "RA0",  "%lf", 1, Rmin);
-  fits_modify (&catalog[0].header, "DEC0", "%lf", 1, Dmin);
-  fits_modify (&catalog[0].header, "RA1",  "%lf", 1, Rmax);
-  fits_modify (&catalog[0].header, "DEC1", "%lf", 1, Dmax);
+  gfits_modify (&catalog[0].header, "RA0",  "%lf", 1, Rmin);
+  gfits_modify (&catalog[0].header, "DEC0", "%lf", 1, Dmin);
+  gfits_modify (&catalog[0].header, "RA1",  "%lf", 1, Rmax);
+  gfits_modify (&catalog[0].header, "DEC1", "%lf", 1, Dmax);
 
   /* write creation date in header */
   str_to_time ("now", &now);
   line = sec_to_date (now);
-  fits_modify (&catalog[0].header, "DATE", "%s", 1, line);
+  gfits_modify (&catalog[0].header, "DATE", "%s", 1, line);
   free (line);
 }