*DECK BSPLVD SUBROUTINE BSPLVD (T, K, X, ILEFT, VNIKX, NDERIV) C***BEGIN PROLOGUE BSPLVD C***SUBSIDIARY C***PURPOSE Subsidiary to FC C***LIBRARY SLATEC C***TYPE SINGLE PRECISION (BSPLVD-S, DFSPVD-D) C***AUTHOR (UNKNOWN) C***DESCRIPTION C C Calculates value and deriv.s of all B-splines which do not vanish at X C C Fill VNIKX(J,IDERIV), J=IDERIV, ... ,K with nonzero values of C B-splines of order K+1-IDERIV , IDERIV=NDERIV, ... ,1, by repeated C calls to BSPLVN C C***SEE ALSO FC C***ROUTINES CALLED BSPLVN C***REVISION HISTORY (YYMMDD) C 780801 DATE WRITTEN C 890531 Changed all specific intrinsics to generic. (WRB) C 890831 Modified array declarations. (WRB) C 891214 Prologue converted to Version 4.0 format. (BAB) C 900328 Added TYPE section. (WRB) C***END PROLOGUE BSPLVD