f77_gglse Interface

public interface f77_gglse

Generic old style interface for GGLSE. Supports s, d, c, z. See also: mfi_gglse, sgglse, dgglse, cgglse, zgglse.


Subroutines

public pure subroutine sgglse(m, n, p, a, lda, b, ldb, c, d, x, work, lwork, info)

Original interface for SGGLSE See also: mfi_gglse, f77_gglse.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: m
integer, intent(in) :: n
integer, intent(in) :: p
real(kind=REAL32), intent(inout) :: a(lda,*)
integer, intent(in) :: lda
real(kind=REAL32), intent(inout) :: b(ldb,*)
integer, intent(in) :: ldb
real(kind=REAL32), intent(inout) :: c(*)
real(kind=REAL32), intent(inout) :: d(*)
real(kind=REAL32), intent(out) :: x(*)
real(kind=REAL32), intent(out) :: work(*)
integer, intent(in) :: lwork
integer, intent(out) :: info

public pure subroutine dgglse(m, n, p, a, lda, b, ldb, c, d, x, work, lwork, info)

Original interface for DGGLSE See also: mfi_gglse, f77_gglse.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: m
integer, intent(in) :: n
integer, intent(in) :: p
real(kind=REAL64), intent(inout) :: a(lda,*)
integer, intent(in) :: lda
real(kind=REAL64), intent(inout) :: b(ldb,*)
integer, intent(in) :: ldb
real(kind=REAL64), intent(inout) :: c(*)
real(kind=REAL64), intent(inout) :: d(*)
real(kind=REAL64), intent(out) :: x(*)
real(kind=REAL64), intent(out) :: work(*)
integer, intent(in) :: lwork
integer, intent(out) :: info

public pure subroutine cgglse(m, n, p, a, lda, b, ldb, c, d, x, work, lwork, info)

Original interface for CGGLSE See also: mfi_gglse, f77_gglse.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: m
integer, intent(in) :: n
integer, intent(in) :: p
complex(kind=REAL32), intent(inout) :: a(lda,*)
integer, intent(in) :: lda
complex(kind=REAL32), intent(inout) :: b(ldb,*)
integer, intent(in) :: ldb
complex(kind=REAL32), intent(inout) :: c(*)
complex(kind=REAL32), intent(inout) :: d(*)
complex(kind=REAL32), intent(out) :: x(*)
complex(kind=REAL32), intent(out) :: work(*)
integer, intent(in) :: lwork
integer, intent(out) :: info

public pure subroutine zgglse(m, n, p, a, lda, b, ldb, c, d, x, work, lwork, info)

Original interface for ZGGLSE See also: mfi_gglse, f77_gglse.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: m
integer, intent(in) :: n
integer, intent(in) :: p
complex(kind=REAL64), intent(inout) :: a(lda,*)
integer, intent(in) :: lda
complex(kind=REAL64), intent(inout) :: b(ldb,*)
integer, intent(in) :: ldb
complex(kind=REAL64), intent(inout) :: c(*)
complex(kind=REAL64), intent(inout) :: d(*)
complex(kind=REAL64), intent(out) :: x(*)
complex(kind=REAL64), intent(out) :: work(*)
integer, intent(in) :: lwork
integer, intent(out) :: info