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 ) |