#include "f2c.h"
#include "blaswrap.h"
Go to the source code of this file.
Functions |
int | ctgsja_ (char *jobu, char *jobv, char *jobq, integer *m, integer *p, integer *n, integer *k, integer *l, complex *a, integer *lda, complex *b, integer *ldb, real *tola, real *tolb, real *alpha, real *beta, complex *u, integer *ldu, complex *v, integer *ldv, complex *q, integer *ldq, complex *work, integer *ncycle, integer *info) |
Variables |
static integer | c__1 = 1 |
static complex | c_b1 = {0.f,0.f} |
static complex | c_b2 = {1.f,0.f} |
static real | c_b39 = -1.f |
static real | c_b42 = 1.f |
Function Documentation
int ctgsja_ |
( |
char * |
jobu, |
|
|
char * |
jobv, |
|
|
char * |
jobq, |
|
|
integer * |
m, |
|
|
integer * |
p, |
|
|
integer * |
n, |
|
|
integer * |
k, |
|
|
integer * |
l, |
|
|
complex * |
a, |
|
|
integer * |
lda, |
|
|
complex * |
b, |
|
|
integer * |
ldb, |
|
|
real * |
tola, |
|
|
real * |
tolb, |
|
|
real * |
alpha, |
|
|
real * |
beta, |
|
|
complex * |
u, |
|
|
integer * |
ldu, |
|
|
complex * |
v, |
|
|
integer * |
ldv, |
|
|
complex * |
q, |
|
|
integer * |
ldq, |
|
|
complex * |
work, |
|
|
integer * |
ncycle, |
|
|
integer * |
info |
|
) |
| |
Variable Documentation