sycon_rook Interface

public interface sycon_rook

SYCON_ROOK estimates the reciprocal of the condition number (in the 1-norm) of a complex symmetric matrix A using the factorization A = UDUT or A = LDLT computed by CSYTRF_ROOK. An estimate is obtained for norm(inv(A)), and the reciprocal of the condition number is computed as RCOND = 1 / (ANORM * norm(inv(A))).


Subroutines

public pure subroutine csycon_rook(uplo, n, a, lda, ipiv, anorm, rcond, work, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
complex(kind=sp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
integer(kind=ilp), intent(in) :: ipiv(*)
real(kind=sp), intent(in) :: anorm
real(kind=sp), intent(out) :: rcond
complex(kind=sp), intent(out) :: work(*)
integer(kind=ilp), intent(out) :: info

public pure subroutine dsycon_rook(uplo, n, a, lda, ipiv, anorm, rcond, work, iwork, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
real(kind=dp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
integer(kind=ilp), intent(in) :: ipiv(*)
real(kind=dp), intent(in) :: anorm
real(kind=dp), intent(out) :: rcond
real(kind=dp), intent(out) :: work(*)
integer(kind=ilp), intent(out) :: iwork(*)
integer(kind=ilp), intent(out) :: info

public pure subroutine ssycon_rook(uplo, n, a, lda, ipiv, anorm, rcond, work, iwork, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
real(kind=sp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
integer(kind=ilp), intent(in) :: ipiv(*)
real(kind=sp), intent(in) :: anorm
real(kind=sp), intent(out) :: rcond
real(kind=sp), intent(out) :: work(*)
integer(kind=ilp), intent(out) :: iwork(*)
integer(kind=ilp), intent(out) :: info

public pure subroutine zsycon_rook(uplo, n, a, lda, ipiv, anorm, rcond, work, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
complex(kind=dp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
integer(kind=ilp), intent(in) :: ipiv(*)
real(kind=dp), intent(in) :: anorm
real(kind=dp), intent(out) :: rcond
complex(kind=dp), intent(out) :: work(*)
integer(kind=ilp), intent(out) :: info

Module Procedures

public interface stdlib_csycon_rook()

Arguments

None

public interface stdlib_dsycon_rook()

Arguments

None

public interface stdlib_ssycon_rook()

Arguments

None

public interface stdlib_zsycon_rook()

Arguments

None