PLASMA  2.4.5
PLASMA - Parallel Linear Algebra for Scalable Multi-core Architectures
 All Data Structures Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros Groups
core_cblas.h
Go to the documentation of this file.
1 
18 #ifndef _PLASMA_CORE_CBLAS_H_
19 #define _PLASMA_CORE_CBLAS_H_
20 
21 #define COMPLEX
22 
23 #ifdef __cplusplus
24 extern "C" {
25 #endif
26 
31 int CORE_clarfx2(int side, int N,
32  PLASMA_Complex32_t V,
33  PLASMA_Complex32_t TAU,
34  PLASMA_Complex32_t *C1, int LDC1,
35  PLASMA_Complex32_t *C2, int LDC2);
36 int CORE_clarfx2c(int uplo,
37  PLASMA_Complex32_t V,
38  PLASMA_Complex32_t TAU,
39  PLASMA_Complex32_t *C1,
40  PLASMA_Complex32_t *C2,
41  PLASMA_Complex32_t *C3);
42 int CORE_clarfx2ce(int uplo,
43  PLASMA_Complex32_t *V,
44  PLASMA_Complex32_t *TAU,
45  PLASMA_Complex32_t *C1,
46  PLASMA_Complex32_t *C2,
47  PLASMA_Complex32_t *C3);
48 int CORE_chbelr(int uplo, int N,
49  PLASMA_desc *A,
50  PLASMA_Complex32_t *V,
51  PLASMA_Complex32_t *TAU,
52  int st,
53  int ed,
54  int eltsize);
55 int CORE_chbrce(int uplo, int N,
56  PLASMA_desc *A,
57  PLASMA_Complex32_t *V,
58  PLASMA_Complex32_t *TAU,
59  int st,
60  int ed,
61  int eltsize);
62 int CORE_chblrx(int uplo, int N,
63  PLASMA_desc *A,
64  PLASMA_Complex32_t *V,
65  PLASMA_Complex32_t *TAU,
66  int st,
67  int ed,
68  int eltsize);
69 int CORE_cgbelr(int uplo, int N,
70  PLASMA_desc *A,
71  PLASMA_Complex32_t *V,
72  PLASMA_Complex32_t *TAU,
73  int st,
74  int ed,
75  int eltsize);
76 int CORE_cgbrce(int uplo, int N,
77  PLASMA_desc *A,
78  PLASMA_Complex32_t *V,
79  PLASMA_Complex32_t *TAU,
80  int st,
81  int ed,
82  int eltsize);
83 int CORE_cgblrx(int uplo, int N,
84  PLASMA_desc *A,
85  PLASMA_Complex32_t *V,
86  PLASMA_Complex32_t *TAU,
87  int st,
88  int ed,
89  int eltsize);
90 void CORE_scasum(int storev, int uplo, int M, int N,
91  PLASMA_Complex32_t *A, int lda, float *work);
92 void CORE_cgeadd(int M, int N, PLASMA_Complex32_t alpha,
93  PLASMA_Complex32_t *A, int LDA,
94  PLASMA_Complex32_t *B, int LDB);
95 void CORE_cbrdalg(PLASMA_enum uplo, int N, int NB,
96  PLASMA_desc *pA, PLASMA_Complex32_t *C, PLASMA_Complex32_t *S,
97  int i, int j, int m, int grsiz);
98 int CORE_cgelqt(int M, int N, int IB,
99  PLASMA_Complex32_t *A, int LDA,
100  PLASMA_Complex32_t *T, int LDT,
101  PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK);
102 void CORE_cgemm(int transA, int transB,
103  int M, int N, int K,
104  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int LDA,
105  PLASMA_Complex32_t *B, int LDB,
106  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC);
107 int CORE_cgeqrt(int M, int N, int IB,
108  PLASMA_Complex32_t *A, int LDA,
109  PLASMA_Complex32_t *T, int LDT,
110  PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK);
111 int CORE_cgessm(int M, int N, int K, int IB,
112  int *IPIV,
113  PLASMA_Complex32_t *L, int LDL,
114  PLASMA_Complex32_t *A, int LDA);
115 int CORE_cgetrf(int M, int N,
116  PLASMA_Complex32_t *A, int LDA,
117  int *IPIV, int *INFO);
118 int CORE_cgetrf_incpiv(int M, int N, int IB,
119  PLASMA_Complex32_t *A, int LDA,
120  int *IPIV, int *INFO);
121 int CORE_cgetrf_reclap(const int M, const int N,
122  PLASMA_Complex32_t *A, const int LDA,
123  int *IPIV, int *info);
124 int CORE_cgetrf_rectil(const PLASMA_desc A, int *IPIV, int *info);
125 void CORE_cgetrip(int m, int n, PLASMA_Complex32_t *A,
126  PLASMA_Complex32_t *work);
127 #ifdef COMPLEX
128 void CORE_chegst(int itype, int uplo, int N,
129  PLASMA_Complex32_t *A, int LDA,
130  PLASMA_Complex32_t *B, int LDB, int *INFO);
131 void CORE_chemm(int side, int uplo,
132  int M, int N,
133  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int LDA,
134  PLASMA_Complex32_t *B, int LDB,
135  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC);
136 void CORE_cherk(int uplo, int trans,
137  int N, int K,
138  float alpha, PLASMA_Complex32_t *A, int LDA,
139  float beta, PLASMA_Complex32_t *C, int LDC);
140 void CORE_cher2k(int uplo, int trans,
141  int N, int K,
142  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int LDA,
143  PLASMA_Complex32_t *B, int LDB,
144  float beta, PLASMA_Complex32_t *C, int LDC);
145 int CORE_cherfb(PLASMA_enum uplo, int N, int K, int IB, int NB,
146  PLASMA_Complex32_t *A, int LDA,
147  PLASMA_Complex32_t *T, int LDT,
148  PLASMA_Complex32_t *C, int LDC,
149  PLASMA_Complex32_t *WORK, int LDWORK);
150 #endif
151 void CORE_clacpy(PLASMA_enum uplo, int M, int N,
152  PLASMA_Complex32_t *A, int LDA,
153  PLASMA_Complex32_t *B, int LDB);
154 void CORE_clange(int norm, int M, int N,
155  PLASMA_Complex32_t *A, int LDA,
156  float *work, float *normA);
157 #ifdef COMPLEX
158 void CORE_clanhe(int norm, int uplo, int N,
159  PLASMA_Complex32_t *A, int LDA,
160  float *work, float *normA);
161 #endif
162 void CORE_clansy(int norm, int uplo, int N,
163  PLASMA_Complex32_t *A, int LDA,
164  float *work, float *normA);
165 void CORE_claset(PLASMA_enum uplo, int n1, int n2, PLASMA_Complex32_t alpha,
166  PLASMA_Complex32_t beta, PLASMA_Complex32_t *tileA, int ldtilea);
167 void CORE_claset2(PLASMA_enum uplo, int n1, int n2, PLASMA_Complex32_t alpha,
168  PLASMA_Complex32_t *tileA, int ldtilea);
169 void CORE_claswp(int N, PLASMA_Complex32_t *A, int LDA,
170  int I1, int I2, int *IPIV, int INC);
171 int CORE_claswp_ontile(PLASMA_desc descA, int i1, int i2, int *ipiv, int inc);
172 int CORE_claswpc_ontile(PLASMA_desc descA, int i1, int i2, int *ipiv, int inc);
173 void CORE_clauum(int uplo, int N, PLASMA_Complex32_t *A, int LDA);
174 int CORE_cpamm(int op, int side, int storev,
175  int M, int N, int K, int L,
176  PLASMA_Complex32_t *A1, int LDA1,
177  PLASMA_Complex32_t *A2, int LDA2,
178  PLASMA_Complex32_t *V, int LDV,
179  PLASMA_Complex32_t *W, int LDW);
180 int CORE_cparfb(int side, int trans, int direct, int storev,
181  int M1, int N1, int M2, int N2, int K, int L,
182  PLASMA_Complex32_t *A1, int LDA1,
183  PLASMA_Complex32_t *A2, int LDA2,
184  PLASMA_Complex32_t *V, int LDV,
185  PLASMA_Complex32_t *T, int LDT,
186  PLASMA_Complex32_t *WORK, int LDWORK);
187 int CORE_cpemv(int trans, int storev,
188  int M, int N, int L,
189  PLASMA_Complex32_t ALPHA,
190  PLASMA_Complex32_t *A, int LDA,
191  PLASMA_Complex32_t *X, int INCX,
192  PLASMA_Complex32_t BETA,
193  PLASMA_Complex32_t *Y, int INCY,
194  PLASMA_Complex32_t *WORK);
195 void CORE_cplghe(float bump, int m, int n, PLASMA_Complex32_t *A, int lda,
196  int bigM, int m0, int n0, unsigned long long int seed );
197 void CORE_cplgsy(PLASMA_Complex32_t bump, int m, int n, PLASMA_Complex32_t *A, int lda,
198  int bigM, int m0, int n0, unsigned long long int seed );
199 void CORE_cplrnt(int m, int n, PLASMA_Complex32_t *A, int lda,
200  int bigM, int m0, int n0, unsigned long long int seed );
201 void CORE_cpotrf(int uplo, int N, PLASMA_Complex32_t *A, int LDA, int *INFO);
202 void CORE_cshift(int s, int m, int n, int L,
203  PLASMA_Complex32_t *A);
204 void CORE_cshiftw(int s, int cl, int m, int n, int L,
205  PLASMA_Complex32_t *A, PLASMA_Complex32_t *W);
206 int CORE_cssssm(int M1, int N1, int M2, int N2, int K, int IB,
207  PLASMA_Complex32_t *A1, int LDA1,
208  PLASMA_Complex32_t *A2, int LDA2,
209  PLASMA_Complex32_t *L1, int LDL1,
210  PLASMA_Complex32_t *L2, int LDL2,
211  int *IPIV);
212 void CORE_csymm(int side, int uplo,
213  int M, int N,
214  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int LDA,
215  PLASMA_Complex32_t *B, int LDB,
216  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC);
217 void CORE_csyrk(int uplo, int trans,
218  int N, int K,
219  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int LDA,
220  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC);
221 void CORE_csyr2k(int uplo, int trans,
222  int N, int K,
223  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int LDA,
224  PLASMA_Complex32_t *B, int LDB,
225  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC);
226 void CORE_cswpab(int i, int n1, int n2,
227  PLASMA_Complex32_t *A, PLASMA_Complex32_t *work);
228 int CORE_cswptr_ontile(PLASMA_desc descA, int i1, int i2, int *ipiv, int inc,
229  PLASMA_Complex32_t *Akk, int ldak);
230 void CORE_ctrdalg(PLASMA_enum uplo, int N, int NB,
231  PLASMA_desc *pA, PLASMA_Complex32_t *C, PLASMA_Complex32_t *S,
232  int i, int j, int m, int grsiz);
233 void CORE_ctrmm(int side, int uplo,
234  int transA, int diag,
235  int M, int N,
236  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int LDA,
237  PLASMA_Complex32_t *B, int LDB);
238 void CORE_ctrsm(int side, int uplo,
239  int transA, int diag,
240  int M, int N,
241  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int LDA,
242  PLASMA_Complex32_t *B, int LDB);
243 void CORE_ctrtri(int uplo, int diag, int N, PLASMA_Complex32_t *A, int LDA, int *info);
244 int CORE_ctslqt(int M, int N, int IB,
245  PLASMA_Complex32_t *A1, int LDA1,
246  PLASMA_Complex32_t *A2, int LDA2,
247  PLASMA_Complex32_t *T, int LDT,
248  PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK);
249 int CORE_ctsmlq(int side, int trans,
250  int M1, int N1, int M2, int N2, int K, int IB,
251  PLASMA_Complex32_t *A1, int LDA1,
252  PLASMA_Complex32_t *A2, int LDA2,
253  PLASMA_Complex32_t *V, int LDV,
254  PLASMA_Complex32_t *T, int LDT,
255  PLASMA_Complex32_t *WORK, int LDWORK);
256 int CORE_ctsmlq_corner( int m1, int n1, int m2, int n2, int m3, int n3,
257  int k, int ib, int nb,
258  PLASMA_Complex32_t *A1, int lda1,
259  PLASMA_Complex32_t *A2, int lda2,
260  PLASMA_Complex32_t *A3, int lda3,
261  PLASMA_Complex32_t *V, int ldv,
262  PLASMA_Complex32_t *T, int ldt,
263  PLASMA_Complex32_t *WORK, int ldwork);
264 int CORE_ctsmlq_hetra1( int side, int trans,
265  int m1, int n1, int m2, int n2,
266  int k, int ib,
267  PLASMA_Complex32_t *A1, int lda1,
268  PLASMA_Complex32_t *A2, int lda2,
269  PLASMA_Complex32_t *V, int ldv,
270  PLASMA_Complex32_t *T, int ldt,
271  PLASMA_Complex32_t *WORK, int ldwork);
272 int CORE_ctsmqr(int side, int trans,
273  int M1, int N1, int M2, int N2, int K, int IB,
274  PLASMA_Complex32_t *A1, int LDA1,
275  PLASMA_Complex32_t *A2, int LDA2,
276  PLASMA_Complex32_t *V, int LDV,
277  PLASMA_Complex32_t *T, int LDT,
278  PLASMA_Complex32_t *WORK, int LDWORK);
279 int CORE_ctsmqr_corner( int m1, int n1, int m2, int n2, int m3, int n3,
280  int k, int ib, int nb,
281  PLASMA_Complex32_t *A1, int lda1,
282  PLASMA_Complex32_t *A2, int lda2,
283  PLASMA_Complex32_t *A3, int lda3,
284  PLASMA_Complex32_t *V, int ldv,
285  PLASMA_Complex32_t *T, int ldt,
286  PLASMA_Complex32_t *WORK, int ldwork);
287 int CORE_ctsmqr_hetra1( int side, int trans,
288  int m1, int n1, int m2, int n2,
289  int k, int ib,
290  PLASMA_Complex32_t *A1, int lda1,
291  PLASMA_Complex32_t *A2, int lda2,
292  PLASMA_Complex32_t *V, int ldv,
293  PLASMA_Complex32_t *T, int ldt,
294  PLASMA_Complex32_t *WORK, int ldwork);
295 int CORE_ctsqrt(int M, int N, int IB,
296  PLASMA_Complex32_t *A1, int LDA1,
297  PLASMA_Complex32_t *A2, int LDA2,
298  PLASMA_Complex32_t *T, int LDT,
299  PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK);
300 int CORE_ctstrf(int M, int N, int IB, int NB,
301  PLASMA_Complex32_t *U, int LDU,
302  PLASMA_Complex32_t *A, int LDA,
303  PLASMA_Complex32_t *L, int LDL,
304  int *IPIV, PLASMA_Complex32_t *WORK,
305  int LDWORK, int *INFO);
306 int CORE_cttmqr(int side, int trans,
307  int M1, int N1, int M2, int N2, int K, int IB,
308  PLASMA_Complex32_t *A1, int LDA1,
309  PLASMA_Complex32_t *A2, int LDA2,
310  PLASMA_Complex32_t *V, int LDV,
311  PLASMA_Complex32_t *T, int LDT,
312  PLASMA_Complex32_t *WORK, int LDWORK);
313 int CORE_cttqrt(int M, int N, int IB,
314  PLASMA_Complex32_t *A1, int LDA1,
315  PLASMA_Complex32_t *A2, int LDA2,
316  PLASMA_Complex32_t *T, int LDT,
317  PLASMA_Complex32_t *TAU,
318  PLASMA_Complex32_t *WORK);
319 int CORE_cttmlq(int side, int trans,
320  int M1, int N1, int M2, int N2, int K, int IB,
321  PLASMA_Complex32_t *A1, int LDA1,
322  PLASMA_Complex32_t *A2, int LDA2,
323  PLASMA_Complex32_t *V, int LDV,
324  PLASMA_Complex32_t *T, int LDT,
325  PLASMA_Complex32_t *WORK, int LDWORK);
326 int CORE_cttlqt(int M, int N, int IB,
327  PLASMA_Complex32_t *A1, int LDA1,
328  PLASMA_Complex32_t *A2, int LDA2,
329  PLASMA_Complex32_t *T, int LDT,
330  PLASMA_Complex32_t *TAU,
331  PLASMA_Complex32_t *WORK);
332 int CORE_cunmlq(int side, int trans,
333  int M, int N, int IB, int K,
334  PLASMA_Complex32_t *V, int LDV,
335  PLASMA_Complex32_t *T, int LDT,
336  PLASMA_Complex32_t *C, int LDC,
337  PLASMA_Complex32_t *WORK, int LDWORK);
338 int CORE_cunmqr(int side, int trans,
339  int M, int N, int K, int IB,
340  PLASMA_Complex32_t *V, int LDV,
341  PLASMA_Complex32_t *T, int LDT,
342  PLASMA_Complex32_t *C, int LDC,
343  PLASMA_Complex32_t *WORK, int LDWORK);
344 
348 void QUARK_CORE_scasum(Quark *quark, Quark_Task_Flags *task_flags,
349  PLASMA_enum storev, PLASMA_enum uplo, int m, int n,
350  PLASMA_Complex32_t *A, int lda, int szeA,
351  float *work, int szeW);
352 void QUARK_CORE_scasum_f1(Quark *quark, Quark_Task_Flags *task_flags,
353  PLASMA_enum storev, PLASMA_enum uplo, int m, int n,
354  PLASMA_Complex32_t *A, int lda, int szeA,
355  float *work, int szeW,
356  float *fake, int szeF);
357 void QUARK_CORE_cgeadd(Quark *quark, Quark_Task_Flags *task_flags,
358  int m, int n, int nb, PLASMA_Complex32_t alpha,
359  PLASMA_Complex32_t *A, int lda,
360  PLASMA_Complex32_t *B, int ldb);
361 void QUARK_CORE_cbrdalg(Quark *quark, Quark_Task_Flags *task_flags,
362  int uplo,
363  int N, int NB,
364  PLASMA_desc *A,
365  PLASMA_Complex32_t *C,
366  PLASMA_Complex32_t *S,
367  int i, int j, int m, int grsiz, int BAND,
368  int *PCOL, int *ACOL, int *MCOL);
369 void QUARK_CORE_cgelqt(Quark *quark, Quark_Task_Flags *task_flags,
370  int m, int n, int ib, int nb,
371  PLASMA_Complex32_t *A, int lda,
372  PLASMA_Complex32_t *T, int ldt);
373 void QUARK_CORE_cgemm(Quark *quark, Quark_Task_Flags *task_flags,
374  int transA, int transB,
375  int m, int n, int k, int nb,
376  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda,
377  PLASMA_Complex32_t *B, int ldb,
378  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
379 void QUARK_CORE_cgemm2( Quark *quark, Quark_Task_Flags *task_flags,
380  int transA, int transB,
381  int m, int n, int k, int nb,
382  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda,
383  PLASMA_Complex32_t *B, int ldb,
384  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
385 void QUARK_CORE_cgemm_f2(Quark *quark, Quark_Task_Flags *task_flags,
386  int transA, int transB,
387  int m, int n, int k, int nb,
388  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda,
389  PLASMA_Complex32_t *B, int ldb,
390  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc,
391  PLASMA_Complex32_t *fake1, int szefake1, int flag1,
392  PLASMA_Complex32_t *fake2, int szefake2, int flag2);
393 void QUARK_CORE_cgemm_p2(Quark *quark, Quark_Task_Flags *task_flags,
394  int transA, int transB,
395  int m, int n, int k, int nb,
396  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda,
397  PLASMA_Complex32_t **B, int ldb,
398  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
399 void QUARK_CORE_cgemm_p2f1(Quark *quark, Quark_Task_Flags *task_flags,
400  int transA, int transB,
401  int m, int n, int k, int nb,
402  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda,
403  PLASMA_Complex32_t **B, int ldb,
404  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc,
405  PLASMA_Complex32_t *fake1, int szefake1, int flag1);
406 void QUARK_CORE_cgemm_p3(Quark *quark, Quark_Task_Flags *task_flags,
407  int transA, int transB,
408  int m, int n, int k, int nb,
409  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda,
410  PLASMA_Complex32_t *B, int ldb,
411  PLASMA_Complex32_t beta, PLASMA_Complex32_t **C, int ldc);
412 void QUARK_CORE_cgeqrt(Quark *quark, Quark_Task_Flags *task_flags,
413  int m, int n, int ib, int nb,
414  PLASMA_Complex32_t *A, int lda,
415  PLASMA_Complex32_t *T, int ldt);
416 void QUARK_CORE_cgessm(Quark *quark, Quark_Task_Flags *task_flags,
417  int m, int n, int k, int ib, int nb,
418  int *IPIV,
419  PLASMA_Complex32_t *L, int ldl,
420  PLASMA_Complex32_t *A, int lda);
421 void QUARK_CORE_cgetrf(Quark *quark, Quark_Task_Flags *task_flags,
422  int m, int n, int nb,
423  PLASMA_Complex32_t *A, int lda,
424  int *IPIV,
425  PLASMA_sequence *sequence, PLASMA_request *request,
426  PLASMA_bool check_info, int iinfo);
427 void QUARK_CORE_cgetrf_incpiv(Quark *quark, Quark_Task_Flags *task_flags,
428  int m, int n, int ib, int nb,
429  PLASMA_Complex32_t *A, int lda,
430  int *IPIV,
431  PLASMA_sequence *sequence, PLASMA_request *request,
432  PLASMA_bool check_info, int iinfo);
433 void QUARK_CORE_cgetrf_reclap(Quark *quark, Quark_Task_Flags *task_flags,
434  int m, int n, int nb,
435  PLASMA_Complex32_t *A, int lda,
436  int *IPIV,
437  PLASMA_sequence *sequence, PLASMA_request *request,
438  PLASMA_bool check_info, int iinfo,
439  int nbthread);
440 void QUARK_CORE_cgetrf_rectil(Quark *quark, Quark_Task_Flags *task_flags,
441  PLASMA_desc A, PLASMA_Complex32_t *Amn, int size,
442  int *IPIV,
443  PLASMA_sequence *sequence, PLASMA_request *request,
444  PLASMA_bool check_info, int iinfo,
445  int nbthread);
446 void QUARK_CORE_cgetrip(Quark *quark, Quark_Task_Flags *task_flags,
447  int m, int n, PLASMA_Complex32_t *A, int szeA);
448 void QUARK_CORE_cgetrip_f1(Quark *quark, Quark_Task_Flags *task_flags,
449  int m, int n, PLASMA_Complex32_t *A, int szeA,
450  PLASMA_Complex32_t *fake, int szeF, int paramF);
451 void QUARK_CORE_cgetrip_f2(Quark *quark, Quark_Task_Flags *task_flags,
452  int m, int n, PLASMA_Complex32_t *A, int szeA,
453  PLASMA_Complex32_t *fake1, int szeF1, int paramF1,
454  PLASMA_Complex32_t *fake2, int szeF2, int paramF2);
455 void QUARK_CORE_chemm(Quark *quark, Quark_Task_Flags *task_flags,
456  int side, int uplo,
457  int m, int n, int nb,
458  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda,
459  PLASMA_Complex32_t *B, int ldb,
460  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
461 void QUARK_CORE_chegst(Quark *quark, Quark_Task_Flags *task_flags,
462  int itype, int uplo, int N,
463  PLASMA_Complex32_t *A, int LDA,
464  PLASMA_Complex32_t *B, int LDB,
465  PLASMA_sequence *sequence, PLASMA_request *request,
466  int iinfo);
467 void QUARK_CORE_cherk(Quark *quark, Quark_Task_Flags *task_flags,
468  int uplo, int trans,
469  int n, int k, int nb,
470  float alpha, PLASMA_Complex32_t *A, int lda,
471  float beta, PLASMA_Complex32_t *C, int ldc);
472 void QUARK_CORE_cher2k(Quark *quark, Quark_Task_Flags *task_flags,
473  int uplo, int trans,
474  int n, int k, int nb,
475  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda,
476  PLASMA_Complex32_t *B, int LDB,
477  float beta, PLASMA_Complex32_t *C, int ldc);
478 void QUARK_CORE_cherfb(Quark *quark, Quark_Task_Flags *task_flags,
479  int uplo,
480  int n, int k, int ib, int nb,
481  PLASMA_Complex32_t *A, int lda,
482  PLASMA_Complex32_t *T, int ldt,
483  PLASMA_Complex32_t *C, int ldc);
484 void QUARK_CORE_clacpy(Quark *quark, Quark_Task_Flags *task_flags,
485  PLASMA_enum uplo, int m, int n, int mb,
486  PLASMA_Complex32_t *A, int lda,
487  PLASMA_Complex32_t *B, int ldb);
488 void QUARK_CORE_clange(Quark *quark, Quark_Task_Flags *task_flags,
489  int norm, int M, int N,
490  PLASMA_Complex32_t *A, int LDA, int szeA,
491  int szeW, float *result);
492 void QUARK_CORE_clange_f1(Quark *quark, Quark_Task_Flags *task_flags,
493  int norm, int M, int N,
494  PLASMA_Complex32_t *A, int LDA, int szeA,
495  int szeW, float *result,
496  float *fake, int szeF);
497 #ifdef COMPLEX
498 void QUARK_CORE_clanhe(Quark *quark, Quark_Task_Flags *task_flags,
499  int norm, int uplo, int N,
500  PLASMA_Complex32_t *A, int LDA, int szeA,
501  int szeW, float *result);
502 void QUARK_CORE_clanhe_f1(Quark *quark, Quark_Task_Flags *task_flags,
503  int norm, int uplo, int N,
504  PLASMA_Complex32_t *A, int LDA, int szeA,
505  int szeW, float *result,
506  float *fake, int szeF);
507 #endif
508 void QUARK_CORE_clansy(Quark *quark, Quark_Task_Flags *task_flags,
509  int norm, int uplo, int N,
510  PLASMA_Complex32_t *A, int LDA, int szeA,
511  int szeW, float *result);
512 void QUARK_CORE_clansy_f1(Quark *quark, Quark_Task_Flags *task_flags,
513  int norm, int uplo, int N,
514  PLASMA_Complex32_t *A, int LDA, int szeA,
515  int szeW, float *result,
516  float *fake, int szeF);
517 void QUARK_CORE_claset(Quark *quark, Quark_Task_Flags *task_flags,
518  PLASMA_enum uplo, int n1, int n2, PLASMA_Complex32_t alpha,
519  PLASMA_Complex32_t beta, PLASMA_Complex32_t *tileA, int ldtilea);
520 void QUARK_CORE_claset2(Quark *quark, Quark_Task_Flags *task_flags,
521  PLASMA_enum uplo, int n1, int n2, PLASMA_Complex32_t alpha,
522  PLASMA_Complex32_t *tileA, int ldtilea);
523 void QUARK_CORE_claswp(Quark *quark, Quark_Task_Flags *task_flags,
524  int n, PLASMA_Complex32_t *A, int lda,
525  int i1, int i2, int *ipiv, int inc);
526 void QUARK_CORE_claswp_f2(Quark *quark, Quark_Task_Flags *task_flags,
527  int n, PLASMA_Complex32_t *A, int lda,
528  int i1, int i2, int *ipiv, int inc,
529  PLASMA_Complex32_t *fake1, int szefake1, int flag1,
530  PLASMA_Complex32_t *fake2, int szefake2, int flag2);
531 void QUARK_CORE_claswp_ontile(Quark *quark, Quark_Task_Flags *task_flags,
532  PLASMA_desc descA, PLASMA_Complex32_t *A,
533  int i1, int i2, int *ipiv, int inc, PLASMA_Complex32_t *fakepanel);
534 void QUARK_CORE_claswp_ontile_f2(Quark *quark, Quark_Task_Flags *task_flags,
535  PLASMA_desc descA, PLASMA_Complex32_t *A,
536  int i1, int i2, int *ipiv, int inc,
537  PLASMA_Complex32_t *fake1, int szefake1, int flag1,
538  PLASMA_Complex32_t *fake2, int szefake2, int flag2);
539 void QUARK_CORE_claswpc_ontile(Quark *quark, Quark_Task_Flags *task_flags,
540  PLASMA_desc descA, PLASMA_Complex32_t *A,
541  int i1, int i2, int *ipiv, int inc, PLASMA_Complex32_t *fakepanel);
542 void QUARK_CORE_clauum(Quark *quark, Quark_Task_Flags *task_flags,
543  int uplo, int n, int nb,
544  PLASMA_Complex32_t *A, int lda);
545 void QUARK_CORE_cplghe(Quark *quark, Quark_Task_Flags *task_flags,
546  float bump, int m, int n, PLASMA_Complex32_t *A, int lda,
547  int bigM, int m0, int n0, unsigned long long int seed );
548 void QUARK_CORE_cplgsy(Quark *quark, Quark_Task_Flags *task_flags,
549  PLASMA_Complex32_t bump, int m, int n, PLASMA_Complex32_t *A, int lda,
550  int bigM, int m0, int n0, unsigned long long int seed );
551 void QUARK_CORE_cplrnt(Quark *quark, Quark_Task_Flags *task_flags,
552  int m, int n, PLASMA_Complex32_t *A, int lda,
553  int bigM, int m0, int n0, unsigned long long int seed );
554 void QUARK_CORE_cpotrf(Quark *quark, Quark_Task_Flags *task_flags,
555  int uplo, int n, int nb,
556  PLASMA_Complex32_t *A, int lda,
557  PLASMA_sequence *sequence, PLASMA_request *request,
558  int iinfo);
559 void QUARK_CORE_cshift( Quark *quark, Quark_Task_Flags *task_flags,
560  int s, int m, int n, int L,
561  PLASMA_Complex32_t *A);
562 void QUARK_CORE_cshiftw(Quark *quark, Quark_Task_Flags *task_flags,
563  int s, int cl, int m, int n, int L,
564  PLASMA_Complex32_t *A, PLASMA_Complex32_t *W);
565 void QUARK_CORE_cssssm(Quark *quark, Quark_Task_Flags *task_flags,
566  int m1, int n1, int m2, int n2, int k, int ib, int nb,
567  PLASMA_Complex32_t *A1, int lda1,
568  PLASMA_Complex32_t *A2, int lda2,
569  PLASMA_Complex32_t *L1, int ldl1,
570  PLASMA_Complex32_t *L2, int ldl2,
571  int *IPIV);
572 void QUARK_CORE_csymm(Quark *quark, Quark_Task_Flags *task_flags,
573  int side, int uplo,
574  int m, int n, int nb,
575  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda,
576  PLASMA_Complex32_t *B, int ldb,
577  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
578 void QUARK_CORE_csyrk(Quark *quark, Quark_Task_Flags *task_flags,
579  int uplo, int trans,
580  int n, int k, int nb,
581  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda,
582  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
583 void QUARK_CORE_csyr2k(Quark *quark, Quark_Task_Flags *task_flags,
584  int uplo, int trans,
585  int n, int k, int nb,
586  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda,
587  PLASMA_Complex32_t *B, int LDB,
588  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
589 void QUARK_CORE_cswpab(Quark *quark, Quark_Task_Flags *task_flags,
590  int i, int n1, int n2,
591  PLASMA_Complex32_t *A, int szeA);
592 void QUARK_CORE_cswptr_ontile(Quark *quark, Quark_Task_Flags *task_flags,
593  PLASMA_desc descA, PLASMA_Complex32_t *Aij,
594  int i1, int i2, int *ipiv, int inc,
595  PLASMA_Complex32_t *Akk, int ldak);
596 void QUARK_CORE_ctrdalg(Quark *quark, Quark_Task_Flags *task_flags,
597  int uplo,
598  int N, int NB,
599  PLASMA_desc *A,
600  PLASMA_Complex32_t *C,
601  PLASMA_Complex32_t *S,
602  int i, int j, int m, int grsiz, int BAND,
603  int *PCOL, int *ACOL, int *MCOL);
604 void QUARK_CORE_ctrmm(Quark *quark, Quark_Task_Flags *task_flags,
605  int side, int uplo, int transA, int diag,
606  int m, int n, int nb,
607  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda,
608  PLASMA_Complex32_t *B, int ldb);
609 void QUARK_CORE_ctrmm_p2(Quark *quark, Quark_Task_Flags *task_flags,
610  int side, int uplo, int transA, int diag,
611  int m, int n, int nb,
612  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda,
613  PLASMA_Complex32_t **B, int ldb);
614 void QUARK_CORE_ctrsm(Quark *quark, Quark_Task_Flags *task_flags,
615  int side, int uplo, int transA, int diag,
616  int m, int n, int nb,
617  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda,
618  PLASMA_Complex32_t *B, int ldb);
619 void QUARK_CORE_ctrtri(Quark *quark, Quark_Task_Flags *task_flags,
620  int uplo, int diag, int n, int nb,
621  PLASMA_Complex32_t *A, int lda,
622  PLASMA_sequence *sequence, PLASMA_request *request,
623  int iinfo);
624 void QUARK_CORE_ctslqt(Quark *quark, Quark_Task_Flags *task_flags,
625  int m, int n, int ib, int nb,
626  PLASMA_Complex32_t *A1, int lda1,
627  PLASMA_Complex32_t *A2, int lda2,
628  PLASMA_Complex32_t *T, int ldt);
629 void QUARK_CORE_ctsmlq(Quark *quark, Quark_Task_Flags *task_flags,
630  int side, int trans,
631  int m1, int n1, int m2, int n2, int k, int ib, int nb,
632  PLASMA_Complex32_t *A1, int lda1,
633  PLASMA_Complex32_t *A2, int lda2,
634  PLASMA_Complex32_t *V, int ldv,
635  PLASMA_Complex32_t *T, int ldt);
636 void QUARK_CORE_ctsmlq_hetra1(Quark *quark, Quark_Task_Flags *task_flags,
637  int side, int trans,
638  int m1, int n1, int m2, int n2, int k, int ib, int nb,
639  PLASMA_Complex32_t *A1, int lda1,
640  PLASMA_Complex32_t *A2, int lda2,
641  PLASMA_Complex32_t *V, int ldv,
642  PLASMA_Complex32_t *T, int ldt);
643 void QUARK_CORE_ctsmlq_corner(Quark *quark, Quark_Task_Flags *task_flags,
644  int m1, int n1, int m2, int n2, int m3, int n3, int k, int ib, int nb,
645  PLASMA_Complex32_t *A1, int lda1,
646  PLASMA_Complex32_t *A2, int lda2,
647  PLASMA_Complex32_t *A3, int lda3,
648  PLASMA_Complex32_t *V, int ldv,
649  PLASMA_Complex32_t *T, int ldt);
650 void QUARK_CORE_ctsmqr(Quark *quark, Quark_Task_Flags *task_flags,
651  int side, int trans,
652  int m1, int n1, int m2, int n2, int k, int ib, int nb,
653  PLASMA_Complex32_t *A1, int lda1,
654  PLASMA_Complex32_t *A2, int lda2,
655  PLASMA_Complex32_t *V, int ldv,
656  PLASMA_Complex32_t *T, int ldt);
657 void QUARK_CORE_ctsmqr_hetra1(Quark *quark, Quark_Task_Flags *task_flags,
658  int side, int trans,
659  int m1, int n1, int m2, int n2, int k, int ib, int nb,
660  PLASMA_Complex32_t *A1, int lda1,
661  PLASMA_Complex32_t *A2, int lda2,
662  PLASMA_Complex32_t *V, int ldv,
663  PLASMA_Complex32_t *T, int ldt);
664 void QUARK_CORE_ctsmqr_corner(Quark *quark, Quark_Task_Flags *task_flags,
665  int m1, int n1, int m2, int n2, int m3, int n3, int k, int ib, int nb,
666  PLASMA_Complex32_t *A1, int lda1,
667  PLASMA_Complex32_t *A2, int lda2,
668  PLASMA_Complex32_t *A3, int lda3,
669  PLASMA_Complex32_t *V, int ldv,
670  PLASMA_Complex32_t *T, int ldt);
671 void QUARK_CORE_ctsqrt(Quark *quark, Quark_Task_Flags *task_flags,
672  int m, int n, int ib, int nb,
673  PLASMA_Complex32_t *A1, int lda1,
674  PLASMA_Complex32_t *A2, int lda2,
675  PLASMA_Complex32_t *T, int ldt);
676 void QUARK_CORE_ctstrf(Quark *quark, Quark_Task_Flags *task_flags,
677  int m, int n, int ib, int nb,
678  PLASMA_Complex32_t *U, int ldu,
679  PLASMA_Complex32_t *A, int lda,
680  PLASMA_Complex32_t *L, int ldl,
681  int *IPIV,
682  PLASMA_sequence *sequence, PLASMA_request *request,
683  PLASMA_bool check_info, int iinfo);
684 void QUARK_CORE_cttmqr(Quark *quark, Quark_Task_Flags *task_flags,
685  int side, int trans,
686  int m1, int n1, int m2, int n2, int k, int ib, int nb,
687  PLASMA_Complex32_t *A1, int lda1,
688  PLASMA_Complex32_t *A2, int lda2,
689  PLASMA_Complex32_t *V, int ldv,
690  PLASMA_Complex32_t *T, int ldt);
691 void QUARK_CORE_cttqrt(Quark *quark, Quark_Task_Flags *task_flags,
692  int m, int n, int ib, int nb,
693  PLASMA_Complex32_t *A1, int lda1,
694  PLASMA_Complex32_t *A2, int lda2,
695  PLASMA_Complex32_t *T, int ldt);
696 void QUARK_CORE_cttmlq(Quark *quark, Quark_Task_Flags *task_flags,
697  int side, int trans,
698  int m1, int n1, int m2, int n2, int k, int ib, int nb,
699  PLASMA_Complex32_t *A1, int lda1,
700  PLASMA_Complex32_t *A2, int lda2,
701  PLASMA_Complex32_t *V, int ldv,
702  PLASMA_Complex32_t *T, int ldt);
703 void QUARK_CORE_cttlqt(Quark *quark, Quark_Task_Flags *task_flags,
704  int m, int n, int ib, int nb,
705  PLASMA_Complex32_t *A1, int lda1,
706  PLASMA_Complex32_t *A2, int lda2,
707  PLASMA_Complex32_t *T, int ldt);
708 void QUARK_CORE_cpamm(Quark *quark, Quark_Task_Flags *task_flags,
709  int op, int side, int storev,
710  int m, int n, int k, int l,
711  PLASMA_Complex32_t *A1, int lda1,
712  PLASMA_Complex32_t *A2, int lda2,
713  PLASMA_Complex32_t *V, int ldv,
714  PLASMA_Complex32_t *W, int ldw);
715 void QUARK_CORE_cunmlq(Quark *quark, Quark_Task_Flags *task_flags,
716  int side, int trans,
717  int m, int n, int ib, int nb, int k,
718  PLASMA_Complex32_t *A, int lda,
719  PLASMA_Complex32_t *T, int ldt,
720  PLASMA_Complex32_t *C, int ldc);
721 void QUARK_CORE_cunmqr(Quark *quark, Quark_Task_Flags *task_flags,
722  int side, int trans,
723  int m, int n, int k, int ib, int nb,
724  PLASMA_Complex32_t *A, int lda,
725  PLASMA_Complex32_t *T, int ldt,
726  PLASMA_Complex32_t *C, int ldc);
727 
731 void CORE_scasum_quark(Quark *quark);
732 void CORE_scasum_f1_quark(Quark *quark);
733 void CORE_cgeadd_quark(Quark *quark);
734 void CORE_cbrdalg_quark(Quark *quark);
735 void CORE_cgelqt_quark(Quark *quark);
736 void CORE_cgemm_quark(Quark *quark);
737 void CORE_cgeqrt_quark(Quark *quark);
738 void CORE_cgessm_quark(Quark *quark);
739 void CORE_cgetrf_quark(Quark *quark);
740 void CORE_cgetrf_incpiv_quark(Quark *quark);
741 void CORE_cgetrf_reclap_quark(Quark *quark);
742 void CORE_cgetrf_rectil_quark(Quark* quark);
743 void CORE_cgetrip_quark(Quark *quark);
744 void CORE_cgetrip_f1_quark(Quark *quark);
745 void CORE_cgetrip_f2_quark(Quark *quark);
746 #ifdef COMPLEX
747 void CORE_chemm_quark(Quark *quark);
748 void CORE_cherk_quark(Quark *quark);
749 void CORE_cher2k_quark(Quark *quark);
750 #endif
751 void CORE_chegst_quark(Quark *quark);
752 void CORE_cherfb_quark(Quark *quark);
753 void CORE_clacpy_quark(Quark *quark);
754 void CORE_clange_quark(Quark *quark);
755 void CORE_clange_f1_quark(Quark *quark);
756 #ifdef COMPLEX
757 void CORE_clanhe_quark(Quark *quark);
758 void CORE_clanhe_f1_quark(Quark *quark);
759 #endif
760 void CORE_clansy_quark(Quark *quark);
761 void CORE_clansy_f1_quark(Quark *quark);
762 void CORE_claset_quark(Quark *quark);
763 void CORE_claset2_quark(Quark *quark);
764 void CORE_clauum_quark(Quark *quark);
765 void CORE_cpamm_quark(Quark *quark);
766 void CORE_cplghe_quark(Quark *quark);
767 void CORE_cplgsy_quark(Quark *quark);
768 void CORE_cplrnt_quark(Quark *quark);
769 void CORE_cpotrf_quark(Quark *quark);
770 void CORE_cshift_quark(Quark *quark);
771 void CORE_cshiftw_quark(Quark *quark);
772 void CORE_cssssm_quark(Quark *quark);
773 void CORE_csymm_quark(Quark *quark);
774 void CORE_csyrk_quark(Quark *quark);
775 void CORE_csyr2k_quark(Quark *quark);
776 void CORE_cswpab_quark(Quark *quark);
777 void CORE_cswptr_ontile_quark(Quark *quark);
778 void CORE_ctrdalg_quark(Quark *quark);
779 void CORE_ctrmm_quark(Quark *quark);
780 void CORE_ctrsm_quark(Quark *quark);
781 void CORE_ctrtri_quark(Quark *quark);
782 void CORE_ctslqt_quark(Quark *quark);
783 void CORE_ctsmlq_quark(Quark *quark);
784 void CORE_ctsmlq_hetra1_quark(Quark *quark);
785 void CORE_ctsmlq_corner_quark(Quark *quark);
786 void CORE_ctsmqr_quark(Quark *quark);
787 void CORE_ctsmqr_hetra1_quark(Quark *quark);
788 void CORE_ctsmqr_corner_quark(Quark *quark);
789 void CORE_ctsqrt_quark(Quark *quark);
790 void CORE_ctstrf_quark(Quark *quark);
791 void CORE_cttmqr_quark(Quark *quark);
792 void CORE_cttqrt_quark(Quark *quark);
793 void CORE_cttmlq_quark(Quark *quark);
794 void CORE_cttlqt_quark(Quark *quark);
795 void CORE_cunmlq_quark(Quark *quark);
796 void CORE_cunmqr_quark(Quark *quark);
797 
798 void CORE_claswp_quark(Quark* quark);
799 void CORE_claswp_f2_quark(Quark* quark);
800 void CORE_claswp_ontile_quark(Quark *quark);
801 void CORE_claswp_ontile_f2_quark(Quark *quark);
802 void CORE_claswpc_ontile_quark(Quark *quark);
803 void CORE_ctrmm_p2_quark(Quark* quark);
804 void CORE_cgemm_f2_quark(Quark* quark);
805 void CORE_cgemm_p2_quark(Quark* quark);
806 void CORE_cgemm_p2f1_quark(Quark* quark);
807 void CORE_cgemm_p3_quark(Quark* quark);
808 
809 #ifdef __cplusplus
810 }
811 #endif
812 
813 #undef COMPLEX
814 
815 #endif