PLASMA  2.4.6
 All Data Structures Functions Groups
core_zblas.h
1 
18 #ifndef _PLASMA_CORE_ZBLAS_H_
19 #define _PLASMA_CORE_ZBLAS_H_
20 
21 #define COMPLEX
22 
23 #ifdef __cplusplus
24 extern "C" {
25 #endif
26 
30 void CORE_dzasum(int storev, PLASMA_enum uplo, int M, int N,
31  const PLASMA_Complex64_t *A, int lda, double *work);
32 void CORE_zbrdalg(PLASMA_enum uplo, int N, int NB,
33  const PLASMA_desc *pA, PLASMA_Complex64_t *C, PLASMA_Complex64_t *S,
34  int i, int j, int m, int grsiz);
35 int CORE_zgbelr(PLASMA_enum uplo, int N,
36  PLASMA_desc *A, PLASMA_Complex64_t *V, PLASMA_Complex64_t *TAU,
37  int st, int ed, int eltsize);
38 int CORE_zgbrce(PLASMA_enum uplo, int N,
39  PLASMA_desc *A, PLASMA_Complex64_t *V, PLASMA_Complex64_t *TAU,
40  int st, int ed, int eltsize);
41 int CORE_zgblrx(PLASMA_enum uplo, int N,
42  PLASMA_desc *A, PLASMA_Complex64_t *V, PLASMA_Complex64_t *TAU,
43  int st, int ed, int eltsize);
44 int CORE_zgeadd(int M, int N, PLASMA_Complex64_t alpha,
45  const PLASMA_Complex64_t *A, int LDA,
46  PLASMA_Complex64_t *B, int LDB);
47 int CORE_zgelqt(int M, int N, int IB,
48  PLASMA_Complex64_t *A, int LDA,
49  PLASMA_Complex64_t *T, int LDT,
50  PLASMA_Complex64_t *TAU,
51  PLASMA_Complex64_t *WORK);
52 void CORE_zgemm(PLASMA_enum transA, PLASMA_enum transB,
53  int M, int N, int K,
54  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int LDA,
55  const PLASMA_Complex64_t *B, int LDB,
56  PLASMA_Complex64_t beta, PLASMA_Complex64_t *C, int LDC);
57 int CORE_zgeqrt(int M, int N, int IB,
58  PLASMA_Complex64_t *A, int LDA,
59  PLASMA_Complex64_t *T, int LDT,
60  PLASMA_Complex64_t *TAU, PLASMA_Complex64_t *WORK);
61 int CORE_zgessm(int M, int N, int K, int IB,
62  const int *IPIV,
63  const PLASMA_Complex64_t *L, int LDL,
64  PLASMA_Complex64_t *A, int LDA);
65 int CORE_zgessq(int M, int N,
66  const PLASMA_Complex64_t *A, int LDA,
67  double *scale, double *sumsq);
68 int CORE_zgetrf(int M, int N,
69  PLASMA_Complex64_t *A, int LDA,
70  int *IPIV, int *INFO);
71 int CORE_zgetrf_incpiv(int M, int N, int IB,
72  PLASMA_Complex64_t *A, int LDA,
73  int *IPIV, int *INFO);
74 int CORE_zgetrf_reclap(int M, int N,
75  PLASMA_Complex64_t *A, int LDA,
76  int *IPIV, int *info);
77 int CORE_zgetrf_rectil(const PLASMA_desc A, int *IPIV, int *info);
78 void CORE_zgetrip(int m, int n, PLASMA_Complex64_t *A,
79  PLASMA_Complex64_t *work);
80 int CORE_zhbelr(PLASMA_enum uplo, int N,
81  PLASMA_desc *A, PLASMA_Complex64_t *V, PLASMA_Complex64_t *TAU,
82  int st, int ed, int eltsize);
83 int CORE_zhblrx(PLASMA_enum uplo, int N,
84  PLASMA_desc *A, PLASMA_Complex64_t *V, PLASMA_Complex64_t *TAU,
85  int st, int ed, int eltsize);
86 int CORE_zhbrce(PLASMA_enum uplo, int N,
87  PLASMA_desc *A, PLASMA_Complex64_t *V, PLASMA_Complex64_t *TAU,
88  int st, int ed, int eltsize);
89 void CORE_zhbtype1cb(int N, int NB,
90  PLASMA_Complex64_t *A, int LDA,
91  PLASMA_Complex64_t *V, PLASMA_Complex64_t *TAU,
92  int st, int ed, int sweep, int Vblksiz, int WANTZ,
93  PLASMA_Complex64_t *WORK);
94 void CORE_zhbtype2cb(int N, int NB,
95  PLASMA_Complex64_t *A, int LDA,
96  PLASMA_Complex64_t *V, PLASMA_Complex64_t *TAU,
97  int st, int ed, int sweep, int Vblksiz, int WANTZ,
98  PLASMA_Complex64_t *WORK);
99 void CORE_zhbtype3cb(int N, int NB,
100  PLASMA_Complex64_t *A, int LDA,
101  const PLASMA_Complex64_t *V, const PLASMA_Complex64_t *TAU,
102  int st, int ed, int sweep, int Vblksiz, int WANTZ,
103  PLASMA_Complex64_t *WORK);
104 void CORE_zhegst(int itype, PLASMA_enum uplo, int N,
105  PLASMA_Complex64_t *A, int LDA,
106  PLASMA_Complex64_t *B, int LDB, int *INFO);
107 #ifdef COMPLEX
108 void CORE_zhemm(PLASMA_enum side, PLASMA_enum uplo,
109  int M, int N,
110  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int LDA,
111  const PLASMA_Complex64_t *B, int LDB,
112  PLASMA_Complex64_t beta, PLASMA_Complex64_t *C, int LDC);
113 void CORE_zherk(PLASMA_enum uplo, PLASMA_enum trans,
114  int N, int K,
115  double alpha, const PLASMA_Complex64_t *A, int LDA,
116  double beta, PLASMA_Complex64_t *C, int LDC);
117 void CORE_zher2k(PLASMA_enum uplo, PLASMA_enum trans,
118  int N, int K,
119  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int LDA,
120  const PLASMA_Complex64_t *B, int LDB,
121  double beta, PLASMA_Complex64_t *C, int LDC);
122 int CORE_zhessq(PLASMA_enum uplo, int N,
123  const PLASMA_Complex64_t *A, int LDA,
124  double *scale, double *sumsq);
125 #endif
126 int CORE_zherfb(PLASMA_enum uplo, int N, int K, int IB, int NB,
127  const PLASMA_Complex64_t *A, int LDA,
128  const PLASMA_Complex64_t *T, int LDT,
129  PLASMA_Complex64_t *C, int LDC,
130  PLASMA_Complex64_t *WORK, int LDWORK);
131 void CORE_zlacpy(PLASMA_enum uplo, int M, int N,
132  const PLASMA_Complex64_t *A, int LDA,
133  PLASMA_Complex64_t *B, int LDB);
134 void CORE_zlange(int norm, int M, int N,
135  const PLASMA_Complex64_t *A, int LDA,
136  double *work, double *normA);
137 #ifdef COMPLEX
138 void CORE_zlanhe(int norm, PLASMA_enum uplo, int N,
139  const PLASMA_Complex64_t *A, int LDA,
140  double *work, double *normA);
141 #endif
142 void CORE_zlansy(int norm, PLASMA_enum uplo, int N,
143  const PLASMA_Complex64_t *A, int LDA,
144  double *work, double *normA);
145 int CORE_zlarfb_gemm(PLASMA_enum side, PLASMA_enum trans, PLASMA_enum direct, PLASMA_enum storev,
146  int M, int N, int K,
147  const PLASMA_Complex64_t *V, int LDV,
148  const PLASMA_Complex64_t *T, int LDT,
149  PLASMA_Complex64_t *C, int LDC,
150  PLASMA_Complex64_t *WORK, int LDWORK);
151 int CORE_zlarfx2(PLASMA_enum side, int N,
152  PLASMA_Complex64_t V,
153  PLASMA_Complex64_t TAU,
154  PLASMA_Complex64_t *C1, int LDC1,
155  PLASMA_Complex64_t *C2, int LDC2);
156 int CORE_zlarfx2c(PLASMA_enum uplo,
157  PLASMA_Complex64_t V,
158  PLASMA_Complex64_t TAU,
159  PLASMA_Complex64_t *C1,
160  PLASMA_Complex64_t *C2,
161  PLASMA_Complex64_t *C3);
162 int CORE_zlarfx2ce(PLASMA_enum uplo,
163  PLASMA_Complex64_t *V,
164  PLASMA_Complex64_t *TAU,
165  PLASMA_Complex64_t *C1,
166  PLASMA_Complex64_t *C2,
167  PLASMA_Complex64_t *C3);
168 void CORE_zlarfy(int N,
169  PLASMA_Complex64_t *A, int LDA,
170  const PLASMA_Complex64_t *V,
171  const PLASMA_Complex64_t *TAU,
172  PLASMA_Complex64_t *WORK);
173 void CORE_zlaset(PLASMA_enum uplo, int n1, int n2,
174  PLASMA_Complex64_t alpha, PLASMA_Complex64_t beta,
175  PLASMA_Complex64_t *tileA, int ldtilea);
176 void CORE_zlaset2(PLASMA_enum uplo, int n1, int n2, PLASMA_Complex64_t alpha,
177  PLASMA_Complex64_t *tileA, int ldtilea);
178 void CORE_zlaswp(int N, PLASMA_Complex64_t *A, int LDA,
179  int I1, int I2, const int *IPIV, int INC);
180 int CORE_zlaswp_ontile( PLASMA_desc descA, int i1, int i2, const int *ipiv, int inc);
181 int CORE_zlaswpc_ontile(PLASMA_desc descA, int i1, int i2, const int *ipiv, int inc);
182 int CORE_zlatro(PLASMA_enum uplo, PLASMA_enum trans,
183  int M, int N,
184  const PLASMA_Complex64_t *A, int LDA,
185  PLASMA_Complex64_t *B, int LDB);
186 void CORE_zlauum(PLASMA_enum uplo, int N, PLASMA_Complex64_t *A, int LDA);
187 int CORE_zpamm(int op, PLASMA_enum side, PLASMA_enum storev,
188  int M, int N, int K, int L,
189  const PLASMA_Complex64_t *A1, int LDA1,
190  PLASMA_Complex64_t *A2, int LDA2,
191  const PLASMA_Complex64_t *V, int LDV,
192  PLASMA_Complex64_t *W, int LDW);
193 int CORE_zparfb(PLASMA_enum side, PLASMA_enum trans, PLASMA_enum direct, PLASMA_enum storev,
194  int M1, int N1, int M2, int N2, int K, int L,
195  PLASMA_Complex64_t *A1, int LDA1,
196  PLASMA_Complex64_t *A2, int LDA2,
197  const PLASMA_Complex64_t *V, int LDV,
198  const PLASMA_Complex64_t *T, int LDT,
199  PLASMA_Complex64_t *WORK, int LDWORK);
200 int CORE_zpemv(PLASMA_enum trans, PLASMA_enum storev,
201  int M, int N, int L,
202  PLASMA_Complex64_t ALPHA,
203  const PLASMA_Complex64_t *A, int LDA,
204  const PLASMA_Complex64_t *X, int INCX,
205  PLASMA_Complex64_t BETA,
206  PLASMA_Complex64_t *Y, int INCY,
207  PLASMA_Complex64_t *WORK);
208 void CORE_zplghe(double bump, int m, int n, PLASMA_Complex64_t *A, int lda,
209  int bigM, int m0, int n0, unsigned long long int seed );
210 void CORE_zplgsy(PLASMA_Complex64_t bump, int m, int n, PLASMA_Complex64_t *A, int lda,
211  int bigM, int m0, int n0, unsigned long long int seed );
212 void CORE_zplrnt(int m, int n, PLASMA_Complex64_t *A, int lda,
213  int bigM, int m0, int n0, unsigned long long int seed );
214 void CORE_zpotrf(PLASMA_enum uplo, int N, PLASMA_Complex64_t *A, int LDA, int *INFO);
215 void CORE_zshift(int s, int m, int n, int L,
216  PLASMA_Complex64_t *A);
217 void CORE_zshiftw(int s, int cl, int m, int n, int L,
218  PLASMA_Complex64_t *A, PLASMA_Complex64_t *W);
219 int CORE_zssssm(int M1, int N1, int M2, int N2, int K, int IB,
220  PLASMA_Complex64_t *A1, int LDA1,
221  PLASMA_Complex64_t *A2, int LDA2,
222  const PLASMA_Complex64_t *L1, int LDL1,
223  const PLASMA_Complex64_t *L2, int LDL2,
224  const int *IPIV);
225 void CORE_zsymm(PLASMA_enum side, PLASMA_enum uplo,
226  int M, int N,
227  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int LDA,
228  const PLASMA_Complex64_t *B, int LDB,
229  PLASMA_Complex64_t beta, PLASMA_Complex64_t *C, int LDC);
230 void CORE_zsyrk(PLASMA_enum uplo, PLASMA_enum trans,
231  int N, int K,
232  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int LDA,
233  PLASMA_Complex64_t beta, PLASMA_Complex64_t *C, int LDC);
234 void CORE_zsyr2k(PLASMA_enum uplo, PLASMA_enum trans,
235  int N, int K,
236  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int LDA,
237  const PLASMA_Complex64_t *B, int LDB,
238  PLASMA_Complex64_t beta, PLASMA_Complex64_t *C, int LDC);
239 int CORE_zsyssq(PLASMA_enum uplo, int N,
240  const PLASMA_Complex64_t *A, int LDA,
241  double *scale, double *sumsq);
242 void CORE_zswpab(int i, int n1, int n2,
243  PLASMA_Complex64_t *A, PLASMA_Complex64_t *work);
244 int CORE_zswptr_ontile(PLASMA_desc descA, int i1, int i2, const int *ipiv, int inc,
245  const PLASMA_Complex64_t *Akk, int ldak);
246 void CORE_ztrdalg(PLASMA_enum uplo, int N, int NB,
247  const PLASMA_desc *pA, PLASMA_Complex64_t *V, PLASMA_Complex64_t *TAU,
248  int i, int j, int m, int grsiz);
249 void CORE_ztrmm(PLASMA_enum side, PLASMA_enum uplo,
250  PLASMA_enum transA, PLASMA_enum diag,
251  int M, int N,
252  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int LDA,
253  PLASMA_Complex64_t *B, int LDB);
254 void CORE_ztrsm(PLASMA_enum side, PLASMA_enum uplo,
255  PLASMA_enum transA, PLASMA_enum diag,
256  int M, int N,
257  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int LDA,
258  PLASMA_Complex64_t *B, int LDB);
259 void CORE_ztrtri(PLASMA_enum uplo, PLASMA_enum diag, int N,
260  PLASMA_Complex64_t *A, int LDA, int *info);
261 int CORE_ztslqt(int M, int N, int IB,
262  PLASMA_Complex64_t *A1, int LDA1,
263  PLASMA_Complex64_t *A2, int LDA2,
264  PLASMA_Complex64_t *T, int LDT,
265  PLASMA_Complex64_t *TAU, PLASMA_Complex64_t *WORK);
266 int CORE_ztsmlq(PLASMA_enum side, PLASMA_enum trans,
267  int M1, int N1, int M2, int N2, int K, int IB,
268  PLASMA_Complex64_t *A1, int LDA1,
269  PLASMA_Complex64_t *A2, int LDA2,
270  const PLASMA_Complex64_t *V, int LDV,
271  const PLASMA_Complex64_t *T, int LDT,
272  PLASMA_Complex64_t *WORK, int LDWORK);
273 int CORE_ztsmlq_corner( int m1, int n1, int m2, int n2, int m3, int n3,
274  int k, int ib, int nb,
275  PLASMA_Complex64_t *A1, int lda1,
276  PLASMA_Complex64_t *A2, int lda2,
277  PLASMA_Complex64_t *A3, int lda3,
278  const PLASMA_Complex64_t *V, int ldv,
279  const PLASMA_Complex64_t *T, int ldt,
280  PLASMA_Complex64_t *WORK, int ldwork);
281 int CORE_ztsmlq_hetra1( PLASMA_enum side, PLASMA_enum trans,
282  int m1, int n1, int m2, int n2,
283  int k, int ib,
284  PLASMA_Complex64_t *A1, int lda1,
285  PLASMA_Complex64_t *A2, int lda2,
286  const PLASMA_Complex64_t *V, int ldv,
287  const PLASMA_Complex64_t *T, int ldt,
288  PLASMA_Complex64_t *WORK, int ldwork);
289 int CORE_ztsmqr(PLASMA_enum side, PLASMA_enum trans,
290  int M1, int N1, int M2, int N2, int K, int IB,
291  PLASMA_Complex64_t *A1, int LDA1,
292  PLASMA_Complex64_t *A2, int LDA2,
293  const PLASMA_Complex64_t *V, int LDV,
294  const PLASMA_Complex64_t *T, int LDT,
295  PLASMA_Complex64_t *WORK, int LDWORK);
296 int CORE_ztsmqr_corner( int m1, int n1, int m2, int n2, int m3, int n3,
297  int k, int ib, int nb,
298  PLASMA_Complex64_t *A1, int lda1,
299  PLASMA_Complex64_t *A2, int lda2,
300  PLASMA_Complex64_t *A3, int lda3,
301  const PLASMA_Complex64_t *V, int ldv,
302  const PLASMA_Complex64_t *T, int ldt,
303  PLASMA_Complex64_t *WORK, int ldwork);
304 int CORE_ztsmqr_hetra1( PLASMA_enum side, PLASMA_enum trans,
305  int m1, int n1, int m2, int n2,
306  int k, int ib,
307  PLASMA_Complex64_t *A1, int lda1,
308  PLASMA_Complex64_t *A2, int lda2,
309  const PLASMA_Complex64_t *V, int ldv,
310  const PLASMA_Complex64_t *T, int ldt,
311  PLASMA_Complex64_t *WORK, int ldwork);
312 int CORE_ztsqrt(int M, int N, int IB,
313  PLASMA_Complex64_t *A1, int LDA1,
314  PLASMA_Complex64_t *A2, int LDA2,
315  PLASMA_Complex64_t *T, int LDT,
316  PLASMA_Complex64_t *TAU, PLASMA_Complex64_t *WORK);
317 int CORE_ztstrf(int M, int N, int IB, int NB,
318  PLASMA_Complex64_t *U, int LDU,
319  PLASMA_Complex64_t *A, int LDA,
320  PLASMA_Complex64_t *L, int LDL,
321  int *IPIV, PLASMA_Complex64_t *WORK,
322  int LDWORK, int *INFO);
323 int CORE_zttmqr(PLASMA_enum side, PLASMA_enum trans,
324  int M1, int N1, int M2, int N2, int K, int IB,
325  PLASMA_Complex64_t *A1, int LDA1,
326  PLASMA_Complex64_t *A2, int LDA2,
327  const PLASMA_Complex64_t *V, int LDV,
328  const PLASMA_Complex64_t *T, int LDT,
329  PLASMA_Complex64_t *WORK, int LDWORK);
330 int CORE_zttqrt(int M, int N, int IB,
331  PLASMA_Complex64_t *A1, int LDA1,
332  PLASMA_Complex64_t *A2, int LDA2,
333  PLASMA_Complex64_t *T, int LDT,
334  PLASMA_Complex64_t *TAU,
335  PLASMA_Complex64_t *WORK);
336 int CORE_zttmlq(PLASMA_enum side, PLASMA_enum trans,
337  int M1, int N1, int M2, int N2, int K, int IB,
338  PLASMA_Complex64_t *A1, int LDA1,
339  PLASMA_Complex64_t *A2, int LDA2,
340  const PLASMA_Complex64_t *V, int LDV,
341  const PLASMA_Complex64_t *T, int LDT,
342  PLASMA_Complex64_t *WORK, int LDWORK);
343 int CORE_zttlqt(int M, int N, int IB,
344  PLASMA_Complex64_t *A1, int LDA1,
345  PLASMA_Complex64_t *A2, int LDA2,
346  PLASMA_Complex64_t *T, int LDT,
347  PLASMA_Complex64_t *TAU,
348  PLASMA_Complex64_t *WORK);
349 int CORE_zunmlq(PLASMA_enum side, PLASMA_enum trans,
350  int M, int N, int IB, int K,
351  const PLASMA_Complex64_t *V, int LDV,
352  const PLASMA_Complex64_t *T, int LDT,
353  PLASMA_Complex64_t *C, int LDC,
354  PLASMA_Complex64_t *WORK, int LDWORK);
355 int CORE_zunmqr(PLASMA_enum side, PLASMA_enum trans,
356  int M, int N, int K, int IB,
357  const PLASMA_Complex64_t *V, int LDV,
358  const PLASMA_Complex64_t *T, int LDT,
359  PLASMA_Complex64_t *C, int LDC,
360  PLASMA_Complex64_t *WORK, int LDWORK);
361 
365 void QUARK_CORE_dzasum(Quark *quark, Quark_Task_Flags *task_flags,
366  PLASMA_enum storev, PLASMA_enum uplo, int m, int n,
367  const PLASMA_Complex64_t *A, int lda, int szeA,
368  double *work, int szeW);
369 void QUARK_CORE_dzasum_f1(Quark *quark, Quark_Task_Flags *task_flags,
370  PLASMA_enum storev, PLASMA_enum uplo, int m, int n,
371  const PLASMA_Complex64_t *A, int lda, int szeA,
372  double *work, int szeW,
373  double *fake, int szeF);
374 void QUARK_CORE_zgeadd(Quark *quark, Quark_Task_Flags *task_flags,
375  int m, int n, int nb, PLASMA_Complex64_t alpha,
376  const PLASMA_Complex64_t *A, int lda,
377  PLASMA_Complex64_t *B, int ldb);
378 void QUARK_CORE_zbrdalg(Quark *quark, Quark_Task_Flags *task_flags,
379  PLASMA_enum uplo,
380  int N, int NB,
381  const PLASMA_desc *A,
382  PLASMA_Complex64_t *C,
383  PLASMA_Complex64_t *S,
384  int i, int j, int m, int grsiz, int BAND,
385  const int *PCOL, const int *ACOL, int *MCOL);
386 void QUARK_CORE_zgelqt(Quark *quark, Quark_Task_Flags *task_flags,
387  int m, int n, int ib, int nb,
388  PLASMA_Complex64_t *A, int lda,
389  PLASMA_Complex64_t *T, int ldt);
390 void QUARK_CORE_zgemm(Quark *quark, Quark_Task_Flags *task_flags,
391  PLASMA_enum transA, PLASMA_enum transB,
392  int m, int n, int k, int nb,
393  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int lda,
394  const PLASMA_Complex64_t *B, int ldb,
395  PLASMA_Complex64_t beta, PLASMA_Complex64_t *C, int ldc);
396 void QUARK_CORE_zgemm2( Quark *quark, Quark_Task_Flags *task_flags,
397  PLASMA_enum transA, PLASMA_enum transB,
398  int m, int n, int k, int nb,
399  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int lda,
400  const PLASMA_Complex64_t *B, int ldb,
401  PLASMA_Complex64_t beta, PLASMA_Complex64_t *C, int ldc);
402 void QUARK_CORE_zgemm_f2(Quark *quark, Quark_Task_Flags *task_flags,
403  PLASMA_enum transA, PLASMA_enum transB,
404  int m, int n, int k, int nb,
405  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int lda,
406  const PLASMA_Complex64_t *B, int ldb,
407  PLASMA_Complex64_t beta, PLASMA_Complex64_t *C, int ldc,
408  PLASMA_Complex64_t *fake1, int szefake1, int flag1,
409  PLASMA_Complex64_t *fake2, int szefake2, int flag2);
410 void QUARK_CORE_zgemm_p2(Quark *quark, Quark_Task_Flags *task_flags,
411  PLASMA_enum transA, PLASMA_enum transB,
412  int m, int n, int k, int nb,
413  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int lda,
414  const PLASMA_Complex64_t **B, int ldb,
415  PLASMA_Complex64_t beta, PLASMA_Complex64_t *C, int ldc);
416 void QUARK_CORE_zgemm_p2f1(Quark *quark, Quark_Task_Flags *task_flags,
417  PLASMA_enum transA, PLASMA_enum transB,
418  int m, int n, int k, int nb,
419  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int lda,
420  const PLASMA_Complex64_t **B, int ldb,
421  PLASMA_Complex64_t beta, PLASMA_Complex64_t *C, int ldc,
422  PLASMA_Complex64_t *fake1, int szefake1, int flag1);
423 void QUARK_CORE_zgemm_p3(Quark *quark, Quark_Task_Flags *task_flags,
424  PLASMA_enum transA, PLASMA_enum transB,
425  int m, int n, int k, int nb,
426  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int lda,
427  const PLASMA_Complex64_t *B, int ldb,
428  PLASMA_Complex64_t beta, PLASMA_Complex64_t **C, int ldc);
429 void QUARK_CORE_zgeqrt(Quark *quark, Quark_Task_Flags *task_flags,
430  int m, int n, int ib, int nb,
431  PLASMA_Complex64_t *A, int lda,
432  PLASMA_Complex64_t *T, int ldt);
433 void QUARK_CORE_zgessm(Quark *quark, Quark_Task_Flags *task_flags,
434  int m, int n, int k, int ib, int nb,
435  const int *IPIV,
436  const PLASMA_Complex64_t *L, int ldl,
437  PLASMA_Complex64_t *A, int lda);
438 void QUARK_CORE_zgessq_f1( Quark *quark, Quark_Task_Flags *task_flags,
439  int m, int n, const PLASMA_Complex64_t *A, int lda,
440  double *scale, double *sumsq,
441  double *fake, int szeF, int paramF );
442 void QUARK_CORE_zgetrf(Quark *quark, Quark_Task_Flags *task_flags,
443  int m, int n, int nb,
444  PLASMA_Complex64_t *A, int lda,
445  int *IPIV,
446  PLASMA_sequence *sequence, PLASMA_request *request,
447  PLASMA_bool check_info, int iinfo);
448 void QUARK_CORE_zgetrf_incpiv(Quark *quark, Quark_Task_Flags *task_flags,
449  int m, int n, int ib, int nb,
450  PLASMA_Complex64_t *A, int lda,
451  int *IPIV,
452  PLASMA_sequence *sequence, PLASMA_request *request,
453  PLASMA_bool check_info, int iinfo);
454 void QUARK_CORE_zgetrf_reclap(Quark *quark, Quark_Task_Flags *task_flags,
455  int m, int n, int nb,
456  PLASMA_Complex64_t *A, int lda,
457  int *IPIV,
458  PLASMA_sequence *sequence, PLASMA_request *request,
459  PLASMA_bool check_info, int iinfo,
460  int nbthread);
461 void QUARK_CORE_zgetrf_rectil(Quark *quark, Quark_Task_Flags *task_flags,
462  PLASMA_desc A, PLASMA_Complex64_t *Amn, int size,
463  int *IPIV,
464  PLASMA_sequence *sequence, PLASMA_request *request,
465  PLASMA_bool check_info, int iinfo,
466  int nbthread);
467 void QUARK_CORE_zgetrip(Quark *quark, Quark_Task_Flags *task_flags,
468  int m, int n, PLASMA_Complex64_t *A, int szeA);
469 void QUARK_CORE_zgetrip_f1(Quark *quark, Quark_Task_Flags *task_flags,
470  int m, int n, PLASMA_Complex64_t *A, int szeA,
471  PLASMA_Complex64_t *fake, int szeF, int paramF);
472 void QUARK_CORE_zgetrip_f2(Quark *quark, Quark_Task_Flags *task_flags,
473  int m, int n, PLASMA_Complex64_t *A, int szeA,
474  PLASMA_Complex64_t *fake1, int szeF1, int paramF1,
475  PLASMA_Complex64_t *fake2, int szeF2, int paramF2);
476 void QUARK_CORE_zhemm(Quark *quark, Quark_Task_Flags *task_flags,
477  PLASMA_enum side, PLASMA_enum uplo,
478  int m, int n, int nb,
479  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int lda,
480  const PLASMA_Complex64_t *B, int ldb,
481  PLASMA_Complex64_t beta, PLASMA_Complex64_t *C, int ldc);
482 void QUARK_CORE_zhegst(Quark *quark, Quark_Task_Flags *task_flags,
483  int itype, PLASMA_enum uplo, int N,
484  PLASMA_Complex64_t *A, int LDA,
485  PLASMA_Complex64_t *B, int LDB,
486  PLASMA_sequence *sequence, PLASMA_request *request,
487  int iinfo);
488 void QUARK_CORE_zherk(Quark *quark, Quark_Task_Flags *task_flags,
489  PLASMA_enum uplo, PLASMA_enum trans,
490  int n, int k, int nb,
491  double alpha, const PLASMA_Complex64_t *A, int lda,
492  double beta, PLASMA_Complex64_t *C, int ldc);
493 void QUARK_CORE_zher2k(Quark *quark, Quark_Task_Flags *task_flags,
494  PLASMA_enum uplo, PLASMA_enum trans,
495  int n, int k, int nb,
496  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int lda,
497  const PLASMA_Complex64_t *B, int LDB,
498  double beta, PLASMA_Complex64_t *C, int ldc);
499 void QUARK_CORE_zherfb(Quark *quark, Quark_Task_Flags *task_flags,
500  PLASMA_enum uplo,
501  int n, int k, int ib, int nb,
502  const PLASMA_Complex64_t *A, int lda,
503  const PLASMA_Complex64_t *T, int ldt,
504  PLASMA_Complex64_t *C, int ldc);
505 void QUARK_CORE_zhessq_f1( Quark *quark, Quark_Task_Flags *task_flags,
506  PLASMA_enum uplo, int n, const PLASMA_Complex64_t *A, int lda,
507  double *scale, double *sumsq,
508  double *fake, int szeF, int paramF );
509 void QUARK_CORE_zlacpy(Quark *quark, Quark_Task_Flags *task_flags,
510  PLASMA_enum uplo, int m, int n, int mb,
511  const PLASMA_Complex64_t *A, int lda,
512  PLASMA_Complex64_t *B, int ldb);
513 void QUARK_CORE_zlange(Quark *quark, Quark_Task_Flags *task_flags,
514  int norm, int M, int N,
515  const PLASMA_Complex64_t *A, int LDA, int szeA,
516  int szeW, double *result);
517 void QUARK_CORE_zlange_f1(Quark *quark, Quark_Task_Flags *task_flags,
518  int norm, int M, int N,
519  const PLASMA_Complex64_t *A, int LDA, int szeA,
520  int szeW, double *result,
521  double *fake, int szeF);
522 #ifdef COMPLEX
523 void QUARK_CORE_zlanhe(Quark *quark, Quark_Task_Flags *task_flags,
524  int norm, PLASMA_enum uplo, int N,
525  const PLASMA_Complex64_t *A, int LDA, int szeA,
526  int szeW, double *result);
527 void QUARK_CORE_zlanhe_f1(Quark *quark, Quark_Task_Flags *task_flags,
528  int norm, PLASMA_enum uplo, int N,
529  const PLASMA_Complex64_t *A, int LDA, int szeA,
530  int szeW, double *result,
531  double *fake, int szeF);
532 #endif
533 void QUARK_CORE_zlansy(Quark *quark, Quark_Task_Flags *task_flags,
534  int norm, PLASMA_enum uplo, int N,
535  const PLASMA_Complex64_t *A, int LDA, int szeA,
536  int szeW, double *result);
537 void QUARK_CORE_zlansy_f1(Quark *quark, Quark_Task_Flags *task_flags,
538  int norm, PLASMA_enum uplo, int N,
539  const PLASMA_Complex64_t *A, int LDA, int szeA,
540  int szeW, double *result,
541  double *fake, int szeF);
542 void QUARK_CORE_zlaset(Quark *quark, Quark_Task_Flags *task_flags,
543  PLASMA_enum uplo, int n1, int n2, PLASMA_Complex64_t alpha,
544  PLASMA_Complex64_t beta, PLASMA_Complex64_t *tileA, int ldtilea);
545 void QUARK_CORE_zlaset2(Quark *quark, Quark_Task_Flags *task_flags,
546  PLASMA_enum uplo, int n1, int n2, PLASMA_Complex64_t alpha,
547  PLASMA_Complex64_t *tileA, int ldtilea);
548 void QUARK_CORE_zlaswp(Quark *quark, Quark_Task_Flags *task_flags,
549  int n, PLASMA_Complex64_t *A, int lda,
550  int i1, int i2, const int *ipiv, int inc);
551 void QUARK_CORE_zlaswp_f2(Quark *quark, Quark_Task_Flags *task_flags,
552  int n, PLASMA_Complex64_t *A, int lda,
553  int i1, int i2, const int *ipiv, int inc,
554  PLASMA_Complex64_t *fake1, int szefake1, int flag1,
555  PLASMA_Complex64_t *fake2, int szefake2, int flag2);
556 void QUARK_CORE_zlaswp_ontile(Quark *quark, Quark_Task_Flags *task_flags,
557  PLASMA_desc descA, PLASMA_Complex64_t *A,
558  int i1, int i2, const int *ipiv, int inc, PLASMA_Complex64_t *fakepanel);
559 void QUARK_CORE_zlaswp_ontile_f2(Quark *quark, Quark_Task_Flags *task_flags,
560  PLASMA_desc descA, PLASMA_Complex64_t *A,
561  int i1, int i2, const int *ipiv, int inc,
562  PLASMA_Complex64_t *fake1, int szefake1, int flag1,
563  PLASMA_Complex64_t *fake2, int szefake2, int flag2);
564 void QUARK_CORE_zlaswpc_ontile(Quark *quark, Quark_Task_Flags *task_flags,
565  PLASMA_desc descA, PLASMA_Complex64_t *A,
566  int i1, int i2, const int *ipiv, int inc, PLASMA_Complex64_t *fakepanel);
567 void QUARK_CORE_zlatro(Quark *quark, Quark_Task_Flags *task_flags,
568  PLASMA_enum uplo, PLASMA_enum trans, int m, int n, int mb,
569  const PLASMA_Complex64_t *A, int lda,
570  PLASMA_Complex64_t *B, int ldb);
571 void QUARK_CORE_zlauum(Quark *quark, Quark_Task_Flags *task_flags,
572  PLASMA_enum uplo, int n, int nb,
573  PLASMA_Complex64_t *A, int lda);
574 void QUARK_CORE_zplghe(Quark *quark, Quark_Task_Flags *task_flags,
575  double bump, int m, int n, PLASMA_Complex64_t *A, int lda,
576  int bigM, int m0, int n0, unsigned long long int seed );
577 void QUARK_CORE_zplgsy(Quark *quark, Quark_Task_Flags *task_flags,
578  PLASMA_Complex64_t bump, int m, int n, PLASMA_Complex64_t *A, int lda,
579  int bigM, int m0, int n0, unsigned long long int seed );
580 void QUARK_CORE_zplrnt(Quark *quark, Quark_Task_Flags *task_flags,
581  int m, int n, PLASMA_Complex64_t *A, int lda,
582  int bigM, int m0, int n0, unsigned long long int seed );
583 void QUARK_CORE_zpotrf(Quark *quark, Quark_Task_Flags *task_flags,
584  PLASMA_enum uplo, int n, int nb,
585  PLASMA_Complex64_t *A, int lda,
586  PLASMA_sequence *sequence, PLASMA_request *request,
587  int iinfo);
588 void QUARK_CORE_zshift( Quark *quark, Quark_Task_Flags *task_flags,
589  int s, int m, int n, int L,
590  PLASMA_Complex64_t *A);
591 void QUARK_CORE_zshiftw(Quark *quark, Quark_Task_Flags *task_flags,
592  int s, int cl, int m, int n, int L,
593  PLASMA_Complex64_t *A, PLASMA_Complex64_t *W);
594 void QUARK_CORE_zssssm(Quark *quark, Quark_Task_Flags *task_flags,
595  int m1, int n1, int m2, int n2, int k, int ib, int nb,
596  PLASMA_Complex64_t *A1, int lda1,
597  PLASMA_Complex64_t *A2, int lda2,
598  const PLASMA_Complex64_t *L1, int ldl1,
599  const PLASMA_Complex64_t *L2, int ldl2,
600  const int *IPIV);
601 void QUARK_CORE_zsymm(Quark *quark, Quark_Task_Flags *task_flags,
602  PLASMA_enum side, PLASMA_enum uplo,
603  int m, int n, int nb,
604  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int lda,
605  const PLASMA_Complex64_t *B, int ldb,
606  PLASMA_Complex64_t beta, PLASMA_Complex64_t *C, int ldc);
607 void QUARK_CORE_zsyrk(Quark *quark, Quark_Task_Flags *task_flags,
608  PLASMA_enum uplo, PLASMA_enum trans,
609  int n, int k, int nb,
610  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int lda,
611  PLASMA_Complex64_t beta, PLASMA_Complex64_t *C, int ldc);
612 void QUARK_CORE_zsyr2k(Quark *quark, Quark_Task_Flags *task_flags,
613  PLASMA_enum uplo, PLASMA_enum trans,
614  int n, int k, int nb,
615  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int lda,
616  const PLASMA_Complex64_t *B, int LDB,
617  PLASMA_Complex64_t beta, PLASMA_Complex64_t *C, int ldc);
618 void QUARK_CORE_zsyssq_f1( Quark *quark, Quark_Task_Flags *task_flags,
619  PLASMA_enum uplo, int n, const PLASMA_Complex64_t *A, int lda,
620  double *scale, double *sumsq,
621  double *fake, int szeF, int paramF );
622 void QUARK_CORE_zswpab(Quark *quark, Quark_Task_Flags *task_flags,
623  int i, int n1, int n2,
624  PLASMA_Complex64_t *A, int szeA);
625 void QUARK_CORE_zswptr_ontile(Quark *quark, Quark_Task_Flags *task_flags,
626  PLASMA_desc descA, PLASMA_Complex64_t *Aij,
627  int i1, int i2, const int *ipiv, int inc,
628  const PLASMA_Complex64_t *Akk, int ldak);
629 void QUARK_CORE_ztrdalg(Quark *quark, Quark_Task_Flags *task_flags,
630  PLASMA_enum uplo,
631  int N, int NB,
632  const PLASMA_desc *A,
633  PLASMA_Complex64_t *C,
634  PLASMA_Complex64_t *S,
635  int i, int j, int m, int grsiz, int BAND,
636  const int *PCOL, const int *ACOL, int *MCOL);
637 void QUARK_CORE_ztrmm(Quark *quark, Quark_Task_Flags *task_flags,
638  PLASMA_enum side, PLASMA_enum uplo, PLASMA_enum transA, PLASMA_enum diag,
639  int m, int n, int nb,
640  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int lda,
641  PLASMA_Complex64_t *B, int ldb);
642 void QUARK_CORE_ztrmm_p2(Quark *quark, Quark_Task_Flags *task_flags,
643  PLASMA_enum side, PLASMA_enum uplo, PLASMA_enum transA, PLASMA_enum diag,
644  int m, int n, int nb,
645  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int lda,
646  PLASMA_Complex64_t **B, int ldb);
647 void QUARK_CORE_ztrsm(Quark *quark, Quark_Task_Flags *task_flags,
648  PLASMA_enum side, PLASMA_enum uplo, PLASMA_enum transA, PLASMA_enum diag,
649  int m, int n, int nb,
650  PLASMA_Complex64_t alpha, const PLASMA_Complex64_t *A, int lda,
651  PLASMA_Complex64_t *B, int ldb);
652 void QUARK_CORE_ztrtri(Quark *quark, Quark_Task_Flags *task_flags,
653  PLASMA_enum uplo, PLASMA_enum diag, int n, int nb,
654  PLASMA_Complex64_t *A, int lda,
655  PLASMA_sequence *sequence, PLASMA_request *request,
656  int iinfo);
657 void QUARK_CORE_ztslqt(Quark *quark, Quark_Task_Flags *task_flags,
658  int m, int n, int ib, int nb,
659  PLASMA_Complex64_t *A1, int lda1,
660  PLASMA_Complex64_t *A2, int lda2,
661  PLASMA_Complex64_t *T, int ldt);
662 void QUARK_CORE_ztsmlq(Quark *quark, Quark_Task_Flags *task_flags,
663  PLASMA_enum side, PLASMA_enum trans,
664  int m1, int n1, int m2, int n2, int k, int ib, int nb,
665  PLASMA_Complex64_t *A1, int lda1,
666  PLASMA_Complex64_t *A2, int lda2,
667  const PLASMA_Complex64_t *V, int ldv,
668  const PLASMA_Complex64_t *T, int ldt);
669 void QUARK_CORE_ztsmlq_hetra1(Quark *quark, Quark_Task_Flags *task_flags,
670  PLASMA_enum side, PLASMA_enum trans,
671  int m1, int n1, int m2, int n2, int k, int ib, int nb,
672  PLASMA_Complex64_t *A1, int lda1,
673  PLASMA_Complex64_t *A2, int lda2,
674  const PLASMA_Complex64_t *V, int ldv,
675  const PLASMA_Complex64_t *T, int ldt);
676 void QUARK_CORE_ztsmlq_corner(Quark *quark, Quark_Task_Flags *task_flags,
677  int m1, int n1, int m2, int n2, int m3, int n3, int k, int ib, int nb,
678  PLASMA_Complex64_t *A1, int lda1,
679  PLASMA_Complex64_t *A2, int lda2,
680  PLASMA_Complex64_t *A3, int lda3,
681  const PLASMA_Complex64_t *V, int ldv,
682  const PLASMA_Complex64_t *T, int ldt);
683 void QUARK_CORE_ztsmqr(Quark *quark, Quark_Task_Flags *task_flags,
684  PLASMA_enum side, PLASMA_enum trans,
685  int m1, int n1, int m2, int n2, int k, int ib, int nb,
686  PLASMA_Complex64_t *A1, int lda1,
687  PLASMA_Complex64_t *A2, int lda2,
688  const PLASMA_Complex64_t *V, int ldv,
689  const PLASMA_Complex64_t *T, int ldt);
690 void QUARK_CORE_ztsmqr_hetra1(Quark *quark, Quark_Task_Flags *task_flags,
691  PLASMA_enum side, PLASMA_enum trans,
692  int m1, int n1, int m2, int n2, int k, int ib, int nb,
693  PLASMA_Complex64_t *A1, int lda1,
694  PLASMA_Complex64_t *A2, int lda2,
695  const PLASMA_Complex64_t *V, int ldv,
696  const PLASMA_Complex64_t *T, int ldt);
697 void QUARK_CORE_ztsmqr_corner(Quark *quark, Quark_Task_Flags *task_flags,
698  int m1, int n1, int m2, int n2, int m3, int n3, int k, int ib, int nb,
699  PLASMA_Complex64_t *A1, int lda1,
700  PLASMA_Complex64_t *A2, int lda2,
701  PLASMA_Complex64_t *A3, int lda3,
702  const PLASMA_Complex64_t *V, int ldv,
703  const PLASMA_Complex64_t *T, int ldt);
704 void QUARK_CORE_ztsqrt(Quark *quark, Quark_Task_Flags *task_flags,
705  int m, int n, int ib, int nb,
706  PLASMA_Complex64_t *A1, int lda1,
707  PLASMA_Complex64_t *A2, int lda2,
708  PLASMA_Complex64_t *T, int ldt);
709 void QUARK_CORE_ztstrf(Quark *quark, Quark_Task_Flags *task_flags,
710  int m, int n, int ib, int nb,
711  PLASMA_Complex64_t *U, int ldu,
712  PLASMA_Complex64_t *A, int lda,
713  PLASMA_Complex64_t *L, int ldl,
714  int *IPIV,
715  PLASMA_sequence *sequence, PLASMA_request *request,
716  PLASMA_bool check_info, int iinfo);
717 void QUARK_CORE_zttmqr(Quark *quark, Quark_Task_Flags *task_flags,
718  PLASMA_enum side, PLASMA_enum trans,
719  int m1, int n1, int m2, int n2, int k, int ib, int nb,
720  PLASMA_Complex64_t *A1, int lda1,
721  PLASMA_Complex64_t *A2, int lda2,
722  const PLASMA_Complex64_t *V, int ldv,
723  const PLASMA_Complex64_t *T, int ldt);
724 void QUARK_CORE_zttqrt(Quark *quark, Quark_Task_Flags *task_flags,
725  int m, int n, int ib, int nb,
726  PLASMA_Complex64_t *A1, int lda1,
727  PLASMA_Complex64_t *A2, int lda2,
728  PLASMA_Complex64_t *T, int ldt);
729 void QUARK_CORE_zttmlq(Quark *quark, Quark_Task_Flags *task_flags,
730  PLASMA_enum side, PLASMA_enum trans,
731  int m1, int n1, int m2, int n2, int k, int ib, int nb,
732  PLASMA_Complex64_t *A1, int lda1,
733  PLASMA_Complex64_t *A2, int lda2,
734  const PLASMA_Complex64_t *V, int ldv,
735  const PLASMA_Complex64_t *T, int ldt);
736 void QUARK_CORE_zttlqt(Quark *quark, Quark_Task_Flags *task_flags,
737  int m, int n, int ib, int nb,
738  PLASMA_Complex64_t *A1, int lda1,
739  PLASMA_Complex64_t *A2, int lda2,
740  PLASMA_Complex64_t *T, int ldt);
741 void QUARK_CORE_zpamm(Quark *quark, Quark_Task_Flags *task_flags,
742  int op, PLASMA_enum side, PLASMA_enum storev,
743  int m, int n, int k, int l,
744  const PLASMA_Complex64_t *A1, int lda1,
745  PLASMA_Complex64_t *A2, int lda2,
746  const PLASMA_Complex64_t *V, int ldv,
747  PLASMA_Complex64_t *W, int ldw);
748 void QUARK_CORE_zplssq( Quark *quark, Quark_Task_Flags *task_flags,
749  int m, const double *A, double *result );
750 void QUARK_CORE_zunmlq(Quark *quark, Quark_Task_Flags *task_flags,
751  PLASMA_enum side, PLASMA_enum trans,
752  int m, int n, int ib, int nb, int k,
753  const PLASMA_Complex64_t *A, int lda,
754  const PLASMA_Complex64_t *T, int ldt,
755  PLASMA_Complex64_t *C, int ldc);
756 void QUARK_CORE_zunmqr(Quark *quark, Quark_Task_Flags *task_flags,
757  PLASMA_enum side, PLASMA_enum trans,
758  int m, int n, int k, int ib, int nb,
759  const PLASMA_Complex64_t *A, int lda,
760  const PLASMA_Complex64_t *T, int ldt,
761  PLASMA_Complex64_t *C, int ldc);
762 
766 void CORE_dzasum_quark(Quark *quark);
767 void CORE_dzasum_f1_quark(Quark *quark);
768 void CORE_zgeadd_quark(Quark *quark);
769 void CORE_zbrdalg_quark(Quark *quark);
770 void CORE_zgelqt_quark(Quark *quark);
771 void CORE_zgemm_quark(Quark *quark);
772 void CORE_zgeqrt_quark(Quark *quark);
773 void CORE_zgessm_quark(Quark *quark);
774 void CORE_zgessq_quark(Quark *quark);
775 void CORE_zgessq_f1_quark(Quark *quark);
776 void CORE_zgetrf_quark(Quark *quark);
777 void CORE_zgetrf_incpiv_quark(Quark *quark);
778 void CORE_zgetrf_reclap_quark(Quark *quark);
779 void CORE_zgetrf_rectil_quark(Quark* quark);
780 void CORE_zgetrip_quark(Quark *quark);
781 void CORE_zgetrip_f1_quark(Quark *quark);
782 void CORE_zgetrip_f2_quark(Quark *quark);
783 #ifdef COMPLEX
784 void CORE_zhemm_quark(Quark *quark);
785 void CORE_zherk_quark(Quark *quark);
786 void CORE_zher2k_quark(Quark *quark);
787 #endif
788 void CORE_zhegst_quark(Quark *quark);
789 void CORE_zherfb_quark(Quark *quark);
790 void CORE_zhessq_quark(Quark *quark);
791 void CORE_zhessq_f1_quark(Quark *quark);
792 void CORE_zlacpy_quark(Quark *quark);
793 void CORE_zlatro_quark(Quark *quark);
794 void CORE_zlange_quark(Quark *quark);
795 void CORE_zlange_f1_quark(Quark *quark);
796 #ifdef COMPLEX
797 void CORE_zlanhe_quark(Quark *quark);
798 void CORE_zlanhe_f1_quark(Quark *quark);
799 #endif
800 void CORE_zlansy_quark(Quark *quark);
801 void CORE_zlansy_f1_quark(Quark *quark);
802 void CORE_zlaset_quark(Quark *quark);
803 void CORE_zlaset2_quark(Quark *quark);
804 void CORE_zlatro_quark(Quark *quark);
805 void CORE_zlauum_quark(Quark *quark);
806 void CORE_zpamm_quark(Quark *quark);
807 void CORE_zplghe_quark(Quark *quark);
808 void CORE_zplgsy_quark(Quark *quark);
809 void CORE_zplrnt_quark(Quark *quark);
810 void CORE_zplssq_quark(Quark *quark);
811 void CORE_zpotrf_quark(Quark *quark);
812 void CORE_zshift_quark(Quark *quark);
813 void CORE_zshiftw_quark(Quark *quark);
814 void CORE_zssssm_quark(Quark *quark);
815 void CORE_zsymm_quark(Quark *quark);
816 void CORE_zsyrk_quark(Quark *quark);
817 void CORE_zsyr2k_quark(Quark *quark);
818 void CORE_zsyssq_quark(Quark *quark);
819 void CORE_zsyssq_f1_quark(Quark *quark);
820 void CORE_zswpab_quark(Quark *quark);
821 void CORE_zswptr_ontile_quark(Quark *quark);
822 void CORE_ztrdalg_quark(Quark *quark);
823 void CORE_ztrmm_quark(Quark *quark);
824 void CORE_ztrsm_quark(Quark *quark);
825 void CORE_ztrtri_quark(Quark *quark);
826 void CORE_ztslqt_quark(Quark *quark);
827 void CORE_ztsmlq_quark(Quark *quark);
828 void CORE_ztsmlq_hetra1_quark(Quark *quark);
829 void CORE_ztsmlq_corner_quark(Quark *quark);
830 void CORE_ztsmqr_quark(Quark *quark);
831 void CORE_ztsmqr_hetra1_quark(Quark *quark);
832 void CORE_ztsmqr_corner_quark(Quark *quark);
833 void CORE_ztsqrt_quark(Quark *quark);
834 void CORE_ztstrf_quark(Quark *quark);
835 void CORE_zttmqr_quark(Quark *quark);
836 void CORE_zttqrt_quark(Quark *quark);
837 void CORE_zttmlq_quark(Quark *quark);
838 void CORE_zttlqt_quark(Quark *quark);
839 void CORE_zunmlq_quark(Quark *quark);
840 void CORE_zunmqr_quark(Quark *quark);
841 
842 void CORE_zlaswp_quark(Quark* quark);
843 void CORE_zlaswp_f2_quark(Quark* quark);
844 void CORE_zlaswp_ontile_quark(Quark *quark);
845 void CORE_zlaswp_ontile_f2_quark(Quark *quark);
846 void CORE_zlaswpc_ontile_quark(Quark *quark);
847 void CORE_ztrmm_p2_quark(Quark* quark);
848 void CORE_zgemm_f2_quark(Quark* quark);
849 void CORE_zgemm_p2_quark(Quark* quark);
850 void CORE_zgemm_p2f1_quark(Quark* quark);
851 void CORE_zgemm_p3_quark(Quark* quark);
852 
853 #ifdef __cplusplus
854 }
855 #endif
856 
857 #undef COMPLEX
858 
859 #endif