blob: ccee7b64e4da91cc97acd0c0687b1b679054999f (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
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
|
