f77_geqrf Interface

public interface f77_geqrf

Generic old style interface for GEQRF. Supports s, d, c, z. See also: mfi_geqrf, sgeqrf, dgeqrf, cgeqrf, zgeqrf.


Subroutines

public pure subroutine sgeqrf(m, n, a, lda, tau, work, lwork, info)

Original interface for SGEQRF See also: mfi_geqrf, f77_geqrf.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: m
integer, intent(in) :: n
real(kind=REAL32), intent(inout) :: a(lda,*)
integer, intent(in) :: lda
real(kind=REAL32), intent(out) :: tau(*)
real(kind=REAL32), intent(inout) :: work(*)
integer, intent(in) :: lwork
integer, intent(out) :: info

public pure subroutine dgeqrf(m, n, a, lda, tau, work, lwork, info)

Original interface for DGEQRF See also: mfi_geqrf, f77_geqrf.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: m
integer, intent(in) :: n
real(kind=REAL64), intent(inout) :: a(lda,*)
integer, intent(in) :: lda
real(kind=REAL64), intent(out) :: tau(*)
real(kind=REAL64), intent(inout) :: work(*)
integer, intent(in) :: lwork
integer, intent(out) :: info

public pure subroutine cgeqrf(m, n, a, lda, tau, work, lwork, info)

Original interface for CGEQRF See also: mfi_geqrf, f77_geqrf.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: m
integer, intent(in) :: n
complex(kind=REAL32), intent(inout) :: a(lda,*)
integer, intent(in) :: lda
complex(kind=REAL32), intent(out) :: tau(*)
complex(kind=REAL32), intent(inout) :: work(*)
integer, intent(in) :: lwork
integer, intent(out) :: info

public pure subroutine zgeqrf(m, n, a, lda, tau, work, lwork, info)

Original interface for ZGEQRF See also: mfi_geqrf, f77_geqrf.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: m
integer, intent(in) :: n
complex(kind=REAL64), intent(inout) :: a(lda,*)
integer, intent(in) :: lda
complex(kind=REAL64), intent(out) :: tau(*)
complex(kind=REAL64), intent(inout) :: work(*)
integer, intent(in) :: lwork
integer, intent(out) :: info