Changeset 34526 for branches/eam_branches/ipp-20120905/Ohana/src/opihi/cmd.data/spline_commands.c

Timestamp:

Oct 7, 2012, 3:16:45 PM (14 years ago)

Author:

eugene

Message:

fix spline function to build correctly

File:

• branches/eam_branches/ipp-20120905/Ohana/src/opihi/cmd.data/spline_commands.c (modified) (2 diffs)

branches/eam_branches/ipp-20120905/Ohana/src/opihi/cmd.data/spline_commands.c

@@ -31 +31 @@
   Spline *myspline = CreateSpline (argv[1], xvec->Nelements);
 
-  for (i = 0; i < xvec->elements; i++) {
-    myspline->xk[i] = xvec->elements[i];
-    myspline->yk[i] = yvec->elements[i];
+  for (i = 0; i < xvec->Nelements; i++) {
+    myspline->xk[i] = xvec->elements.Flt[i];
+    myspline->yk[i] = yvec->elements.Flt[i];
   }    
 
@@ -61 +61 @@
   ResetVector (yvec, OPIHI_FLT, xvec->Nelements);
 
-  for (i = 0; i < xvec->elements; i++) {
-    opihi_flt value = spline_apply_dbl (myspline->xk, myspline->yk, myspline->y2, myspline->Nknots, xvec->elements[i]);
-    yvec->elements[i] = value;;
+  for (i = 0; i < xvec->Nelements; i++) {
+    opihi_flt value = spline_apply_dbl (myspline->xk, myspline->yk, myspline->y2, myspline->Nknots, xvec->elements.Flt[i]);
+    yvec->elements.Flt[i] = value;
   }