hprfs Interface

public interface hprfs

HPRFS improves the computed solution to a system of linear equations when the coefficient matrix is Hermitian indefinite and packed, and provides error bounds and backward error estimates for the solution.


Subroutines

public pure subroutine chprfs(uplo, n, nrhs, ap, afp, ipiv, b, ldb, x, ldx, ferr, berr, work, rwork, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: nrhs
complex(kind=sp), intent(in) :: ap(*)
complex(kind=sp), intent(in) :: afp(*)
integer(kind=ilp), intent(in) :: ipiv(*)
complex(kind=sp), intent(in) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
complex(kind=sp), intent(inout) :: x(ldx,*)
integer(kind=ilp), intent(in) :: ldx
real(kind=sp), intent(out) :: ferr(*)
real(kind=sp), intent(out) :: berr(*)
complex(kind=sp), intent(out) :: work(*)
real(kind=sp), intent(out) :: rwork(*)
integer(kind=ilp), intent(out) :: info

public pure subroutine zhprfs(uplo, n, nrhs, ap, afp, ipiv, b, ldb, x, ldx, ferr, berr, work, rwork, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: nrhs
complex(kind=dp), intent(in) :: ap(*)
complex(kind=dp), intent(in) :: afp(*)
integer(kind=ilp), intent(in) :: ipiv(*)
complex(kind=dp), intent(in) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
complex(kind=dp), intent(inout) :: x(ldx,*)
integer(kind=ilp), intent(in) :: ldx
real(kind=dp), intent(out) :: ferr(*)
real(kind=dp), intent(out) :: berr(*)
complex(kind=dp), intent(out) :: work(*)
real(kind=dp), intent(out) :: rwork(*)
integer(kind=ilp), intent(out) :: info

Module Procedures

public interface stdlib_chprfs()

Arguments

None

public interface stdlib_zhprfs()

Arguments

None