Changeset 10307 for trunk/Ohana/src/opihi/cmd.data/vgauss.c
- Timestamp:
- Nov 29, 2006, 4:05:29 PM (20 years ago)
- File:
-
- 1 edited
-
trunk/Ohana/src/opihi/cmd.data/vgauss.c (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Ohana/src/opihi/cmd.data/vgauss.c
r10071 r10307 53 53 v1 = svec[0].elements; 54 54 v2 = dy; 55 for (i = 0; i < Npts; i++, v1++, v2++) *v2 = 1.0 / (*v1 * *v1); 55 for (i = 0; i < Npts; i++, v1++, v2++) { 56 *v2 = (*v1 == 0.0) ? 0.0 : 1.0 / (*v1 * *v1); 57 } 56 58 57 59 ochisq = mrqinit (xvec[0].elements, yvec[0].elements, dy, Npts, par, Npar, fgaussOD, !Quiet);
Note:
See TracChangeset
for help on using the changeset viewer.
