ergo
template_lapack_lag2.h File Reference

Go to the source code of this file.

Macros

#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]
 

Functions

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)
 

Macro Definition Documentation

◆ a_ref

#define a_ref (   a_1,
  a_2 
)    a[(a_2)*a_dim1 + a_1]

Referenced by template_lapack_lag2().

◆ b_ref

#define b_ref (   a_1,
  a_2 
)    b[(a_2)*b_dim1 + a_1]

Referenced by template_lapack_lag2().

Function Documentation

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