home *** CD-ROM | disk | FTP | other *** search
-
-
-
- ____MMMMIIIINNNNFFFFIIIITTTT((((3333FFFF)))) ____MMMMIIIINNNNFFFFIIIITTTT((((3333FFFF))))
-
-
-
- NNNNAAAAMMMMEEEE
- MINFIT, SMINFIT - EISPACK routine. This subroutine determines, towards
- the solution of the linear
- T system AX=B, the singular value decomposition A=USV of a real
- T M by N rectangular matrix, forming U B rather than U. Householder
- bidiagonalization and a variant of the QR algorithm are used.
-
-
- SSSSYYYYNNNNOOOOPPPPSSSSYYYYSSSS
- ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee mmmmiiiinnnnffffiiiitttt((((nnnnmmmm,,,, mmmm,,,, nnnn,,,, aaaa,,,, wwww,,,, iiiipppp,,,, bbbb,,,, iiiieeeerrrrrrrr,,,, rrrrvvvv1111))))
- iiiinnnntttteeeeggggeeeerrrr nnnnmmmm,,,, mmmm,,,, nnnn,,,, iiiipppp,,,, iiiieeeerrrrrrrr
- ddddoooouuuubbbblllleeee pppprrrreeeecccciiiissssiiiioooonnnn aaaa((((nnnnmmmm,,,,nnnn)))),,,, wwww((((nnnn)))),,,, bbbb((((nnnnmmmm,,,,iiiipppp)))),,,, rrrrvvvv1111((((nnnn))))
-
- ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ssssmmmmiiiinnnnffffiiiitttt((((nnnnmmmm,,,, mmmm,,,, nnnn,,,, aaaa,,,, wwww,,,, iiiipppp,,,, bbbb,,,, iiiieeeerrrrrrrr,,,, rrrrvvvv1111))))
- iiiinnnntttteeeeggggeeeerrrr nnnnmmmm,,,, mmmm,,,, nnnn,,,, iiiipppp,,,, iiiieeeerrrrrrrr
- rrrreeeeaaaallll aaaa((((nnnnmmmm,,,,nnnn)))),,,, wwww((((nnnn)))),,,, bbbb((((nnnnmmmm,,,,iiiipppp)))),,,, rrrrvvvv1111((((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. Note that NM
- must be at least as large as the maximum of M and N.
-
- MMMM is the number of rows of A and B.
-
- NNNN is the number of columns of A and the order of V.
-
- AAAA contains the rectangular coefficient matrix of the system.
-
- IIIIPPPP is the number of columns of B. IP can be zero.
-
- BBBB contains the constant column matrix of the system if IP is not zero.
- Otherwise B is not referenced. On OUTPUT
-
- AAAA has been overwritten by the matrix V (orthogonal) of the decomposition
- in its first N rows and columns. If an error exit is made, the columns
- of V corresponding to indices of correct singular values should be
- correct.
-
- WWWW contains the N (non-negative) singular values of A (the diagonal
- elements of S). They are UNORDERED. If an error exit is made, the
- singular values should be correct for indices IERR+1,IERR+2,...,N.
- T
-
- BBBB has been overwritten by U B. If an error exit is made,
- T the rows of U B corresponding to indices of correct singular values
- should be correct.
-
- IIIIEEEERRRRRRRR is set to Zero for normal return, K if the K-th
-
-
-
- PPPPaaaaggggeeee 1111
-
-
-
-
-
-
- ____MMMMIIIINNNNFFFFIIIITTTT((((3333FFFF)))) ____MMMMIIIINNNNFFFFIIIITTTT((((3333FFFF))))
-
-
-
- singular value has not been
- determined after 30 iterations.
-
- RRRRVVVV1111 is a temporary storage array. Calls PYTHAG(A,B) for sqrt(A**2 +
- B**2). Questions and comments should be directed to B. S. Garbow,
- APPLIED MATHEMATICS DIVISION, ARGONNE NATIONAL LABORATORY
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- PPPPaaaaggggeeee 2222
-
-
-
-