Changeset 20839 for branches/eam_branch_20081124/Ohana/src/opihi/cmd.astro/cplot.c

Timestamp:

Nov 25, 2008, 4:51:39 PM (18 years ago)

Author:

eugene

Message:

convert opihi vectors to double type, add option for int type as well

File:

• branches/eam_branch_20081124/Ohana/src/opihi/cmd.astro/cplot.c (modified) (4 diffs)

branches/eam_branch_20081124/Ohana/src/opihi/cmd.astro/cplot.c

@@ -4 +4 @@
   
   int i, kapa, Npts, status, leftside;
-  float *x, *y, *r, *d, Rmin, Rmax, Rmid;
+  opihi_flt *x, *y, *r, *d, Rmin, Rmax, Rmid;
   Vector Xvec, Yvec, *xvec, *yvec;
   Graphdata graphmode;
@@ -28 +28 @@
   }
 
-  ALLOCATE (Xvec.elements, float, xvec[0].Nelements);
-  ALLOCATE (Yvec.elements, float, xvec[0].Nelements);
+  ALLOCATE (Xvec.elements.Flt, opihi_flt, xvec[0].Nelements);
+  ALLOCATE (Yvec.elements.Flt, opihi_flt, xvec[0].Nelements);
     
   Xvec.Nelements = xvec[0].Nelements;
   Yvec.Nelements = xvec[0].Nelements;
   
-  r = xvec[0].elements;
-  d = yvec[0].elements;
-  x = Xvec.elements;
-  y = Yvec.elements;
+  r = xvec[0].elements.Flt;
+  d = yvec[0].elements.Flt;
+  x = Xvec.elements.Flt;
+  y = Yvec.elements.Flt;
   
   Npts = 0;
@@ -51 +51 @@
       if (!leftside && (r[0] < Rmid - 90)) { r[0] += 360.0; }
     }
-    status = fRD_to_XY (x, y, *r, *d, &graphmode.coords);
+    status = RD_to_XY (x, y, *r, *d, &graphmode.coords);
 
     // if we fail on one of the points, drop the corresponding pair
@@ -77 +77 @@
 
   graphmode.etype = 0;
-  PlotVectorPair (kapa, Npts, Xvec.elements, Yvec.elements, &graphmode);
+  PlotVectorPair (kapa, Npts, Xvec.elements.Flt, Yvec.elements.Flt, &graphmode);
   
-  free (Xvec.elements);
-  free (Yvec.elements);
+  free (Xvec.elements.Flt);
+  free (Yvec.elements.Flt);
     
   return (TRUE);