la_syrcond Interface

public interface la_syrcond

LA_SYRCOND estimates the Skeel condition number of op(A) * op2(C) where op2 is determined by CMODE as follows CMODE = 1 op2(C) = C CMODE = 0 op2(C) = I CMODE = -1 op2(C) = inv(C) The Skeel condition number cond(A) = norminf( |inv(A)||A| ) is computed by computing scaling factors R such that diag(R)Aop2(C) is row equilibrated and computing the standard infinity-norm condition number.


Functions

public function dla_syrcond(uplo, n, a, lda, af, ldaf, ipiv, cmode, c, info, work, iwork)

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
real(kind=dp), intent(in) :: af(ldaf,*)
integer(kind=ilp), intent(in) :: ldaf
integer(kind=ilp), intent(in) :: ipiv(*)
integer(kind=ilp), intent(in) :: cmode
real(kind=dp), intent(in) :: c(*)
integer(kind=ilp), intent(out) :: info
real(kind=dp), intent(out) :: work(*)
integer(kind=ilp), intent(out) :: iwork(*)

Return Value real(kind=dp)

public function sla_syrcond(uplo, n, a, lda, af, ldaf, ipiv, cmode, c, info, work, iwork)

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
real(kind=sp), intent(in) :: af(ldaf,*)
integer(kind=ilp), intent(in) :: ldaf
integer(kind=ilp), intent(in) :: ipiv(*)
integer(kind=ilp), intent(in) :: cmode
real(kind=sp), intent(in) :: c(*)
integer(kind=ilp), intent(out) :: info
real(kind=sp), intent(out) :: work(*)
integer(kind=ilp), intent(out) :: iwork(*)

Return Value real(kind=sp)

Module Procedures

public interface stdlib_dla_syrcond()

Arguments

None

public interface stdlib_sla_syrcond()

Arguments

None