Go to the source code of this file.
|
#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] |
|
|
template<class Treal > |
int | template_lapack_lag2 (const Treal *a, const integer *lda, const Treal *b, const integer *ldb, const Treal *safmin, Treal *scale1, Treal *scale2, Treal *wr1, Treal *wr2, Treal *wi) |
|
◆ 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] |
◆ template_lapack_lag2()
template<class Treal >
int template_lapack_lag2 |
( |
const Treal * |
a, |
|
|
const integer * |
lda, |
|
|
const Treal * |
b, |
|
|
const integer * |
ldb, |
|
|
const Treal * |
safmin, |
|
|
Treal * |
scale1, |
|
|
Treal * |
scale2, |
|
|
Treal * |
wr1, |
|
|
Treal * |
wr2, |
|
|
Treal * |
wi |
|
) |
| |