Changeset 4580 for trunk/psLib/src/math

Timestamp:

Jul 18, 2005, 4:55:54 PM (21 years ago)

Author:

gusciora

Message:

New version of spline fit functions in the SDRS.

Location:

trunk/psLib/src/math

Files:

• psFunctions.c (modified) (2 diffs)
• psMinimize.c (modified) (3 diffs)

trunk/psLib/src/math/psFunctions.c

@@ -1 +1 @@
 /** @file  psFunctions.c
- *
- *  @brief Contains basic function allocation, deallocation, and evaluation
- *         routines.
- *
- *  This file will hold the functions for allocated, freeing, and evaluating
- *  polynomials.  It also contains a Gaussian functions.
- *
- *  @version $Revision: 1.4 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2005-07-16 00:42:28 $
- *
- *  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
- *
- *  XXX: Should the "coeffErr[]" be used as well?  Bug ???.  Ignore coeffErr
- *
- *  XXX: In the various polyAlloc(n) functions, n is really the order of the
- *  polynomial plus 1.  To create a 2nd-order polynomial, n == 3.
- */
+*
+*  @brief Contains basic function allocation, deallocation, and evaluation
+*         routines.
+*
+*  This file will hold the functions for allocated, freeing, and evaluating
+*  polynomials.  It also contains a Gaussian functions.
+*
+*  @version $Revision: 1.5 $ $Name: not supported by cvs2svn $
+*  @date $Date: 2005-07-19 02:55:54 $
+*
+*  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
+*
+*  XXX: Should the "coeffErr[]" be used as well?  Bug ???.  Ignore coeffErr
+*
+*  XXX: In the various polyAlloc(n) functions, n is really the order of the
+*  polynomial plus 1.  To create a 2nd-order polynomial, n == 3.
+*/
 /*****************************************************************************/
 /*  INCLUDE FILES                                                            */
@@ -1918 +1918 @@
     for (psS32 i=0;i<bounds->n-1;i++) {
         if (FLT_EPSILON >= fabs(bounds->data.F32[i+1]-bounds->data.F32[i])) {
-            psError(PS_ERR_UNKNOWN, true, "data points must be distinct\n");
+            psError(PS_ERR_UNKNOWN, true, "data points must be distinct ([%d] %f %f)\n", i, bounds->data.F32[i], bounds->data.F32[i+1]);
             return(NULL);
         }

trunk/psLib/src/math/psMinimize.c

@@ -9 +9 @@
  *  @author GLG, MHPCC
  *
- *  @version $Revision: 1.126 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2005-07-16 00:42:28 $
+ *  @version $Revision: 1.127 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2005-07-19 02:55:54 $
  *
  *  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
@@ -520 +520 @@
     psVector *y32 = yPtr;
 
-
     // If these are linear splines, which means their polynomials will have
     // two coefficients, then we do the simple calculation.
@@ -638 +637 @@
     psTrace(".psLib.dataManip.psVectorFitSpline1D", 4,
             "---- psVectorFitSpline1D() end ----\n");
+
     return(mySpline);
 }