*DECK BSPLVN SUBROUTINE BSPLVN (T, JHIGH, INDEX, X, ILEFT, VNIKX) C***BEGIN PROLOGUE BSPLVN C***SUBSIDIARY C***PURPOSE Subsidiary to FC C***LIBRARY SLATEC C***TYPE SINGLE PRECISION (BSPLVN-S, DFSPVN-D) C***AUTHOR (UNKNOWN) C***DESCRIPTION C C Calculates the value of all possibly nonzero B-splines at *X* of C order MAX(JHIGH,(J+1)(INDEX-1)) on *T*. C C***SEE ALSO FC C***ROUTINES CALLED (NONE) C***REVISION HISTORY (YYMMDD) C 780801 DATE WRITTEN C 891214 Prologue converted to Version 4.0 format. (BAB) C 900328 Added TYPE section. (WRB) C***END PROLOGUE BSPLVN