GESVDQ: computes the singular value decomposition (SVD) of a complex M-by-N matrix A, where M >= N. The SVD of A is written as [++] [xx] [x0] [xx] A = U * SIGMA * V^*, [++] = [xx] * [ox] * [xx] [++] [xx] where SIGMA is an N-by-N diagonal matrix, U is an M-by-N orthonormal matrix, and V is an N-by-N unitary matrix. The diagonal elements of SIGMA are the singular values of A. The columns of U and V are the left and the right singular vectors of A, respectively.
More...
|
subroutine | cgesvdq (joba, jobp, jobr, jobu, jobv, m, n, a, lda, s, u, ldu, v, ldv, numrank, iwork, liwork, cwork, lcwork, rwork, lrwork, info) |
|
| la_cgesvdq |
|
subroutine | dgesvdq (joba, jobp, jobr, jobu, jobv, m, n, a, lda, s, u, ldu, v, ldv, numrank, iwork, liwork, work, lwork, rwork, lrwork, info) |
|
| la_dgesvdq |
|
| la_qgesvdq |
|
subroutine | sgesvdq (joba, jobp, jobr, jobu, jobv, m, n, a, lda, s, u, ldu, v, ldv, numrank, iwork, liwork, work, lwork, rwork, lrwork, info) |
|
| la_sgesvdq |
|
| la_wgesvdq |
|
subroutine | zgesvdq (joba, jobp, jobr, jobu, jobv, m, n, a, lda, s, u, ldu, v, ldv, numrank, iwork, liwork, cwork, lcwork, rwork, lrwork, info) |
|
| la_zgesvdq |
|
GESVDQ: computes the singular value decomposition (SVD) of a complex M-by-N matrix A, where M >= N. The SVD of A is written as [++] [xx] [x0] [xx] A = U * SIGMA * V^*, [++] = [xx] * [ox] * [xx] [++] [xx] where SIGMA is an N-by-N diagonal matrix, U is an M-by-N orthonormal matrix, and V is an N-by-N unitary matrix. The diagonal elements of SIGMA are the singular values of A. The columns of U and V are the left and the right singular vectors of A, respectively.
◆ cgesvdq()
subroutine la_lapack::gesvdq::cgesvdq |
( |
character, intent(in) | joba, |
|
|
character, intent(in) | jobp, |
|
|
character, intent(in) | jobr, |
|
|
character, intent(in) | jobu, |
|
|
character, intent(in) | jobv, |
|
|
integer(ilp), intent(in) | m, |
|
|
integer(ilp), intent(in) | n, |
|
|
complex(sp), dimension(lda,*), intent(inout) | a, |
|
|
integer(ilp), intent(in) | lda, |
|
|
real(sp), dimension(*), intent(out) | s, |
|
|
complex(sp), dimension(ldu,*), intent(out) | u, |
|
|
integer(ilp), intent(in) | ldu, |
|
|
complex(sp), dimension(ldv,*), intent(out) | v, |
|
|
integer(ilp), intent(in) | ldv, |
|
|
integer(ilp), intent(out) | numrank, |
|
|
integer(ilp), dimension(*), intent(out) | iwork, |
|
|
integer(ilp), intent(in) | liwork, |
|
|
complex(sp), dimension(*), intent(out) | cwork, |
|
|
integer(ilp), intent(inout) | lcwork, |
|
|
real(sp), dimension(*), intent(out) | rwork, |
|
|
integer(ilp), intent(in) | lrwork, |
|
|
integer(ilp), intent(out) | info ) |
◆ dgesvdq()
subroutine la_lapack::gesvdq::dgesvdq |
( |
character, intent(in) | joba, |
|
|
character, intent(in) | jobp, |
|
|
character, intent(in) | jobr, |
|
|
character, intent(in) | jobu, |
|
|
character, intent(in) | jobv, |
|
|
integer(ilp), intent(in) | m, |
|
|
integer(ilp), intent(in) | n, |
|
|
real(dp), dimension(lda,*), intent(inout) | a, |
|
|
integer(ilp), intent(in) | lda, |
|
|
real(dp), dimension(*), intent(out) | s, |
|
|
real(dp), dimension(ldu,*), intent(out) | u, |
|
|
integer(ilp), intent(in) | ldu, |
|
|
real(dp), dimension(ldv,*), intent(out) | v, |
|
|
integer(ilp), intent(in) | ldv, |
|
|
integer(ilp), intent(out) | numrank, |
|
|
integer(ilp), dimension(*), intent(out) | iwork, |
|
|
integer(ilp), intent(in) | liwork, |
|
|
real(dp), dimension(*), intent(out) | work, |
|
|
integer(ilp), intent(inout) | lwork, |
|
|
real(dp), dimension(*), intent(out) | rwork, |
|
|
integer(ilp), intent(in) | lrwork, |
|
|
integer(ilp), intent(out) | info ) |
◆ la_cgesvdq()
la_lapack::gesvdq::la_cgesvdq |
◆ la_dgesvdq()
la_lapack::gesvdq::la_dgesvdq |
◆ la_qgesvdq()
la_lapack::gesvdq::la_qgesvdq |
◆ la_sgesvdq()
la_lapack::gesvdq::la_sgesvdq |
◆ la_wgesvdq()
la_lapack::gesvdq::la_wgesvdq |
◆ la_zgesvdq()
la_lapack::gesvdq::la_zgesvdq |
◆ sgesvdq()
subroutine la_lapack::gesvdq::sgesvdq |
( |
character, intent(in) | joba, |
|
|
character, intent(in) | jobp, |
|
|
character, intent(in) | jobr, |
|
|
character, intent(in) | jobu, |
|
|
character, intent(in) | jobv, |
|
|
integer(ilp), intent(in) | m, |
|
|
integer(ilp), intent(in) | n, |
|
|
real(sp), dimension(lda,*), intent(inout) | a, |
|
|
integer(ilp), intent(in) | lda, |
|
|
real(sp), dimension(*), intent(out) | s, |
|
|
real(sp), dimension(ldu,*), intent(out) | u, |
|
|
integer(ilp), intent(in) | ldu, |
|
|
real(sp), dimension(ldv,*), intent(out) | v, |
|
|
integer(ilp), intent(in) | ldv, |
|
|
integer(ilp), intent(out) | numrank, |
|
|
integer(ilp), dimension(*), intent(out) | iwork, |
|
|
integer(ilp), intent(in) | liwork, |
|
|
real(sp), dimension(*), intent(out) | work, |
|
|
integer(ilp), intent(inout) | lwork, |
|
|
real(sp), dimension(*), intent(out) | rwork, |
|
|
integer(ilp), intent(in) | lrwork, |
|
|
integer(ilp), intent(out) | info ) |
◆ zgesvdq()
subroutine la_lapack::gesvdq::zgesvdq |
( |
character, intent(in) | joba, |
|
|
character, intent(in) | jobp, |
|
|
character, intent(in) | jobr, |
|
|
character, intent(in) | jobu, |
|
|
character, intent(in) | jobv, |
|
|
integer(ilp), intent(in) | m, |
|
|
integer(ilp), intent(in) | n, |
|
|
complex(dp), dimension(lda,*), intent(inout) | a, |
|
|
integer(ilp), intent(in) | lda, |
|
|
real(dp), dimension(*), intent(out) | s, |
|
|
complex(dp), dimension(ldu,*), intent(out) | u, |
|
|
integer(ilp), intent(in) | ldu, |
|
|
complex(dp), dimension(ldv,*), intent(out) | v, |
|
|
integer(ilp), intent(in) | ldv, |
|
|
integer(ilp), intent(out) | numrank, |
|
|
integer(ilp), dimension(*), intent(out) | iwork, |
|
|
integer(ilp), intent(in) | liwork, |
|
|
complex(dp), dimension(*), intent(out) | cwork, |
|
|
integer(ilp), intent(inout) | lcwork, |
|
|
real(dp), dimension(*), intent(out) | rwork, |
|
|
integer(ilp), intent(in) | lrwork, |
|
|
integer(ilp), intent(out) | info ) |
The documentation for this interface was generated from the following file: