Changeset 20839 for branches/eam_branch_20081124/Ohana/src/opihi/cmd.data/vsmooth.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.data/vsmooth.c (modified) (4 diffs)

branches/eam_branch_20081124/Ohana/src/opihi/cmd.data/vsmooth.c

@@ -4 +4 @@
   
   int i, n, N, Nx, Ns, Ngauss;
-  float *vi, *vo, *gauss, *gaussnorm;
+  opihi_flt *vi, *vo, *gauss, *gaussnorm;
   float g, s, sigma, Nsigma;
   Vector *in;
@@ -23 +23 @@
   sigma = atof (argv[2]);
   Nx = in[0].Nelements;
-  vi = in[0].elements;
+  vi = in[0].elements.Flt;
 
   /* build a 1D gaussian */
   Ns = (int) (Nsigma*sigma + 0.5);
   Ngauss = 2*Ns + 1;
-  ALLOCATE (gaussnorm, float, Ngauss);
+  ALLOCATE (gaussnorm, opihi_flt, Ngauss);
   gauss = &gaussnorm[Ns];
   for (i = -Ns; i < Ns + 1; i++) {
@@ -34 +34 @@
   }
 
-  ALLOCATE (vo, float, Nx);
+  ALLOCATE (vo, opihi_flt, Nx);
 
   for (i = 0; i < Nx; i++) {
@@ -47 +47 @@
   }
 
-  free (in[0].elements);
+  free (in[0].elements.Flt);
   free (gaussnorm);
 
-  in[0].elements = vo;
+  in[0].elements.Flt = vo;
   return (TRUE);
 }