| 1 | <title>RG</title> |
|---|
| 2 | <h2>SUBROUTINE RG(NM,N,A,WR,WI,MATZ,Z,IV1,FV1,IERR)</h2> |
|---|
| 3 | |
|---|
| 4 | RG calls the recommended sequence of EISPACK subroutines to |
|---|
| 5 | find the eigenvalues and, if desired, the eigenvectors of a |
|---|
| 6 | real, general matrix. |
|---|
| 7 | <p> |
|---|
| 8 | <dl> |
|---|
| 9 | <p><dt><b>NM</b> |
|---|
| 10 | <dd>Input, INTEGER NM, the row dimension (first dimension) of the two |
|---|
| 11 | dimensional arrays as declared in the calling program. |
|---|
| 12 | |
|---|
| 13 | <p><dt><b>N</b> |
|---|
| 14 | <dd>Input, INTEGER N, the order (=size=number of rows=number of columns) |
|---|
| 15 | of the matrix whose eigenvalues are sought. |
|---|
| 16 | |
|---|
| 17 | <p><dt><b>A</b> |
|---|
| 18 | <dd>Input/output, REAL A(NM,N), on input, the matrix, which is overwritten |
|---|
| 19 | on output. |
|---|
| 20 | |
|---|
| 21 | <p><dt><b>WR</b> |
|---|
| 22 | <dd>Output, REAL WR(N), the real parts of the eigenvalues. |
|---|
| 23 | |
|---|
| 24 | <p><dt><b>WI</b> |
|---|
| 25 | <dd>Output, REAL WI(N), the imaginary parts of the eigenvalues. |
|---|
| 26 | |
|---|
| 27 | <p><dt><b>MATZ</b> |
|---|
| 28 | <dd>Input, INTEGER MATZ, set to 0 if only eigenvalues are desired. |
|---|
| 29 | Otherwise all eigenvectors will also be calculated. |
|---|
| 30 | |
|---|
| 31 | <p><dt><b>Z</b> |
|---|
| 32 | <dd>Output, REAL Z(NM,N), if MATZ is not zero, Z contains the |
|---|
| 33 | eigenvectors of A. If the J-th eigenvalue is real, the |
|---|
| 34 | J-th column of Z is its eigenvector. If the J-th |
|---|
| 35 | eigenvalue is complex with positive real part (then the |
|---|
| 36 | J+1-th eigenvalue is its complex conjugate), its eigenvector |
|---|
| 37 | has real part in the J-th column of Z and imaginary part |
|---|
| 38 | in the J+1-th column of Z. |
|---|
| 39 | |
|---|
| 40 | <p><dt><b>IV1</b> |
|---|
| 41 | <dd>Work vector, INTEGER IV1(N). |
|---|
| 42 | |
|---|
| 43 | <p><dt><b>FV1</b> |
|---|
| 44 | <dd>Work vector, REAL FV1(N). |
|---|
| 45 | |
|---|
| 46 | <p><dt><b>IERR</b> |
|---|
| 47 | <dd>Output, INTEGER IERR, an error flag. 0 if no errors, or |
|---|
| 48 | J if eigenvalues 1 through J were not found. |
|---|
| 49 | </dl> |
|---|
| 50 | <p> |
|---|
| 51 | <!-- STANDARD PSC FOOTER OPENING --> |
|---|
| 52 | <hr> |
|---|
| 53 | <a href="http://www.psc.edu/general/software/software.html"><img alt="[Software]" src="http://www.psc.edu/general/images/icons/software_button.gif"></a> |
|---|
| 54 | <a href="http://www.psc.edu/"><img alt="[PSC Home Page]" src="http://www.psc.edu/general/images/icons/psc_home.gif"></a> |
|---|
| 55 | <a href="http://www.psc.edu/search/search.html"><img src="http://www.psc.edu/general/images/icons/search.gif" alt="[Search]"></a> |
|---|
| 56 | <a href="http://www.psc.edu/general/help/assistance.html"><img src="http://www.psc.edu/general/images/icons/help.gif" alt="[Help]"></a> |
|---|
| 57 | <a href="http://www.psc.edu/general/feedback.html"><img src="http://www.psc.edu/general/images/icons/feedback.gif" alt="[Feedback]"></a> |
|---|
| 58 | <hr> |
|---|
| 59 | <font size=-1> |
|---|
| 60 | <i><a href=/copyright.html>©</a> Pittsburgh Supercomputing Center (PSC)<br> |
|---|
| 61 | Revised: October 1996 <br> |
|---|
| 62 | </i></font> |
|---|
| 63 | <font size=-2> |
|---|
| 64 | <i>URL: http://www.psc.edu/general/software/packages/eispack/subroutines/rg.html</i> |
|---|
| 65 | </font> |
|---|
| 66 | <!-- STANDARD PSC FOOTER CLOSING --> |
|---|
| 67 | |
|---|
| 68 | |
|---|