Contents
     vdsinti - initialize the array WSAVE, which is used in  sub-
     routine VSINT.
     SUBROUTINE VDSINTI(N, WSAVE)
     INTEGER N
     DOUBLE PRECISION WSAVE(*)
     SUBROUTINE VDSINTI_64(N, WSAVE)
     INTEGER*8 N
     DOUBLE PRECISION WSAVE(*)
  F95 INTERFACE
     SUBROUTINE VSINTI(N, WSAVE)
     INTEGER :: N
     REAL(8), DIMENSION(:) :: WSAVE
     SUBROUTINE VSINTI_64(N, WSAVE)
     INTEGER(8) :: N
     REAL(8), DIMENSION(:) :: WSAVE
  C INTERFACE
     #include <sunperf.h>
     void vdsinti(int n, double *wsave);
     void vdsinti_64(long n, double *wsave);
     N (input) Length of the sequence to be transformed.  N >= 0.
     WSAVE (input)
               On entry, an array of dimension (2N + N/2 + 15) or
               greater. VSINTI is called once to initialize WSAVE
               before calling VSINT and need not be called  again
               between  calls  to  VSINT  if  N  and WSAVE remain
               unchanged.  Thus, subsequent  transforms  of  same
               size  can  be obtained faster than the first since
               they  do  not  require   initialization   of   the
               workspace.