TESTING/EIG/cckcsd.f(3)
πΈ NAME πΈ
okay so welcome to the TESTING/EIG/cckcsd.f(3) page in the Library Functions Manual β the file is TESTING/EIG/cckcsd.f, and it's giving βtest routine documentation, but make it cuteβ energy. π
β¨ SYNOPSIS β¨
π Functions/Subroutines π
Functions/Subroutines
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)
π FUNCTION/SUBROUTINE DOCUMENTATION π
π«Ά subroutine cckcsd β CCKCSD π«Ά
subroutine cckcsd (integer nm, integer, dimension( * ) mval, integer,
dimension( * ) pval, integer, dimension( * ) qval, integer nmats,
integer, dimension( 4 ) iseed, real thresh, integer mmax, complex,
dimension( * ) x, complex, dimension( * ) xf, complex, dimension( * )
u1, complex, dimension( * ) u2, complex, dimension( * ) v1t, complex,
dimension( * ) v2t, real, dimension( * ) theta, integer, dimension( * )
iwork, complex, dimension( * ) work, real, dimension( * ) rwork, integer
nin, integer nout, integer info)
this is the CCKCSD subroutine, and yes it ate. β¨
πΈ 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 vectorMVAL.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. IfNMATS >= NTYPES(the maximum number of matrix types), then all the different types are generated for testing. IfNMATS < 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, andISEED(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 ifRESULT >= THRESH. To have every test ratio printed, useTHRESH = 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.
π¦ subroutine clacsg π¦
subroutine clacsg (integer m, integer p, integer q, real, dimension( * )
theta, integer, dimension( 4 ) iseed, complex, dimension( ldx, * ) x,
integer ldx, complex, dimension( * ) work)
Definition at line 352 of file cckcsd.f.
π AUTHOR π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Generated automatically by Doxygen for LAPACK from the source code.
okay thatβs the whole page, bestie π β footer energy is literally LAPACK Version 3.12.0 and TESTING/EIG/cckcsd.f(3). periodt. β¨
π¦ where this page comes from
- arch rolling: lapack-doc 3.12.1-2 Β· custom
- π girlified by deepseek-ai/DeepSeek-V4.1-Flash-1017 on : a language model's rewrite of the original, under its terms