cckcsd.f - Man Page

subroutine cckcsd (nm, mval, pval, qval, nmats, iseed, thresh, mmax, x, xf, u1, u2, v1t, v2t, theta, iwork, work, rwork, nin, nout, info)
CCKCSD
subroutine clacsg (m, p, q, theta, iseed, x, ldx, work)

CCKCSD

Purpose:

 CCKCSD tests CUNCSD:
        the CSD for an M-by-M unitary matrix X partitioned as
        [ X11 X12; X21 X22 ]. X11 is P-by-Q.

Parameters

NM

          NM is INTEGER
          The number of values of M contained in the vector MVAL.

MVAL

          MVAL is INTEGER array, dimension (NM)
          The values of the matrix row dimension M.

PVAL

          PVAL is INTEGER array, dimension (NM)
          The values of the matrix row dimension P.

QVAL

          QVAL is INTEGER array, dimension (NM)
          The values of the matrix column dimension Q.

NMATS

          NMATS is INTEGER
          The number of matrix types to be tested for each combination
          of matrix dimensions.  If NMATS >= NTYPES (the maximum
          number of matrix types), then all the different types are
          generated for testing.  If NMATS < NTYPES, another input line
          is read to get the numbers of the matrix types to be used.

ISEED

          ISEED is INTEGER array, dimension (4)
          On entry, the seed of the random number generator.  The array
          elements should be between 0 and 4095, otherwise they will be
          reduced mod 4096, and ISEED(4) must be odd.
          On exit, the next seed in the random number sequence after
          all the test matrices have been generated.

THRESH

          THRESH is REAL
          The threshold value for the test ratios.  A result is
          included in the output file if RESULT >= THRESH.  To have
          every test ratio printed, use THRESH = 0.

MMAX

          MMAX is INTEGER
          The maximum value permitted for M, used in dimensioning the
          work arrays.

X

          X is COMPLEX array, dimension (MMAX*MMAX)

XF

          XF is COMPLEX array, dimension (MMAX*MMAX)

U1

          U1 is COMPLEX array, dimension (MMAX*MMAX)

U2

          U2 is COMPLEX array, dimension (MMAX*MMAX)

V1T

          V1T is COMPLEX array, dimension (MMAX*MMAX)

V2T

          V2T is COMPLEX array, dimension (MMAX*MMAX)

THETA

          THETA is REAL array, dimension (MMAX)

IWORK

          IWORK is INTEGER array, dimension (MMAX)

WORK

          WORK is COMPLEX array

RWORK

          RWORK is REAL array

NIN

          NIN is INTEGER
          The unit number for input.

NOUT

          NOUT is INTEGER
          The unit number for output.

INFO

          INFO is INTEGER
          = 0 :  successful exit
          > 0 :  If CLAROR returns an error code, the absolute value
                 of it is returned.

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Definition at line 181 of file cckcsd.f.

Definition at line 352 of file cckcsd.f.