Repatch (from linux) of OSX IRAF

1 files changed, 14 insertions, 0 deletions

diff --git a/math/deboor/bspln.h b/math/deboor/bspln.h
new file mode 100644
index 00000000..ccee7b64
--- /dev/null
+++ b/math/deboor/bspln.h
@@ -0,0 +1,14 @@
+define	KMAX		20		# maximum order spline permitted
+
+# Spline descriptor structure -- stored at beginning of BSPLN array.
+# All of the information needed to describe the spline is collected
+# in one place.  Space is left in the header for expansion.
+# Space required:  REAL BSPLN [2*N+30]
+
+define	NCOEF		bspln[1]	# number of coeff in the spline
+define	ORDER		bspln[2]	# order of spline (cubic = 4)
+define	XMIN		bspln[3]	# minimum x-value
+define	XMAX		bspln[4]	# maximum x-value
+define	KINDEX		bspln[5]	# position during evaluation (SEVAL)
+define	KNOT1		NCOEF+10	# offset to the first knot
+define	COEF1		10		# offset to the first coefficient