PLASMA  2.5.2
PLASMA - Parallel Linear Algebra for Scalable Multi-core Architectures
 All Data Structures Functions Variables Groups
core_cblas.h
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 
30 void CORE_scasum(int storev, PLASMA_enum uplo, int M, int N,
31  const PLASMA_Complex32_t *A, int lda, float *work);
32 void CORE_cbrdalg1( PLASMA_enum uplo,
33  int n,
34  int nb,
35  PLASMA_Complex32_t *A,
36  int lda,
37  PLASMA_Complex32_t *VQ,
38  PLASMA_Complex32_t *TAUQ,
39  PLASMA_Complex32_t *VP,
40  PLASMA_Complex32_t *TAUP,
41  int Vblksiz, int wantz,
42  int i, int sweepid, int m, int grsiz,
43  PLASMA_Complex32_t *work);
44 int CORE_cgbelr(PLASMA_enum uplo, int N,
45  PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU,
46  int st, int ed, int eltsize);
47 int CORE_cgbrce(PLASMA_enum uplo, int N,
48  PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU,
49  int st, int ed, int eltsize);
50 int CORE_cgblrx(PLASMA_enum uplo, int N,
51  PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU,
52  int st, int ed, int eltsize);
53 int CORE_cgeadd(int M, int N, PLASMA_Complex32_t alpha,
54  const PLASMA_Complex32_t *A, int LDA,
55  PLASMA_Complex32_t *B, int LDB);
56 int CORE_cgelqt(int M, int N, int IB,
57  PLASMA_Complex32_t *A, int LDA,
58  PLASMA_Complex32_t *T, int LDT,
59  PLASMA_Complex32_t *TAU,
60  PLASMA_Complex32_t *WORK);
61 void CORE_cgemm(PLASMA_enum transA, PLASMA_enum transB,
62  int M, int N, int K,
63  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
64  const PLASMA_Complex32_t *B, int LDB,
65  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC);
66 void CORE_cgemm_tile(PLASMA_enum transA, PLASMA_enum transB,
67  int M, int N, int K,
68  const PLASMA_Complex32_t *alpha, const PLASMA_Complex32_t *A, int LDA,
69  const PLASMA_Complex32_t *B, int LDB,
70  const PLASMA_Complex32_t *beta, PLASMA_Complex32_t *C, int LDC);
71 void CORE_cgemv(PLASMA_enum trans, int M, int N,
72  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
73  const PLASMA_Complex32_t *x, int incx,
74  PLASMA_Complex32_t beta, PLASMA_Complex32_t *y, int incy);
75 void CORE_cgemv_tile(PLASMA_enum trans, int M, int N,
76  const PLASMA_Complex32_t *alpha, const PLASMA_Complex32_t *A, int LDA,
77  const PLASMA_Complex32_t *x, int incx,
78  const PLASMA_Complex32_t *beta, PLASMA_Complex32_t *y, int incy);
79 void CORE_cgeqp3_init( int n, int *jpvt );
80 void CORE_cgeqp3_larfg( PLASMA_desc A, int ii, int jj, int i, int j,
81  PLASMA_Complex32_t *tau, PLASMA_Complex32_t *beta );
82 void CORE_cgeqp3_norms( PLASMA_desc A, int ioff, int joff, float *norms1, float *norms2 );
83 void CORE_cgeqp3_pivot( PLASMA_desc A, PLASMA_Complex32_t *F, int ldf,
84  int jj, int k, int *jpvt,
85  float *norms1, float *norms2, int *info );
86 int CORE_cgeqp3_tntpiv(int m, int n,
87  PLASMA_Complex32_t *A, int lda,
88  int *IPIV, PLASMA_Complex32_t *tau,
89  int *iwork);
90 void CORE_cgeqp3_update( const PLASMA_Complex32_t *Ajj, int lda1,
91  PLASMA_Complex32_t *Ajk, int lda2,
92  const PLASMA_Complex32_t *Fk, int ldf,
93  int joff, int k, int koff, int nb,
94  float *norms1, float *norms2,
95  int *info );
96 int CORE_cgeqrt(int M, int N, int IB,
97  PLASMA_Complex32_t *A, int LDA,
98  PLASMA_Complex32_t *T, int LDT,
99  PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK);
100 int CORE_cgessm(int M, int N, int K, int IB,
101  const int *IPIV,
102  const PLASMA_Complex32_t *L, int LDL,
103  PLASMA_Complex32_t *A, int LDA);
104 int CORE_cgessq(int M, int N,
105  const PLASMA_Complex32_t *A, int LDA,
106  float *scale, float *sumsq);
107 int CORE_cgetf2_nopiv(int m, int n,
108  PLASMA_Complex32_t *A, int lda);
109 int CORE_cgetrf(int M, int N,
110  PLASMA_Complex32_t *A, int LDA,
111  int *IPIV, int *INFO);
112 int CORE_cgetrf_incpiv(int M, int N, int IB,
113  PLASMA_Complex32_t *A, int LDA,
114  int *IPIV, int *INFO);
115 int CORE_cgetrf_nopiv(int m, int n, int ib,
116  PLASMA_Complex32_t *A, int lda);
117 int CORE_cgetrf_reclap(int M, int N,
118  PLASMA_Complex32_t *A, int LDA,
119  int *IPIV, int *info);
120 int CORE_cgetrf_rectil(const PLASMA_desc A, int *IPIV, int *info);
121 void CORE_cgetrip(int m, int n, PLASMA_Complex32_t *A,
122  PLASMA_Complex32_t *work);
123 int CORE_chbelr(PLASMA_enum uplo, int N,
124  PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU,
125  int st, int ed, int eltsize);
126 int CORE_chblrx(PLASMA_enum uplo, int N,
127  PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU,
128  int st, int ed, int eltsize);
129 int CORE_chbrce(PLASMA_enum uplo, int N,
130  PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU,
131  int st, int ed, int eltsize);
132 void CORE_chbtype1cb(int N, int NB,
133  PLASMA_Complex32_t *A, int LDA,
134  PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU,
135  int st, int ed, int sweep, int Vblksiz, int WANTZ,
136  PLASMA_Complex32_t *WORK);
137 void CORE_chbtype2cb(int N, int NB,
138  PLASMA_Complex32_t *A, int LDA,
139  PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU,
140  int st, int ed, int sweep, int Vblksiz, int WANTZ,
141  PLASMA_Complex32_t *WORK);
142 void CORE_chbtype3cb(int N, int NB,
143  PLASMA_Complex32_t *A, int LDA,
144  const PLASMA_Complex32_t *V, const PLASMA_Complex32_t *TAU,
145  int st, int ed, int sweep, int Vblksiz, int WANTZ,
146  PLASMA_Complex32_t *WORK);
147 void CORE_cgbtype1cb(PLASMA_enum uplo, int N, int NB,
148  PLASMA_Complex32_t *A, int LDA,
149  PLASMA_Complex32_t *VQ, PLASMA_Complex32_t *TAUQ,
150  PLASMA_Complex32_t *VP, PLASMA_Complex32_t *TAUP,
151  int st, int ed, int sweep, int Vblksiz, int WANTZ,
152  PLASMA_Complex32_t *WORK);
153 void CORE_cgbtype2cb(PLASMA_enum uplo, int N, int NB,
154  PLASMA_Complex32_t *A, int LDA,
155  PLASMA_Complex32_t *VQ, PLASMA_Complex32_t *TAUQ,
156  PLASMA_Complex32_t *VP, PLASMA_Complex32_t *TAUP,
157  int st, int ed, int sweep, int Vblksiz, int WANTZ,
158  PLASMA_Complex32_t *WORK);
159 void CORE_cgbtype3cb(PLASMA_enum uplo, int N, int NB,
160  PLASMA_Complex32_t *A, int LDA,
161  PLASMA_Complex32_t *VQ, PLASMA_Complex32_t *TAUQ,
162  PLASMA_Complex32_t *VP, PLASMA_Complex32_t *TAUP,
163  int st, int ed, int sweep, int Vblksiz, int WANTZ,
164  PLASMA_Complex32_t *WORK);
165 void CORE_chegst(int itype, PLASMA_enum uplo, int N,
166  PLASMA_Complex32_t *A, int LDA,
167  PLASMA_Complex32_t *B, int LDB, int *INFO);
168 #ifdef COMPLEX
169 void CORE_chemm(PLASMA_enum side, PLASMA_enum uplo,
170  int M, int N,
171  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
172  const PLASMA_Complex32_t *B, int LDB,
173  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC);
174 void CORE_cherk(PLASMA_enum uplo, PLASMA_enum trans,
175  int N, int K,
176  float alpha, const PLASMA_Complex32_t *A, int LDA,
177  float beta, PLASMA_Complex32_t *C, int LDC);
178 void CORE_cher2k(PLASMA_enum uplo, PLASMA_enum trans,
179  int N, int K,
180  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
181  const PLASMA_Complex32_t *B, int LDB,
182  float beta, PLASMA_Complex32_t *C, int LDC);
183 int CORE_chessq(PLASMA_enum uplo, int N,
184  const PLASMA_Complex32_t *A, int LDA,
185  float *scale, float *sumsq);
186 #endif
187 int CORE_cherfb(PLASMA_enum uplo, int N, int K, int IB, int NB,
188  const PLASMA_Complex32_t *A, int LDA,
189  const PLASMA_Complex32_t *T, int LDT,
190  PLASMA_Complex32_t *C, int LDC,
191  PLASMA_Complex32_t *WORK, int LDWORK);
192 void CORE_clacpy(PLASMA_enum uplo, int M, int N,
193  const PLASMA_Complex32_t *A, int LDA,
194  PLASMA_Complex32_t *B, int LDB);
195 int CORE_clacpy_pivot( const PLASMA_desc descA,
196  PLASMA_enum direct,
197  int k1, int k2, const int *ipiv,
198  int *rankin, int *rankout,
199  PLASMA_Complex32_t *A, int lda,
200  int init);
201 void CORE_clange(int norm, int M, int N,
202  const PLASMA_Complex32_t *A, int LDA,
203  float *work, float *normA);
204 #ifdef COMPLEX
205 void CORE_clanhe(int norm, PLASMA_enum uplo, int N,
206  const PLASMA_Complex32_t *A, int LDA,
207  float *work, float *normA);
208 #endif
209 void CORE_clansy(int norm, PLASMA_enum uplo, int N,
210  const PLASMA_Complex32_t *A, int LDA,
211  float *work, float *normA);
212 int CORE_clarfb_gemm(PLASMA_enum side, PLASMA_enum trans, PLASMA_enum direct, PLASMA_enum storev,
213  int M, int N, int K,
214  const PLASMA_Complex32_t *V, int LDV,
215  const PLASMA_Complex32_t *T, int LDT,
216  PLASMA_Complex32_t *C, int LDC,
217  PLASMA_Complex32_t *WORK, int LDWORK);
218 int CORE_clarfx2(PLASMA_enum side, int N,
219  PLASMA_Complex32_t V,
220  PLASMA_Complex32_t TAU,
221  PLASMA_Complex32_t *C1, int LDC1,
222  PLASMA_Complex32_t *C2, int LDC2);
223 int CORE_clarfx2c(PLASMA_enum uplo,
224  PLASMA_Complex32_t V,
225  PLASMA_Complex32_t TAU,
226  PLASMA_Complex32_t *C1,
227  PLASMA_Complex32_t *C2,
228  PLASMA_Complex32_t *C3);
229 int CORE_clarfx2ce(PLASMA_enum uplo,
230  PLASMA_Complex32_t *V,
231  PLASMA_Complex32_t *TAU,
232  PLASMA_Complex32_t *C1,
233  PLASMA_Complex32_t *C2,
234  PLASMA_Complex32_t *C3);
235 void CORE_clarfy(int N,
236  PLASMA_Complex32_t *A, int LDA,
237  const PLASMA_Complex32_t *V,
238  const PLASMA_Complex32_t *TAU,
239  PLASMA_Complex32_t *WORK);
240 void CORE_claset(PLASMA_enum uplo, int n1, int n2,
241  PLASMA_Complex32_t alpha, PLASMA_Complex32_t beta,
242  PLASMA_Complex32_t *tileA, int ldtilea);
243 void CORE_claset2(PLASMA_enum uplo, int n1, int n2, PLASMA_Complex32_t alpha,
244  PLASMA_Complex32_t *tileA, int ldtilea);
245 void CORE_claswp(int N, PLASMA_Complex32_t *A, int LDA,
246  int I1, int I2, const int *IPIV, int INC);
247 int CORE_claswp_ontile( PLASMA_desc descA, int i1, int i2, const int *ipiv, int inc);
248 int CORE_claswpc_ontile(PLASMA_desc descA, int i1, int i2, const int *ipiv, int inc);
249 int CORE_clatro(PLASMA_enum uplo, PLASMA_enum trans,
250  int M, int N,
251  const PLASMA_Complex32_t *A, int LDA,
252  PLASMA_Complex32_t *B, int LDB);
253 void CORE_clauum(PLASMA_enum uplo, int N, PLASMA_Complex32_t *A, int LDA);
254 int CORE_cpamm(int op, PLASMA_enum side, PLASMA_enum storev,
255  int M, int N, int K, int L,
256  const PLASMA_Complex32_t *A1, int LDA1,
257  PLASMA_Complex32_t *A2, int LDA2,
258  const PLASMA_Complex32_t *V, int LDV,
259  PLASMA_Complex32_t *W, int LDW);
260 int CORE_cparfb(PLASMA_enum side, PLASMA_enum trans, PLASMA_enum direct, PLASMA_enum storev,
261  int M1, int N1, int M2, int N2, int K, int L,
262  PLASMA_Complex32_t *A1, int LDA1,
263  PLASMA_Complex32_t *A2, int LDA2,
264  const PLASMA_Complex32_t *V, int LDV,
265  const PLASMA_Complex32_t *T, int LDT,
266  PLASMA_Complex32_t *WORK, int LDWORK);
267 int CORE_cpemv(PLASMA_enum trans, PLASMA_enum storev,
268  int M, int N, int L,
269  PLASMA_Complex32_t ALPHA,
270  const PLASMA_Complex32_t *A, int LDA,
271  const PLASMA_Complex32_t *X, int INCX,
272  PLASMA_Complex32_t BETA,
273  PLASMA_Complex32_t *Y, int INCY,
274  PLASMA_Complex32_t *WORK);
275 void CORE_cplghe(float bump, int m, int n, PLASMA_Complex32_t *A, int lda,
276  int bigM, int m0, int n0, unsigned long long int seed );
277 void CORE_cplgsy(PLASMA_Complex32_t bump, int m, int n, PLASMA_Complex32_t *A, int lda,
278  int bigM, int m0, int n0, unsigned long long int seed );
279 void CORE_cplrnt(int m, int n, PLASMA_Complex32_t *A, int lda,
280  int bigM, int m0, int n0, unsigned long long int seed );
281 void CORE_cpotrf(PLASMA_enum uplo, int N, PLASMA_Complex32_t *A, int LDA, int *INFO);
282 void CORE_csetvar(const PLASMA_Complex32_t *alpha, PLASMA_Complex32_t *x);
283 void CORE_cshift(int s, int m, int n, int L,
284  PLASMA_Complex32_t *A);
285 void CORE_cshiftw(int s, int cl, int m, int n, int L,
286  PLASMA_Complex32_t *A, PLASMA_Complex32_t *W);
287 int CORE_cssssm(int M1, int N1, int M2, int N2, int K, int IB,
288  PLASMA_Complex32_t *A1, int LDA1,
289  PLASMA_Complex32_t *A2, int LDA2,
290  const PLASMA_Complex32_t *L1, int LDL1,
291  const PLASMA_Complex32_t *L2, int LDL2,
292  const int *IPIV);
293 void CORE_csymm(PLASMA_enum side, PLASMA_enum uplo,
294  int M, int N,
295  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
296  const PLASMA_Complex32_t *B, int LDB,
297  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC);
298 void CORE_csyrk(PLASMA_enum uplo, PLASMA_enum trans,
299  int N, int K,
300  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
301  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC);
302 void CORE_csyr2k(PLASMA_enum uplo, PLASMA_enum trans,
303  int N, int K,
304  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
305  const PLASMA_Complex32_t *B, int LDB,
306  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC);
307 int CORE_csyssq(PLASMA_enum uplo, int N,
308  const PLASMA_Complex32_t *A, int LDA,
309  float *scale, float *sumsq);
310 void CORE_cswpab(int i, int n1, int n2,
311  PLASMA_Complex32_t *A, PLASMA_Complex32_t *work);
312 int CORE_cswptr_ontile(PLASMA_desc descA, int i1, int i2, const int *ipiv, int inc,
313  const PLASMA_Complex32_t *Akk, int ldak);
314 void CORE_ctrdalg1(int n,
315  int nb,
316  PLASMA_Complex32_t *A,
317  int lda,
318  PLASMA_Complex32_t *V,
319  PLASMA_Complex32_t *TAU,
320  int Vblksiz, int wantz,
321  int i, int sweepid, int m, int grsiz,
322  PLASMA_Complex32_t *work);
323 void CORE_ctrmm(PLASMA_enum side, PLASMA_enum uplo,
324  PLASMA_enum transA, PLASMA_enum diag,
325  int M, int N,
326  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
327  PLASMA_Complex32_t *B, int LDB);
328 void CORE_ctrsm(PLASMA_enum side, PLASMA_enum uplo,
329  PLASMA_enum transA, PLASMA_enum diag,
330  int M, int N,
331  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
332  PLASMA_Complex32_t *B, int LDB);
333 void CORE_ctrtri(PLASMA_enum uplo, PLASMA_enum diag, int N,
334  PLASMA_Complex32_t *A, int LDA, int *info);
335 int CORE_ctslqt(int M, int N, int IB,
336  PLASMA_Complex32_t *A1, int LDA1,
337  PLASMA_Complex32_t *A2, int LDA2,
338  PLASMA_Complex32_t *T, int LDT,
339  PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK);
340 int CORE_ctsmlq(PLASMA_enum side, PLASMA_enum trans,
341  int M1, int N1, int M2, int N2, int K, int IB,
342  PLASMA_Complex32_t *A1, int LDA1,
343  PLASMA_Complex32_t *A2, int LDA2,
344  const PLASMA_Complex32_t *V, int LDV,
345  const PLASMA_Complex32_t *T, int LDT,
346  PLASMA_Complex32_t *WORK, int LDWORK);
347 int CORE_ctsmlq_corner( int m1, int n1, int m2, int n2, int m3, int n3,
348  int k, int ib, int nb,
349  PLASMA_Complex32_t *A1, int lda1,
350  PLASMA_Complex32_t *A2, int lda2,
351  PLASMA_Complex32_t *A3, int lda3,
352  const PLASMA_Complex32_t *V, int ldv,
353  const PLASMA_Complex32_t *T, int ldt,
354  PLASMA_Complex32_t *WORK, int ldwork);
355 int CORE_ctsmlq_hetra1( PLASMA_enum side, PLASMA_enum trans,
356  int m1, int n1, int m2, int n2,
357  int k, int ib,
358  PLASMA_Complex32_t *A1, int lda1,
359  PLASMA_Complex32_t *A2, int lda2,
360  const PLASMA_Complex32_t *V, int ldv,
361  const PLASMA_Complex32_t *T, int ldt,
362  PLASMA_Complex32_t *WORK, int ldwork);
363 int CORE_ctsmqr(PLASMA_enum side, PLASMA_enum trans,
364  int M1, int N1, int M2, int N2, int K, int IB,
365  PLASMA_Complex32_t *A1, int LDA1,
366  PLASMA_Complex32_t *A2, int LDA2,
367  const PLASMA_Complex32_t *V, int LDV,
368  const PLASMA_Complex32_t *T, int LDT,
369  PLASMA_Complex32_t *WORK, int LDWORK);
370 int CORE_ctsmqr_corner( int m1, int n1, int m2, int n2, int m3, int n3,
371  int k, int ib, int nb,
372  PLASMA_Complex32_t *A1, int lda1,
373  PLASMA_Complex32_t *A2, int lda2,
374  PLASMA_Complex32_t *A3, int lda3,
375  const PLASMA_Complex32_t *V, int ldv,
376  const PLASMA_Complex32_t *T, int ldt,
377  PLASMA_Complex32_t *WORK, int ldwork);
378 int CORE_ctsmqr_hetra1( PLASMA_enum side, PLASMA_enum trans,
379  int m1, int n1, int m2, int n2,
380  int k, int ib,
381  PLASMA_Complex32_t *A1, int lda1,
382  PLASMA_Complex32_t *A2, int lda2,
383  const PLASMA_Complex32_t *V, int ldv,
384  const PLASMA_Complex32_t *T, int ldt,
385  PLASMA_Complex32_t *WORK, int ldwork);
386 int CORE_ctsqrt(int M, int N, int IB,
387  PLASMA_Complex32_t *A1, int LDA1,
388  PLASMA_Complex32_t *A2, int LDA2,
389  PLASMA_Complex32_t *T, int LDT,
390  PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK);
391 int CORE_ctstrf(int M, int N, int IB, int NB,
392  PLASMA_Complex32_t *U, int LDU,
393  PLASMA_Complex32_t *A, int LDA,
394  PLASMA_Complex32_t *L, int LDL,
395  int *IPIV, PLASMA_Complex32_t *WORK,
396  int LDWORK, int *INFO);
397 int CORE_cttmqr(PLASMA_enum side, PLASMA_enum trans,
398  int M1, int N1, int M2, int N2, int K, int IB,
399  PLASMA_Complex32_t *A1, int LDA1,
400  PLASMA_Complex32_t *A2, int LDA2,
401  const PLASMA_Complex32_t *V, int LDV,
402  const PLASMA_Complex32_t *T, int LDT,
403  PLASMA_Complex32_t *WORK, int LDWORK);
404 int CORE_cttqrt(int M, int N, int IB,
405  PLASMA_Complex32_t *A1, int LDA1,
406  PLASMA_Complex32_t *A2, int LDA2,
407  PLASMA_Complex32_t *T, int LDT,
408  PLASMA_Complex32_t *TAU,
409  PLASMA_Complex32_t *WORK);
410 int CORE_cttmlq(PLASMA_enum side, PLASMA_enum trans,
411  int M1, int N1, int M2, int N2, int K, int IB,
412  PLASMA_Complex32_t *A1, int LDA1,
413  PLASMA_Complex32_t *A2, int LDA2,
414  const PLASMA_Complex32_t *V, int LDV,
415  const PLASMA_Complex32_t *T, int LDT,
416  PLASMA_Complex32_t *WORK, int LDWORK);
417 int CORE_cttlqt(int M, int N, int IB,
418  PLASMA_Complex32_t *A1, int LDA1,
419  PLASMA_Complex32_t *A2, int LDA2,
420  PLASMA_Complex32_t *T, int LDT,
421  PLASMA_Complex32_t *TAU,
422  PLASMA_Complex32_t *WORK);
423 int CORE_cunmlq(PLASMA_enum side, PLASMA_enum trans,
424  int M, int N, int IB, int K,
425  const PLASMA_Complex32_t *V, int LDV,
426  const PLASMA_Complex32_t *T, int LDT,
427  PLASMA_Complex32_t *C, int LDC,
428  PLASMA_Complex32_t *WORK, int LDWORK);
429 int CORE_cunmqr(PLASMA_enum side, PLASMA_enum trans,
430  int M, int N, int K, int IB,
431  const PLASMA_Complex32_t *V, int LDV,
432  const PLASMA_Complex32_t *T, int LDT,
433  PLASMA_Complex32_t *C, int LDC,
434  PLASMA_Complex32_t *WORK, int LDWORK);
435 
439 void QUARK_CORE_scasum(Quark *quark, Quark_Task_Flags *task_flags,
440  PLASMA_enum storev, PLASMA_enum uplo, int m, int n,
441  const PLASMA_Complex32_t *A, int lda, int szeA,
442  float *work, int szeW);
443 void QUARK_CORE_scasum_f1(Quark *quark, Quark_Task_Flags *task_flags,
444  PLASMA_enum storev, PLASMA_enum uplo, int m, int n,
445  const PLASMA_Complex32_t *A, int lda, int szeA,
446  float *work, int szeW,
447  float *fake, int szeF);
448 void QUARK_CORE_cgeadd(Quark *quark, Quark_Task_Flags *task_flags,
449  int m, int n, int nb, PLASMA_Complex32_t alpha,
450  const PLASMA_Complex32_t *A, int lda,
451  PLASMA_Complex32_t *B, int ldb);
452 void QUARK_CORE_cbrdalg1(Quark *quark, Quark_Task_Flags *task_flags,
453  PLASMA_enum uplo,
454  int n, int nb,
455  PLASMA_Complex32_t *A,
456  int lda,
457  PLASMA_Complex32_t *VQ,
458  PLASMA_Complex32_t *TAUQ,
459  PLASMA_Complex32_t *VP,
460  PLASMA_Complex32_t *TAUP,
461  int Vblksiz, int wantz,
462  int i, int sweepid, int m, int grsiz,
463  int *PCOL, int *ACOL, int *MCOL);
464 void QUARK_CORE_cgelqt(Quark *quark, Quark_Task_Flags *task_flags,
465  int m, int n, int ib, int nb,
466  PLASMA_Complex32_t *A, int lda,
467  PLASMA_Complex32_t *T, int ldt);
468 void QUARK_CORE_cgemm(Quark *quark, Quark_Task_Flags *task_flags,
469  PLASMA_enum transA, PLASMA_enum transB,
470  int m, int n, int k, int nb,
471  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
472  const PLASMA_Complex32_t *B, int ldb,
473  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
474 void QUARK_CORE_cgemm2( Quark *quark, Quark_Task_Flags *task_flags,
475  PLASMA_enum transA, PLASMA_enum transB,
476  int m, int n, int k, int nb,
477  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
478  const PLASMA_Complex32_t *B, int ldb,
479  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
480 void QUARK_CORE_cgemm_f2(Quark *quark, Quark_Task_Flags *task_flags,
481  PLASMA_enum transA, PLASMA_enum transB,
482  int m, int n, int k, int nb,
483  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
484  const PLASMA_Complex32_t *B, int ldb,
485  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc,
486  PLASMA_Complex32_t *fake1, int szefake1, int flag1,
487  PLASMA_Complex32_t *fake2, int szefake2, int flag2);
488 void QUARK_CORE_cgemm_p2(Quark *quark, Quark_Task_Flags *task_flags,
489  PLASMA_enum transA, PLASMA_enum transB,
490  int m, int n, int k, int nb,
491  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
492  const PLASMA_Complex32_t **B, int ldb,
493  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
494 void QUARK_CORE_cgemm_p2f1(Quark *quark, Quark_Task_Flags *task_flags,
495  PLASMA_enum transA, PLASMA_enum transB,
496  int m, int n, int k, int nb,
497  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
498  const PLASMA_Complex32_t **B, int ldb,
499  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc,
500  PLASMA_Complex32_t *fake1, int szefake1, int flag1);
501 void QUARK_CORE_cgemm_p3(Quark *quark, Quark_Task_Flags *task_flags,
502  PLASMA_enum transA, PLASMA_enum transB,
503  int m, int n, int k, int nb,
504  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
505  const PLASMA_Complex32_t *B, int ldb,
506  PLASMA_Complex32_t beta, PLASMA_Complex32_t **C, int ldc);
507 void QUARK_CORE_cgemm_tile(Quark *quark, Quark_Task_Flags *task_flags,
508  PLASMA_enum transA, PLASMA_enum transB,
509  int m, int n, int k, int nb,
510  const PLASMA_Complex32_t *alpha, const PLASMA_Complex32_t *A, int lda,
511  const PLASMA_Complex32_t *B, int ldb,
512  const PLASMA_Complex32_t *beta, PLASMA_Complex32_t *C, int ldc,
513  const PLASMA_Complex32_t *Alock,
514  const PLASMA_Complex32_t *Block,
515  const PLASMA_Complex32_t *Clock);
516 void QUARK_CORE_cgemv(Quark *quark, Quark_Task_Flags *task_flags,
517  PLASMA_enum trans, int m, int n,
518  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
519  const PLASMA_Complex32_t *x, int incx,
520  PLASMA_Complex32_t beta, PLASMA_Complex32_t *y, int incy);
521 void QUARK_CORE_cgemv_tile(Quark *quark, Quark_Task_Flags *task_flags,
522  PLASMA_enum trans,
523  int m, int n,
524  const PLASMA_Complex32_t *alpha, const PLASMA_Complex32_t *A, int lda,
525  const PLASMA_Complex32_t *x, int incx,
526  const PLASMA_Complex32_t *beta, PLASMA_Complex32_t *y, int incy,
527  const PLASMA_Complex32_t *Alock,
528  const PLASMA_Complex32_t *xlock,
529  const PLASMA_Complex32_t *ylock);
530 void QUARK_CORE_cgeqp3_init( Quark *quark, Quark_Task_Flags *task_flags,
531  int n, int *jpvt );
532 void QUARK_CORE_cgeqp3_larfg(Quark *quark, Quark_Task_Flags *task_flags,
533  PLASMA_desc A, int ii, int jj, int i, int j,
534  PLASMA_Complex32_t *tau, PLASMA_Complex32_t *beta );
535 void QUARK_CORE_cgeqp3_norms( Quark *quark, Quark_Task_Flags *task_flags,
536  PLASMA_desc A, int ioff, int joff, float *norms1, float *norms2 );
537 void QUARK_CORE_cgeqp3_pivot( Quark *quark, Quark_Task_Flags *task_flags,
538  PLASMA_desc A,
539  PLASMA_Complex32_t *F, int ldf,
540  int jj, int k, int *jpvt,
541  float *norms1, float *norms2, int *info );
542 void QUARK_CORE_cgeqp3_tntpiv(Quark *quark, Quark_Task_Flags *task_flags,
543  int m, int n, int nb,
544  PLASMA_Complex32_t *A, int lda,
545  int *IPIV,
546  PLASMA_sequence *sequence, PLASMA_request *request,
547  PLASMA_bool check_info, int iinfo);
548 void QUARK_CORE_cgeqp3_update( Quark *quark, Quark_Task_Flags *task_flags,
549  PLASMA_Complex32_t *Ajj, int lda1,
550  PLASMA_Complex32_t *Ajk, int lda2,
551  PLASMA_Complex32_t *Fk, int ldf,
552  int joff, int k, int koff, int nb,
553  float *norms1, float *norms2, int *info );
554 void QUARK_CORE_cgeqrt(Quark *quark, Quark_Task_Flags *task_flags,
555  int m, int n, int ib, int nb,
556  PLASMA_Complex32_t *A, int lda,
557  PLASMA_Complex32_t *T, int ldt);
558 void QUARK_CORE_cgessm(Quark *quark, Quark_Task_Flags *task_flags,
559  int m, int n, int k, int ib, int nb,
560  const int *IPIV,
561  const PLASMA_Complex32_t *L, int ldl,
562  PLASMA_Complex32_t *A, int lda);
563 void QUARK_CORE_cgessq_f1( Quark *quark, Quark_Task_Flags *task_flags,
564  int m, int n, const PLASMA_Complex32_t *A, int lda,
565  float *scale, float *sumsq,
566  float *fake, int szeF, int paramF );
567 void QUARK_CORE_cgetrf(Quark *quark, Quark_Task_Flags *task_flags,
568  int m, int n, int nb,
569  PLASMA_Complex32_t *A, int lda,
570  int *IPIV,
571  PLASMA_sequence *sequence, PLASMA_request *request,
572  PLASMA_bool check_info, int iinfo);
573 void QUARK_CORE_cgetrf_incpiv(Quark *quark, Quark_Task_Flags *task_flags,
574  int m, int n, int ib, int nb,
575  PLASMA_Complex32_t *A, int lda,
576  int *IPIV,
577  PLASMA_sequence *sequence, PLASMA_request *request,
578  PLASMA_bool check_info, int iinfo);
579 void QUARK_CORE_cgetrf_nopiv(Quark *quark, Quark_Task_Flags *task_flags,
580  int m, int n, int ib, int nb,
581  PLASMA_Complex32_t *A, int lda,
582  PLASMA_sequence *sequence, PLASMA_request *request,
583  int iinfo);
584 void QUARK_CORE_cgetrf_reclap(Quark *quark, Quark_Task_Flags *task_flags,
585  int m, int n, int nb,
586  PLASMA_Complex32_t *A, int lda,
587  int *IPIV,
588  PLASMA_sequence *sequence, PLASMA_request *request,
589  PLASMA_bool check_info, int iinfo,
590  int nbthread);
591 void QUARK_CORE_cgetrf_rectil(Quark *quark, Quark_Task_Flags *task_flags,
592  PLASMA_desc A, PLASMA_Complex32_t *Amn, int size,
593  int *IPIV,
594  PLASMA_sequence *sequence, PLASMA_request *request,
595  PLASMA_bool check_info, int iinfo,
596  int nbthread);
597 void QUARK_CORE_cgetrip(Quark *quark, Quark_Task_Flags *task_flags,
598  int m, int n, PLASMA_Complex32_t *A, int szeA);
599 void QUARK_CORE_cgetrip_f1(Quark *quark, Quark_Task_Flags *task_flags,
600  int m, int n, PLASMA_Complex32_t *A, int szeA,
601  PLASMA_Complex32_t *fake, int szeF, int paramF);
602 void QUARK_CORE_cgetrip_f2(Quark *quark, Quark_Task_Flags *task_flags,
603  int m, int n, PLASMA_Complex32_t *A, int szeA,
604  PLASMA_Complex32_t *fake1, int szeF1, int paramF1,
605  PLASMA_Complex32_t *fake2, int szeF2, int paramF2);
606 void QUARK_CORE_chemm(Quark *quark, Quark_Task_Flags *task_flags,
607  PLASMA_enum side, PLASMA_enum uplo,
608  int m, int n, int nb,
609  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
610  const PLASMA_Complex32_t *B, int ldb,
611  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
612 void QUARK_CORE_chegst(Quark *quark, Quark_Task_Flags *task_flags,
613  int itype, PLASMA_enum uplo, int N,
614  PLASMA_Complex32_t *A, int LDA,
615  PLASMA_Complex32_t *B, int LDB,
616  PLASMA_sequence *sequence, PLASMA_request *request,
617  int iinfo);
618 void QUARK_CORE_cherk(Quark *quark, Quark_Task_Flags *task_flags,
619  PLASMA_enum uplo, PLASMA_enum trans,
620  int n, int k, int nb,
621  float alpha, const PLASMA_Complex32_t *A, int lda,
622  float beta, PLASMA_Complex32_t *C, int ldc);
623 void QUARK_CORE_cher2k(Quark *quark, Quark_Task_Flags *task_flags,
624  PLASMA_enum uplo, PLASMA_enum trans,
625  int n, int k, int nb,
626  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
627  const PLASMA_Complex32_t *B, int LDB,
628  float beta, PLASMA_Complex32_t *C, int ldc);
629 void QUARK_CORE_cherfb(Quark *quark, Quark_Task_Flags *task_flags,
630  PLASMA_enum uplo,
631  int n, int k, int ib, int nb,
632  const PLASMA_Complex32_t *A, int lda,
633  const PLASMA_Complex32_t *T, int ldt,
634  PLASMA_Complex32_t *C, int ldc);
635 void QUARK_CORE_chessq_f1( Quark *quark, Quark_Task_Flags *task_flags,
636  PLASMA_enum uplo, int n, const PLASMA_Complex32_t *A, int lda,
637  float *scale, float *sumsq,
638  float *fake, int szeF, int paramF );
639 void QUARK_CORE_clacpy(Quark *quark, Quark_Task_Flags *task_flags,
640  PLASMA_enum uplo, int m, int n, int mb,
641  const PLASMA_Complex32_t *A, int lda,
642  PLASMA_Complex32_t *B, int ldb);
643 void QUARK_CORE_clacpy_f1(Quark *quark, Quark_Task_Flags *task_flags,
644  PLASMA_enum uplo, int m, int n, int nb,
645  const PLASMA_Complex32_t *A, int lda,
646  PLASMA_Complex32_t *B, int ldb,
647  PLASMA_Complex32_t *fake1, int szefake1, int flag1);
648 void QUARK_CORE_clacpy_pivot(Quark *quark, Quark_Task_Flags *task_flags,
649  const PLASMA_desc descA,
650  PLASMA_enum direct,
651  int k1, int k2, const int *ipiv,
652  int *rankin, int *rankout,
653  PLASMA_Complex32_t *A, int lda,
654  int pos, int init);
655 void QUARK_CORE_clange(Quark *quark, Quark_Task_Flags *task_flags,
656  int norm, int M, int N,
657  const PLASMA_Complex32_t *A, int LDA, int szeA,
658  int szeW, float *result);
659 void QUARK_CORE_clange_f1(Quark *quark, Quark_Task_Flags *task_flags,
660  int norm, int M, int N,
661  const PLASMA_Complex32_t *A, int LDA, int szeA,
662  int szeW, float *result,
663  float *fake, int szeF);
664 #ifdef COMPLEX
665 void QUARK_CORE_clanhe(Quark *quark, Quark_Task_Flags *task_flags,
666  int norm, PLASMA_enum uplo, int N,
667  const PLASMA_Complex32_t *A, int LDA, int szeA,
668  int szeW, float *result);
669 void QUARK_CORE_clanhe_f1(Quark *quark, Quark_Task_Flags *task_flags,
670  int norm, PLASMA_enum uplo, int N,
671  const PLASMA_Complex32_t *A, int LDA, int szeA,
672  int szeW, float *result,
673  float *fake, int szeF);
674 #endif
675 void QUARK_CORE_clansy(Quark *quark, Quark_Task_Flags *task_flags,
676  int norm, PLASMA_enum uplo, int N,
677  const PLASMA_Complex32_t *A, int LDA, int szeA,
678  int szeW, float *result);
679 void QUARK_CORE_clansy_f1(Quark *quark, Quark_Task_Flags *task_flags,
680  int norm, PLASMA_enum uplo, int N,
681  const PLASMA_Complex32_t *A, int LDA, int szeA,
682  int szeW, float *result,
683  float *fake, int szeF);
684 void QUARK_CORE_claset(Quark *quark, Quark_Task_Flags *task_flags,
685  PLASMA_enum uplo, int n1, int n2, PLASMA_Complex32_t alpha,
686  PLASMA_Complex32_t beta, PLASMA_Complex32_t *tileA, int ldtilea);
687 void QUARK_CORE_claset2(Quark *quark, Quark_Task_Flags *task_flags,
688  PLASMA_enum uplo, int n1, int n2, PLASMA_Complex32_t alpha,
689  PLASMA_Complex32_t *tileA, int ldtilea);
690 void QUARK_CORE_claswp(Quark *quark, Quark_Task_Flags *task_flags,
691  int n, PLASMA_Complex32_t *A, int lda,
692  int i1, int i2, const int *ipiv, int inc);
693 void QUARK_CORE_claswp_f2(Quark *quark, Quark_Task_Flags *task_flags,
694  int n, PLASMA_Complex32_t *A, int lda,
695  int i1, int i2, const int *ipiv, int inc,
696  PLASMA_Complex32_t *fake1, int szefake1, int flag1,
697  PLASMA_Complex32_t *fake2, int szefake2, int flag2);
698 void QUARK_CORE_claswp_ontile(Quark *quark, Quark_Task_Flags *task_flags,
699  PLASMA_desc descA, PLASMA_Complex32_t *A,
700  int i1, int i2, const int *ipiv, int inc, PLASMA_Complex32_t *fakepanel);
701 void QUARK_CORE_claswp_ontile_f2(Quark *quark, Quark_Task_Flags *task_flags,
702  PLASMA_desc descA, PLASMA_Complex32_t *A,
703  int i1, int i2, const int *ipiv, int inc,
704  PLASMA_Complex32_t *fake1, int szefake1, int flag1,
705  PLASMA_Complex32_t *fake2, int szefake2, int flag2);
706 void QUARK_CORE_claswpc_ontile(Quark *quark, Quark_Task_Flags *task_flags,
707  PLASMA_desc descA, PLASMA_Complex32_t *A,
708  int i1, int i2, const int *ipiv, int inc, PLASMA_Complex32_t *fakepanel);
709 void QUARK_CORE_clatro(Quark *quark, Quark_Task_Flags *task_flags,
710  PLASMA_enum uplo, PLASMA_enum trans, int m, int n, int mb,
711  const PLASMA_Complex32_t *A, int lda,
712  PLASMA_Complex32_t *B, int ldb);
713 void QUARK_CORE_clatro_f1(Quark *quark, Quark_Task_Flags *task_flags,
714  PLASMA_enum uplo, PLASMA_enum trans, int m, int n, int mb,
715  const PLASMA_Complex32_t *A, int lda,
716  PLASMA_Complex32_t *B, int ldb,
717  PLASMA_Complex32_t *fake1, int szefake1, int flag1);
718 void QUARK_CORE_clauum(Quark *quark, Quark_Task_Flags *task_flags,
719  PLASMA_enum uplo, int n, int nb,
720  PLASMA_Complex32_t *A, int lda);
721 void QUARK_CORE_cplghe(Quark *quark, Quark_Task_Flags *task_flags,
722  float bump, int m, int n, PLASMA_Complex32_t *A, int lda,
723  int bigM, int m0, int n0, unsigned long long int seed );
724 void QUARK_CORE_cplgsy(Quark *quark, Quark_Task_Flags *task_flags,
725  PLASMA_Complex32_t bump, int m, int n, PLASMA_Complex32_t *A, int lda,
726  int bigM, int m0, int n0, unsigned long long int seed );
727 void QUARK_CORE_cplrnt(Quark *quark, Quark_Task_Flags *task_flags,
728  int m, int n, PLASMA_Complex32_t *A, int lda,
729  int bigM, int m0, int n0, unsigned long long int seed );
730 void QUARK_CORE_cpotrf(Quark *quark, Quark_Task_Flags *task_flags,
731  PLASMA_enum uplo, int n, int nb,
732  PLASMA_Complex32_t *A, int lda,
733  PLASMA_sequence *sequence, PLASMA_request *request,
734  int iinfo);
735 void QUARK_CORE_csetvar(Quark *quark, Quark_Task_Flags *task_flags,
736  const PLASMA_Complex32_t *alpha, PLASMA_Complex32_t *x,
737  PLASMA_Complex32_t *Alock);
738 void QUARK_CORE_cshift( Quark *quark, Quark_Task_Flags *task_flags,
739  int s, int m, int n, int L,
740  PLASMA_Complex32_t *A);
741 void QUARK_CORE_cshiftw(Quark *quark, Quark_Task_Flags *task_flags,
742  int s, int cl, int m, int n, int L,
743  PLASMA_Complex32_t *A, PLASMA_Complex32_t *W);
744 void QUARK_CORE_cssssm(Quark *quark, Quark_Task_Flags *task_flags,
745  int m1, int n1, int m2, int n2, int k, int ib, int nb,
746  PLASMA_Complex32_t *A1, int lda1,
747  PLASMA_Complex32_t *A2, int lda2,
748  const PLASMA_Complex32_t *L1, int ldl1,
749  const PLASMA_Complex32_t *L2, int ldl2,
750  const int *IPIV);
751 void QUARK_CORE_csymm(Quark *quark, Quark_Task_Flags *task_flags,
752  PLASMA_enum side, PLASMA_enum uplo,
753  int m, int n, int nb,
754  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
755  const PLASMA_Complex32_t *B, int ldb,
756  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
757 void QUARK_CORE_csyrk(Quark *quark, Quark_Task_Flags *task_flags,
758  PLASMA_enum uplo, PLASMA_enum trans,
759  int n, int k, int nb,
760  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
761  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
762 void QUARK_CORE_csyr2k(Quark *quark, Quark_Task_Flags *task_flags,
763  PLASMA_enum uplo, PLASMA_enum trans,
764  int n, int k, int nb,
765  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
766  const PLASMA_Complex32_t *B, int LDB,
767  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
768 void QUARK_CORE_csyssq_f1( Quark *quark, Quark_Task_Flags *task_flags,
769  PLASMA_enum uplo, int n, const PLASMA_Complex32_t *A, int lda,
770  float *scale, float *sumsq,
771  float *fake, int szeF, int paramF );
772 void QUARK_CORE_cswpab(Quark *quark, Quark_Task_Flags *task_flags,
773  int i, int n1, int n2,
774  PLASMA_Complex32_t *A, int szeA);
775 void QUARK_CORE_cswptr_ontile(Quark *quark, Quark_Task_Flags *task_flags,
776  PLASMA_desc descA, PLASMA_Complex32_t *Aij,
777  int i1, int i2, const int *ipiv, int inc,
778  const PLASMA_Complex32_t *Akk, int ldak);
779 void QUARK_CORE_ctrdalg1(Quark *quark, Quark_Task_Flags *task_flags,
780  int n,
781  int nb,
782  PLASMA_Complex32_t *A,
783  int lda,
784  PLASMA_Complex32_t *V,
785  PLASMA_Complex32_t *TAU,
786  int Vblksiz, int wantz,
787  int i, int sweepid, int m, int grsiz,
788  int *PCOL, int *ACOL, int *MCOL);
789 void QUARK_CORE_ctrmm(Quark *quark, Quark_Task_Flags *task_flags,
790  PLASMA_enum side, PLASMA_enum uplo, PLASMA_enum transA, PLASMA_enum diag,
791  int m, int n, int nb,
792  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
793  PLASMA_Complex32_t *B, int ldb);
794 void QUARK_CORE_ctrmm_p2(Quark *quark, Quark_Task_Flags *task_flags,
795  PLASMA_enum side, PLASMA_enum uplo, PLASMA_enum transA, PLASMA_enum diag,
796  int m, int n, int nb,
797  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
798  PLASMA_Complex32_t **B, int ldb);
799 void QUARK_CORE_ctrsm(Quark *quark, Quark_Task_Flags *task_flags,
800  PLASMA_enum side, PLASMA_enum uplo, PLASMA_enum transA, PLASMA_enum diag,
801  int m, int n, int nb,
802  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
803  PLASMA_Complex32_t *B, int ldb);
804 void QUARK_CORE_ctrtri(Quark *quark, Quark_Task_Flags *task_flags,
805  PLASMA_enum uplo, PLASMA_enum diag, int n, int nb,
806  PLASMA_Complex32_t *A, int lda,
807  PLASMA_sequence *sequence, PLASMA_request *request,
808  int iinfo);
809 void QUARK_CORE_ctslqt(Quark *quark, Quark_Task_Flags *task_flags,
810  int m, int n, int ib, int nb,
811  PLASMA_Complex32_t *A1, int lda1,
812  PLASMA_Complex32_t *A2, int lda2,
813  PLASMA_Complex32_t *T, int ldt);
814 void QUARK_CORE_ctsmlq(Quark *quark, Quark_Task_Flags *task_flags,
815  PLASMA_enum side, PLASMA_enum trans,
816  int m1, int n1, int m2, int n2, int k, int ib, int nb,
817  PLASMA_Complex32_t *A1, int lda1,
818  PLASMA_Complex32_t *A2, int lda2,
819  const PLASMA_Complex32_t *V, int ldv,
820  const PLASMA_Complex32_t *T, int ldt);
821 void QUARK_CORE_ctsmlq_hetra1(Quark *quark, Quark_Task_Flags *task_flags,
822  PLASMA_enum side, PLASMA_enum trans,
823  int m1, int n1, int m2, int n2, int k, int ib, int nb,
824  PLASMA_Complex32_t *A1, int lda1,
825  PLASMA_Complex32_t *A2, int lda2,
826  const PLASMA_Complex32_t *V, int ldv,
827  const PLASMA_Complex32_t *T, int ldt);
828 void QUARK_CORE_ctsmlq_corner(Quark *quark, Quark_Task_Flags *task_flags,
829  int m1, int n1, int m2, int n2, int m3, int n3, int k, int ib, int nb,
830  PLASMA_Complex32_t *A1, int lda1,
831  PLASMA_Complex32_t *A2, int lda2,
832  PLASMA_Complex32_t *A3, int lda3,
833  const PLASMA_Complex32_t *V, int ldv,
834  const PLASMA_Complex32_t *T, int ldt);
835 void QUARK_CORE_ctsmqr(Quark *quark, Quark_Task_Flags *task_flags,
836  PLASMA_enum side, PLASMA_enum trans,
837  int m1, int n1, int m2, int n2, int k, int ib, int nb,
838  PLASMA_Complex32_t *A1, int lda1,
839  PLASMA_Complex32_t *A2, int lda2,
840  const PLASMA_Complex32_t *V, int ldv,
841  const PLASMA_Complex32_t *T, int ldt);
842 void QUARK_CORE_ctsmqr_hetra1(Quark *quark, Quark_Task_Flags *task_flags,
843  PLASMA_enum side, PLASMA_enum trans,
844  int m1, int n1, int m2, int n2, int k, int ib, int nb,
845  PLASMA_Complex32_t *A1, int lda1,
846  PLASMA_Complex32_t *A2, int lda2,
847  const PLASMA_Complex32_t *V, int ldv,
848  const PLASMA_Complex32_t *T, int ldt);
849 void QUARK_CORE_ctsmqr_corner(Quark *quark, Quark_Task_Flags *task_flags,
850  int m1, int n1, int m2, int n2, int m3, int n3, int k, int ib, int nb,
851  PLASMA_Complex32_t *A1, int lda1,
852  PLASMA_Complex32_t *A2, int lda2,
853  PLASMA_Complex32_t *A3, int lda3,
854  const PLASMA_Complex32_t *V, int ldv,
855  const PLASMA_Complex32_t *T, int ldt);
856 void QUARK_CORE_ctsqrt(Quark *quark, Quark_Task_Flags *task_flags,
857  int m, int n, int ib, int nb,
858  PLASMA_Complex32_t *A1, int lda1,
859  PLASMA_Complex32_t *A2, int lda2,
860  PLASMA_Complex32_t *T, int ldt);
861 void QUARK_CORE_ctstrf(Quark *quark, Quark_Task_Flags *task_flags,
862  int m, int n, int ib, int nb,
863  PLASMA_Complex32_t *U, int ldu,
864  PLASMA_Complex32_t *A, int lda,
865  PLASMA_Complex32_t *L, int ldl,
866  int *IPIV,
867  PLASMA_sequence *sequence, PLASMA_request *request,
868  PLASMA_bool check_info, int iinfo);
869 void QUARK_CORE_cttmqr(Quark *quark, Quark_Task_Flags *task_flags,
870  PLASMA_enum side, PLASMA_enum trans,
871  int m1, int n1, int m2, int n2, int k, int ib, int nb,
872  PLASMA_Complex32_t *A1, int lda1,
873  PLASMA_Complex32_t *A2, int lda2,
874  const PLASMA_Complex32_t *V, int ldv,
875  const PLASMA_Complex32_t *T, int ldt);
876 void QUARK_CORE_cttqrt(Quark *quark, Quark_Task_Flags *task_flags,
877  int m, int n, int ib, int nb,
878  PLASMA_Complex32_t *A1, int lda1,
879  PLASMA_Complex32_t *A2, int lda2,
880  PLASMA_Complex32_t *T, int ldt);
881 void QUARK_CORE_cttmlq(Quark *quark, Quark_Task_Flags *task_flags,
882  PLASMA_enum side, PLASMA_enum trans,
883  int m1, int n1, int m2, int n2, int k, int ib, int nb,
884  PLASMA_Complex32_t *A1, int lda1,
885  PLASMA_Complex32_t *A2, int lda2,
886  const PLASMA_Complex32_t *V, int ldv,
887  const PLASMA_Complex32_t *T, int ldt);
888 void QUARK_CORE_cttlqt(Quark *quark, Quark_Task_Flags *task_flags,
889  int m, int n, int ib, int nb,
890  PLASMA_Complex32_t *A1, int lda1,
891  PLASMA_Complex32_t *A2, int lda2,
892  PLASMA_Complex32_t *T, int ldt);
893 void QUARK_CORE_cpamm(Quark *quark, Quark_Task_Flags *task_flags,
894  int op, PLASMA_enum side, PLASMA_enum storev,
895  int m, int n, int k, int l,
896  const PLASMA_Complex32_t *A1, int lda1,
897  PLASMA_Complex32_t *A2, int lda2,
898  const PLASMA_Complex32_t *V, int ldv,
899  PLASMA_Complex32_t *W, int ldw);
900 void QUARK_CORE_cplssq( Quark *quark, Quark_Task_Flags *task_flags,
901  int m, const float *A, float *result );
902 void QUARK_CORE_cunmlq(Quark *quark, Quark_Task_Flags *task_flags,
903  PLASMA_enum side, PLASMA_enum trans,
904  int m, int n, int ib, int nb, int k,
905  const PLASMA_Complex32_t *A, int lda,
906  const PLASMA_Complex32_t *T, int ldt,
907  PLASMA_Complex32_t *C, int ldc);
908 void QUARK_CORE_cunmqr(Quark *quark, Quark_Task_Flags *task_flags,
909  PLASMA_enum side, PLASMA_enum trans,
910  int m, int n, int k, int ib, int nb,
911  const PLASMA_Complex32_t *A, int lda,
912  const PLASMA_Complex32_t *T, int ldt,
913  PLASMA_Complex32_t *C, int ldc);
914 
918 void CORE_scasum_quark(Quark *quark);
919 void CORE_scasum_f1_quark(Quark *quark);
920 void CORE_cgeadd_quark(Quark *quark);
921 void CORE_cbrdalg1_quark(Quark *quark);
922 void CORE_cgelqt_quark(Quark *quark);
923 void CORE_cgemm_quark(Quark *quark);
924 void CORE_cgemm_tile_quark(Quark *quark);
925 void CORE_cgemv_quark(Quark *quark);
926 void CORE_cgemv_tile_quark(Quark *quark);
927 void CORE_cgeqp3_init_quark(Quark *quark);
928 void CORE_cgeqp3_larfg_quark(Quark *quark);
929 void CORE_cgeqp3_norms_quark(Quark *quark);
930 void CORE_cgeqp3_pivot_quark(Quark *quark);
931 void CORE_cgeqp3_tntpiv_quark(Quark *quark);
932 void CORE_cgeqp3_update_quark(Quark *quark);
933 void CORE_cgeqrt_quark(Quark *quark);
934 void CORE_cgessm_quark(Quark *quark);
935 void CORE_cgessq_quark(Quark *quark);
936 void CORE_cgessq_f1_quark(Quark *quark);
937 void CORE_cgetrf_quark(Quark *quark);
938 void CORE_cgetrf_incpiv_quark(Quark *quark);
939 void CORE_cgetrf_nopiv_quark(Quark* quark);
940 void CORE_cgetrf_reclap_quark(Quark *quark);
941 void CORE_cgetrf_rectil_quark(Quark* quark);
942 void CORE_cgetrip_quark(Quark *quark);
943 void CORE_cgetrip_f1_quark(Quark *quark);
944 void CORE_cgetrip_f2_quark(Quark *quark);
945 #ifdef COMPLEX
946 void CORE_chemm_quark(Quark *quark);
947 void CORE_cherk_quark(Quark *quark);
948 void CORE_cher2k_quark(Quark *quark);
949 #endif
950 void CORE_chegst_quark(Quark *quark);
951 void CORE_cherfb_quark(Quark *quark);
952 void CORE_chessq_quark(Quark *quark);
953 void CORE_chessq_f1_quark(Quark *quark);
954 void CORE_clacpy_quark(Quark *quark);
955 void CORE_clacpy_f1_quark(Quark *quark);
956 void CORE_clacpy_pivot_quark(Quark *quark);
957 void CORE_clatro_quark(Quark *quark);
958 void CORE_clatro_f1_quark(Quark *quark);
959 void CORE_clange_quark(Quark *quark);
960 void CORE_clange_f1_quark(Quark *quark);
961 #ifdef COMPLEX
962 void CORE_clanhe_quark(Quark *quark);
963 void CORE_clanhe_f1_quark(Quark *quark);
964 #endif
965 void CORE_clansy_quark(Quark *quark);
966 void CORE_clansy_f1_quark(Quark *quark);
967 void CORE_claset_quark(Quark *quark);
968 void CORE_claset2_quark(Quark *quark);
969 void CORE_clatro_quark(Quark *quark);
970 void CORE_clauum_quark(Quark *quark);
971 void CORE_cpamm_quark(Quark *quark);
972 void CORE_cplghe_quark(Quark *quark);
973 void CORE_cplgsy_quark(Quark *quark);
974 void CORE_cplrnt_quark(Quark *quark);
975 void CORE_cplssq_quark(Quark *quark);
976 void CORE_cpotrf_quark(Quark *quark);
977 void CORE_csetvar_quark(Quark *quark);
978 void CORE_cshift_quark(Quark *quark);
979 void CORE_cshiftw_quark(Quark *quark);
980 void CORE_cssssm_quark(Quark *quark);
981 void CORE_csymm_quark(Quark *quark);
982 void CORE_csyrk_quark(Quark *quark);
983 void CORE_csyr2k_quark(Quark *quark);
984 void CORE_csyssq_quark(Quark *quark);
985 void CORE_csyssq_f1_quark(Quark *quark);
986 void CORE_cswpab_quark(Quark *quark);
987 void CORE_cswptr_ontile_quark(Quark *quark);
988 void CORE_ctrdalg1_quark(Quark *quark);
989 void CORE_ctrmm_quark(Quark *quark);
990 void CORE_ctrsm_quark(Quark *quark);
991 void CORE_ctrtri_quark(Quark *quark);
992 void CORE_ctslqt_quark(Quark *quark);
993 void CORE_ctsmlq_quark(Quark *quark);
994 void CORE_ctsmlq_hetra1_quark(Quark *quark);
995 void CORE_ctsmlq_corner_quark(Quark *quark);
996 void CORE_ctsmqr_quark(Quark *quark);
997 void CORE_ctsmqr_hetra1_quark(Quark *quark);
998 void CORE_ctsmqr_corner_quark(Quark *quark);
999 void CORE_ctsqrt_quark(Quark *quark);
1000 void CORE_ctstrf_quark(Quark *quark);
1001 void CORE_cttmqr_quark(Quark *quark);
1002 void CORE_cttqrt_quark(Quark *quark);
1003 void CORE_cttmlq_quark(Quark *quark);
1004 void CORE_cttlqt_quark(Quark *quark);
1005 void CORE_cunmlq_quark(Quark *quark);
1006 void CORE_cunmqr_quark(Quark *quark);
1007 void CORE_claswp_quark(Quark* quark);
1008 void CORE_claswp_f2_quark(Quark* quark);
1009 void CORE_claswp_ontile_quark(Quark *quark);
1010 void CORE_claswp_ontile_f2_quark(Quark *quark);
1011 void CORE_claswpc_ontile_quark(Quark *quark);
1012 void CORE_ctrmm_p2_quark(Quark* quark);
1013 void CORE_cgemm_f2_quark(Quark* quark);
1014 void CORE_cgemm_p2_quark(Quark* quark);
1015 void CORE_cgemm_p2f1_quark(Quark* quark);
1016 void CORE_cgemm_p3_quark(Quark* quark);
1017 
1018 #ifdef __cplusplus
1019 }
1020 #endif
1021 
1022 #undef COMPLEX
1023 
1024 #endif