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

trunk/Ohana/src/opihi/cmd.astro/polar.c

@@ -32 +32 @@
 
   /* we expect the output image to have units of longitude and distance */
-  fits_scan (&in[0].header, "CRVAL1", "%lf", 1, &Lo);
-  fits_scan (&in[0].header, "CDELT1", "%lf", 1, &dL);
-  fits_scan (&in[0].header, "CRPIX1", "%lf", 1, &xo);
-  fits_scan (&in[0].header, "CRVAL2", "%lf", 1, &Do);
-  fits_scan (&in[0].header, "CDELT2", "%lf", 1, &dD);
-  fits_scan (&in[0].header, "CRPIX2", "%lf", 1, &yo);
+  gfits_scan (&in[0].header, "CRVAL1", "%lf", 1, &Lo);
+  gfits_scan (&in[0].header, "CDELT1", "%lf", 1, &dL);
+  gfits_scan (&in[0].header, "CRPIX1", "%lf", 1, &xo);
+  gfits_scan (&in[0].header, "CRVAL2", "%lf", 1, &Do);
+  gfits_scan (&in[0].header, "CDELT2", "%lf", 1, &dD);
+  gfits_scan (&in[0].header, "CRPIX2", "%lf", 1, &yo);
 
   /* we expect the input image to have units of distance X and Y */
-  fits_scan (&out[0].header, "CRVAL1", "%lf", 1, &Mo);
-  fits_scan (&out[0].header, "CDELT1", "%lf", 1, &dM);
-  fits_scan (&out[0].header, "CRPIX1", "%lf", 1, &Xo);
-  fits_scan (&out[0].header, "CRVAL2", "%lf", 1, &No);
-  fits_scan (&out[0].header, "CDELT2", "%lf", 1, &dN);
-  fits_scan (&out[0].header, "CRPIX2", "%lf", 1, &Yo);
+  gfits_scan (&out[0].header, "CRVAL1", "%lf", 1, &Mo);
+  gfits_scan (&out[0].header, "CDELT1", "%lf", 1, &dM);
+  gfits_scan (&out[0].header, "CRPIX1", "%lf", 1, &Xo);
+  gfits_scan (&out[0].header, "CRVAL2", "%lf", 1, &No);
+  gfits_scan (&out[0].header, "CDELT2", "%lf", 1, &dN);
+  gfits_scan (&out[0].header, "CRPIX2", "%lf", 1, &Yo);
 
   Vin  = (float *)in[0].matrix.buffer;