Go to the source code of this file.
Functions/Subroutines | |
| subroutine | ZUNCSD (JOBU1, JOBU2, JOBV1T, JOBV2T, TRANS, SIGNS, M, P, Q, X11, LDX11, X12, LDX12, X21, LDX21, X22, LDX22, THETA, U1, LDU1, U2, LDU2, V1T, LDV1T, V2T, LDV2T, WORK, LWORK, RWORK, LRWORK, IWORK, INFO) |
| subroutine ZUNCSD | ( | CHARACTER | JOBU1, |
| CHARACTER | JOBU2, | ||
| CHARACTER | JOBV1T, | ||
| CHARACTER | JOBV2T, | ||
| CHARACTER | TRANS, | ||
| CHARACTER | SIGNS, | ||
| INTEGER | M, | ||
| INTEGER | P, | ||
| INTEGER | Q, | ||
| COMPLEX*16,dimension( ldx11, * ) | X11, | ||
| INTEGER | LDX11, | ||
| COMPLEX*16,dimension( ldx12, * ) | X12, | ||
| INTEGER | LDX12, | ||
| COMPLEX*16,dimension( ldx21, * ) | X21, | ||
| INTEGER | LDX21, | ||
| COMPLEX*16,dimension( ldx22, * ) | X22, | ||
| INTEGER | LDX22, | ||
| DOUBLE PRECISION,dimension( * ) | THETA, | ||
| COMPLEX*16,dimension( ldu1, * ) | U1, | ||
| INTEGER | LDU1, | ||
| COMPLEX*16,dimension( ldu2, * ) | U2, | ||
| INTEGER | LDU2, | ||
| COMPLEX*16,dimension( ldv1t, * ) | V1T, | ||
| INTEGER | LDV1T, | ||
| COMPLEX*16,dimension( ldv2t, * ) | V2T, | ||
| INTEGER | LDV2T, | ||
| COMPLEX*16,dimension( * ) | WORK, | ||
| INTEGER | LWORK, | ||
| DOUBLE PRECISION,dimension( * ) | RWORK, | ||
| INTEGER | LRWORK, | ||
| INTEGER,dimension( * ) | IWORK, | ||
| INTEGER | INFO | ||
| ) |
1.7.2