| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer | :: | M | ||||
| integer | :: | ICMAX | ||||
| integer | :: | N | ||||
| real(kind=dp) | :: | H(M,ICMAX) | ||||
| integer | :: | LAB(M,ICMAX) | ||||
| real(kind=dp) | :: | V0(M,N) | ||||
| real(kind=dp) | :: | VS(M,N) | ||||
| integer | :: | NKRY | ||||
| integer | :: | NKRY1 | ||||
| integer | :: | NBLOCK | ||||
| integer | :: | NROW(M) | ||||
| integer | :: | LSCR | ||||
| integer | :: | LISCR | ||||
| real(kind=dp) | :: | A(N,N) | ||||
| real(kind=dp) | :: | W(N) | ||||
| real(kind=dp) | :: | V(M*NBLOCK*NKRY1) | ||||
| real(kind=dp) | :: | AM(NBLOCK*NBLOCK*NKRY1) | ||||
| real(kind=dp) | :: | BM(NBLOCK*NBLOCK*NKRY) | ||||
| real(kind=dp) | :: | T(3*NBLOCK*NKRY*NBLOCK*NKRY) | ||||
| real(kind=dp) | :: | WT(NBLOCK*NKRY) | ||||
| real(kind=dp) | :: | SCR(LSCR) | ||||
| integer | :: | ISCR(LISCR) | ||||
| integer | :: | INDEX(N) | ||||
| integer | :: | NCYCLE | ||||
| real(kind=dp) | :: | B2LIMIT | ||||
| logical | :: | PRINTOUT | ||||
| logical | :: | TLargest | ||||
| logical | :: | tDie |