Changeset 20936 for trunk/Ohana/src/opihi/cmd.data/cut.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/cut.c (modified) (4 diffs)

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

@@ -48 +48 @@
   case 'X':
     /* create output vectors */
-    xvec[0].Nelements = yvec[0].Nelements = nx;
-    REALLOCATE (xvec[0].elements, float, MAX (nx, 1));
-    REALLOCATE (yvec[0].elements, float, MAX (nx, 1));
-    bzero (yvec[0].elements, nx*sizeof(float));
+    ResetVector (xvec, OPIHI_FLT, MAX (nx, 1));
+    ResetVector (yvec, OPIHI_FLT, MAX (nx, 1));
+    bzero (yvec[0].elements.Flt, nx*sizeof(opihi_flt));
     for (i = 0; i < nx; i++) {
-      xvec[0].elements[i] = i + sx; 
+      xvec[0].elements.Flt[i] = i + sx; 
     }
     ALLOCATE (Vbuf, float, MAX (ny, 1));
@@ -74 +73 @@
         if (Mode == MEAN) { value /= ny; }
       }
-      yvec[0].elements[i] = value;
+      yvec[0].elements.Flt[i] = value;
     }
     free (Vbuf);
@@ -81 +80 @@
   case 'y':
   case 'Y':
-    xvec[0].Nelements = yvec[0].Nelements = ny;
-    REALLOCATE (xvec[0].elements, float, ny);
-    REALLOCATE (yvec[0].elements, float, ny);
-    bzero (yvec[0].elements, ny*sizeof(float));
+    ResetVector (xvec, OPIHI_FLT, MAX (ny, 1));
+    ResetVector (yvec, OPIHI_FLT, MAX (ny, 1));
+    bzero (yvec[0].elements.Flt, ny*sizeof(opihi_flt));
     for (i = 0; i < ny; i++) {
-      xvec[0].elements[i] = i + sy; 
+      xvec[0].elements.Flt[i] = i + sy; 
     }
     ALLOCATE (Vbuf, float, MAX (nx, 1));
@@ -107 +105 @@
         if (Mode == MEAN) { value /= nx; }
       }
-      yvec[0].elements[i] = value;
+      yvec[0].elements.Flt[i] = value;
     }
     free (Vbuf);