core_dlansy.c File Reference

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

Include dependency graph for core_dlansy.c:

Go to the source code of this file.

Functions
void	CORE_dlansy (int norm, int uplo, int N, double *A, int LDA, double *work, double *normA)
void	QUARK_CORE_dlansy (Quark *quark, Quark_Task_Flags *task_flags, int norm, int uplo, int N, double *A, int LDA, int szeA, int szeW, double *result)
void	CORE_dlansy_quark (Quark *quark)
void	QUARK_CORE_dlansy_f1 (Quark *quark, Quark_Task_Flags *task_flags, PLASMA_enum norm, PLASMA_enum uplo, int N, double *A, int LDA, int szeA, int szeW, double *result, double *fake, int szeF)
void	CORE_dlansy_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 d Tue Nov 22 14:35:20 2011

Definition in file core_dlansy.c.

---

Function Documentation

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

Definition at line 29 of file core_dlansy.c.

References lapack_const.

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

Here is the caller graph for this function:

void CORE_dlansy_f1_quark

(

Quark *

quark

)

Definition at line 114 of file core_dlansy.c.

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

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

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

Here is the caller graph for this function:

void CORE_dlansy_quark

(

Quark *

quark

)

Definition at line 67 of file core_dlansy.c.

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

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

    quark_unpack_args_7(quark, normA, norm, uplo, N, A, LDA, work);
    *normA = LAPACKE_dlansy_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_dlansy	(	Quark *	quark,
		Quark_Task_Flags *	task_flags,
		int	norm,
		int	uplo,
		int	N,
		double *	A,
		int	LDA,
		int	szeA,
		int	szeW,
		double *	result
	)

Definition at line 42 of file core_dlansy.c.

References CORE_dlansy_quark(), DAG_CORE_LANSY, INPUT, max, OUTPUT, QUARK_Insert_Task(), SCRATCH, and VALUE.

{
    szeW = max(1, szeW);
    DAG_CORE_LANSY;
    QUARK_Insert_Task(quark, CORE_dlansy_quark, task_flags,
        sizeof(PLASMA_enum),                &norm,  VALUE,
        sizeof(PLASMA_enum),                &uplo,  VALUE,
        sizeof(int),                        &N,     VALUE,
        sizeof(double)*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_dlansy_f1	(	Quark *	quark,
		Quark_Task_Flags *	task_flags,
		PLASMA_enum	norm,
		PLASMA_enum	uplo,
		int	N,
		double *	A,
		int	LDA,
		int	szeA,
		int	szeW,
		double *	result,
		double *	fake,
		int	szeF
	)

Definition at line 87 of file core_dlansy.c.

References CORE_dlansy_f1_quark(), DAG_CORE_LANSY, GATHERV, INPUT, max, OUTPUT, QUARK_Insert_Task(), SCRATCH, and VALUE.

{
    szeW = max(1, szeW);
    DAG_CORE_LANSY;
    QUARK_Insert_Task(quark, CORE_dlansy_f1_quark, task_flags,
        sizeof(PLASMA_enum),                &norm,  VALUE,
        sizeof(PLASMA_enum),                &uplo,  VALUE,
        sizeof(int),                        &N,     VALUE,
        sizeof(double)*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: