NAME

vcosqi - initialize the array WSAVE, which is used in both VCOSQF and VCOSQB.

SYNOPSIS

  SUBROUTINE VCOSQI( N, WSAVE)
  INTEGER N
  REAL WSAVE(*)

  SUBROUTINE VCOSQI_64( N, WSAVE)
  INTEGER*8 N
  REAL WSAVE(*)

  SUBROUTINE VCOSQI( N, WSAVE)
  INTEGER :: N
  REAL, DIMENSION(:) :: WSAVE

  SUBROUTINE VCOSQI_64( N, WSAVE)
  INTEGER(8) :: N
  REAL, DIMENSION(:) :: WSAVE

#include <sunperf.h>

void vcosqi(int n, float *wsave);

void vcosqi_64(long n, float *wsave);

N (input)
Length of the sequence to be transformed. The method is most efficient when N is a product of small primes.
WSAVE (input/output)
On entry, an array of dimension (2 * N + 15) or greater. VCOSQI needs to be called only once to initialize WSAVE before calling VCOSQF and/or VCOSQB if N and WSAVE remain unchanged between these calls. Thus, subsequent transforms or inverse transforms of same size can be obtained faster than the first since they do not require initialization of the workspace.