OPMTR: 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 nq-1 elementary reflectors, as returned by DSPTRD using packed storage: if UPLO = 'U', Q = H(nq-1) . . . H(2) H(1); if UPLO = 'L', Q = H(1) H(2) . . . H(nq-1).
More...
|
pure subroutine | dopmtr (side, uplo, trans, m, n, ap, tau, c, ldc, work, info) |
|
| la_dopmtr |
|
| la_qopmtr |
|
pure subroutine | sopmtr (side, uplo, trans, m, n, ap, tau, c, ldc, work, info) |
|
| la_sopmtr |
|
OPMTR: 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 nq-1 elementary reflectors, as returned by DSPTRD using packed storage: if UPLO = 'U', Q = H(nq-1) . . . H(2) H(1); if UPLO = 'L', Q = H(1) H(2) . . . H(nq-1).
◆ dopmtr()
pure subroutine la_lapack::opmtr::dopmtr |
( |
character, intent(in) |
side, |
|
|
character, intent(in) |
uplo, |
|
|
character, intent(in) |
trans, |
|
|
integer(ilp), intent(in) |
m, |
|
|
integer(ilp), intent(in) |
n, |
|
|
real(dp), dimension(*), intent(inout) |
ap, |
|
|
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(out) |
info |
|
) |
| |
◆ la_dopmtr()
la_lapack::opmtr::la_dopmtr |
◆ la_qopmtr()
la_lapack::opmtr::la_qopmtr |
◆ la_sopmtr()
la_lapack::opmtr::la_sopmtr |
◆ sopmtr()
pure subroutine la_lapack::opmtr::sopmtr |
( |
character, intent(in) |
side, |
|
|
character, intent(in) |
uplo, |
|
|
character, intent(in) |
trans, |
|
|
integer(ilp), intent(in) |
m, |
|
|
integer(ilp), intent(in) |
n, |
|
|
real(sp), dimension(*), intent(inout) |
ap, |
|
|
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(out) |
info |
|
) |
| |
The documentation for this interface was generated from the following file: