Go to the source code of this file.
Functions/Subroutines |
| subroutine | CCSDTS (M, P, Q, X, XF, LDX, U1, LDU1, U2, LDU2, V1T, LDV1T, V2T, LDV2T, THETA, IWORK, WORK, LWORK, RWORK, RESULT) |
Function Documentation
| subroutine CCSDTS |
( |
INTEGER |
M, |
|
|
INTEGER |
P, |
|
|
INTEGER |
Q, |
|
|
COMPLEX,dimension( ldx, * ) |
X, |
|
|
COMPLEX,dimension( ldx, * ) |
XF, |
|
|
INTEGER |
LDX, |
|
|
COMPLEX,dimension( ldu1, * ) |
U1, |
|
|
INTEGER |
LDU1, |
|
|
COMPLEX,dimension( ldu2, * ) |
U2, |
|
|
INTEGER |
LDU2, |
|
|
COMPLEX,dimension( ldv1t, * ) |
V1T, |
|
|
INTEGER |
LDV1T, |
|
|
COMPLEX,dimension( ldv2t, * ) |
V2T, |
|
|
INTEGER |
LDV2T, |
|
|
REAL,dimension( * ) |
THETA, |
|
|
INTEGER,dimension( * ) |
IWORK, |
|
|
COMPLEX,dimension( lwork ) |
WORK, |
|
|
INTEGER |
LWORK, |
|
|
REAL,dimension( * ) |
RWORK, |
|
|
REAL,dimension( 9 ) |
RESULT |
|
) |
| |
