la_syrpvgrw Interface

public interface la_syrpvgrw

LA_SYRPVGRW computes the reciprocal pivot growth factor norm(A)/norm(U). The "max absolute element" norm is used. If this is much less than 1, the stability of the LU factorization of the (equilibrated) matrix A could be poor. This also means that the solution X, estimated condition numbers, and error bounds could be unreliable.


Functions

public function cla_syrpvgrw(uplo, n, info, a, lda, af, ldaf, ipiv, work)

Arguments

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

Return Value real(kind=sp)

public function dla_syrpvgrw(uplo, n, info, a, lda, af, ldaf, ipiv, work)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: info
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(*)
real(kind=dp), intent(out) :: work(*)

Return Value real(kind=dp)

public function sla_syrpvgrw(uplo, n, info, a, lda, af, ldaf, ipiv, work)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: info
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(*)
real(kind=sp), intent(out) :: work(*)

Return Value real(kind=sp)

public function zla_syrpvgrw(uplo, n, info, a, lda, af, ldaf, ipiv, work)

Arguments

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

Return Value real(kind=dp)

Module Procedures

public interface stdlib_cla_syrpvgrw()

Arguments

None

public interface stdlib_dla_syrpvgrw()

Arguments

None

public interface stdlib_sla_syrpvgrw()

Arguments

None

public interface stdlib_zla_syrpvgrw()

Arguments

None