Contents


NAME

     vsinqf - compute the Fourier coefficients in a  sine  series
     representation with only odd wave numbers.  The VSINQ opera-
     tions are normalized, so a call of VSINQF followed by a call
     of VSINQB will return the original sequence.

SYNOPSIS

     SUBROUTINE VSINQF(M, N, X, XT, MDIMX, WSAVE)

     INTEGER M, N, MDIMX
     REAL X(MDIMX,*), XT(MDIMX,*), WSAVE(*)

     SUBROUTINE VSINQF_64(M, N, X, XT, MDIMX, WSAVE)

     INTEGER*8 M, N, MDIMX
     REAL X(MDIMX,*), XT(MDIMX,*), WSAVE(*)

  F95 INTERFACE
     SUBROUTINE SINQF([M], [N], X, XT, [MDIMX], WSAVE)

     INTEGER :: M, N, MDIMX
     REAL, DIMENSION(:) :: WSAVE
     REAL, DIMENSION(:,:) :: X, XT

     SUBROUTINE SINQF_64([M], [N], X, XT, [MDIMX], WSAVE)

     INTEGER(8) :: M, N, MDIMX
     REAL, DIMENSION(:) :: WSAVE
     REAL, DIMENSION(:,:) :: X, XT

  C INTERFACE
     #include <sunperf.h>

     void vsinqf(int m, int n, float *x, float  *xt,  int  mdimx,
               float *wsave);

     void vsinqf_64(long m, long n, float  *x,  float  *xt,  long
               mdimx, float *wsave);

ARGUMENTS

     M (input)
               The number of sequences to be transformed.   M  >=
               0.

     N (input) Length of the sequence to be  transformed.   These
               subroutines are most efficient when N is a product
               of small primes.  N >= 0.

     X (input/output)
               On entry, an array  of  length  N  containing  the
               sequence  to  be  transformed.  For VSINQF, a real
               two-dimensional array with dimensions of (MDIMX  x
               N)   whose   rows  contain  the  sequences  to  be
               transformed.   On  exit,  the  quarter-wave   sine
               transform of the input.

     XT (input)
               A real two-dimensional work array with  dimensions
               of (MDIMX x N).

     MDIMX (input)
               Leading dimension of the arrays X and XT as speci-
               fied  in  a dimension or type statement.  MDIMX >=
               M.

     WSAVE (input)
               On entry, an array with dimension of at least (2 *
               N + 15), initialized by VSINQI.