core_zlanhe.c File Reference

#include <lapacke.h>
#include "common.h"

Include dependency graph for core_zlanhe.c:

Go to the source code of this file.

Functions
void	CORE_zlanhe (int norm, int uplo, int N, PLASMA_Complex64_t *A, int LDA, double *work, double *normA)
void	QUARK_CORE_zlanhe (Quark *quark, Quark_Task_Flags *task_flags, int norm, int uplo, int N, PLASMA_Complex64_t *A, int LDA, int szeA, int szeW, double *result)
void	CORE_zlanhe_quark (Quark *quark)
void	QUARK_CORE_zlanhe_f1 (Quark *quark, Quark_Task_Flags *task_flags, PLASMA_enum norm, PLASMA_enum uplo, int N, PLASMA_Complex64_t *A, int LDA, int szeA, int szeW, double *result, double *fake, int szeF)
void	CORE_zlanhe_f1_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:

Julien Langou

Henricus Bouwmeester

Mathieu Faverge

Date:

2010-11-15 normal z -> c

Definition in file core_zlanhe.c.

---

Function Documentation

void CORE_zlanhe	(	int	norm,
		int	uplo,
		int	N,
		PLASMA_Complex64_t *	A,
		int	LDA,
		double *	work,
		double *	normA
	)

Definition at line 29 of file core_zlanhe.c.

References lapack_const.

{
    *normA = LAPACKE_zlanhe_work(
        LAPACK_COL_MAJOR,
        lapack_const(norm), lapack_const(uplo),
        N, A, LDA, work);
}

Here is the caller graph for this function:

void CORE_zlanhe_f1_quark

(

Quark *

quark

)

Definition at line 113 of file core_zlanhe.c.

References A, lapack_const, norm, quark_unpack_args_8, and uplo.

{
    double *normA;
    int norm;
    int uplo;
    int N;
    PLASMA_Complex64_t *A;
    int LDA;
    double *work;
    double *fake;

    quark_unpack_args_8(quark, norm, uplo, N, A, LDA, work, normA, fake);
    *normA = LAPACKE_zlanhe_work(
        LAPACK_COL_MAJOR,
        lapack_const(norm), lapack_const(uplo),
        N, A, LDA, work);
}

Here is the caller graph for this function:

void CORE_zlanhe_quark

(

Quark *

quark

)

Definition at line 67 of file core_zlanhe.c.

References A, lapack_const, norm, quark_unpack_args_7, and uplo.

{
    double *normA;
    int norm;
    int uplo;
    int N;
    PLASMA_Complex64_t *A;
    int LDA;
    double *work;

    quark_unpack_args_7(quark, normA, norm, uplo, N, A, LDA, work);
    *normA = LAPACKE_zlanhe_work(
        LAPACK_COL_MAJOR,
        lapack_const(norm), lapack_const(uplo),
        N, A, LDA, work);
}

Here is the caller graph for this function:

void QUARK_CORE_zlanhe	(	Quark *	quark,
		Quark_Task_Flags *	task_flags,
		int	norm,
		int	uplo,
		int	N,
		PLASMA_Complex64_t *	A,
		int	LDA,
		int	szeA,
		int	szeW,
		double *	result
	)

Definition at line 42 of file core_zlanhe.c.

References CORE_zlanhe_quark(), DAG_CORE_LANHE, INPUT, max, OUTPUT, QUARK_Insert_Task(), SCRATCH, and VALUE.

{
    szeW = max(1, szeW);
    DAG_CORE_LANHE;
    QUARK_Insert_Task(quark, CORE_zlanhe_quark, task_flags,
        sizeof(PLASMA_enum),                &norm,  VALUE,
        sizeof(PLASMA_enum),                &uplo,  VALUE,
        sizeof(int),                        &N,     VALUE,
        sizeof(PLASMA_Complex64_t)*szeA,     A,             INPUT,
        sizeof(int),                        &LDA,   VALUE,
        sizeof(double)*szeW,                 NULL,          SCRATCH,
        sizeof(double),                     result,         OUTPUT,
        0);
}

Here is the call graph for this function:

void QUARK_CORE_zlanhe_f1	(	Quark *	quark,
		Quark_Task_Flags *	task_flags,
		PLASMA_enum	norm,
		PLASMA_enum	uplo,
		int	N,
		PLASMA_Complex64_t *	A,
		int	LDA,
		int	szeA,
		int	szeW,
		double *	result,
		double *	fake,
		int	szeF
	)

Definition at line 87 of file core_zlanhe.c.

References CORE_zlanhe_f1_quark(), DAG_CORE_LANHE, GATHERV, INPUT, max, OUTPUT, QUARK_Insert_Task(), SCRATCH, and VALUE.

{
    szeW = max(1, szeW);
    DAG_CORE_LANHE;
    QUARK_Insert_Task(quark, CORE_zlanhe_f1_quark, task_flags,
        sizeof(PLASMA_enum),                &norm, VALUE,
        sizeof(PLASMA_enum),                &uplo, VALUE,
        sizeof(int),                        &N,    VALUE,
        sizeof(PLASMA_Complex64_t)*szeA,     A,             INPUT,
        sizeof(int),                        &LDA,  VALUE,
        sizeof(double)*szeW,                 NULL,          SCRATCH,
        sizeof(double),                      result,        OUTPUT,
        sizeof(double)*szeF,                 fake,          OUTPUT | GATHERV,
        0);
}

Here is the call graph for this function:

Here is the caller graph for this function: