Go to the source code of this file.
|
#define | ci (equiv_0) |
|
#define | cr (equiv_1) |
|
#define | civ (equiv_0) |
|
#define | crv (equiv_1) |
|
#define | a_ref(a_1, a_2) a[(a_2)*a_dim1 + a_1] |
|
#define | b_ref(a_1, a_2) b[(a_2)*b_dim1 + a_1] |
|
#define | x_ref(a_1, a_2) x[(a_2)*x_dim1 + a_1] |
|
#define | ci_ref(a_1, a_2) ci[(a_2)*2 + a_1 - 3] |
|
#define | cr_ref(a_1, a_2) cr[(a_2)*2 + a_1 - 3] |
|
#define | ipivot_ref(a_1, a_2) ipivot[(a_2)*4 + a_1 - 5] |
|
|
template<class Treal > |
int | template_lapack_laln2 (const logical *ltrans, const integer *na, const integer *nw, const Treal *smin, const Treal *ca, const Treal *a, const integer *lda, const Treal *d1, const Treal *d2, const Treal *b, const integer *ldb, const Treal *wr, const Treal *wi, Treal *x, const integer *ldx, Treal *scale, Treal *xnorm, integer *info) |
|
◆ a_ref
#define a_ref |
( |
| a_1, |
|
|
| a_2 ) a[(a_2)*a_dim1 + a_1] |
◆ b_ref
#define b_ref |
( |
| a_1, |
|
|
| a_2 ) b[(a_2)*b_dim1 + a_1] |
◆ ci
◆ ci_ref
#define ci_ref |
( |
| a_1, |
|
|
| a_2 ) ci[(a_2)*2 + a_1 - 3] |
◆ civ
◆ cr
◆ cr_ref
#define cr_ref |
( |
| a_1, |
|
|
| a_2 ) cr[(a_2)*2 + a_1 - 3] |
◆ crv
◆ ipivot_ref
#define ipivot_ref |
( |
| a_1, |
|
|
| a_2 ) ipivot[(a_2)*4 + a_1 - 5] |
◆ x_ref
#define x_ref |
( |
| a_1, |
|
|
| a_2 ) x[(a_2)*x_dim1 + a_1] |
◆ template_lapack_laln2()
template<class Treal >
int template_lapack_laln2 |
( |
const logical * | ltrans, |
|
|
const integer * | na, |
|
|
const integer * | nw, |
|
|
const Treal * | smin, |
|
|
const Treal * | ca, |
|
|
const Treal * | a, |
|
|
const integer * | lda, |
|
|
const Treal * | d1, |
|
|
const Treal * | d2, |
|
|
const Treal * | b, |
|
|
const integer * | ldb, |
|
|
const Treal * | wr, |
|
|
const Treal * | wi, |
|
|
Treal * | x, |
|
|
const integer * | ldx, |
|
|
Treal * | scale, |
|
|
Treal * | xnorm, |
|
|
integer * | info ) |
References a_ref, absMACRO, b_ref, ci_ref, civ, cr_ref, crv, FALSE_, ipivot_ref, maxMACRO, template_lapack_ladiv(), template_lapack_lamch(), TRUE_, and x_ref.
Referenced by template_lapack_tgevc().