costi

NAME

costi - initialize the array WSAVE, which is used in COST.

SYNOPSIS

  SUBROUTINE COSTI( N, WSAVE)
  INTEGER N
  REAL WSAVE(*)
 
  SUBROUTINE COSTI_64( N, WSAVE)
  INTEGER*8 N
  REAL WSAVE(*)

F95 INTERFACE

  SUBROUTINE COSTI( N, WSAVE)
  INTEGER :: N
  REAL, DIMENSION(:) :: WSAVE
 
  SUBROUTINE COSTI_64( N, WSAVE)
  INTEGER(8) :: N
  REAL, DIMENSION(:) :: WSAVE

C INTERFACE

#include <sunperf.h>

void costi(int n, float *wsave);

void costi_64(long n, float *wsave);

ARGUMENTS

* 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 (3 * N + 15) or greater. COSTI is called once to initialize WSAVE before calling COST and need not be called again between calls to COST 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.