core_dgeadd.c File Reference

#include "common.h"

Include dependency graph for core_dgeadd.c:

Go to the source code of this file.

Functions
void	CORE_dgeadd (int M, int N, double alpha, double *A, int LDA, double *B, int LDB)
void	QUARK_CORE_dgeadd (Quark *quark, Quark_Task_Flags *task_flags, int m, int n, int nb, double alpha, double *A, int lda, double *B, int ldb)
void	CORE_dgeadd_quark (Quark *quark)

---

Detailed Description

PLASMA core_blas kernel PLASMA is a software package provided by Univ. of Tennessee, Univ. of California Berkeley and Univ. of Colorado Denver

Version:

2.4.5

Author:

Mathieu Faverge

Date:

2010-11-15 d Tue Nov 22 14:35:19 2011

Definition in file core_dgeadd.c.

---

Function Documentation

void CORE_dgeadd	(	int	M,
		int	N,
		double	alpha,
		double *	A,
		int	LDA,
		double *	B,
		int	LDB
	)

Definition at line 26 of file core_dgeadd.c.

References cblas_daxpy().

{
    int j;

    if (M == LDA && M == LDB)
        cblas_daxpy(M*N, (alpha), A, 1, B, 1);
    else {
        for (j = 0; j < N; j++)
            cblas_daxpy(M, (alpha), &A[j*LDA], 1, &B[j*LDB], 1);
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

void CORE_dgeadd_quark

(

Quark *

quark

)

Definition at line 67 of file core_dgeadd.c.

References A, B, cblas_daxpy(), and quark_unpack_args_7.

{
    int M;
    int N;
    double alpha;
    double *A;
    int LDA;
    double *B;
    int LDB;

    int j;

    quark_unpack_args_7(quark, M, N, alpha, A, LDA, B, LDB);
    if (M == LDA && M == LDB)
        cblas_daxpy(M*N, (alpha), A, 1, B, 1);
    else {
        for (j = 0; j < N; j++)
            cblas_daxpy(M, (alpha), &A[j*LDA], 1, &B[j*LDB], 1);
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

void QUARK_CORE_dgeadd	(	Quark *	quark,
		Quark_Task_Flags *	task_flags,
		int	m,
		int	n,
		int	nb,
		double	alpha,
		double *	A,
		int	lda,
		double *	B,
		int	ldb
	)

Definition at line 43 of file core_dgeadd.c.

References CORE_dgeadd_quark(), DAG_CORE_GEADD, INOUT, INPUT, QUARK_Insert_Task(), and VALUE.

{
    DAG_CORE_GEADD;
    QUARK_Insert_Task(quark, CORE_dgeadd_quark, task_flags,
        sizeof(int),                        &m,     VALUE,
        sizeof(int),                        &n,     VALUE,
        sizeof(double),         &alpha, VALUE,
        sizeof(double)*nb*nb,    A,             INPUT,
        sizeof(int),                        &lda,   VALUE,
        sizeof(double)*nb*nb,    B,             INOUT,
        sizeof(int),                        &ldb,   VALUE,
        0);
}

Here is the call graph for this function:

Here is the caller graph for this function: