Contents
     vcosti - initialize the array WSAVE, which is used in VCOST.
     SUBROUTINE VCOSTI(N, WSAVE)
     INTEGER N
     REAL WSAVE(*)
     SUBROUTINE VCOSTI_64(N, WSAVE)
     INTEGER*8 N
     REAL WSAVE(*)
  F95 INTERFACE
     SUBROUTINE VCOSTI(N, WSAVE)
     INTEGER :: N
     REAL, DIMENSION(:) :: WSAVE
     SUBROUTINE VCOSTI_64(N, WSAVE)
     INTEGER(8) :: N
     REAL, DIMENSION(:) :: WSAVE
  C INTERFACE
     #include <sunperf.h>
     void vcosti(int n, float *wsave);
     void vcosti_64(long n, float *wsave);
     N (input) Length of the sequence  to  be  transformed.   The
               method  is  most efficient when N - 1 is a product
               of small primes.  N >= 2.
     WSAVE (input)
               On entry, an array of dimension (2 * N  +  15)  or
               greater.   VCOSTI  is  called  once  to initialize
               WSAVE before calling VCOST and need not be  called
               again between calls to VCOST 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.