25 #if defined(PLASMA_HAVE_WEAK)
26 #pragma weak CORE_dlansy = PCORE_dlansy
27 #define CORE_dlansy PCORE_dlansy
31 double *work,
double *normA)
33 *normA = LAPACKE_dlansy_work(
44 double *
A,
int LDA,
int szeA,
45 int szeW,
double *result)
52 sizeof(
int), &N,
VALUE,
53 sizeof(
double)*szeA, A,
INPUT,
54 sizeof(
int), &LDA,
VALUE,
55 sizeof(
double)*szeW, NULL,
SCRATCH,
56 sizeof(
double), result,
OUTPUT,
63 #if defined(PLASMA_HAVE_WEAK)
64 #pragma weak CORE_dlansy_quark = PCORE_dlansy_quark
65 #define CORE_dlansy_quark PCORE_dlansy_quark
78 *normA = LAPACKE_dlansy_work(
89 double *
A,
int LDA,
int szeA,
90 int szeW,
double *result,
91 double *fake,
int szeF)
98 sizeof(
int), &N,
VALUE,
99 sizeof(
double)*szeA, A,
INPUT,
100 sizeof(
int), &LDA,
VALUE,
101 sizeof(
double)*szeW, NULL,
SCRATCH,
102 sizeof(
double), result,
OUTPUT,
110 #if defined(PLASMA_HAVE_WEAK)
111 #pragma weak CORE_dlansy_f1_quark = PCORE_dlansy_f1_quark
112 #define CORE_dlansy_f1_quark PCORE_dlansy_f1_quark
126 *normA = LAPACKE_dlansy_work(