home *** CD-ROM | disk | FTP | other *** search
-
-
-
- ____FFFFIIIIGGGGIIII2222((((3333FFFF)))) ____FFFFIIIIGGGGIIII2222((((3333FFFF))))
-
-
-
- NNNNAAAAMMMMEEEE
- FIGI2, SFIGI2 - EISPACK routine. Given a NONSYMMETRIC TRIDIAGONAL
- matrix such that the products of corresponding pairs of off-diagonal
- elements are all non-negative, and zero only when both factors are zero,
- this subroutine reduces it to a SYMMETRIC TRIDIAGONAL matrix using and
- accumulating diagonal similarity transformations.
-
-
- SSSSYYYYNNNNOOOOPPPPSSSSYYYYSSSS
- ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ffffiiiiggggiiii2222((((nnnnmmmm,,,, nnnn,,,, tttt,,,, dddd,,,, eeee,,,, zzzz,,,, iiiieeeerrrrrrrr))))
- iiiinnnntttteeeeggggeeeerrrr nnnnmmmm,,,, nnnn,,,, iiiieeeerrrrrrrr
- ddddoooouuuubbbblllleeee pppprrrreeeecccciiiissssiiiioooonnnn tttt((((nnnnmmmm,,,,3333)))),,,, dddd((((nnnn)))),,,, eeee((((nnnn)))),,,, zzzz((((nnnnmmmm,,,,nnnn))))
-
- ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ssssffffiiiiggggiiii2222((((nnnnmmmm,,,, nnnn,,,, tttt,,,, dddd,,,, eeee,,,, zzzz,,,, iiiieeeerrrrrrrr))))
- iiiinnnntttteeeeggggeeeerrrr nnnnmmmm,,,, nnnn,,,, iiiieeeerrrrrrrr
- rrrreeeeaaaallll tttt((((nnnnmmmm,,,,3333)))),,,, dddd((((nnnn)))),,,, eeee((((nnnn)))),,,, zzzz((((nnnnmmmm,,,,nnnn))))
-
-
-
- DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
- On INPUT
-
- NNNNMMMM must be set to the row dimension of two-dimensional array parameters
- as declared in the calling program dimension statement.
-
- NNNN is the order of the matrix.
-
- TTTT contains the input matrix. Its subdiagonal is stored in the last N-1
- positions of the first column, its diagonal in the N positions of the
- second column, and its superdiagonal in the first N-1 positions of the
- third column. T(1,1) and T(N,3) are arbitrary. On OUTPUT
-
- TTTT is unaltered.
-
- DDDD contains the diagonal elements of the symmetric matrix.
-
- EEEE contains the subdiagonal elements of the symmetric matrix in its last
- N-1 positions. E(1) is not set.
-
- ZZZZ contains the transformation matrix produced in the reduction.
-
- IIIIEEEERRRRRRRR is set to Zero for normal return, N+I if T(I,1)*T(I-
- 1,3) is negative, 2*N+I if T(I,1)*T(I-1,3) is zero with
- one factor non-zero. Questions and comments should be directed to B.
- S. Garbow, APPLIED MATHEMATICS DIVISION, ARGONNE NATIONAL LABORATORY
-
-
-
-
-
-
-
-
-
-
- PPPPaaaaggggeeee 1111
-
-
-
-