TESTING/LIN/cptt01.f(3)    Library Functions Manual    TESTING/LIN/cptt01.f(3)

NAME
       TESTING/LIN/cptt01.f

SYNOPSIS
   Functions/Subroutines
       subroutine cptt01 (n, d, e, df, ef, work, resid)
           CPTT01

Function/Subroutine Documentation
   subroutine cptt01 (integer n, real, dimension( * ) d, complex, dimension( *
       ) e, real, dimension( * ) df, complex, dimension( * ) ef, complex,
       dimension( * ) work, real resid)
       CPTT01

       Purpose:


            CPTT01 reconstructs a tridiagonal matrix A from its L*D*L'
            factorization and computes the residual
               norm(L*D*L' - A) / ( n * norm(A) * EPS ),
            where EPS is the machine epsilon.

       Parameters
           N

                     N is INTEGER
                     The order of the matrix A.

           D

                     D is REAL array, dimension (N)
                     The n diagonal elements of the tridiagonal matrix A.

           E

                     E is COMPLEX array, dimension (N-1)
                     The (n-1) subdiagonal elements of the tridiagonal matrix A.

           DF

                     DF is REAL array, dimension (N)
                     The n diagonal elements of the factor L from the L*D*L'
                     factorization of A.

           EF

                     EF is COMPLEX array, dimension (N-1)
                     The (n-1) subdiagonal elements of the factor L from the
                     L*D*L' factorization of A.

           WORK

                     WORK is COMPLEX array, dimension (2*N)

           RESID

                     RESID is REAL
                     norm(L*D*L' - A) / (n * norm(A) * EPS)

       Author
           Univ. of Tennessee

           Univ. of California Berkeley

           Univ. of Colorado Denver

           NAG Ltd.

       Definition at line 91 of file cptt01.f.

Author
       Generated automatically by Doxygen for LAPACK from the source code.

LAPACK                          Version 3.12.0         TESTING/LIN/cptt01.f(3)