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)