Changeset 7080 for trunk/Ohana/src/opihi/dvo/imbox.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/dvo/imbox.c (modified) (5 diffs)

trunk/Ohana/src/opihi/dvo/imbox.c

@@ -9 +9 @@
   Coords coords;
   Graphdata graphmode;
-  int Ngraph;
+
+  if (!style_args (&graphmode, &argc, argv, 0)) return FALSE;
 
   if (argc != 2) {
@@ -15 +16 @@
     return (FALSE);
   }
-  Ngraph = 0;
-  if (!GetGraph (&graphmode, NULL, &Ngraph)) return (FALSE);
+  SetGraph (graphmode);
 
-  if (!fits_read_header (argv[1], &header)) {
+  if (!gfits_read_header (argv[1], &header)) {
     fprintf (stderr, "file not found\n");
     return (FALSE);
@@ -25 +25 @@
   Nextend = 0;
   if (header.Naxes == 0) {
-    fits_scan (&header, "NEXTEND", "%d", 1, &Nextend);
+    gfits_scan (&header, "NEXTEND", "%d", 1, &Nextend);
   }
   
@@ -38 +38 @@
   for (i = Nextend ? 0 : -1; i < Nextend; i++) {
     if (Nextend) {
-      fits_read_Xheader (argv[1], &header, i);
+      gfits_read_Xheader (argv[1], &header, i);
     }
     if (!GetCoords (&coords, &header)) {
@@ -86 +86 @@
   }
 
-  fits_free_header (&header);
+  gfits_free_header (&header);
   free (Xvec.elements);
   free (Yvec.elements);