Contents
sinti - initialize the array WSAVE, which is used in subrou-
tine SINT.
SUBROUTINE SINTI(N, WSAVE)
INTEGER N
REAL WSAVE(*)
SUBROUTINE SINTI_64(N, WSAVE)
INTEGER*8 N
REAL WSAVE(*)
F95 INTERFACE
SUBROUTINE SINTI(N, WSAVE)
INTEGER :: N
REAL, DIMENSION(:) :: WSAVE
SUBROUTINE SINTI_64(N, WSAVE)
INTEGER(8) :: N
REAL, DIMENSION(:) :: WSAVE
C INTERFACE
#include <sunperf.h>
void sinti(int n, float *wsave);
void sinti_64(long n, float *wsave);
N (input) Length of the sequence to be transformed. N >= 0.
WSAVE (input/output)
On entry, an array of dimension (2N + N/2 + 15) or
greater. SINTI is called once to initialize WSAVE
before calling SINT and need not be called again
between calls to SINT 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.