PUT_SPLINE is used in conjunction with SPLINE_READ. SPLINE_READ reads in the data points for a spline from a file. PUT_SPLINE is used to store this data within Adams Solver.
Use
Called By
SPLINE_READ
Calling Sequence
CALL PUT_SPLINE (id, nx, nz, x, y, z, errflg)
Input Argument
id | An integer variable containing the ID of the SPLINE statement. |
nx | An integer variable that specifies the number of x values contained in the x array. The number of x values must be at least 4. |
nz | An integer variable that specifies the number of z values contained in the z array. The number of z values must be at least 1. |
x | A double-precision array containing the x values for the spline element. The number of x values must be at least nx. |
y | A double-precision array containing the y values for the spline element. The number of y values must be at least nx · nz. |
z | A double-precision array containing the z values for the spline element. The number of z values must be at least nz. |
Output Argument
errflg | A logical variable that indicates if Adams successfully accepts the x, y, [and z] data. SPLINE_READ checks the value of errflg after calling PUT_SPLINE. |
Extended Definition
PUT_SPLINE transfers spline data to Adams Solver from local variables that you define in the SPLINE_READ user-written subroutine. For an example of a SPLINE_READ subroutine that calls PUT_SPLINE, see SPLINE_READ.
Cautions
■If there are more than nx values in x, more than nx · nz values in y, or more than nz values in z, then Adams Solver ignores the extra values.
■The z array is not used when nz = 1. The value of z is irrelevant in this case; however, z must exist.
■The order of values that are stored in the y array must correspond to the order of points in the x and z arrays as follows:
■The y array must consist of nz consecutive sets of nx values (the values within each set correspond to the values in the x array, and the sets correspond to the values in the z array). It is possible to use either a single- or double-dimensioned array for y.
■If a double-dimensioned array is used, the first dimension must be equal to nx, not greater, and the second dimension must be greater or equal to nz.