Changeset 20936 for trunk/Ohana/src/opihi/cmd.data/imhist.c

Timestamp:

Dec 7, 2008, 3:31:01 PM (18 years ago)

Author:

eugene

Message:

big update from eam_branch_20081124 with updates to Opihi math

File:

• trunk/Ohana/src/opihi/cmd.data/imhist.c (modified) (2 diffs)

trunk/Ohana/src/opihi/cmd.data/imhist.c

@@ -105 +105 @@
   }  
 
-  vec1[0].Nelements = Nbins + 1;
-  vec2[0].Nelements = Nbins + 1;
-  REALLOCATE (vec1[0].elements, float, vec1[0].Nelements);
-  bzero (vec1[0].elements, vec1[0].Nelements*sizeof(float));
-  REALLOCATE (vec2[0].elements, float, vec2[0].Nelements);
-  bzero (vec2[0].elements, vec2[0].Nelements*sizeof(float));
+  ResetVector (vec1, OPIHI_FLT, Nbins + 1);
+  ResetVector (vec2, OPIHI_FLT, Nbins + 1);
+  bzero (vec1[0].elements.Flt, vec1[0].Nelements*sizeof(opihi_flt));
+  bzero (vec2[0].elements.Flt, vec2[0].Nelements*sizeof(opihi_flt));
   
   for (j = sy; j < sy + ny; j++) {
@@ -116 +114 @@
     for (i = 0; i < nx; i++, V++) {
       bin = MAX (MIN (Nbins, (*V - min) / dx), 0);
-      vec2[0].elements[bin] += 1.0;
+      vec2[0].elements.Flt[bin] += 1.0;
     }
   }
   for (i = 0; i < Nbins + 1; i++, V++) {
-    vec1[0].elements[i] = i*dx + min;
+    vec1[0].elements.Flt[i] = i*dx + min;
   }