f77_ungqr Interface
public interface f77_ungqr
Generic old style interface for UNGQR. Supports c, z. See also: mfi_ungqr, cungqr, zungqr.
Subroutines
public pure subroutine cungqr(m, n, k, a, lda, tau, work, lwork, info)
Original interface for CUNGQR See also: mfi_ungqr, f77_ungqr. This routine generates an complex(REAL32) matrix with orthonormal columns, which is defined as the first columns of a product of elementary reflectors of order . as returned by cgeqrf.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | m | |||
| integer, | intent(in) | :: | n | |||
| integer, | intent(in) | :: | k | |||
| complex(kind=REAL32), | intent(inout) | :: | a(lda,*) | |||
| integer, | intent(in) | :: | lda | |||
| complex(kind=REAL32), | intent(in) | :: | tau(*) | |||
| complex(kind=REAL32), | intent(out) | :: | work(*) | |||
| integer, | intent(in) | :: | lwork | |||
| integer, | intent(out) | :: | info |
public pure subroutine zungqr(m, n, k, a, lda, tau, work, lwork, info)
Original interface for ZUNGQR See also: mfi_ungqr, f77_ungqr. This routine generates an complex(REAL64) matrix with orthonormal columns, which is defined as the first columns of a product of elementary reflectors of order . as returned by zgeqrf.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | m | |||
| integer, | intent(in) | :: | n | |||
| integer, | intent(in) | :: | k | |||
| complex(kind=REAL64), | intent(inout) | :: | a(lda,*) | |||
| integer, | intent(in) | :: | lda | |||
| complex(kind=REAL64), | intent(in) | :: | tau(*) | |||
| complex(kind=REAL64), | intent(out) | :: | work(*) | |||
| integer, | intent(in) | :: | lwork | |||
| integer, | intent(out) | :: | info |