UPMTR: overwrites the general complex M-by-N matrix C with SIDE = 'L' SIDE = 'R' TRANS = 'N': Q * C C * Q TRANS = 'C': Q**H * C C * Q**H where Q is a complex unitary 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 CHPTRD 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 | cupmtr (side, uplo, trans, m, n, ap, tau, c, ldc, work, info) |
|
| la_cupmtr |
|
| la_wupmtr |
|
pure subroutine | zupmtr (side, uplo, trans, m, n, ap, tau, c, ldc, work, info) |
|
| la_zupmtr |
|
UPMTR: overwrites the general complex M-by-N matrix C with SIDE = 'L' SIDE = 'R' TRANS = 'N': Q * C C * Q TRANS = 'C': Q**H * C C * Q**H where Q is a complex unitary 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 CHPTRD 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).
◆ cupmtr()
pure subroutine la_lapack::upmtr::cupmtr |
( |
character, intent(in) |
side, |
|
|
character, intent(in) |
uplo, |
|
|
character, intent(in) |
trans, |
|
|
integer(ilp), intent(in) |
m, |
|
|
integer(ilp), intent(in) |
n, |
|
|
complex(sp), dimension(*), intent(inout) |
ap, |
|
|
complex(sp), dimension(*), intent(in) |
tau, |
|
|
complex(sp), dimension(ldc,*), intent(inout) |
c, |
|
|
integer(ilp), intent(in) |
ldc, |
|
|
complex(sp), dimension(*), intent(out) |
work, |
|
|
integer(ilp), intent(out) |
info |
|
) |
| |
◆ la_cupmtr()
la_lapack::upmtr::la_cupmtr |
◆ la_wupmtr()
la_lapack::upmtr::la_wupmtr |
◆ la_zupmtr()
la_lapack::upmtr::la_zupmtr |
◆ zupmtr()
pure subroutine la_lapack::upmtr::zupmtr |
( |
character, intent(in) |
side, |
|
|
character, intent(in) |
uplo, |
|
|
character, intent(in) |
trans, |
|
|
integer(ilp), intent(in) |
m, |
|
|
integer(ilp), intent(in) |
n, |
|
|
complex(dp), dimension(*), intent(inout) |
ap, |
|
|
complex(dp), dimension(*), intent(in) |
tau, |
|
|
complex(dp), dimension(ldc,*), intent(inout) |
c, |
|
|
integer(ilp), intent(in) |
ldc, |
|
|
complex(dp), dimension(*), intent(out) |
work, |
|
|
integer(ilp), intent(out) |
info |
|
) |
| |
The documentation for this interface was generated from the following file: