dsinti - initialize the array WSAVE, which is used in subroutine SINT.
SUBROUTINE DSINTI(N, WSAVE) INTEGER N DOUBLE PRECISION WSAVE(*) SUBROUTINE DSINTI_64(N, WSAVE) INTEGER*8 N DOUBLE PRECISION WSAVE(*) F95 INTERFACE SUBROUTINE SINTI(N, WSAVE) INTEGER :: N REAL(8), DIMENSION(:) :: WSAVE SUBROUTINE SINTI_64(N, WSAVE) INTEGER(8) :: N REAL(8), DIMENSION(:) :: WSAVE C INTERFACE #include <sunperf.h> void dsinti(int n, double *wsave); void dsinti_64(long n, double *wsave);
Oracle Solaris Studio Performance Library dsinti(3P) NAME dsinti - initialize the array WSAVE, which is used in subroutine SINT. SYNOPSIS SUBROUTINE DSINTI(N, WSAVE) INTEGER N DOUBLE PRECISION WSAVE(*) SUBROUTINE DSINTI_64(N, WSAVE) INTEGER*8 N DOUBLE PRECISION WSAVE(*) F95 INTERFACE SUBROUTINE SINTI(N, WSAVE) INTEGER :: N REAL(8), DIMENSION(:) :: WSAVE SUBROUTINE SINTI_64(N, WSAVE) INTEGER(8) :: N REAL(8), DIMENSION(:) :: WSAVE C INTERFACE #include <sunperf.h> void dsinti(int n, double *wsave); void dsinti_64(long n, double *wsave); ARGUMENTS 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. 7 Nov 2015 dsinti(3P)