ORMHR: overwrites the general real M-by-N matrix C with SIDE = 'L' SIDE = 'R' TRANS = 'N': Q * C C * Q TRANS = 'T': Q**T * C C * Q**T where Q is a real orthogonal matrix of order nq, with nq = m if SIDE = 'L' and nq = n if SIDE = 'R'. Q is defined as the product of IHI-ILO elementary reflectors, as returned by DGEHRD: Q = H(ilo) H(ilo+1) . . . H(ihi-1).
More...
|
pure subroutine | dormhr (side, trans, m, n, ilo, ihi, a, lda, tau, c, ldc, work, lwork, info) |
|
| la_dormhr |
|
| la_qormhr |
|
pure subroutine | sormhr (side, trans, m, n, ilo, ihi, a, lda, tau, c, ldc, work, lwork, info) |
|
| la_sormhr |
|
ORMHR: overwrites the general real M-by-N matrix C with SIDE = 'L' SIDE = 'R' TRANS = 'N': Q * C C * Q TRANS = 'T': Q**T * C C * Q**T where Q is a real orthogonal matrix of order nq, with nq = m if SIDE = 'L' and nq = n if SIDE = 'R'. Q is defined as the product of IHI-ILO elementary reflectors, as returned by DGEHRD: Q = H(ilo) H(ilo+1) . . . H(ihi-1).
◆ dormhr()
pure subroutine la_lapack::ormhr::dormhr |
( |
character, intent(in) | side, |
|
|
character, intent(in) | trans, |
|
|
integer(ilp), intent(in) | m, |
|
|
integer(ilp), intent(in) | n, |
|
|
integer(ilp), intent(in) | ilo, |
|
|
integer(ilp), intent(in) | ihi, |
|
|
real(dp), dimension(lda,*), intent(inout) | a, |
|
|
integer(ilp), intent(in) | lda, |
|
|
real(dp), dimension(*), intent(in) | tau, |
|
|
real(dp), dimension(ldc,*), intent(inout) | c, |
|
|
integer(ilp), intent(in) | ldc, |
|
|
real(dp), dimension(*), intent(out) | work, |
|
|
integer(ilp), intent(in) | lwork, |
|
|
integer(ilp), intent(out) | info ) |
◆ la_dormhr()
la_lapack::ormhr::la_dormhr |
◆ la_qormhr()
la_lapack::ormhr::la_qormhr |
◆ la_sormhr()
la_lapack::ormhr::la_sormhr |
◆ sormhr()
pure subroutine la_lapack::ormhr::sormhr |
( |
character, intent(in) | side, |
|
|
character, intent(in) | trans, |
|
|
integer(ilp), intent(in) | m, |
|
|
integer(ilp), intent(in) | n, |
|
|
integer(ilp), intent(in) | ilo, |
|
|
integer(ilp), intent(in) | ihi, |
|
|
real(sp), dimension(lda,*), intent(inout) | a, |
|
|
integer(ilp), intent(in) | lda, |
|
|
real(sp), dimension(*), intent(in) | tau, |
|
|
real(sp), dimension(ldc,*), intent(inout) | c, |
|
|
integer(ilp), intent(in) | ldc, |
|
|
real(sp), dimension(*), intent(out) | work, |
|
|
integer(ilp), intent(in) | lwork, |
|
|
integer(ilp), intent(out) | info ) |
The documentation for this interface was generated from the following file: