ZUNT03(3)
okay so bestie, welcome to the ZUNT03(3) page from the Library Functions Manual π. This is the LAPACK corner where two unitary matrices get their vibe check, and honestly? it's giving main character energy. β¨
πΈ NAME πΈ
the file is literally right here, no cap: /home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/TESTING/EIG/zunt03.f
β¨ SYNOPSIS β¨
π Functions/Subroutines π
here's the call shape, bestie β lowkey iconic:
subroutine ZUNT03 (rc, mu, mv, n, k, u, ldu, v, ldv, work, lwork, rwork,
result, info)
ZUNT03
π FUNCTION/SUBROUTINE DOCUMENTATION π
and the full signature is highkey this:
subroutine ZUNT03 (character*( * ) rc, integer mu, integer mv, integer n,
integer k, complex*16, dimension( ldu, * ) u, integer ldu, complex*16,
dimension( ldv, * ) v, integer ldv, complex*16, dimension( * ) work,
integer lwork, double precision, dimension( * ) rwork, double precision
result, integer info)
ZUNT03
π Purpose π
okay so what does it actually do? ZUNT03 compares two unitary matrices U and V to see if their corresponding rows or columns span the same spaces. The rows are checked if RC = 'R', and the columns are checked if RC = 'C'. periodt. π
RESULT is the maximum of:
| V*V' - I | / ( MV ulp ), if RC = 'R', or
| V'*V - I | / ( MV ulp ), if RC = 'C',
and the maximum over rows (or columns) 1 to K of:
| U(i) - S*V(i) |/ ( N ulp )
where abs(S) = 1 (chosen to minimize the expression), U(i) is the i-th row (column) of U, and V(i) is the i-th row (column) of V. iykyk β¨
π Parameters π
RCβCHARACTER*1. IfRC = 'R'the rows ofUandVare to be compared. IfRC = 'C'the columns ofUandVare to be compared. πMUβINTEGER. The number of rows ofUifRC = 'R', and the number of columns ifRC = 'C'. IfMU = 0ZUNT03does nothing.MUmust be at least zero. β¨MVβINTEGER. The number of rows ofVifRC = 'R', and the number of columns ifRC = 'C'. IfMV = 0ZUNT03does nothing.MVmust be at least zero. π«NβINTEGER. IfRC = 'R', the number of columns in the matricesUandV, and ifRC = 'C', the number of rows inUandV. IfN = 0ZUNT03does nothing.Nmust be at least zero. πΈKβINTEGER. The number of rows or columns ofUandVto compare.0 <= K <= max(MU,MV). π₯UβCOMPLEX*16 array, dimension (LDU,N). The first matrix to compare. IfRC = 'R',UisMUbyN, and ifRC = 'C',UisNbyMU. π¦LDUβINTEGER. The leading dimension ofU. IfRC = 'R',LDU >= max(1,MU), and ifRC = 'C',LDU >= max(1,N). πVβCOMPLEX*16 array, dimension (LDV,N). The second matrix to compare. IfRC = 'R',VisMVbyN, and ifRC = 'C',VisNbyMV. πLDVβINTEGER. The leading dimension ofV. IfRC = 'R',LDV >= max(1,MV), and ifRC = 'C',LDV >= max(1,N). βWORKβCOMPLEX*16 array, dimension (LWORK). πLWORKβINTEGER. The length of the arrayWORK. For best performance,LWORKshould be at leastN*NifRC = 'C'orM*MifRC = 'R', but the tests will be done even ifLWORKis0. πRWORKβDOUBLE PRECISION array, dimension (max(MV,N)). πRESULTβDOUBLE PRECISION. The value computed by the test described above.RESULTis limited to1/ulpto avoid overflow. πINFOβINTEGER.0indicates a successful exit.-kindicates the k-th parameter had an illegal value. π«Ά
π Author π
shoutout to the author gang β obsessed:
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 160 of file zunt03.f. π
π Author π
Generated automatically by Doxygen for LAPACK from the source code. Iconic. π
and that's the whole page, bestie β you ate! π This was LAPACK Version 3.12.0, from /home/abui...IG/zunt03.f(3) β byeee fr fr! πβ¨
π¦ where this page comes from
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- π girlified by deepseek-ai/DeepSeek-V4.1-Flash-1017 on : a language model's rewrite of the original, under its terms