SRC/zptrfs.f(3)
πΈ NAME πΈ
SRC/zptrfs.f β the ZPTRFS routine, bestie, straight from the Library Functions Manual. It's the one that improves your computed solution and gives you error-bound receipts. π
π SYNOPSIS π
Functions/Subroutines
subroutine zptrfs (uplo, n, nrhs, d, e, df, ef, b, ldb, x, ldx, ferr,
berr, work, rwork, info)
ZPTRFS
π Function/Subroutine Documentation π
Here's the full signature, exactly as the page serves it, no cap:
subroutine zptrfs (character uplo, integer n, integer nrhs, double
precision, dimension( * ) d, complex*16, dimension( * ) e, double
precision, dimension( * ) df, complex*16, dimension( * ) ef, complex*16,
dimension( ldb, * ) b, integer ldb, complex*16, dimension( ldx, * ) x,
integer ldx, double precision, dimension( * ) ferr, double precision,
dimension( * ) berr, complex*16, dimension( * ) work, double precision,
dimension( * ) rwork, integer info)
ZPTRFS
π― Purpose
ZPTRFS improves the computed solution to a system of linear equations when the coefficient matrix is Hermitian positive definite and tridiagonal, and provides error bounds and backward error estimates for the solution. It's giving "your answer, but with a security blanket and a math receipt." β¨
π§Έ Parameters
UPLOβUPLO is CHARACTER*1. Specifies whether the superdiagonal or the subdiagonal of the tridiagonal matrixAis stored and the form of the factorization:= 'U':Eis the superdiagonal ofA, andA = U**H*D*U;= 'L':Eis the subdiagonal ofA, andA = L*D*L**H.- (The two forms are equivalent if
Ais real.)
NβN is INTEGER. The order of the matrixA.N >= 0.NRHSβNRHS is INTEGER. The number of right hand sides, i.e., the number of columns of the matrixB.NRHS >= 0.DβD is DOUBLE PRECISION array, dimension (N). Thenreal diagonal elements of the tridiagonal matrixA.EβE is COMPLEX*16 array, dimension (N-1). The(n-1)off-diagonal elements of the tridiagonal matrixA(seeUPLO).DFβDF is DOUBLE PRECISION array, dimension (N). Thendiagonal elements of the diagonal matrixDfrom the factorization computed byZPTTRF.EFβEF is COMPLEX*16 array, dimension (N-1). The(n-1)off-diagonal elements of the unit bidiagonal factorUorLfrom the factorization computed byZPTTRF(seeUPLO).BβB is COMPLEX*16 array, dimension (LDB,NRHS). The right hand side matrixB.LDBβLDB is INTEGER. The leading dimension of the arrayB.LDB >= max(1,N).XβX is COMPLEX*16 array, dimension (LDX,NRHS). On entry, the solution matrixX, as computed byZPTTRS. On exit, the improved solution matrixX.LDXβLDX is INTEGER. The leading dimension of the arrayX.LDX >= max(1,N).FERRβFERR is DOUBLE PRECISION array, dimension (NRHS). The forward error bound for each solution vectorX(j)(thej-th column of the solution matrixX). IfXTRUEis the true solution corresponding toX(j),FERR(j)is an estimated upper bound for the magnitude of the largest element in(X(j) - XTRUE)divided by the magnitude of the largest element inX(j).BERRβBERR is DOUBLE PRECISION array, dimension (NRHS). The componentwise relative backward error of each solution vectorX(j)(i.e., the smallest relative change in any element ofAorBthat makesX(j)an exact solution).WORKβWORK is COMPLEX*16 array, dimension (N).RWORKβRWORK is DOUBLE PRECISION array, dimension (N).INFOβINFO is INTEGER.= 0: successful exit< 0: ifINFO = -i, thei-th argument had an illegal value
π§ Internal Parameters
ITMAX is the maximum number of steps of iterative refinement. It's the "one more little glow-up pass" limit, bestie. πͺ
π Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Definition at line 181 of file zptrfs.f.
β¨ Author (generated edition) β¨
Generated automatically by Doxygen for LAPACK from the source code.
Okay bestie, that's the whole page β xoxo, your LAPACK gen-z Unix bestie π
β¨π¦. Footer glow: LAPACK, Version 3.12.0, page SRC/zptrfs.f(3). π
π¦ where this page comes from
- arch rolling: lapack-doc 3.12.1-2 Β· custom
- π girlified by deepseek-ai/DeepSeek-V4.1-Flash-1017 on : a language model's rewrite of the original, under its terms