TESTING/LIN/cppt03.f(3)

πŸ“¦
version 3.12.1 Β· 2 versions
, in arch rolling

πŸ’– TESTING/LIN/cppt03.f(3) πŸ’–

hey bestie!! welcome to the Library Functions Manual page for TESTING/LIN/cppt03.f β€” this is the one about CPPT03, and we’re gonna get through it together, no cap 🫢✨


🌸 NAME 🌸

TESTING/LIN/cppt03.f β€” the page for the CPPT03 subroutine πŸ’…

✨ SYNOPSIS ✨

🧚 Functions/Subroutines 🧚

   Functions/Subroutines
       subroutine cppt03 (uplo, n, a, ainv, work, ldwork, rwork, rcond, resid)
           CPPT03

πŸ’… Function/Subroutine Documentation πŸ’…

   subroutine cppt03 (character uplo, integer n, complex, dimension( * ) a,
       complex, dimension( * ) ainv, complex, dimension( ldwork, * ) work,
       integer ldwork, real, dimension( * ) rwork, real rcond, real resid)
       CPPT03

🎯 Purpose 🎯

okay so the whole point, bestie: CPPT03 computes the residual for a Hermitian packed matrix times its inverse. It’s giving:

!>
!> CPPT03 computes the residual for a Hermitian packed matrix times its
!> inverse:
!>    norm( I - A*AINV ) / ( N * norm(A) * norm(AINV) * EPS ),
!> where EPS is the machine epsilon.
!>

where EPS is the machine epsilon. iconic behavior, honestly πŸ”₯

πŸ¦‹ Parameters πŸ¦‹

UPLO

UPLO is CHARACTER*1 β€” specifies whether the upper or lower triangular part of the Hermitian matrix A is stored:

  • = 'U': Upper triangular
  • = 'L': Lower triangular

N

N is INTEGER β€” the number of rows and columns of the matrix A. N >= 0.

A

A is COMPLEX array, dimension (N*(N+1)/2) β€” the original Hermitian matrix A, stored as a packed triangular matrix.

AINV

AINV is COMPLEX array, dimension (N*(N+1)/2) β€” the (Hermitian) inverse of the matrix A, stored as a packed triangular matrix.

WORK

WORK is COMPLEX array, dimension (LDWORK,N).

LDWORK

LDWORK is INTEGER β€” the leading dimension of the array WORK. LDWORK >= max(1,N).

RWORK

RWORK is REAL array, dimension (N).

RCOND

RCOND is REAL β€” the reciprocal of the condition number of A, computed as ( 1/norm(A) ) / norm(AINV).

RESID

RESID is REAL β€” norm(I - A*AINV) / ( N * norm(A) * norm(AINV) * EPS ).

πŸ‘‘ Author πŸ‘‘

  • Univ. of Tennessee
  • Univ. of California Berkeley
  • Univ. of Colorado Denver
  • NAG Ltd.

Definition at line 108 of file cppt03.f.

πŸ“œ Author πŸ“œ

Generated automatically by Doxygen for LAPACK from the source code.


mwah πŸ’‹ β€” LAPACK Version 3.12.0, from TESTING/LIN/cppt03.f(3). stay iconic, bestie πŸ’œ

πŸ“¦ where this page comes from