tbrfs Interface

public interface tbrfs

TBRFS provides error bounds and backward error estimates for the solution to a system of linear equations with a triangular band coefficient matrix. The solution matrix X must be computed by CTBTRS or some other means before entering this routine. TBRFS does not do iterative refinement because doing so cannot improve the backward error.


Subroutines

public pure subroutine ctbrfs(uplo, trans, diag, n, kd, nrhs, ab, ldab, b, ldb, x, ldx, ferr, berr, work, rwork, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
character(len=1), intent(in) :: trans
character(len=1), intent(in) :: diag
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: kd
integer(kind=ilp), intent(in) :: nrhs
complex(kind=sp), intent(in) :: ab(ldab,*)
integer(kind=ilp), intent(in) :: ldab
complex(kind=sp), intent(in) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
complex(kind=sp), intent(in) :: 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 dtbrfs(uplo, trans, diag, n, kd, nrhs, ab, ldab, b, ldb, x, ldx, ferr, berr, work, iwork, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
character(len=1), intent(in) :: trans
character(len=1), intent(in) :: diag
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: kd
integer(kind=ilp), intent(in) :: nrhs
real(kind=dp), intent(in) :: ab(ldab,*)
integer(kind=ilp), intent(in) :: ldab
real(kind=dp), intent(in) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
real(kind=dp), intent(in) :: x(ldx,*)
integer(kind=ilp), intent(in) :: ldx
real(kind=dp), intent(out) :: ferr(*)
real(kind=dp), intent(out) :: berr(*)
real(kind=dp), intent(out) :: work(*)
integer(kind=ilp), intent(out) :: iwork(*)
integer(kind=ilp), intent(out) :: info

public pure subroutine stbrfs(uplo, trans, diag, n, kd, nrhs, ab, ldab, b, ldb, x, ldx, ferr, berr, work, iwork, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
character(len=1), intent(in) :: trans
character(len=1), intent(in) :: diag
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: kd
integer(kind=ilp), intent(in) :: nrhs
real(kind=sp), intent(in) :: ab(ldab,*)
integer(kind=ilp), intent(in) :: ldab
real(kind=sp), intent(in) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
real(kind=sp), intent(in) :: x(ldx,*)
integer(kind=ilp), intent(in) :: ldx
real(kind=sp), intent(out) :: ferr(*)
real(kind=sp), intent(out) :: berr(*)
real(kind=sp), intent(out) :: work(*)
integer(kind=ilp), intent(out) :: iwork(*)
integer(kind=ilp), intent(out) :: info

public pure subroutine ztbrfs(uplo, trans, diag, n, kd, nrhs, ab, ldab, b, ldb, x, ldx, ferr, berr, work, rwork, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
character(len=1), intent(in) :: trans
character(len=1), intent(in) :: diag
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: kd
integer(kind=ilp), intent(in) :: nrhs
complex(kind=dp), intent(in) :: ab(ldab,*)
integer(kind=ilp), intent(in) :: ldab
complex(kind=dp), intent(in) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
complex(kind=dp), intent(in) :: 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_ctbrfs()

Arguments

None

public interface stdlib_dtbrfs()

Arguments

None

public interface stdlib_stbrfs()

Arguments

None

public interface stdlib_ztbrfs()

Arguments

None