costi - initialize the array WSAVE, which is used in COST.
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);
Oracle Solaris Studio Performance Library costi(3P) 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/output) 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. 7 Nov 2015 costi(3P)