template_lapack_laln2.h File Reference

Go to the source code of this file.

Defines

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


Define Documentation

#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 ci   (equiv_0)

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

#define civ   (equiv_0)

#define cr   (equiv_1)

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

#define crv   (equiv_1)

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

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


Function Documentation

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 
)


Generated on Wed Nov 21 09:32:12 2012 for ergo by  doxygen 1.4.7