amesos_cholmod_blas.h File Reference

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Macros
#define	CHOLMOD_ARCHITECTURE   "unknown"
#define	BLAS_DTRSV   dtrsv_
#define	BLAS_DGEMV   dgemv_
#define	BLAS_DTRSM   dtrsm_
#define	BLAS_DGEMM   dgemm_
#define	BLAS_DSYRK   dsyrk_
#define	BLAS_DGER   dger_
#define	BLAS_DSCAL   dscal_
#define	LAPACK_DPOTRF   dpotrf_
#define	BLAS_ZTRSV   ztrsv_
#define	BLAS_ZGEMV   zgemv_
#define	BLAS_ZTRSM   ztrsm_
#define	BLAS_ZGEMM   zgemm_
#define	BLAS_ZHERK   zherk_
#define	BLAS_ZGER   zgeru_
#define	BLAS_ZSCAL   zscal_
#define	LAPACK_ZPOTRF   zpotrf_
#define	BLAS_INT   int
#define	CHECK_BLAS_INT   (sizeof (BLAS_INT) < sizeof (Int))
#define	EQ(K, k)   (((BLAS_INT) K) == ((Int) k))
#define	BLAS_dgemv(trans, m, n, alpha, A, lda, X, incx, beta, Y, incy)
#define	BLAS_zgemv(trans, m, n, alpha, A, lda, X, incx, beta, Y, incy)
#define	BLAS_dtrsv(uplo, trans, diag, n, A, lda, X, incx)
#define	BLAS_ztrsv(uplo, trans, diag, n, A, lda, X, incx)
#define	BLAS_dtrsm(side, uplo, transa, diag, m, n, alpha, A, lda, B, ldb)
#define	BLAS_ztrsm(side, uplo, transa, diag, m, n, alpha, A, lda, B, ldb)
#define	BLAS_dgemm(transa, transb, m, n, k, alpha, A, lda, B, ldb, beta, C, ldc)
#define	BLAS_zgemm(transa, transb, m, n, k, alpha, A, lda, B, ldb, beta, C, ldc)
#define	BLAS_dsyrk(uplo, trans, n, k, alpha, A, lda, beta, C, ldc)
#define	BLAS_zherk(uplo, trans, n, k, alpha, A, lda, beta, C, ldc)
#define	LAPACK_dpotrf(uplo, n, A, lda, info)
#define	LAPACK_zpotrf(uplo, n, A, lda, info)
#define	BLAS_dscal(n, alpha, Y, incy)
#define	BLAS_zscal(n, alpha, Y, incy)
#define	BLAS_dger(m, n, alpha, X, incx, Y, incy, A, lda)
#define	BLAS_zgeru(m, n, alpha, X, incx, Y, incy, A, lda)

Functions
void	BLAS_DGEMV (char *trans, BLAS_INT *m, BLAS_INT *n, double *alpha, double *A, BLAS_INT *lda, double *X, BLAS_INT *incx, double *beta, double *Y, BLAS_INT *incy)
void	BLAS_ZGEMV (char *trans, BLAS_INT *m, BLAS_INT *n, double *alpha, double *A, BLAS_INT *lda, double *X, BLAS_INT *incx, double *beta, double *Y, BLAS_INT *incy)
void	BLAS_DTRSV (char *uplo, char *trans, char *diag, BLAS_INT *n, double *A, BLAS_INT *lda, double *X, BLAS_INT *incx)
void	BLAS_ZTRSV (char *uplo, char *trans, char *diag, BLAS_INT *n, double *A, BLAS_INT *lda, double *X, BLAS_INT *incx)
void	BLAS_DTRSM (char *side, char *uplo, char *transa, char *diag, BLAS_INT *m, BLAS_INT *n, double *alpha, double *A, BLAS_INT *lda, double *B, BLAS_INT *ldb)
void	BLAS_ZTRSM (char *side, char *uplo, char *transa, char *diag, BLAS_INT *m, BLAS_INT *n, double *alpha, double *A, BLAS_INT *lda, double *B, BLAS_INT *ldb)
void	BLAS_DGEMM (char *transa, char *transb, BLAS_INT *m, BLAS_INT *n, BLAS_INT *k, double *alpha, double *A, BLAS_INT *lda, double *B, BLAS_INT *ldb, double *beta, double *C, BLAS_INT *ldc)
void	BLAS_ZGEMM (char *transa, char *transb, BLAS_INT *m, BLAS_INT *n, BLAS_INT *k, double *alpha, double *A, BLAS_INT *lda, double *B, BLAS_INT *ldb, double *beta, double *C, BLAS_INT *ldc)
void	BLAS_DSYRK (char *uplo, char *trans, BLAS_INT *n, BLAS_INT *k, double *alpha, double *A, BLAS_INT *lda, double *beta, double *C, BLAS_INT *ldc)
void	BLAS_ZHERK (char *uplo, char *trans, BLAS_INT *n, BLAS_INT *k, double *alpha, double *A, BLAS_INT *lda, double *beta, double *C, BLAS_INT *ldc)
void	LAPACK_DPOTRF (char *uplo, BLAS_INT *n, double *A, BLAS_INT *lda, BLAS_INT *info)
void	LAPACK_ZPOTRF (char *uplo, BLAS_INT *n, double *A, BLAS_INT *lda, BLAS_INT *info)
void	BLAS_DSCAL (BLAS_INT *n, double *alpha, double *Y, BLAS_INT *incy)
void	BLAS_ZSCAL (BLAS_INT *n, double *alpha, double *Y, BLAS_INT *incy)
void	BLAS_DGER (BLAS_INT *m, BLAS_INT *n, double *alpha, double *X, BLAS_INT *incx, double *Y, BLAS_INT *incy, double *A, BLAS_INT *lda)
void	BLAS_ZGERU (BLAS_INT *m, BLAS_INT *n, double *alpha, double *X, BLAS_INT *incx, double *Y, BLAS_INT *incy, double *A, BLAS_INT *lda)

Macro Definition Documentation

#define CHOLMOD_ARCHITECTURE   "unknown"

Definition at line 68 of file amesos_cholmod_blas.h.

#define BLAS_DTRSV   dtrsv_

Definition at line 125 of file amesos_cholmod_blas.h.

#define BLAS_DGEMV   dgemv_

Definition at line 126 of file amesos_cholmod_blas.h.

#define BLAS_DTRSM   dtrsm_

Definition at line 127 of file amesos_cholmod_blas.h.

#define BLAS_DGEMM   dgemm_

Definition at line 128 of file amesos_cholmod_blas.h.

#define BLAS_DSYRK   dsyrk_

Definition at line 129 of file amesos_cholmod_blas.h.

#define BLAS_DGER   dger_

Definition at line 130 of file amesos_cholmod_blas.h.

#define BLAS_DSCAL   dscal_

Definition at line 131 of file amesos_cholmod_blas.h.

#define LAPACK_DPOTRF   dpotrf_

Definition at line 132 of file amesos_cholmod_blas.h.

#define BLAS_ZTRSV   ztrsv_

Definition at line 134 of file amesos_cholmod_blas.h.

#define BLAS_ZGEMV   zgemv_

Definition at line 135 of file amesos_cholmod_blas.h.

#define BLAS_ZTRSM   ztrsm_

Definition at line 136 of file amesos_cholmod_blas.h.

#define BLAS_ZGEMM   zgemm_

Definition at line 137 of file amesos_cholmod_blas.h.

#define BLAS_ZHERK   zherk_

Definition at line 138 of file amesos_cholmod_blas.h.

#define BLAS_ZGER   zgeru_

Definition at line 139 of file amesos_cholmod_blas.h.

#define BLAS_ZSCAL   zscal_

Definition at line 140 of file amesos_cholmod_blas.h.

#define LAPACK_ZPOTRF   zpotrf_

Definition at line 141 of file amesos_cholmod_blas.h.

#define BLAS_INT   int

Definition at line 159 of file amesos_cholmod_blas.h.

#define CHECK_BLAS_INT   (sizeof (BLAS_INT) < sizeof (Int))

Definition at line 168 of file amesos_cholmod_blas.h.

#define EQ	(		K,
			k
	)		(((BLAS_INT) K) == ((Int) k))

Definition at line 169 of file amesos_cholmod_blas.h.

#define BLAS_dgemv	(		trans,
			m,
			n,
			alpha,
			A,
			lda,
			X,
			incx,
			beta,
			Y,
			incy
	)

Value:

{ \
    BLAS_INT M = m, N = n, LDA = lda, INCX = incx, INCY = incy ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (M,m) && EQ (N,n) && EQ (LDA,lda) && EQ (INCX,incx) \
    && EQ (INCY,incy) ; \
    } \
    if (blas_ok) \
    { \
	BLAS_DGEMV (trans, &M, &N, alpha, A, &LDA, X, &INCX, beta, Y, &INCY) ; \
    } \
}

Definition at line 179 of file amesos_cholmod_blas.h.

#define BLAS_zgemv	(		trans,
			m,
			n,
			alpha,
			A,
			lda,
			X,
			incx,
			beta,
			Y,
			incy
	)

Value:

{ \
    BLAS_INT M = m, N = n, LDA = lda, INCX = incx, INCY = incy ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (M,m) && EQ (N,n) && EQ (LDA,lda) && EQ (INCX,incx) \
    && EQ (INCY,incy) ; \
    } \
    if (blas_ok) \
    { \
	BLAS_ZGEMV (trans, &M, &N, alpha, A, &LDA, X, &INCX, beta, Y, &INCY) ; \
    } \
}

Definition at line 197 of file amesos_cholmod_blas.h.

#define BLAS_dtrsv	(		uplo,
			trans,
			diag,
			n,
			A,
			lda,
			X,
			incx
	)

Value:

{ \
    BLAS_INT N = n, LDA = lda, INCX = incx ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (N,n) && EQ (LDA,lda) && EQ (INCX,incx) ; \
    } \
    if (blas_ok) \
    { \
	BLAS_DTRSV (uplo, trans, diag, &N, A, &LDA, X, &INCX) ; \
    } \
}

Definition at line 214 of file amesos_cholmod_blas.h.

#define BLAS_ztrsv	(		uplo,
			trans,
			diag,
			n,
			A,
			lda,
			X,
			incx
	)

Value:

{ \
    BLAS_INT N = n, LDA = lda, INCX = incx ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (N,n) && EQ (LDA,lda) && EQ (INCX,incx) ; \
    } \
    if (blas_ok) \
    { \
	BLAS_ZTRSV (uplo, trans, diag, &N, A, &LDA, X, &INCX) ; \
    } \
}

Definition at line 230 of file amesos_cholmod_blas.h.

#define BLAS_dtrsm	(		side,
			uplo,
			transa,
			diag,
			m,
			n,
			alpha,
			A,
			lda,
			B,
			ldb
	)

Value:

{ \
    BLAS_INT M = m, N = n, LDA = lda, LDB = ldb ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (M,m) && EQ (N,n) && EQ (LDA,lda) && EQ (LDB,ldb) ; \
    } \
    if (blas_ok) \
    { \
	BLAS_DTRSM (side, uplo, transa, diag, &M, &N, alpha, A, &LDA, B, &LDB);\
    } \
}

Definition at line 247 of file amesos_cholmod_blas.h.

#define BLAS_ztrsm	(		side,
			uplo,
			transa,
			diag,
			m,
			n,
			alpha,
			A,
			lda,
			B,
			ldb
	)

Value:

{ \
    BLAS_INT M = m, N = n, LDA = lda, LDB = ldb ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (M,m) && EQ (N,n) && EQ (LDA,lda) && EQ (LDB,ldb) ; \
    } \
    if (blas_ok) \
    { \
	BLAS_ZTRSM (side, uplo, transa, diag, &M, &N, alpha, A, &LDA, B, &LDB);\
    } \
}

Definition at line 264 of file amesos_cholmod_blas.h.

#define BLAS_dgemm	(		transa,
			transb,
			m,
			n,
			k,
			alpha,
			A,
			lda,
			B,
			ldb,
			beta,
			C,
			ldc
	)

Value:

{ \
    BLAS_INT M = m, N = n, K = k, LDA = lda, LDB = ldb, LDC = ldc ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (M,m) && EQ (N,n) && EQ (K,k) && EQ (LDA,lda) \
    && EQ (LDB,ldb) && EQ (LDC,ldc) ; \
    } \
    if (blas_ok) \
    { \
	BLAS_DGEMM (transa, transb, &M, &N, &K, alpha, A, &LDA, B, &LDB, beta, \
      C, &LDC) ; \
    } \
}

Definition at line 281 of file amesos_cholmod_blas.h.

#define BLAS_zgemm	(		transa,
			transb,
			m,
			n,
			k,
			alpha,
			A,
			lda,
			B,
			ldb,
			beta,
			C,
			ldc
	)

Value:

{ \
    BLAS_INT M = m, N = n, K = k, LDA = lda, LDB = ldb, LDC = ldc ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (M,m) && EQ (N,n) && EQ (K,k) && EQ (LDA,lda) \
    && EQ (LDB,ldb) && EQ (LDC,ldc) ; \
    } \
    if (blas_ok) \
    { \
	BLAS_ZGEMM (transa, transb, &M, &N, &K, alpha, A, &LDA, B, &LDB, beta, \
      C, &LDC) ; \
    } \
}

Definition at line 300 of file amesos_cholmod_blas.h.

#define BLAS_dsyrk	(		uplo,
			trans,
			n,
			k,
			alpha,
			A,
			lda,
			beta,
			C,
			ldc
	)

Value:

{ \
    BLAS_INT N = n, K = k, LDA = lda, LDC = ldc ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (N,n) && EQ (K,k) && EQ (LDA,lda) && EQ (LDC,ldc) ; \
    } \
    if (blas_ok) \
    { \
	BLAS_DSYRK (uplo, trans, &N, &K, alpha, A, &LDA, beta, C, &LDC) ; \
    } \
} \

Definition at line 319 of file amesos_cholmod_blas.h.

#define BLAS_zherk	(		uplo,
			trans,
			n,
			k,
			alpha,
			A,
			lda,
			beta,
			C,
			ldc
	)

Value:

{ \
    BLAS_INT N = n, K = k, LDA = lda, LDC = ldc ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (N,n) && EQ (K,k) && EQ (LDA,lda) && EQ (LDC,ldc) ; \
    } \
    if (blas_ok) \
    { \
	BLAS_ZHERK (uplo, trans, &N, &K, alpha, A, &LDA, beta, C, &LDC) ; \
    } \
} \

Definition at line 336 of file amesos_cholmod_blas.h.

#define LAPACK_dpotrf	(		uplo,
			n,
			A,
			lda,
			info
	)

Value:

{ \
    BLAS_INT N = n, LDA = lda, INFO = 1 ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (N,n) && EQ (LDA,lda) ; \
    } \
    if (blas_ok) \
    { \
	LAPACK_DPOTRF (uplo, &N, A, &LDA, &INFO) ; \
    } \
    info = INFO ; \
}

Definition at line 352 of file amesos_cholmod_blas.h.

#define LAPACK_zpotrf	(		uplo,
			n,
			A,
			lda,
			info
	)

Value:

{ \
    BLAS_INT N = n, LDA = lda, INFO = 1 ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (N,n) && EQ (LDA,lda) ; \
    } \
    if (blas_ok) \
    { \
	LAPACK_ZPOTRF (uplo, &N, A, &LDA, &INFO) ; \
    } \
    info = INFO ; \
}

Definition at line 369 of file amesos_cholmod_blas.h.

#define BLAS_dscal	(		n,
			alpha,
			Y,
			incy
	)

Value:

{ \
    BLAS_INT N = n, INCY = incy ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (N,n) && EQ (INCY,incy) ; \
    } \
    if (blas_ok) \
    { \
	BLAS_DSCAL (&N, alpha, Y, &INCY) ; \
    } \
}

Definition at line 387 of file amesos_cholmod_blas.h.

#define BLAS_zscal	(		n,
			alpha,
			Y,
			incy
	)

Value:

{ \
    BLAS_INT N = n, INCY = incy ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (N,n) && EQ (INCY,incy) ; \
    } \
    if (blas_ok) \
    { \
	BLAS_ZSCAL (&N, alpha, Y, &INCY) ; \
    } \
}

Definition at line 402 of file amesos_cholmod_blas.h.

#define BLAS_dger	(		m,
			n,
			alpha,
			X,
			incx,
			Y,
			incy,
			A,
			lda
	)

Value:

{ \
    BLAS_INT M = m, N = n, LDA = lda, INCX = incx, INCY = incy ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (M,m) && EQ (N,n) && EQ (LDA,lda) && EQ (INCX,incx) \
    && EQ (INCY,incy) ; \
    } \
    if (blas_ok) \
    { \
	BLAS_DGER (&M, &N, alpha, X, &INCX, Y, &INCY, A, &LDA) ; \
    } \
}

Definition at line 419 of file amesos_cholmod_blas.h.

#define BLAS_zgeru	(		m,
			n,
			alpha,
			X,
			incx,
			Y,
			incy,
			A,
			lda
	)

Value:

{ \
    BLAS_INT M = m, N = n, LDA = lda, INCX = incx, INCY = incy ; \
    if (CHECK_BLAS_INT) \
    { \
  blas_ok &= EQ (M,m) && EQ (N,n) && EQ (LDA,lda) && EQ (INCX,incx) \
    && EQ (INCY,incy) ; \
    } \
    if (blas_ok) \
    { \
	BLAS_ZGER (&M, &N, alpha, X, &INCX, Y, &INCY, A, &LDA) ; \
    } \
}

Definition at line 437 of file amesos_cholmod_blas.h.

Function Documentation

void BLAS_DGEMV	(	char *	trans,
		BLAS_INT *	m,
		BLAS_INT *	n,
		double *	alpha,
		double *	A,
		BLAS_INT *	lda,
		double *	X,
		BLAS_INT *	incx,
		double *	beta,
		double *	Y,
		BLAS_INT *	incy
	)

void BLAS_ZGEMV	(	char *	trans,
		BLAS_INT *	m,
		BLAS_INT *	n,
		double *	alpha,
		double *	A,
		BLAS_INT *	lda,
		double *	X,
		BLAS_INT *	incx,
		double *	beta,
		double *	Y,
		BLAS_INT *	incy
	)

void BLAS_DTRSV	(	char *	uplo,
		char *	trans,
		char *	diag,
		BLAS_INT *	n,
		double *	A,
		BLAS_INT *	lda,
		double *	X,
		BLAS_INT *	incx
	)

void BLAS_ZTRSV	(	char *	uplo,
		char *	trans,
		char *	diag,
		BLAS_INT *	n,
		double *	A,
		BLAS_INT *	lda,
		double *	X,
		BLAS_INT *	incx
	)

void BLAS_DTRSM	(	char *	side,
		char *	uplo,
		char *	transa,
		char *	diag,
		BLAS_INT *	m,
		BLAS_INT *	n,
		double *	alpha,
		double *	A,
		BLAS_INT *	lda,
		double *	B,
		BLAS_INT *	ldb
	)

void BLAS_ZTRSM	(	char *	side,
		char *	uplo,
		char *	transa,
		char *	diag,
		BLAS_INT *	m,
		BLAS_INT *	n,
		double *	alpha,
		double *	A,
		BLAS_INT *	lda,
		double *	B,
		BLAS_INT *	ldb
	)

void BLAS_DGEMM	(	char *	transa,
		char *	transb,
		BLAS_INT *	m,
		BLAS_INT *	n,
		BLAS_INT *	k,
		double *	alpha,
		double *	A,
		BLAS_INT *	lda,
		double *	B,
		BLAS_INT *	ldb,
		double *	beta,
		double *	C,
		BLAS_INT *	ldc
	)

void BLAS_ZGEMM	(	char *	transa,
		char *	transb,
		BLAS_INT *	m,
		BLAS_INT *	n,
		BLAS_INT *	k,
		double *	alpha,
		double *	A,
		BLAS_INT *	lda,
		double *	B,
		BLAS_INT *	ldb,
		double *	beta,
		double *	C,
		BLAS_INT *	ldc
	)

void BLAS_DSYRK	(	char *	uplo,
		char *	trans,
		BLAS_INT *	n,
		BLAS_INT *	k,
		double *	alpha,
		double *	A,
		BLAS_INT *	lda,
		double *	beta,
		double *	C,
		BLAS_INT *	ldc
	)

void BLAS_ZHERK	(	char *	uplo,
		char *	trans,
		BLAS_INT *	n,
		BLAS_INT *	k,
		double *	alpha,
		double *	A,
		BLAS_INT *	lda,
		double *	beta,
		double *	C,
		BLAS_INT *	ldc
	)

void LAPACK_DPOTRF	(	char *	uplo,
		BLAS_INT *	n,
		double *	A,
		BLAS_INT *	lda,
		BLAS_INT *	info
	)

void LAPACK_ZPOTRF	(	char *	uplo,
		BLAS_INT *	n,
		double *	A,
		BLAS_INT *	lda,
		BLAS_INT *	info
	)

void BLAS_DSCAL	(	BLAS_INT *	n,
		double *	alpha,
		double *	Y,
		BLAS_INT *	incy
	)

void BLAS_ZSCAL	(	BLAS_INT *	n,
		double *	alpha,
		double *	Y,
		BLAS_INT *	incy
	)

void BLAS_DGER	(	BLAS_INT *	m,
		BLAS_INT *	n,
		double *	alpha,
		double *	X,
		BLAS_INT *	incx,
		double *	Y,
		BLAS_INT *	incy,
		double *	A,
		BLAS_INT *	lda
	)

void BLAS_ZGERU	(	BLAS_INT *	m,
		BLAS_INT *	n,
		double *	alpha,
		double *	X,
		BLAS_INT *	incx,
		double *	Y,
		BLAS_INT *	incy,
		double *	A,
		BLAS_INT *	lda
	)