37 #ifndef TEMPLATE_LAPACK_LARF_HEADER 38 #define TEMPLATE_LAPACK_LARF_HEADER 43 const integer *incv,
const Treal *tau, Treal *c__,
const integer *ldc,
117 c_offset = 1 + c_dim1 * 1;
131 &c_b5, &work[1], &c__1);
148 incv, &c_b5, &work[1], &c__1);
int integer
Definition: template_blas_common.h:40
int template_blas_ger(const integer *m, const integer *n, const Treal *alpha, const Treal *x, const integer *incx, const Treal *y, const integer *incy, Treal *a, const integer *lda)
Definition: template_blas_ger.h:42
int template_blas_gemv(const char *trans, const integer *m, const integer *n, const Treal *alpha, const Treal *a, const integer *lda, const Treal *x, const integer *incx, const Treal *beta, Treal *y, const integer *incy)
Definition: template_blas_gemv.h:43
side
Definition: Matrix.h:75
int template_lapack_larf(const char *side, const integer *m, const integer *n, const Treal *v, const integer *incv, const Treal *tau, Treal *c__, const integer *ldc, Treal *work)
Definition: template_lapack_larf.h:42
logical template_blas_lsame(const char *ca, const char *cb)
Definition: template_blas_common.cc:46