ergo
template_lapack_laln2.h File Reference

Go to the source code of this file.

Macros

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

Functions

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)
 

Macro Definition Documentation

◆ a_ref

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

Referenced by template_lapack_laln2().

◆ b_ref

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

Referenced by template_lapack_laln2().

◆ ci

#define ci   (equiv_0)

◆ ci_ref

#define ci_ref (   a_1,
  a_2 
)    ci[(a_2)*2 + a_1 - 3]

Referenced by template_lapack_laln2().

◆ civ

#define civ   (equiv_0)

Referenced by template_lapack_laln2().

◆ cr

#define cr   (equiv_1)

Referenced by template_lapack_hgeqz().

◆ cr_ref

#define cr_ref (   a_1,
  a_2 
)    cr[(a_2)*2 + a_1 - 3]

Referenced by template_lapack_laln2().

◆ crv

#define crv   (equiv_1)

Referenced by template_lapack_laln2().

◆ ipivot_ref

#define ipivot_ref (   a_1,
  a_2 
)    ipivot[(a_2)*4 + a_1 - 5]

Referenced by template_lapack_laln2().

◆ x_ref

#define x_ref (   a_1,
  a_2 
)    x[(a_2)*x_dim1 + a_1]

Referenced by template_lapack_laln2().

Function Documentation

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