Contents


NAME

     sinti - initialize the array WSAVE, which is used in subrou-
     tine SINT.

SYNOPSIS

     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);

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.