f77_sytrf Interface

public interface f77_sytrf

Generic old style interface for SYTRF. Supports s, d. See also: mfi_sytrf, ssytrf, dsytrf.


Subroutines

public pure subroutine ssytrf(uplo, n, a, lda, ipiv, work, lwork, info)

Original interface for SSYTRF See also: mfi_sytrf, f77_sytrf. SSYTRF computes the factorization of a real symmetric matrix A using the Bunch-Kaufman diagonal pivoting method. The form of the factorization is A = UDUT or A = LDLT, where U (or L) is a product of permutation and unit upper (lower) triangular matrices, and D is block diagonal with 1-by-1 and 2-by-2 diagonal blocks.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer, intent(in) :: n
real(kind=REAL32), intent(inout) :: a(lda,*)
integer, intent(in) :: lda
integer, intent(out) :: ipiv(*)
real(kind=REAL32), intent(inout) :: work(*)
integer, intent(in) :: lwork
integer, intent(out) :: info

public pure subroutine dsytrf(uplo, n, a, lda, ipiv, work, lwork, info)

Original interface for DSYTRF See also: mfi_sytrf, f77_sytrf. DSYTRF computes the factorization of a real symmetric matrix A using the Bunch-Kaufman diagonal pivoting method. The form of the factorization is A = UDUT or A = LDLT, where U (or L) is a product of permutation and unit upper (lower) triangular matrices, and D is block diagonal with 1-by-1 and 2-by-2 diagonal blocks.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer, intent(in) :: n
real(kind=REAL64), intent(inout) :: a(lda,*)
integer, intent(in) :: lda
integer, intent(out) :: ipiv(*)
real(kind=REAL64), intent(inout) :: work(*)
integer, intent(in) :: lwork
integer, intent(out) :: info