Changeset 20857 for branches/eam_branch_20081124/Ohana/src/opihi/cmd.data/vgauss.c

Timestamp:

Nov 30, 2008, 7:45:21 AM (18 years ago)

Author:

eugene

Message:

modify functions to use both int and flt vectors

File:

• branches/eam_branch_20081124/Ohana/src/opihi/cmd.data/vgauss.c (modified) (2 diffs)

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

@@ -42 +42 @@
   if ((ovec = SelectVector (argv[4], ANYVECTOR, TRUE)) == NULL) return (FALSE);
 
+  REQUIRE_VECTOR_FLT (xvec, FALSE); 
+  REQUIRE_VECTOR_FLT (yvec, FALSE); 
+  REQUIRE_VECTOR_FLT (svec, FALSE); 
+
   Npts = xvec[0].Nelements;
+  ResetVector (ovec, OPIHI_FLT, Npts);
+
   ALLOCATE (dy, opihi_flt, Npts);
-  REALLOCATE (ovec[0].elements.Flt, opihi_flt, Npts);
 
   GET_VAR (par[0], "C0");
@@ -52 +57 @@
   Npar = 4;
 
+  // mrqmin takes the inverse variance (do not generate NANs)
   v1 = svec[0].elements.Flt;
   v2 = dy;