Index: trunk/psLib/src/dataManip/psFunctions.c
===================================================================
--- trunk/psLib/src/dataManip/psFunctions.c	(revision 1755)
+++ trunk/psLib/src/dataManip/psFunctions.c	(revision 1763)
@@ -7,6 +7,6 @@
  *  polynomials.  It also contains a Gaussian functions.
  *
- *  @version $Revision: 1.30 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2004-09-09 03:38:07 $
+ *  @version $Revision: 1.31 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2004-09-09 22:20:31 $
  *
  *  Copyright 2004 Maui High Performance Computing Center, University of Hawaii
@@ -1713,2 +1713,33 @@
     return(tmpVector);
 }
+
+
+
+psSpline1D *psSpline1DEGen(const psSpline1D *spline,
+                           psVector *data)
+{
+    int i;
+    if (data->n != (1 + spline->n)) {
+        psLogMsg(__func__, PS_LOG_WARN,
+                 "data size / spline size mismatch (%d %d)\n",
+                 data->n, spline->n);
+        return(NULL);
+    }
+    if (1 == (spline->spline[0])->n) {
+        psLogMsg(__func__, PS_LOG_WARN,
+                 "Linear splines have not been implemented.");
+        return(NULL);
+        for (i=0;i<spline->n;i++) {}
+
+    }
+    else if (3 == (spline->spline[0])->n) {
+        psLogMsg(__func__, PS_LOG_WARN,
+                 "Cubic splines have not been implemented.");
+        return(NULL);
+    } else {
+        psLogMsg(__func__, PS_LOG_WARN,
+                 "Don't know how to generate %d-order splines.",
+                 (spline->spline[0])->n);
+        return(NULL);
+    }
+}