vcosqf (3p)

Name

vcosqf - tation with only odd wave numbers. The VCOSQ operations are normal- ized, so a call of VCOSQF followed by a call of VCOSQB will return the original sequence.

Synopsis

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

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

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

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




F95 INTERFACE
SUBROUTINE COSQF(M, N, X, XT, MDIMX, WSAVE)

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

SUBROUTINE COSQF_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 vcosqf(int m, int  n,  float  *x,  float  *xt,  int  mdimx,  float
*wsave);

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

Description

Oracle Solaris Studio Performance Library                           vcosqf(3P)



NAME
       vcosqf  - compute the Fourier coefficients in a cosine series represen-
       tation with only odd wave numbers.  The VCOSQ  operations  are  normal-
       ized,  so a call of VCOSQF followed by a call of VCOSQB will return the
       original sequence.


SYNOPSIS
       SUBROUTINE VCOSQF(M, N, X, XT, MDIMX, WSAVE)

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

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

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




   F95 INTERFACE
       SUBROUTINE COSQF(M, N, X, XT, MDIMX, WSAVE)

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

       SUBROUTINE COSQF_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 vcosqf(int m, int  n,  float  *x,  float  *xt,  int  mdimx,  float
                 *wsave);

       void  vcosqf_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  VCOSQF, a real two-dimensional array with
                 dimensions of (MDIMX x N) whose rows contain the sequences to
                 be  transformed.   On exit, the quarter-wave cosine 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 specified in a
                 dimension or type statement.  MDIMX >= M.


       WSAVE (input)
                 On entry, an array of dimension (2 * N + 15) or greater  ini-
                 tialized by VCOSTI.




                                  7 Nov 2015                        vcosqf(3P)