PLASMA  2.8.0
PLASMA - Parallel Linear Algebra for Scalable Multi-core Architectures
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 
28 
32 void CORE_scasum(int storev, PLASMA_enum uplo, int M, int N,
33  const PLASMA_Complex32_t *A, int lda, float *work);
34 void CORE_cbrdalg1( PLASMA_enum uplo,
35  int n,
36  int nb,
37  PLASMA_Complex32_t *A,
38  int lda,
39  PLASMA_Complex32_t *VQ,
40  PLASMA_Complex32_t *TAUQ,
41  PLASMA_Complex32_t *VP,
42  PLASMA_Complex32_t *TAUP,
43  int Vblksiz, int wantz,
44  int i, int sweepid, int m, int grsiz,
45  PLASMA_Complex32_t *work);
46 int CORE_cgbelr(PLASMA_enum uplo, int N,
47  PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU,
48  int st, int ed, int eltsize);
49 int CORE_cgbrce(PLASMA_enum uplo, int N,
50  PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU,
51  int st, int ed, int eltsize);
52 int CORE_cgblrx(PLASMA_enum uplo, int N,
53  PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU,
54  int st, int ed, int eltsize);
55 int CORE_cgeadd(PLASMA_enum trans, int M, int N,
56  PLASMA_Complex32_t alpha,
57  const PLASMA_Complex32_t *A, int LDA,
58  PLASMA_Complex32_t beta,
59  PLASMA_Complex32_t *B, int LDB);
60 int CORE_cgelqt(int M, int N, int IB,
61  PLASMA_Complex32_t *A, int LDA,
62  PLASMA_Complex32_t *T, int LDT,
63  PLASMA_Complex32_t *TAU,
64  PLASMA_Complex32_t *WORK);
65 void CORE_cgemm(PLASMA_enum transA, PLASMA_enum transB,
66  int M, int N, int K,
67  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
68  const PLASMA_Complex32_t *B, int LDB,
69  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC);
70 void CORE_cgemv(PLASMA_enum trans, int M, int N,
71  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
72  const PLASMA_Complex32_t *x, int incx,
73  PLASMA_Complex32_t beta, PLASMA_Complex32_t *y, int incy);
74 void CORE_cgeqp3_init( int n, int *jpvt );
75 void CORE_cgeqp3_larfg( PLASMA_desc A, int ii, int jj, int i, int j,
76  PLASMA_Complex32_t *tau, PLASMA_Complex32_t *beta );
77 void CORE_cgeqp3_norms( PLASMA_desc A, int ioff, int joff, float *norms1, float *norms2 );
78 void CORE_cgeqp3_pivot( PLASMA_desc A, PLASMA_Complex32_t *F, int ldf,
79  int jj, int k, int *jpvt,
80  float *norms1, float *norms2, int *info );
81 int CORE_cgeqp3_tntpiv(int m, int n,
82  PLASMA_Complex32_t *A, int lda,
83  int *IPIV, PLASMA_Complex32_t *tau,
84  int *iwork);
85 void CORE_cgeqp3_update( const PLASMA_Complex32_t *Ajj, int lda1,
86  PLASMA_Complex32_t *Ajk, int lda2,
87  const PLASMA_Complex32_t *Fk, int ldf,
88  int joff, int k, int koff, int nb,
89  float *norms1, float *norms2,
90  int *info );
91 int CORE_cgeqrt(int M, int N, int IB,
92  PLASMA_Complex32_t *A, int LDA,
93  PLASMA_Complex32_t *T, int LDT,
94  PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK);
95 int CORE_cgessm(int M, int N, int K, int IB,
96  const int *IPIV,
97  const PLASMA_Complex32_t *L, int LDL,
98  PLASMA_Complex32_t *A, int LDA);
99 int CORE_cgessq(int M, int N,
100  const PLASMA_Complex32_t *A, int LDA,
101  float *scale, float *sumsq);
102 int CORE_cgetf2_nopiv(int m, int n,
103  PLASMA_Complex32_t *A, int lda);
104 int CORE_cgetrf(int M, int N,
105  PLASMA_Complex32_t *A, int LDA,
106  int *IPIV, int *INFO);
107 int CORE_cgetrf_incpiv(int M, int N, int IB,
108  PLASMA_Complex32_t *A, int LDA,
109  int *IPIV, int *INFO);
110 int CORE_cgetrf_nopiv(int m, int n, int ib,
111  PLASMA_Complex32_t *A, int lda);
112 int CORE_cgetrf_reclap(CORE_cgetrf_data_t *data, int M, int N,
113  PLASMA_Complex32_t *A, int LDA,
114  int *IPIV, int *info);
115 CORE_cgetrf_data_t *CORE_cgetrf_reclap_init(int nbthrd);
116 int CORE_cgetrf_rectil(CORE_cgetrf_data_t *data, const PLASMA_desc A, int *IPIV, int *info);
117 CORE_cgetrf_data_t *CORE_cgetrf_rectil_init(int nbthrd);
118 void CORE_cgetrip(int m, int n, PLASMA_Complex32_t *A,
119  PLASMA_Complex32_t *work);
120 int CORE_chbelr(PLASMA_enum uplo, int N,
121  PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU,
122  int st, int ed, int eltsize);
123 int CORE_chblrx(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_chbrce(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 void CORE_chbtype1cb(int N, int NB,
130  PLASMA_Complex32_t *A, int LDA,
131  PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU,
132  int st, int ed, int sweep, int Vblksiz, int WANTZ,
133  PLASMA_Complex32_t *WORK);
134 void CORE_chbtype2cb(int N, int NB,
135  PLASMA_Complex32_t *A, int LDA,
136  PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU,
137  int st, int ed, int sweep, int Vblksiz, int WANTZ,
138  PLASMA_Complex32_t *WORK);
139 void CORE_chbtype3cb(int N, int NB,
140  PLASMA_Complex32_t *A, int LDA,
141  const PLASMA_Complex32_t *V, const PLASMA_Complex32_t *TAU,
142  int st, int ed, int sweep, int Vblksiz, int WANTZ,
143  PLASMA_Complex32_t *WORK);
144 void CORE_cgbtype1cb(PLASMA_enum uplo, int N, int NB,
145  PLASMA_Complex32_t *A, int LDA,
146  PLASMA_Complex32_t *VQ, PLASMA_Complex32_t *TAUQ,
147  PLASMA_Complex32_t *VP, PLASMA_Complex32_t *TAUP,
148  int st, int ed, int sweep, int Vblksiz, int WANTZ,
149  PLASMA_Complex32_t *WORK);
150 void CORE_cgbtype2cb(PLASMA_enum uplo, int N, int NB,
151  PLASMA_Complex32_t *A, int LDA,
152  PLASMA_Complex32_t *VQ, PLASMA_Complex32_t *TAUQ,
153  PLASMA_Complex32_t *VP, PLASMA_Complex32_t *TAUP,
154  int st, int ed, int sweep, int Vblksiz, int WANTZ,
155  PLASMA_Complex32_t *WORK);
156 void CORE_cgbtype3cb(PLASMA_enum uplo, int N, int NB,
157  PLASMA_Complex32_t *A, int LDA,
158  PLASMA_Complex32_t *VQ, PLASMA_Complex32_t *TAUQ,
159  PLASMA_Complex32_t *VP, PLASMA_Complex32_t *TAUP,
160  int st, int ed, int sweep, int Vblksiz, int WANTZ,
161  PLASMA_Complex32_t *WORK);
162 void CORE_chegst(int itype, PLASMA_enum uplo, int N,
163  PLASMA_Complex32_t *A, int LDA,
164  PLASMA_Complex32_t *B, int LDB, int *INFO);
165 #ifdef COMPLEX
166 void CORE_chemm(PLASMA_enum side, PLASMA_enum uplo,
167  int M, int N,
168  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
169  const PLASMA_Complex32_t *B, int LDB,
170  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC);
171 void CORE_cherk(PLASMA_enum uplo, PLASMA_enum trans,
172  int N, int K,
173  float alpha, const PLASMA_Complex32_t *A, int LDA,
174  float beta, PLASMA_Complex32_t *C, int LDC);
175 void CORE_cher2k(PLASMA_enum uplo, PLASMA_enum trans,
176  int N, int K,
177  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
178  const PLASMA_Complex32_t *B, int LDB,
179  float beta, PLASMA_Complex32_t *C, int LDC);
180 int CORE_chessq(PLASMA_enum uplo, int N,
181  const PLASMA_Complex32_t *A, int LDA,
182  float *scale, float *sumsq);
183 #endif
184 int CORE_cherfb(PLASMA_enum uplo, int N, int K, int IB, int NB,
185  const PLASMA_Complex32_t *A, int LDA,
186  const PLASMA_Complex32_t *T, int LDT,
187  PLASMA_Complex32_t *C, int LDC,
188  PLASMA_Complex32_t *WORK, int LDWORK);
189 void CORE_clacpy(PLASMA_enum uplo, int M, int N,
190  const PLASMA_Complex32_t *A, int LDA,
191  PLASMA_Complex32_t *B, int LDB);
192 int CORE_clacpy_pivot( const PLASMA_desc descA,
193  PLASMA_enum direct,
194  int k1, int k2, const int *ipiv,
195  int *rankin, int *rankout,
196  PLASMA_Complex32_t *A, int lda,
197  int init);
198 void CORE_clange(int norm, int M, int N,
199  const PLASMA_Complex32_t *A, int LDA,
200  float *work, float *normA);
201 #ifdef COMPLEX
202 void CORE_clanhe(int norm, PLASMA_enum uplo, int N,
203  const PLASMA_Complex32_t *A, int LDA,
204  float *work, float *normA);
205 #endif
206 void CORE_clansy(int norm, PLASMA_enum uplo, int N,
207  const PLASMA_Complex32_t *A, int LDA,
208  float *work, float *normA);
209 void CORE_clantr(PLASMA_enum norm, PLASMA_enum uplo, PLASMA_enum diag,
210  int M, int N,
211  const PLASMA_Complex32_t *A, int LDA,
212  float *work, float *normA);
213 int CORE_clarfb_gemm(PLASMA_enum side, PLASMA_enum trans, PLASMA_enum direct, PLASMA_enum storev,
214  int M, int N, int K,
215  const PLASMA_Complex32_t *V, int LDV,
216  const PLASMA_Complex32_t *T, int LDT,
217  PLASMA_Complex32_t *C, int LDC,
218  PLASMA_Complex32_t *WORK, int LDWORK);
219 int CORE_clarfx2(PLASMA_enum side, int N,
220  PLASMA_Complex32_t V,
221  PLASMA_Complex32_t TAU,
222  PLASMA_Complex32_t *C1, int LDC1,
223  PLASMA_Complex32_t *C2, int LDC2);
224 int CORE_clarfx2c(PLASMA_enum uplo,
225  PLASMA_Complex32_t V,
226  PLASMA_Complex32_t TAU,
227  PLASMA_Complex32_t *C1,
228  PLASMA_Complex32_t *C2,
229  PLASMA_Complex32_t *C3);
230 int CORE_clarfx2ce(PLASMA_enum uplo,
231  PLASMA_Complex32_t *V,
232  PLASMA_Complex32_t *TAU,
233  PLASMA_Complex32_t *C1,
234  PLASMA_Complex32_t *C2,
235  PLASMA_Complex32_t *C3);
236 void CORE_clarfy(int N,
237  PLASMA_Complex32_t *A, int LDA,
238  const PLASMA_Complex32_t *V,
239  const PLASMA_Complex32_t *TAU,
240  PLASMA_Complex32_t *WORK);
241 int CORE_clascal(PLASMA_enum uplo, int m, int n,
242  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda);
243 void CORE_claset(PLASMA_enum uplo, int n1, int n2,
244  PLASMA_Complex32_t alpha, PLASMA_Complex32_t beta,
245  PLASMA_Complex32_t *tileA, int ldtilea);
246 void CORE_claset2(PLASMA_enum uplo, int n1, int n2, PLASMA_Complex32_t alpha,
247  PLASMA_Complex32_t *tileA, int ldtilea);
248 void CORE_claswp(int N, PLASMA_Complex32_t *A, int LDA,
249  int I1, int I2, const int *IPIV, int INC);
250 int CORE_claswp_ontile( PLASMA_desc descA, int i1, int i2, const int *ipiv, int inc);
251 int CORE_claswpc_ontile(PLASMA_desc descA, int i1, int i2, const int *ipiv, int inc);
252 int CORE_clatro(PLASMA_enum uplo, PLASMA_enum trans,
253  int M, int N,
254  const PLASMA_Complex32_t *A, int LDA,
255  PLASMA_Complex32_t *B, int LDB);
256 void CORE_clauum(PLASMA_enum uplo, int N, PLASMA_Complex32_t *A, int LDA);
257 int CORE_cpamm(int op, PLASMA_enum side, PLASMA_enum storev,
258  int M, int N, int K, int L,
259  const PLASMA_Complex32_t *A1, int LDA1,
260  PLASMA_Complex32_t *A2, int LDA2,
261  const PLASMA_Complex32_t *V, int LDV,
262  PLASMA_Complex32_t *W, int LDW);
263 int CORE_cparfb(PLASMA_enum side, PLASMA_enum trans, PLASMA_enum direct, PLASMA_enum storev,
264  int M1, int N1, int M2, int N2, int K, int L,
265  PLASMA_Complex32_t *A1, int LDA1,
266  PLASMA_Complex32_t *A2, int LDA2,
267  const PLASMA_Complex32_t *V, int LDV,
268  const PLASMA_Complex32_t *T, int LDT,
269  PLASMA_Complex32_t *WORK, int LDWORK);
270 int CORE_cpemv(PLASMA_enum trans, PLASMA_enum storev,
271  int M, int N, int L,
272  PLASMA_Complex32_t ALPHA,
273  const PLASMA_Complex32_t *A, int LDA,
274  const PLASMA_Complex32_t *X, int INCX,
275  PLASMA_Complex32_t BETA,
276  PLASMA_Complex32_t *Y, int INCY,
277  PLASMA_Complex32_t *WORK);
278 void CORE_cplghe(float bump, int m, int n, PLASMA_Complex32_t *A, int lda,
279  int bigM, int m0, int n0, unsigned long long int seed );
280 void CORE_cplgsy(PLASMA_Complex32_t bump, int m, int n, PLASMA_Complex32_t *A, int lda,
281  int bigM, int m0, int n0, unsigned long long int seed );
282 void CORE_cplrnt(int m, int n, PLASMA_Complex32_t *A, int lda,
283  int bigM, int m0, int n0, unsigned long long int seed );
284 int CORE_cpltmg(PLASMA_enum mtxtype, int m, int n, PLASMA_Complex32_t *A, int lda,
285  int gM, int gN, int m0, int n0, unsigned long long int seed );
286 int CORE_cpltmg_chebvand( int M, int N, PLASMA_Complex32_t *A, int LDA,
287  int gN, int m0, int n0,
288  PLASMA_Complex32_t *W );
289 int CORE_cpltmg_circul( int M, int N, PLASMA_Complex32_t *A, int LDA,
290  int gM, int m0, int n0,
291  const PLASMA_Complex32_t *V );
292 void CORE_cpltmg_condexq( int M, int N, PLASMA_Complex32_t *Q, int LDQ );
293 void CORE_cpltmg_fiedler(int m, int n,
294  const PLASMA_Complex32_t *X, int incX,
295  const PLASMA_Complex32_t *Y, int incY,
296  PLASMA_Complex32_t *A, int lda);
297 int CORE_cpltmg_hankel( PLASMA_enum uplo, int M, int N, PLASMA_Complex32_t *A, int LDA,
298  int m0, int n0, int nb,
299  const PLASMA_Complex32_t *V1,
300  const PLASMA_Complex32_t *V2 );
301 void CORE_cpltmg_toeppd1( int gM, int m0, int M, PLASMA_Complex32_t *W,
302  unsigned long long int seed );
303 void CORE_cpltmg_toeppd2( int M, int N, int K, int m0, int n0,
304  const PLASMA_Complex32_t *W,
305  PLASMA_Complex32_t *A, int LDA );
306 void CORE_cpotrf(PLASMA_enum uplo, int N, PLASMA_Complex32_t *A, int LDA, int *INFO);
307 void CORE_csetvar(const PLASMA_Complex32_t *alpha, PLASMA_Complex32_t *x);
308 void CORE_cshift(int s, int m, int n, int L,
309  PLASMA_Complex32_t *A);
310 void CORE_cshiftw(int s, int cl, int m, int n, int L,
311  PLASMA_Complex32_t *A, PLASMA_Complex32_t *W);
312 int CORE_cssssm(int M1, int N1, int M2, int N2, int K, int IB,
313  PLASMA_Complex32_t *A1, int LDA1,
314  PLASMA_Complex32_t *A2, int LDA2,
315  const PLASMA_Complex32_t *L1, int LDL1,
316  const PLASMA_Complex32_t *L2, int LDL2,
317  const int *IPIV);
318 int CORE_cstedc(PLASMA_enum compz, int n,
319  float *D, float *E,
320  PLASMA_Complex32_t *Z, int LDZ,
321  PLASMA_Complex32_t *WORK, int LWORK,
322 #ifdef COMPLEX
323  float *RWORK, int LRWORK,
324 #endif
325  int *IWORK, int LIWORK);
326 int CORE_csteqr(PLASMA_enum compz, int n,
327  float *D, float *E,
328  PLASMA_Complex32_t *Z, int LDZ,
329  float *WORK);
330 void CORE_csymm(PLASMA_enum side, PLASMA_enum uplo,
331  int M, int N,
332  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
333  const PLASMA_Complex32_t *B, int LDB,
334  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC);
335 void CORE_csyrk(PLASMA_enum uplo, PLASMA_enum trans,
336  int N, int K,
337  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
338  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC);
339 void CORE_csyr2k(PLASMA_enum uplo, PLASMA_enum trans,
340  int N, int K,
341  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
342  const PLASMA_Complex32_t *B, int LDB,
343  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC);
344 int CORE_csyssq(PLASMA_enum uplo, int N,
345  const PLASMA_Complex32_t *A, int LDA,
346  float *scale, float *sumsq);
347 void CORE_cswpab(int i, int n1, int n2,
348  PLASMA_Complex32_t *A, PLASMA_Complex32_t *work);
349 int CORE_cswptr_ontile(PLASMA_desc descA, int i1, int i2, const int *ipiv, int inc,
350  const PLASMA_Complex32_t *Akk, int ldak);
351 int CORE_ctradd(PLASMA_enum uplo, PLASMA_enum trans, int M, int N,
352  PLASMA_Complex32_t alpha,
353  const PLASMA_Complex32_t *A, int LDA,
354  PLASMA_Complex32_t beta,
355  PLASMA_Complex32_t *B, int LDB);
356 void CORE_ctrasm(PLASMA_enum storev, PLASMA_enum uplo, PLASMA_enum diag,
357  int M, int N, const PLASMA_Complex32_t *A, int lda, float *work);
358 void CORE_ctrdalg1(int n,
359  int nb,
360  PLASMA_Complex32_t *A,
361  int lda,
362  PLASMA_Complex32_t *V,
363  PLASMA_Complex32_t *TAU,
364  int Vblksiz, int wantz,
365  int i, int sweepid, int m, int grsiz,
366  PLASMA_Complex32_t *work);
367 void CORE_ctrmm(PLASMA_enum side, PLASMA_enum uplo,
368  PLASMA_enum transA, PLASMA_enum diag,
369  int M, int N,
370  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
371  PLASMA_Complex32_t *B, int LDB);
372 void CORE_ctrsm(PLASMA_enum side, PLASMA_enum uplo,
373  PLASMA_enum transA, PLASMA_enum diag,
374  int M, int N,
375  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA,
376  PLASMA_Complex32_t *B, int LDB);
377 int CORE_ctrssq(PLASMA_enum uplo, PLASMA_enum diag, int M, int N,
378  const PLASMA_Complex32_t *A, int LDA,
379  float *scale, float *sumsq);
380 void CORE_ctrtri(PLASMA_enum uplo, PLASMA_enum diag, int N,
381  PLASMA_Complex32_t *A, int LDA, int *info);
382 int CORE_ctslqt(int M, int N, int IB,
383  PLASMA_Complex32_t *A1, int LDA1,
384  PLASMA_Complex32_t *A2, int LDA2,
385  PLASMA_Complex32_t *T, int LDT,
386  PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK);
387 int CORE_ctsmlq(PLASMA_enum side, PLASMA_enum trans,
388  int M1, int N1, int M2, int N2, int K, int IB,
389  PLASMA_Complex32_t *A1, int LDA1,
390  PLASMA_Complex32_t *A2, int LDA2,
391  const PLASMA_Complex32_t *V, int LDV,
392  const PLASMA_Complex32_t *T, int LDT,
393  PLASMA_Complex32_t *WORK, int LDWORK);
394 int CORE_ctsmlq_corner( int m1, int n1, int m2, int n2, int m3, int n3,
395  int k, int ib, int nb,
396  PLASMA_Complex32_t *A1, int lda1,
397  PLASMA_Complex32_t *A2, int lda2,
398  PLASMA_Complex32_t *A3, int lda3,
399  const PLASMA_Complex32_t *V, int ldv,
400  const PLASMA_Complex32_t *T, int ldt,
401  PLASMA_Complex32_t *WORK, int ldwork);
402 int CORE_ctsmlq_hetra1( PLASMA_enum side, PLASMA_enum trans,
403  int m1, int n1, int m2, int n2,
404  int k, int ib,
405  PLASMA_Complex32_t *A1, int lda1,
406  PLASMA_Complex32_t *A2, int lda2,
407  const PLASMA_Complex32_t *V, int ldv,
408  const PLASMA_Complex32_t *T, int ldt,
409  PLASMA_Complex32_t *WORK, int ldwork);
410 int CORE_ctsmqr(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_ctsmqr_corner( int m1, int n1, int m2, int n2, int m3, int n3,
418  int k, int ib, int nb,
419  PLASMA_Complex32_t *A1, int lda1,
420  PLASMA_Complex32_t *A2, int lda2,
421  PLASMA_Complex32_t *A3, int lda3,
422  const PLASMA_Complex32_t *V, int ldv,
423  const PLASMA_Complex32_t *T, int ldt,
424  PLASMA_Complex32_t *WORK, int ldwork);
425 int CORE_ctsmqr_hetra1( PLASMA_enum side, PLASMA_enum trans,
426  int m1, int n1, int m2, int n2,
427  int k, int ib,
428  PLASMA_Complex32_t *A1, int lda1,
429  PLASMA_Complex32_t *A2, int lda2,
430  const PLASMA_Complex32_t *V, int ldv,
431  const PLASMA_Complex32_t *T, int ldt,
432  PLASMA_Complex32_t *WORK, int ldwork);
433 int CORE_ctsqrt(int M, int N, int IB,
434  PLASMA_Complex32_t *A1, int LDA1,
435  PLASMA_Complex32_t *A2, int LDA2,
436  PLASMA_Complex32_t *T, int LDT,
437  PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK);
438 int CORE_ctstrf(int M, int N, int IB, int NB,
439  PLASMA_Complex32_t *U, int LDU,
440  PLASMA_Complex32_t *A, int LDA,
441  PLASMA_Complex32_t *L, int LDL,
442  int *IPIV, PLASMA_Complex32_t *WORK,
443  int LDWORK, int *INFO);
444 int CORE_cttmqr(PLASMA_enum side, PLASMA_enum trans,
445  int M1, int N1, int M2, int N2, int K, int IB,
446  PLASMA_Complex32_t *A1, int LDA1,
447  PLASMA_Complex32_t *A2, int LDA2,
448  const PLASMA_Complex32_t *V, int LDV,
449  const PLASMA_Complex32_t *T, int LDT,
450  PLASMA_Complex32_t *WORK, int LDWORK);
451 int CORE_cttqrt(int M, int N, int IB,
452  PLASMA_Complex32_t *A1, int LDA1,
453  PLASMA_Complex32_t *A2, int LDA2,
454  PLASMA_Complex32_t *T, int LDT,
455  PLASMA_Complex32_t *TAU,
456  PLASMA_Complex32_t *WORK);
457 int CORE_cttmlq(PLASMA_enum side, PLASMA_enum trans,
458  int M1, int N1, int M2, int N2, int K, int IB,
459  PLASMA_Complex32_t *A1, int LDA1,
460  PLASMA_Complex32_t *A2, int LDA2,
461  const PLASMA_Complex32_t *V, int LDV,
462  const PLASMA_Complex32_t *T, int LDT,
463  PLASMA_Complex32_t *WORK, int LDWORK);
464 int CORE_cttlqt(int M, int N, int IB,
465  PLASMA_Complex32_t *A1, int LDA1,
466  PLASMA_Complex32_t *A2, int LDA2,
467  PLASMA_Complex32_t *T, int LDT,
468  PLASMA_Complex32_t *TAU,
469  PLASMA_Complex32_t *WORK);
470 int CORE_cunmlq(PLASMA_enum side, PLASMA_enum trans,
471  int M, int N, int IB, int K,
472  const PLASMA_Complex32_t *V, int LDV,
473  const PLASMA_Complex32_t *T, int LDT,
474  PLASMA_Complex32_t *C, int LDC,
475  PLASMA_Complex32_t *WORK, int LDWORK);
476 int CORE_cunmqr(PLASMA_enum side, PLASMA_enum trans,
477  int M, int N, int K, int IB,
478  const PLASMA_Complex32_t *V, int LDV,
479  const PLASMA_Complex32_t *T, int LDT,
480  PLASMA_Complex32_t *C, int LDC,
481  PLASMA_Complex32_t *WORK, int LDWORK);
482 
483 #ifndef COMPLEX
484 void CORE_slaed2_computeK(int *K, int n, int n1,
485  float *beta, float *D, float *Q, int LDQ,
486  float *Z, float *DLAMBDA, float *W,
487  int *INDX, int *INDXC, int *INDXP, int *INDXQ,
488  int *COLTYP);
489 void CORE_slaed2_compressq(int n, int n1, const int *INDX, const int *ctot,
490  const float *Q, int LDQ, float *Q2,
491  int start, int end);
492 void CORE_slaed2_copydef(int n, int n1, int K, const int *ctot,
493  float *Q, int LDQ, const float *Q2,
494  int start, int end);
495 int CORE_slaed4(int n, int K,
496  float *D, float beta,
497  float *Q, int LDQ,
498  const float *D0, const float *Z,
499  const int *INDX,
500  int start, int end );
501 void CORE_slaed3_computeW(int n, int K,
502  const float *Q, int LDQ,
503  const float *DLAMBDA, float *W,
504  const int *INDX,
505  int start, int end);
506 void CORE_slaed3_reduceW(int n, int n1, int K, int l,
507  const float *Q, int LDQ,
508  const float *Wred, float *W);
509 void CORE_slaed3_computevectors(int K, int il_nondef, int iu_nondef,
510  float *Q, int LDQ, float *W, float *S,
511  const int *INDXC,
512  int start, int end);
513 void CORE_slaed3_merge( int n, int K, float *D, int *INDXQ );
514 void CORE_slaed3_updatevectors(int op, int wsmode, int n, int n1, int K,
515  int il_nondef, int iu_nondef,
516  float *Q, int ldq, float *Q2,
517  const int *ctot, float *WORK, int start, int end);
518 #endif
519 void CORE_cswap(int m, int n, PLASMA_Complex32_t *Q, int ldq,
520  const PLASMA_Complex32_t *work, const int *perm,
521  int start, int end);
522 int CORE_clascl(PLASMA_enum type, int kl, int ku, float cfrom, float cto,
523  int m, int n, PLASMA_Complex32_t *A, int lda);
524 #ifdef COMPLEX
525 int CORE_slag2c(int m, int n, const float *Q, int LDQ,
526  PLASMA_Complex32_t *Z, int LDZ);
527 #endif
528 
529 #ifndef COMPLEX
530 void CORE_slaed3_freebigwork(int oper, float **WORK);
531 void CORE_slaed0_betaapprox(int subpbs, const int *subpbs_info,
532  float *D, const float *E);
533 int CORE_slapst(PLASMA_enum type, int n,
534  const float *D, int *INDX);
535 #endif
536 
537 #if defined(QUARK_H)
538 
541 void QUARK_CORE_scasum(Quark *quark, Quark_Task_Flags *task_flags,
542  PLASMA_enum storev, PLASMA_enum uplo, int m, int n,
543  const PLASMA_Complex32_t *A, int lda, int szeA,
544  float *work, int szeW);
545 void QUARK_CORE_scasum_f1(Quark *quark, Quark_Task_Flags *task_flags,
546  PLASMA_enum storev, PLASMA_enum uplo, int m, int n,
547  const PLASMA_Complex32_t *A, int lda, int szeA,
548  float *work, int szeW,
549  float *fake, int szeF);
550 void QUARK_CORE_cgeadd(Quark *quark, Quark_Task_Flags *task_flags,
551  PLASMA_enum trans, int m, int n, int nb,
552  PLASMA_Complex32_t alpha,
553  const PLASMA_Complex32_t *A, int lda,
554  PLASMA_Complex32_t beta,
555  PLASMA_Complex32_t *B, int ldb);
556 void QUARK_CORE_cbrdalg1(Quark *quark, Quark_Task_Flags *task_flags,
557  PLASMA_enum uplo,
558  int n, int nb,
559  PLASMA_Complex32_t *A,
560  int lda,
561  PLASMA_Complex32_t *VQ,
562  PLASMA_Complex32_t *TAUQ,
563  PLASMA_Complex32_t *VP,
564  PLASMA_Complex32_t *TAUP,
565  int Vblksiz, int wantz,
566  int i, int sweepid, int m, int grsiz,
567  int *PCOL, int *ACOL, int *MCOL);
568 void QUARK_CORE_cgelqt(Quark *quark, Quark_Task_Flags *task_flags,
569  int m, int n, int ib, int nb,
570  PLASMA_Complex32_t *A, int lda,
571  PLASMA_Complex32_t *T, int ldt);
572 void QUARK_CORE_cgemm(Quark *quark, Quark_Task_Flags *task_flags,
573  PLASMA_enum transA, PLASMA_enum transB,
574  int m, int n, int k, int nb,
575  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
576  const PLASMA_Complex32_t *B, int ldb,
577  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
578 void QUARK_CORE_cgemm2( Quark *quark, Quark_Task_Flags *task_flags,
579  PLASMA_enum transA, PLASMA_enum transB,
580  int m, int n, int k, int nb,
581  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
582  const PLASMA_Complex32_t *B, int ldb,
583  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
584 void QUARK_CORE_cgemm_f2(Quark *quark, Quark_Task_Flags *task_flags,
585  PLASMA_enum transA, PLASMA_enum transB,
586  int m, int n, int k, int nb,
587  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
588  const PLASMA_Complex32_t *B, int ldb,
589  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc,
590  PLASMA_Complex32_t *fake1, int szefake1, int flag1,
591  PLASMA_Complex32_t *fake2, int szefake2, int flag2);
592 void QUARK_CORE_cgemm_p2(Quark *quark, Quark_Task_Flags *task_flags,
593  PLASMA_enum transA, PLASMA_enum transB,
594  int m, int n, int k, int nb,
595  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
596  const PLASMA_Complex32_t **B, int ldb,
597  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
598 void QUARK_CORE_cgemm_p2f1(Quark *quark, Quark_Task_Flags *task_flags,
599  PLASMA_enum transA, PLASMA_enum transB,
600  int m, int n, int k, int nb,
601  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
602  const PLASMA_Complex32_t **B, int ldb,
603  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc,
604  PLASMA_Complex32_t *fake1, int szefake1, int flag1);
605 void QUARK_CORE_cgemm_p3(Quark *quark, Quark_Task_Flags *task_flags,
606  PLASMA_enum transA, PLASMA_enum transB,
607  int m, int n, int k, int nb,
608  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
609  const PLASMA_Complex32_t *B, int ldb,
610  PLASMA_Complex32_t beta, PLASMA_Complex32_t **C, int ldc);
611 void QUARK_CORE_cgemm_tile(Quark *quark, Quark_Task_Flags *task_flags,
612  PLASMA_enum transA, PLASMA_enum transB,
613  int m, int n, int k, int nb,
614  const PLASMA_Complex32_t *alpha, const PLASMA_Complex32_t *A, int lda,
615  const PLASMA_Complex32_t *B, int ldb,
616  const PLASMA_Complex32_t *beta, PLASMA_Complex32_t *C, int ldc,
617  const PLASMA_Complex32_t *Alock,
618  const PLASMA_Complex32_t *Block,
619  const PLASMA_Complex32_t *Clock);
620 void QUARK_CORE_cgemv(Quark *quark, Quark_Task_Flags *task_flags,
621  PLASMA_enum trans, int m, int n,
622  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
623  const PLASMA_Complex32_t *x, int incx,
624  PLASMA_Complex32_t beta, PLASMA_Complex32_t *y, int incy);
625 void QUARK_CORE_cgemv_tile(Quark *quark, Quark_Task_Flags *task_flags,
626  PLASMA_enum trans,
627  int m, int n,
628  const PLASMA_Complex32_t *alpha, const PLASMA_Complex32_t *A, int lda,
629  const PLASMA_Complex32_t *x, int incx,
630  const PLASMA_Complex32_t *beta, PLASMA_Complex32_t *y, int incy,
631  const PLASMA_Complex32_t *Alock,
632  const PLASMA_Complex32_t *xlock,
633  const PLASMA_Complex32_t *ylock);
634 void QUARK_CORE_cgeqp3_init( Quark *quark, Quark_Task_Flags *task_flags,
635  int n, int *jpvt );
636 void QUARK_CORE_cgeqp3_larfg(Quark *quark, Quark_Task_Flags *task_flags,
637  PLASMA_desc A, int ii, int jj, int i, int j,
638  PLASMA_Complex32_t *tau, PLASMA_Complex32_t *beta );
639 void QUARK_CORE_cgeqp3_norms( Quark *quark, Quark_Task_Flags *task_flags,
640  PLASMA_desc A, int ioff, int joff, float *norms1, float *norms2 );
641 void QUARK_CORE_cgeqp3_pivot( Quark *quark, Quark_Task_Flags *task_flags,
642  PLASMA_desc A,
643  PLASMA_Complex32_t *F, int ldf,
644  int jj, int k, int *jpvt,
645  float *norms1, float *norms2, int *info );
646 void QUARK_CORE_cgeqp3_tntpiv(Quark *quark, Quark_Task_Flags *task_flags,
647  int m, int n, int nb,
648  PLASMA_Complex32_t *A, int lda,
649  int *IPIV,
650  PLASMA_sequence *sequence, PLASMA_request *request,
651  PLASMA_bool check_info, int iinfo);
652 void QUARK_CORE_cgeqp3_update( Quark *quark, Quark_Task_Flags *task_flags,
653  PLASMA_Complex32_t *Ajj, int lda1,
654  PLASMA_Complex32_t *Ajk, int lda2,
655  PLASMA_Complex32_t *Fk, int ldf,
656  int joff, int k, int koff, int nb,
657  float *norms1, float *norms2, int *info );
658 void QUARK_CORE_cgeqrt(Quark *quark, Quark_Task_Flags *task_flags,
659  int m, int n, int ib, int nb,
660  PLASMA_Complex32_t *A, int lda,
661  PLASMA_Complex32_t *T, int ldt);
662 void QUARK_CORE_cgessm(Quark *quark, Quark_Task_Flags *task_flags,
663  int m, int n, int k, int ib, int nb,
664  const int *IPIV,
665  const PLASMA_Complex32_t *L, int ldl,
666  PLASMA_Complex32_t *A, int lda);
667 void QUARK_CORE_cgessq_f1( Quark *quark, Quark_Task_Flags *task_flags,
668  int m, int n, const PLASMA_Complex32_t *A, int lda,
669  float *scale, float *sumsq,
670  float *fake, int szeF, int paramF );
671 void QUARK_CORE_cgetrf(Quark *quark, Quark_Task_Flags *task_flags,
672  int m, int n, int nb,
673  PLASMA_Complex32_t *A, int lda,
674  int *IPIV,
675  PLASMA_sequence *sequence, PLASMA_request *request,
676  PLASMA_bool check_info, int iinfo);
677 void QUARK_CORE_cgetrf_incpiv(Quark *quark, Quark_Task_Flags *task_flags,
678  int m, int n, int ib, int nb,
679  PLASMA_Complex32_t *A, int lda,
680  int *IPIV,
681  PLASMA_sequence *sequence, PLASMA_request *request,
682  PLASMA_bool check_info, int iinfo);
683 void QUARK_CORE_cgetrf_nopiv(Quark *quark, Quark_Task_Flags *task_flags,
684  int m, int n, int ib, int nb,
685  PLASMA_Complex32_t *A, int lda,
686  PLASMA_sequence *sequence, PLASMA_request *request,
687  int iinfo);
688 void QUARK_CORE_cgetrf_reclap(Quark *quark, Quark_Task_Flags *task_flags,
689  CORE_cgetrf_data_t *data, int m, int n, int nb,
690  PLASMA_Complex32_t *A, int lda,
691  int *IPIV,
692  PLASMA_sequence *sequence, PLASMA_request *request,
693  PLASMA_bool check_info, int iinfo,
694  int nbthread);
695 void QUARK_CORE_cgetrf_rectil(Quark *quark, Quark_Task_Flags *task_flags,
696  CORE_cgetrf_data_t *data,
697  PLASMA_desc A, PLASMA_Complex32_t *Amn, int size,
698  int *IPIV,
699  PLASMA_sequence *sequence, PLASMA_request *request,
700  PLASMA_bool check_info, int iinfo,
701  int nbthread);
702 void QUARK_CORE_cgetrip(Quark *quark, Quark_Task_Flags *task_flags,
703  int m, int n, PLASMA_Complex32_t *A, int szeA);
704 void QUARK_CORE_cgetrip_f1(Quark *quark, Quark_Task_Flags *task_flags,
705  int m, int n, PLASMA_Complex32_t *A, int szeA,
706  PLASMA_Complex32_t *fake, int szeF, int paramF);
707 void QUARK_CORE_cgetrip_f2(Quark *quark, Quark_Task_Flags *task_flags,
708  int m, int n, PLASMA_Complex32_t *A, int szeA,
709  PLASMA_Complex32_t *fake1, int szeF1, int paramF1,
710  PLASMA_Complex32_t *fake2, int szeF2, int paramF2);
711 void QUARK_CORE_chemm(Quark *quark, Quark_Task_Flags *task_flags,
712  PLASMA_enum side, PLASMA_enum uplo,
713  int m, int n, int nb,
714  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
715  const PLASMA_Complex32_t *B, int ldb,
716  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
717 void QUARK_CORE_chegst(Quark *quark, Quark_Task_Flags *task_flags,
718  int itype, PLASMA_enum uplo, int N,
719  PLASMA_Complex32_t *A, int LDA,
720  PLASMA_Complex32_t *B, int LDB,
721  PLASMA_sequence *sequence, PLASMA_request *request,
722  int iinfo);
723 void QUARK_CORE_cherk(Quark *quark, Quark_Task_Flags *task_flags,
724  PLASMA_enum uplo, PLASMA_enum trans,
725  int n, int k, int nb,
726  float alpha, const PLASMA_Complex32_t *A, int lda,
727  float beta, PLASMA_Complex32_t *C, int ldc);
728 void QUARK_CORE_cher2k(Quark *quark, Quark_Task_Flags *task_flags,
729  PLASMA_enum uplo, PLASMA_enum trans,
730  int n, int k, int nb,
731  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
732  const PLASMA_Complex32_t *B, int LDB,
733  float beta, PLASMA_Complex32_t *C, int ldc);
734 void QUARK_CORE_cherfb(Quark *quark, Quark_Task_Flags *task_flags,
735  PLASMA_enum uplo,
736  int n, int k, int ib, int nb,
737  const PLASMA_Complex32_t *A, int lda,
738  const PLASMA_Complex32_t *T, int ldt,
739  PLASMA_Complex32_t *C, int ldc);
740 void QUARK_CORE_chessq_f1( Quark *quark, Quark_Task_Flags *task_flags,
741  PLASMA_enum uplo, int n, const PLASMA_Complex32_t *A, int lda,
742  float *scale, float *sumsq,
743  float *fake, int szeF, int paramF );
744 void QUARK_CORE_clacpy(Quark *quark, Quark_Task_Flags *task_flags,
745  PLASMA_enum uplo, int m, int n, int mb,
746  const PLASMA_Complex32_t *A, int lda,
747  PLASMA_Complex32_t *B, int ldb);
748 void QUARK_CORE_clacpy_f1(Quark *quark, Quark_Task_Flags *task_flags,
749  PLASMA_enum uplo, int m, int n, int nb,
750  const PLASMA_Complex32_t *A, int lda,
751  PLASMA_Complex32_t *B, int ldb,
752  PLASMA_Complex32_t *fake1, int szefake1, int flag1);
753 void QUARK_CORE_clacpy_pivot(Quark *quark, Quark_Task_Flags *task_flags,
754  const PLASMA_desc descA,
755  PLASMA_enum direct,
756  int k1, int k2, const int *ipiv,
757  int *rankin, int *rankout,
758  PLASMA_Complex32_t *A, int lda,
759  int pos, int init);
760 void QUARK_CORE_clange(Quark *quark, Quark_Task_Flags *task_flags,
761  int norm, int M, int N,
762  const PLASMA_Complex32_t *A, int LDA, int szeA,
763  int szeW, float *result);
764 void QUARK_CORE_clange_f1(Quark *quark, Quark_Task_Flags *task_flags,
765  int norm, int M, int N,
766  const PLASMA_Complex32_t *A, int LDA, int szeA,
767  int szeW, float *result,
768  float *fake, int szeF);
769 #ifdef COMPLEX
770 void QUARK_CORE_clanhe(Quark *quark, Quark_Task_Flags *task_flags,
771  int norm, PLASMA_enum uplo, int N,
772  const PLASMA_Complex32_t *A, int LDA, int szeA,
773  int szeW, float *result);
774 void QUARK_CORE_clanhe_f1(Quark *quark, Quark_Task_Flags *task_flags,
775  int norm, PLASMA_enum uplo, int N,
776  const PLASMA_Complex32_t *A, int LDA, int szeA,
777  int szeW, float *result,
778  float *fake, int szeF);
779 #endif
780 void QUARK_CORE_clansy(Quark *quark, Quark_Task_Flags *task_flags,
781  int norm, PLASMA_enum uplo, int N,
782  const PLASMA_Complex32_t *A, int LDA, int szeA,
783  int szeW, float *result);
784 void QUARK_CORE_clansy_f1(Quark *quark, Quark_Task_Flags *task_flags,
785  int norm, PLASMA_enum uplo, int N,
786  const PLASMA_Complex32_t *A, int LDA, int szeA,
787  int szeW, float *result,
788  float *fake, int szeF);
789 void QUARK_CORE_clantr(Quark *quark, Quark_Task_Flags *task_flags,
790  PLASMA_enum norm, PLASMA_enum uplo, PLASMA_enum diag, int M, int N,
791  const PLASMA_Complex32_t *A, int LDA, int szeA,
792  int szeW, float *result);
793 void QUARK_CORE_clantr_f1(Quark *quark, Quark_Task_Flags *task_flags,
794  PLASMA_enum norm, PLASMA_enum uplo, PLASMA_enum diag, int M, int N,
795  const PLASMA_Complex32_t *A, int LDA, int szeA,
796  int szeW, float *result,
797  float *fake, int szeF);
798 void QUARK_CORE_clascal(Quark *quark, Quark_Task_Flags *task_flags,
799  PLASMA_enum uplo, int m, int n, int nb,
800  PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda);
801 void QUARK_CORE_claset(Quark *quark, Quark_Task_Flags *task_flags,
802  PLASMA_enum uplo, int n1, int n2, PLASMA_Complex32_t alpha,
803  PLASMA_Complex32_t beta, PLASMA_Complex32_t *tileA, int ldtilea);
804 void QUARK_CORE_claset2(Quark *quark, Quark_Task_Flags *task_flags,
805  PLASMA_enum uplo, int n1, int n2, PLASMA_Complex32_t alpha,
806  PLASMA_Complex32_t *tileA, int ldtilea);
807 void QUARK_CORE_claswp(Quark *quark, Quark_Task_Flags *task_flags,
808  int n, PLASMA_Complex32_t *A, int lda,
809  int i1, int i2, const int *ipiv, int inc);
810 void QUARK_CORE_claswp_f2(Quark *quark, Quark_Task_Flags *task_flags,
811  int n, PLASMA_Complex32_t *A, int lda,
812  int i1, int i2, const int *ipiv, int inc,
813  PLASMA_Complex32_t *fake1, int szefake1, int flag1,
814  PLASMA_Complex32_t *fake2, int szefake2, int flag2);
815 void QUARK_CORE_claswp_ontile(Quark *quark, Quark_Task_Flags *task_flags,
816  PLASMA_desc descA, PLASMA_Complex32_t *A,
817  int i1, int i2, const int *ipiv, int inc, PLASMA_Complex32_t *fakepanel);
818 void QUARK_CORE_claswp_ontile_f2(Quark *quark, Quark_Task_Flags *task_flags,
819  PLASMA_desc descA, PLASMA_Complex32_t *A,
820  int i1, int i2, const int *ipiv, int inc,
821  PLASMA_Complex32_t *fake1, int szefake1, int flag1,
822  PLASMA_Complex32_t *fake2, int szefake2, int flag2);
823 void QUARK_CORE_claswpc_ontile(Quark *quark, Quark_Task_Flags *task_flags,
824  PLASMA_desc descA, PLASMA_Complex32_t *A,
825  int i1, int i2, const int *ipiv, int inc, PLASMA_Complex32_t *fakepanel);
826 void QUARK_CORE_clatro(Quark *quark, Quark_Task_Flags *task_flags,
827  PLASMA_enum uplo, PLASMA_enum trans, int m, int n, int mb,
828  const PLASMA_Complex32_t *A, int lda,
829  PLASMA_Complex32_t *B, int ldb);
830 void QUARK_CORE_clatro_f1(Quark *quark, Quark_Task_Flags *task_flags,
831  PLASMA_enum uplo, PLASMA_enum trans, int m, int n, int mb,
832  const PLASMA_Complex32_t *A, int lda,
833  PLASMA_Complex32_t *B, int ldb,
834  PLASMA_Complex32_t *fake1, int szefake1, int flag1);
835 void QUARK_CORE_clauum(Quark *quark, Quark_Task_Flags *task_flags,
836  PLASMA_enum uplo, int n, int nb,
837  PLASMA_Complex32_t *A, int lda);
838 void QUARK_CORE_cplghe(Quark *quark, Quark_Task_Flags *task_flags,
839  float bump, int m, int n, PLASMA_Complex32_t *A, int lda,
840  int bigM, int m0, int n0, unsigned long long int seed );
841 void QUARK_CORE_cplgsy(Quark *quark, Quark_Task_Flags *task_flags,
842  PLASMA_Complex32_t bump, int m, int n, PLASMA_Complex32_t *A, int lda,
843  int bigM, int m0, int n0, unsigned long long int seed );
844 void QUARK_CORE_cplrnt(Quark *quark, Quark_Task_Flags *task_flags,
845  int m, int n, PLASMA_Complex32_t *A, int lda,
846  int bigM, int m0, int n0, unsigned long long int seed );
847 void QUARK_CORE_cpltmg(Quark *quark, Quark_Task_Flags *task_flags,
848  PLASMA_enum mtxtype, int m, int n, PLASMA_Complex32_t *A, int lda,
849  int gM, int gN, int m0, int n0, unsigned long long int seed );
850 void QUARK_CORE_cpltmg_chebvand( Quark *quark, Quark_Task_Flags *task_flags,
851  int M, int N, PLASMA_Complex32_t *A, int LDA,
852  int gN, int m0, int n0,
853  PLASMA_Complex32_t *W );
854 void QUARK_CORE_cpltmg_circul( Quark *quark, Quark_Task_Flags *task_flags,
855  int M, int N, PLASMA_Complex32_t *A, int LDA,
856  int gM, int m0, int n0,
857  const PLASMA_Complex32_t *W );
858 void QUARK_CORE_cpltmg_fiedler(Quark *quark, Quark_Task_Flags *task_flags,
859  int m, int n,
860  const PLASMA_Complex32_t *X, int incX,
861  const PLASMA_Complex32_t *Y, int incY,
862  PLASMA_Complex32_t *A, int lda);
863 void QUARK_CORE_cpltmg_hankel( Quark *quark, Quark_Task_Flags *task_flags,
864  PLASMA_enum uplo, int M, int N, PLASMA_Complex32_t *A, int LDA,
865  int m0, int n0, int nb,
866  const PLASMA_Complex32_t *V1,
867  const PLASMA_Complex32_t *V2);
868 void QUARK_CORE_cpltmg_toeppd1(Quark *quark, Quark_Task_Flags *task_flags,
869  int gM, int m0, int M,
870  PLASMA_Complex32_t *W,
871  unsigned long long int seed);
872 void QUARK_CORE_cpltmg_toeppd2(Quark *quark, Quark_Task_Flags *task_flags,
873  int M, int N, int K, int m0, int n0,
874  const PLASMA_Complex32_t *W,
875  PLASMA_Complex32_t *A, int LDA );
876 void QUARK_CORE_cpotrf(Quark *quark, Quark_Task_Flags *task_flags,
877  PLASMA_enum uplo, int n, int nb,
878  PLASMA_Complex32_t *A, int lda,
879  PLASMA_sequence *sequence, PLASMA_request *request,
880  int iinfo);
881 void QUARK_CORE_csetvar(Quark *quark, Quark_Task_Flags *task_flags,
882  const PLASMA_Complex32_t *alpha, PLASMA_Complex32_t *x,
883  PLASMA_Complex32_t *Alock);
884 void QUARK_CORE_cshift( Quark *quark, Quark_Task_Flags *task_flags,
885  int s, int m, int n, int L,
886  PLASMA_Complex32_t *A);
887 void QUARK_CORE_cshiftw(Quark *quark, Quark_Task_Flags *task_flags,
888  int s, int cl, int m, int n, int L,
889  PLASMA_Complex32_t *A, PLASMA_Complex32_t *W);
890 void QUARK_CORE_cssssm(Quark *quark, Quark_Task_Flags *task_flags,
891  int m1, int n1, int m2, int n2, int k, int ib, int nb,
892  PLASMA_Complex32_t *A1, int lda1,
893  PLASMA_Complex32_t *A2, int lda2,
894  const PLASMA_Complex32_t *L1, int ldl1,
895  const PLASMA_Complex32_t *L2, int ldl2,
896  const int *IPIV);
897 void QUARK_CORE_cstedc(Quark *quark, Quark_Task_Flags *task_flags,
898  PLASMA_enum compz, int n,
899  float *D, float *E,
900  PLASMA_Complex32_t *Z, int ldz);
901 void QUARK_CORE_cstedc_f2(Quark *quark, Quark_Task_Flags *task_flags,
902  PLASMA_enum compz, int n,
903  float *D, float *E,
904  PLASMA_Complex32_t *Z, int ldz,
905  void *fake1, int szefake1, int flag1,
906  void *fake2, int szefake2, int flag2);
907 void QUARK_CORE_csteqr(Quark *quark, Quark_Task_Flags *task_flags,
908  PLASMA_enum compz, int n,
909  float *D, float *E,
910  PLASMA_Complex32_t *Z, int ldz);
911 void QUARK_CORE_csymm(Quark *quark, Quark_Task_Flags *task_flags,
912  PLASMA_enum side, PLASMA_enum uplo,
913  int m, int n, int nb,
914  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
915  const PLASMA_Complex32_t *B, int ldb,
916  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
917 void QUARK_CORE_csyrk(Quark *quark, Quark_Task_Flags *task_flags,
918  PLASMA_enum uplo, PLASMA_enum trans,
919  int n, int k, int nb,
920  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
921  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
922 void QUARK_CORE_csyr2k(Quark *quark, Quark_Task_Flags *task_flags,
923  PLASMA_enum uplo, PLASMA_enum trans,
924  int n, int k, int nb,
925  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
926  const PLASMA_Complex32_t *B, int LDB,
927  PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int ldc);
928 void QUARK_CORE_csyssq_f1( Quark *quark, Quark_Task_Flags *task_flags,
929  PLASMA_enum uplo, int n, const PLASMA_Complex32_t *A, int lda,
930  float *scale, float *sumsq,
931  float *fake, int szeF, int paramF );
932 void QUARK_CORE_cswpab(Quark *quark, Quark_Task_Flags *task_flags,
933  int i, int n1, int n2,
934  PLASMA_Complex32_t *A, int szeA);
935 void QUARK_CORE_cswptr_ontile(Quark *quark, Quark_Task_Flags *task_flags,
936  PLASMA_desc descA, PLASMA_Complex32_t *Aij,
937  int i1, int i2, const int *ipiv, int inc,
938  const PLASMA_Complex32_t *Akk, int ldak);
939 void QUARK_CORE_ctradd(Quark *quark, Quark_Task_Flags *task_flags,
940  PLASMA_enum uplo, PLASMA_enum trans, int m, int n, int nb,
941  PLASMA_Complex32_t alpha,
942  const PLASMA_Complex32_t *A, int lda,
943  PLASMA_Complex32_t beta,
944  PLASMA_Complex32_t *B, int ldb);
945 void QUARK_CORE_ctrasm(Quark *quark, Quark_Task_Flags *task_flags,
946  PLASMA_enum storev, PLASMA_enum uplo, PLASMA_enum diag, int m, int n,
947  const PLASMA_Complex32_t *A, int lda, int szeA,
948  float *work, int szeW);
949 void QUARK_CORE_ctrasm_f1(Quark *quark, Quark_Task_Flags *task_flags,
950  PLASMA_enum storev, PLASMA_enum uplo, PLASMA_enum diag, int m, int n,
951  const PLASMA_Complex32_t *A, int lda, int szeA,
952  float *work, int szeW,
953  float *fake, int szeF);
954 void QUARK_CORE_ctrdalg1(Quark *quark, Quark_Task_Flags *task_flags,
955  int n,
956  int nb,
957  PLASMA_Complex32_t *A,
958  int lda,
959  PLASMA_Complex32_t *V,
960  PLASMA_Complex32_t *TAU,
961  int Vblksiz, int wantz,
962  int i, int sweepid, int m, int grsiz,
963  int *PCOL, int *ACOL, int *MCOL);
964 void QUARK_CORE_ctrmm(Quark *quark, Quark_Task_Flags *task_flags,
965  PLASMA_enum side, PLASMA_enum uplo, PLASMA_enum transA, PLASMA_enum diag,
966  int m, int n, int nb,
967  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
968  PLASMA_Complex32_t *B, int ldb);
969 void QUARK_CORE_ctrmm_p2(Quark *quark, Quark_Task_Flags *task_flags,
970  PLASMA_enum side, PLASMA_enum uplo, PLASMA_enum transA, PLASMA_enum diag,
971  int m, int n, int nb,
972  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
973  PLASMA_Complex32_t **B, int ldb);
974 void QUARK_CORE_ctrsm(Quark *quark, Quark_Task_Flags *task_flags,
975  PLASMA_enum side, PLASMA_enum uplo, PLASMA_enum transA, PLASMA_enum diag,
976  int m, int n, int nb,
977  PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int lda,
978  PLASMA_Complex32_t *B, int ldb);
979 void QUARK_CORE_ctrssq_f1( Quark *quark, Quark_Task_Flags *task_flags,
980  PLASMA_enum uplo, PLASMA_enum diag,
981  int m, int n, const PLASMA_Complex32_t *A, int lda,
982  float *scale, float *sumsq,
983  float *fake, int szeF, int paramF );
984 void QUARK_CORE_ctrtri(Quark *quark, Quark_Task_Flags *task_flags,
985  PLASMA_enum uplo, PLASMA_enum diag, int n, int nb,
986  PLASMA_Complex32_t *A, int lda,
987  PLASMA_sequence *sequence, PLASMA_request *request,
988  int iinfo);
989 void QUARK_CORE_ctslqt(Quark *quark, Quark_Task_Flags *task_flags,
990  int m, int n, int ib, int nb,
991  PLASMA_Complex32_t *A1, int lda1,
992  PLASMA_Complex32_t *A2, int lda2,
993  PLASMA_Complex32_t *T, int ldt);
994 void QUARK_CORE_ctsmlq(Quark *quark, Quark_Task_Flags *task_flags,
995  PLASMA_enum side, PLASMA_enum trans,
996  int m1, int n1, int m2, int n2, int k, int ib, int nb,
997  PLASMA_Complex32_t *A1, int lda1,
998  PLASMA_Complex32_t *A2, int lda2,
999  const PLASMA_Complex32_t *V, int ldv,
1000  const PLASMA_Complex32_t *T, int ldt);
1001 void QUARK_CORE_ctsmlq_hetra1(Quark *quark, Quark_Task_Flags *task_flags,
1002  PLASMA_enum side, PLASMA_enum trans,
1003  int m1, int n1, int m2, int n2, int k, int ib, int nb,
1004  PLASMA_Complex32_t *A1, int lda1,
1005  PLASMA_Complex32_t *A2, int lda2,
1006  const PLASMA_Complex32_t *V, int ldv,
1007  const PLASMA_Complex32_t *T, int ldt);
1008 void QUARK_CORE_ctsmlq_corner(Quark *quark, Quark_Task_Flags *task_flags,
1009  int m1, int n1, int m2, int n2, int m3, int n3, int k, int ib, int nb,
1010  PLASMA_Complex32_t *A1, int lda1,
1011  PLASMA_Complex32_t *A2, int lda2,
1012  PLASMA_Complex32_t *A3, int lda3,
1013  const PLASMA_Complex32_t *V, int ldv,
1014  const PLASMA_Complex32_t *T, int ldt);
1015 void QUARK_CORE_ctsmqr(Quark *quark, Quark_Task_Flags *task_flags,
1016  PLASMA_enum side, PLASMA_enum trans,
1017  int m1, int n1, int m2, int n2, int k, int ib, int nb,
1018  PLASMA_Complex32_t *A1, int lda1,
1019  PLASMA_Complex32_t *A2, int lda2,
1020  const PLASMA_Complex32_t *V, int ldv,
1021  const PLASMA_Complex32_t *T, int ldt);
1022 void QUARK_CORE_ctsmqr_hetra1(Quark *quark, Quark_Task_Flags *task_flags,
1023  PLASMA_enum side, PLASMA_enum trans,
1024  int m1, int n1, int m2, int n2, int k, int ib, int nb,
1025  PLASMA_Complex32_t *A1, int lda1,
1026  PLASMA_Complex32_t *A2, int lda2,
1027  const PLASMA_Complex32_t *V, int ldv,
1028  const PLASMA_Complex32_t *T, int ldt);
1029 void QUARK_CORE_ctsmqr_corner(Quark *quark, Quark_Task_Flags *task_flags,
1030  int m1, int n1, int m2, int n2, int m3, int n3, int k, int ib, int nb,
1031  PLASMA_Complex32_t *A1, int lda1,
1032  PLASMA_Complex32_t *A2, int lda2,
1033  PLASMA_Complex32_t *A3, int lda3,
1034  const PLASMA_Complex32_t *V, int ldv,
1035  const PLASMA_Complex32_t *T, int ldt);
1036 void QUARK_CORE_ctsqrt(Quark *quark, Quark_Task_Flags *task_flags,
1037  int m, int n, int ib, int nb,
1038  PLASMA_Complex32_t *A1, int lda1,
1039  PLASMA_Complex32_t *A2, int lda2,
1040  PLASMA_Complex32_t *T, int ldt);
1041 void QUARK_CORE_ctstrf(Quark *quark, Quark_Task_Flags *task_flags,
1042  int m, int n, int ib, int nb,
1043  PLASMA_Complex32_t *U, int ldu,
1044  PLASMA_Complex32_t *A, int lda,
1045  PLASMA_Complex32_t *L, int ldl,
1046  int *IPIV,
1047  PLASMA_sequence *sequence, PLASMA_request *request,
1048  PLASMA_bool check_info, int iinfo);
1049 void QUARK_CORE_cttmqr(Quark *quark, Quark_Task_Flags *task_flags,
1050  PLASMA_enum side, PLASMA_enum trans,
1051  int m1, int n1, int m2, int n2, int k, int ib, int nb,
1052  PLASMA_Complex32_t *A1, int lda1,
1053  PLASMA_Complex32_t *A2, int lda2,
1054  const PLASMA_Complex32_t *V, int ldv,
1055  const PLASMA_Complex32_t *T, int ldt);
1056 void QUARK_CORE_cttqrt(Quark *quark, Quark_Task_Flags *task_flags,
1057  int m, int n, int ib, int nb,
1058  PLASMA_Complex32_t *A1, int lda1,
1059  PLASMA_Complex32_t *A2, int lda2,
1060  PLASMA_Complex32_t *T, int ldt);
1061 void QUARK_CORE_cttmlq(Quark *quark, Quark_Task_Flags *task_flags,
1062  PLASMA_enum side, PLASMA_enum trans,
1063  int m1, int n1, int m2, int n2, int k, int ib, int nb,
1064  PLASMA_Complex32_t *A1, int lda1,
1065  PLASMA_Complex32_t *A2, int lda2,
1066  const PLASMA_Complex32_t *V, int ldv,
1067  const PLASMA_Complex32_t *T, int ldt);
1068 void QUARK_CORE_cttlqt(Quark *quark, Quark_Task_Flags *task_flags,
1069  int m, int n, int ib, int nb,
1070  PLASMA_Complex32_t *A1, int lda1,
1071  PLASMA_Complex32_t *A2, int lda2,
1072  PLASMA_Complex32_t *T, int ldt);
1073 void QUARK_CORE_cpamm(Quark *quark, Quark_Task_Flags *task_flags,
1074  int op, PLASMA_enum side, PLASMA_enum storev,
1075  int m, int n, int k, int l,
1076  const PLASMA_Complex32_t *A1, int lda1,
1077  PLASMA_Complex32_t *A2, int lda2,
1078  const PLASMA_Complex32_t *V, int ldv,
1079  PLASMA_Complex32_t *W, int ldw);
1080 void QUARK_CORE_cplssq( Quark *quark, Quark_Task_Flags *task_flags,
1081  int m, const float *A, float *result );
1082 void QUARK_CORE_cunmlq(Quark *quark, Quark_Task_Flags *task_flags,
1083  PLASMA_enum side, PLASMA_enum trans,
1084  int m, int n, int ib, int nb, int k,
1085  const PLASMA_Complex32_t *A, int lda,
1086  const PLASMA_Complex32_t *T, int ldt,
1087  PLASMA_Complex32_t *C, int ldc);
1088 void QUARK_CORE_cunmqr(Quark *quark, Quark_Task_Flags *task_flags,
1089  PLASMA_enum side, PLASMA_enum trans,
1090  int m, int n, int k, int ib, int nb,
1091  const PLASMA_Complex32_t *A, int lda,
1092  const PLASMA_Complex32_t *T, int ldt,
1093  PLASMA_Complex32_t *C, int ldc);
1094 
1095 
1096 void QUARK_CORE_clascl(Quark *quark, Quark_Task_Flags *task_flags,
1097  PLASMA_enum type, int kl, int ku, float cfrom, float cto,
1098  int m, int n, PLASMA_Complex32_t *A, int lda);
1099 void QUARK_CORE_clascl_p2f1(Quark *quark, Quark_Task_Flags *task_flags,
1100  PLASMA_enum type, int kl, int ku, float *cfrom, float *cto,
1101  int m, int n, PLASMA_Complex32_t *A, int lda,
1102  void *fake, int szefake, int flag);
1103 void QUARK_CORE_slaed0_lascl( Quark *quark, Quark_Task_Flags *task_flags,
1104  int n, float *scale, float *D, float *E);
1105 void QUARK_CORE_slaed0_betaapprox(Quark *quark, Quark_Task_Flags *task_flags,
1106  int subpbs, const int *subpbs_info,
1107  float *D, const float *E);
1108 
1109 #ifndef COMPLEX
1110 void QUARK_CORE_slaed2_computeK(Quark *quark, Quark_Task_Flags *task_flags,
1111  int *K1, int n, int n1,
1112  float *beta, float *D, float *Q, int LDQ,
1113  float *Z, float *DLAMBDA, float *W,
1114  int *INDX, int *INDXC, int *INDXP, int *INDXQ,
1115  int *COLTYP,
1116  float **Qmerge, int wsmode,
1117  int *K2);
1118 
1119 void QUARK_CORE_slaed1_pipelined(Quark *quark, Quark_Task_Flags *task_flags,
1120  int n, int n1, const int *K,
1121  const int *INDX, const int *ctot,
1122  float *D, const float *beta,
1123  float *Q, int LDQ, float *Q2,
1124  const float *DLAMBDA, const float *W, float *Wred,
1125  int start, int end);
1126 void QUARK_CORE_slaed2_compressq(Quark *quark, Quark_Task_Flags *task_flags,
1127  int n, int n1, int start, int end,
1128  const int *INDX, const int *ctot,
1129  const float *Q, int LDQ,
1130  float *Q2, int *K);
1131 void QUARK_CORE_slaed4_p2f1(Quark *quark, Quark_Task_Flags *task_flags,
1132  int n, const int *K,
1133  float *D, const float *beta,
1134  float **Q, const int *LDQ,
1135  const float *DLAMBDA, const float *W, const int *INDX,
1136  int start, int end,
1137  PLASMA_sequence *sequence, PLASMA_request *request,
1138  void *fakeQ, int flagfQ);
1139 void QUARK_CORE_slaed3_compW_p2f1(Quark *quark, Quark_Task_Flags *task_flags,
1140  int n, const int *K,
1141  float **Q, const int *LDQ,
1142  const float *DLAMBDA, float *W,
1143  const int *INDX,
1144  int start, int end,
1145  void *fakeQ, int flagfQ,
1146  void *fakeW, int flagfW);
1147 
1148 void QUARK_CORE_slaed3_reduceW(Quark *quark, Quark_Task_Flags *task_flags,
1149  int n, int n1, const int *K, int l,
1150  const float *Q, int LDQ,
1151  const float *Wred, float *W);
1152 void QUARK_CORE_slaed3_reduceW_p2(Quark *quark, Quark_Task_Flags *task_flags,
1153  int n, int n1, const int *K, int l,
1154  float **Q, const int *LDQ,
1155  const float *Wred, float *W);
1156 
1157 void QUARK_CORE_slaed2_copydef(Quark *quark, Quark_Task_Flags *task_flags,
1158  int n, int n1, const int *K, const int *ctot,
1159  float *Q, int LDQ, const float *Q2,
1160  int start, int end);
1161 void QUARK_CORE_slaed3_computevectors(Quark *quark, Quark_Task_Flags *task_flags,
1162  int wsmode, int n, const int *K,
1163  const int *il_nondef, const int *iu_nondef,
1164  float *Q, int LDQ, float *W, const int *INDXC,
1165  float **WSglobal, float **WSlocal,
1166  int start, int end );
1167 void QUARK_CORE_slaed3_wscopy( Quark *quark, Quark_Task_Flags *task_flags,
1168  const int *K, const int *il_nondef, const int *iu_nondef,
1169  const float *Q, int LDQ, float **WORK,
1170  int start, int end );
1171 void QUARK_CORE_slaed3_updatevectors(Quark *quark, Quark_Task_Flags *task_flags,
1172  int oper, int wsmode, int n, int n1, int *K,
1173  int *il_nondef, int *iu_nondef,
1174  float *D, float *Q, int LDQ, float *Q2,
1175  int *INDXQ, int *COLTYP, float **WORK,
1176  int start, int end, float **WORKDEP);
1177 void QUARK_CORE_slaed3_pipelined(Quark *quark, Quark_Task_Flags *task_flags,
1178  int n, int n1, int *K, int *il_nondef, int *iu_nondef,
1179  float *D, float *Q, int LDQ, float *Q2,
1180  int *INDXC, int *INDXQ, int *COLTYP, float *W,
1181  int start, int end2);
1182 
1183 void QUARK_CORE_sDC_fakedep(Quark *quark, Quark_Task_Flags *task_flags,
1184  int nb_tasks, int nb, float *Q, int LDQ, float *W);
1185 #endif
1186 
1187 void QUARK_CORE_cswap(Quark *quark, Quark_Task_Flags *task_flags,
1188  int m, int n, PLASMA_Complex32_t *Q,
1189  int LDQ, PLASMA_Complex32_t *work,
1190  int *perm, int begin, int end);
1191 #ifdef COMPLEX
1192 void QUARK_CORE_slag2c(Quark *quark, Quark_Task_Flags *task_flags,
1193  int m, int n,
1194  const float *Q, int LDQ,
1195  PLASMA_Complex32_t *Z, int LDZ);
1196 #endif
1197 void QUARK_CORE_slaed3_freebigwork(Quark *quark, Quark_Task_Flags *task_flags,
1198  int *K_bis, int largework, float **WORK);
1199 void QUARK_CORE_claset_identity(Quark *quark, Quark_Task_Flags *task_flags,
1200  int n, int start, int size,
1201  PLASMA_Complex32_t *A);
1202 
1206 void CORE_scasum_quark(Quark *quark);
1207 void CORE_scasum_f1_quark(Quark *quark);
1208 void CORE_cgeadd_quark(Quark *quark);
1209 void CORE_cbrdalg1_quark(Quark *quark);
1210 void CORE_cgelqt_quark(Quark *quark);
1211 void CORE_cgemm_quark(Quark *quark);
1212 void CORE_cgemm_tile_quark(Quark *quark);
1213 void CORE_cgemv_quark(Quark *quark);
1214 void CORE_cgemv_tile_quark(Quark *quark);
1215 void CORE_cgeqp3_init_quark(Quark *quark);
1216 void CORE_cgeqp3_larfg_quark(Quark *quark);
1217 void CORE_cgeqp3_norms_quark(Quark *quark);
1218 void CORE_cgeqp3_pivot_quark(Quark *quark);
1219 void CORE_cgeqp3_tntpiv_quark(Quark *quark);
1220 void CORE_cgeqp3_update_quark(Quark *quark);
1221 void CORE_cgeqrt_quark(Quark *quark);
1222 void CORE_cgessm_quark(Quark *quark);
1223 void CORE_cgessq_quark(Quark *quark);
1224 void CORE_cgessq_f1_quark(Quark *quark);
1225 void CORE_cgetrf_quark(Quark *quark);
1226 void CORE_cgetrf_incpiv_quark(Quark *quark);
1227 void CORE_cgetrf_nopiv_quark(Quark* quark);
1228 void CORE_cgetrf_reclap_quark(Quark *quark);
1229 void CORE_cgetrf_rectil_quark(Quark* quark);
1230 void CORE_cgetrip_quark(Quark *quark);
1231 void CORE_cgetrip_f1_quark(Quark *quark);
1232 void CORE_cgetrip_f2_quark(Quark *quark);
1233 #ifdef COMPLEX
1234 void CORE_chemm_quark(Quark *quark);
1235 void CORE_cherk_quark(Quark *quark);
1236 void CORE_cher2k_quark(Quark *quark);
1237 #endif
1238 void CORE_chegst_quark(Quark *quark);
1239 void CORE_cherfb_quark(Quark *quark);
1240 void CORE_chessq_quark(Quark *quark);
1241 void CORE_chessq_f1_quark(Quark *quark);
1242 void CORE_clacpy_quark(Quark *quark);
1243 void CORE_clacpy_f1_quark(Quark *quark);
1244 void CORE_clacpy_pivot_quark(Quark *quark);
1245 void CORE_clatro_quark(Quark *quark);
1246 void CORE_clatro_f1_quark(Quark *quark);
1247 void CORE_clange_quark(Quark *quark);
1248 void CORE_clange_f1_quark(Quark *quark);
1249 #ifdef COMPLEX
1250 void CORE_clanhe_quark(Quark *quark);
1251 void CORE_clanhe_f1_quark(Quark *quark);
1252 #endif
1253 void CORE_clansy_quark(Quark *quark);
1254 void CORE_clansy_f1_quark(Quark *quark);
1255 void CORE_claset_quark(Quark *quark);
1256 void CORE_claset2_quark(Quark *quark);
1257 void CORE_clatro_quark(Quark *quark);
1258 void CORE_clauum_quark(Quark *quark);
1259 void CORE_cpamm_quark(Quark *quark);
1260 void CORE_cplghe_quark(Quark *quark);
1261 void CORE_cplgsy_quark(Quark *quark);
1262 void CORE_cplrnt_quark(Quark *quark);
1263 void CORE_cpltmg_quark(Quark *quark);
1264 void CORE_cplssq_quark(Quark *quark);
1265 void CORE_cpotrf_quark(Quark *quark);
1266 void CORE_csetvar_quark(Quark *quark);
1267 void CORE_cshift_quark(Quark *quark);
1268 void CORE_cshiftw_quark(Quark *quark);
1269 void CORE_cssssm_quark(Quark *quark);
1270 void CORE_csymm_quark(Quark *quark);
1271 void CORE_csyrk_quark(Quark *quark);
1272 void CORE_csyr2k_quark(Quark *quark);
1273 void CORE_csyssq_quark(Quark *quark);
1274 void CORE_csyssq_f1_quark(Quark *quark);
1275 void CORE_cswpab_quark(Quark *quark);
1276 void CORE_cswptr_ontile_quark(Quark *quark);
1277 void CORE_ctrdalg1_quark(Quark *quark);
1278 void CORE_ctrmm_quark(Quark *quark);
1279 void CORE_ctrsm_quark(Quark *quark);
1280 void CORE_ctrtri_quark(Quark *quark);
1281 void CORE_ctslqt_quark(Quark *quark);
1282 void CORE_ctsmlq_quark(Quark *quark);
1283 void CORE_ctsmlq_hetra1_quark(Quark *quark);
1284 void CORE_ctsmlq_corner_quark(Quark *quark);
1285 void CORE_ctsmqr_quark(Quark *quark);
1286 void CORE_ctsmqr_hetra1_quark(Quark *quark);
1287 void CORE_ctsmqr_corner_quark(Quark *quark);
1288 void CORE_ctsqrt_quark(Quark *quark);
1289 void CORE_ctstrf_quark(Quark *quark);
1290 void CORE_cttmqr_quark(Quark *quark);
1291 void CORE_cttqrt_quark(Quark *quark);
1292 void CORE_cttmlq_quark(Quark *quark);
1293 void CORE_cttlqt_quark(Quark *quark);
1294 void CORE_cunmlq_quark(Quark *quark);
1295 void CORE_cunmqr_quark(Quark *quark);
1296 void CORE_claswp_quark(Quark* quark);
1297 void CORE_claswp_f2_quark(Quark* quark);
1298 void CORE_claswp_ontile_quark(Quark *quark);
1299 void CORE_claswp_ontile_f2_quark(Quark *quark);
1300 void CORE_claswpc_ontile_quark(Quark *quark);
1301 void CORE_ctrmm_p2_quark(Quark* quark);
1302 void CORE_cgemm_f2_quark(Quark* quark);
1303 void CORE_cgemm_p2_quark(Quark* quark);
1304 void CORE_cgemm_p2f1_quark(Quark* quark);
1305 void CORE_cgemm_p3_quark(Quark* quark);
1306 
1307 #endif /* defined(QUARK_H) */
1308 
1309 #ifdef __cplusplus
1310 }
1311 #endif
1312 
1313 #undef COMPLEX
1314 
1315 #endif
void CORE_cpltmg_toeppd2(int M, int N, int K, int m0, int n0, const PLASMA_Complex32_t *W, PLASMA_Complex32_t *A, int LDA)
Definition: core_cpltmg_toeppd.c:149
void CORE_slaed0_betaapprox(int subpbs, const int *subpbs_info, float *D, const float *E)
Definition: core_slaed0_betaapprox.c:49
int CORE_cgetrf_nopiv(int m, int n, int ib, PLASMA_Complex32_t *A, int lda)
Definition: core_cgetrf_nopiv.c:69
void CORE_chbtype3cb(int N, int NB, PLASMA_Complex32_t *A, int LDA, const PLASMA_Complex32_t *V, const PLASMA_Complex32_t *TAU, int st, int ed, int sweep, int Vblksiz, int WANTZ, PLASMA_Complex32_t *WORK)
Definition: core_chbtype3cb.c:98
void CORE_clansy(int norm, PLASMA_enum uplo, int N, const PLASMA_Complex32_t *A, int LDA, float *work, float *normA)
Definition: core_clansy.c:74
int CORE_cswptr_ontile(PLASMA_desc descA, int i1, int i2, const int *ipiv, int inc, const PLASMA_Complex32_t *Akk, int ldak)
Definition: core_claswp.c:224
void CORE_cswpab(int i, int n1, int n2, PLASMA_Complex32_t *A, PLASMA_Complex32_t *work)
Definition: core_cswpab.c:63
void CORE_cpltmg_condexq(int M, int N, PLASMA_Complex32_t *Q, int LDQ)
Definition: core_cpltmg_condex.c:53
void CORE_slaed3_computeW(int n, int K, const float *Q, int LDQ, const float *DLAMBDA, float *W, const int *INDX, int start, int end)
Definition: core_slaed3_computeW.c:66
int CORE_cpamm(int op, PLASMA_enum side, PLASMA_enum storev, int M, int N, int K, int L, const PLASMA_Complex32_t *A1, int LDA1, PLASMA_Complex32_t *A2, int LDA2, const PLASMA_Complex32_t *V, int LDV, PLASMA_Complex32_t *W, int LDW)
Definition: core_cpamm.c:175
void CORE_cgbtype1cb(PLASMA_enum uplo, int N, int NB, PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t *VQ, PLASMA_Complex32_t *TAUQ, PLASMA_Complex32_t *VP, PLASMA_Complex32_t *TAUP, int st, int ed, int sweep, int Vblksiz, int WANTZ, PLASMA_Complex32_t *WORK)
Definition: core_cgbtype1cb.c:121
int CORE_cgblrx(PLASMA_enum uplo, int N, PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU, int st, int ed, int eltsize)
Definition: core_cgblrx.c:80
void CORE_cplrnt(int m, int n, PLASMA_Complex32_t *A, int lda, int bigM, int m0, int n0, unsigned long long int seed)
Definition: core_cplrnt.c:68
void CORE_ctrtri(PLASMA_enum uplo, PLASMA_enum diag, int N, PLASMA_Complex32_t *A, int LDA, int *info)
Definition: core_ctrtri.c:66
int CORE_cgetrf_reclap(CORE_cgetrf_data_t *data, int M, int N, PLASMA_Complex32_t *A, int LDA, int *IPIV, int *info)
Definition: core_cgetrf_reclap.c:125
int CORE_clascl(PLASMA_enum type, int kl, int ku, float cfrom, float cto, int m, int n, PLASMA_Complex32_t *A, int lda)
Definition: core_clascl.c:77
void CORE_claset2(PLASMA_enum uplo, int n1, int n2, PLASMA_Complex32_t alpha, PLASMA_Complex32_t *tileA, int ldtilea)
Definition: core_claset2.c:55
int CORE_cttmlq(PLASMA_enum side, PLASMA_enum trans, int M1, int N1, int M2, int N2, int K, int IB, PLASMA_Complex32_t *A1, int LDA1, PLASMA_Complex32_t *A2, int LDA2, const PLASMA_Complex32_t *V, int LDV, const PLASMA_Complex32_t *T, int LDT, PLASMA_Complex32_t *WORK, int LDWORK)
Definition: core_cttmlq.c:116
int CORE_clascal(PLASMA_enum uplo, int m, int n, PLASMA_Complex32_t alpha, PLASMA_Complex32_t *A, int lda)
Definition: core_clascal.c:52
int CORE_csteqr(PLASMA_enum compz, int n, float *D, float *E, PLASMA_Complex32_t *Z, int LDZ, float *WORK)
Definition: core_csteqr.c:66
int CORE_ctslqt(int M, int N, int IB, PLASMA_Complex32_t *A1, int LDA1, PLASMA_Complex32_t *A2, int LDA2, PLASMA_Complex32_t *T, int LDT, PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK)
Definition: core_ctslqt.c:107
int CORE_clacpy_pivot(const PLASMA_desc descA, PLASMA_enum direct, int k1, int k2, const int *ipiv, int *rankin, int *rankout, PLASMA_Complex32_t *A, int lda, int init)
Definition: core_clacpy_pivot.c:84
void CORE_slaed2_copydef(int n, int n1, int K, const int *ctot, float *Q, int LDQ, const float *Q2, int start, int end)
Definition: core_slaed2_compressq.c:180
void CORE_slaed3_merge(int n, int K, float *D, int *INDXQ)
Definition: core_slaed3_merge.c:46
void CORE_cpltmg_toeppd1(int gM, int m0, int M, PLASMA_Complex32_t *W, unsigned long long int seed)
Definition: core_cpltmg_toeppd.c:70
int CORE_cparfb(PLASMA_enum side, PLASMA_enum trans, PLASMA_enum direct, PLASMA_enum storev, int M1, int N1, int M2, int N2, int K, int L, PLASMA_Complex32_t *A1, int LDA1, PLASMA_Complex32_t *A2, int LDA2, const PLASMA_Complex32_t *V, int LDV, const PLASMA_Complex32_t *T, int LDT, PLASMA_Complex32_t *WORK, int LDWORK)
Definition: core_cparfb.c:132
void CORE_clange(int norm, int M, int N, const PLASMA_Complex32_t *A, int LDA, float *work, float *normA)
Definition: core_clange.c:72
int CORE_ctstrf(int M, int N, int IB, int NB, PLASMA_Complex32_t *U, int LDU, PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t *L, int LDL, int *IPIV, PLASMA_Complex32_t *WORK, int LDWORK, int *INFO)
Definition: core_ctstrf.c:99
int CORE_cgessm(int M, int N, int K, int IB, const int *IPIV, const PLASMA_Complex32_t *L, int LDL, PLASMA_Complex32_t *A, int LDA)
Definition: core_cgessm.c:70
int CORE_cpltmg_circul(int M, int N, PLASMA_Complex32_t *A, int LDA, int gM, int m0, int n0, const PLASMA_Complex32_t *V)
Definition: core_cpltmg_circul.c:76
int CORE_slag2c(int m, int n, const float *Q, int LDQ, PLASMA_Complex32_t *Z, int LDZ)
Definition: core_slag2c.c:58
void CORE_slaed2_compressq(int n, int n1, const int *INDX, const int *ctot, const float *Q, int LDQ, float *Q2, int start, int end)
Definition: core_slaed2_compressq.c:85
int CORE_cssssm(int M1, int N1, int M2, int N2, int K, int IB, PLASMA_Complex32_t *A1, int LDA1, PLASMA_Complex32_t *A2, int LDA2, const PLASMA_Complex32_t *L1, int LDL1, const PLASMA_Complex32_t *L2, int LDL2, const int *IPIV)
Definition: core_cssssm.c:94
int CORE_clarfb_gemm(PLASMA_enum side, PLASMA_enum trans, PLASMA_enum direct, PLASMA_enum storev, int M, int N, int K, const PLASMA_Complex32_t *V, int LDV, const PLASMA_Complex32_t *T, int LDT, PLASMA_Complex32_t *C, int LDC, PLASMA_Complex32_t *WORK, int LDWORK)
Definition: core_clarfb_gemm.c:113
int CORE_cgetrf_rectil(CORE_cgetrf_data_t *data, const PLASMA_desc A, int *IPIV, int *info)
Definition: core_cgetrf_rectil.c:122
void CORE_clacpy(PLASMA_enum uplo, int M, int N, const PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t *B, int LDB)
Definition: core_clacpy.c:59
void CORE_cshiftw(int s, int cl, int m, int n, int L, PLASMA_Complex32_t *A, PLASMA_Complex32_t *W)
Definition: core_cshift.c:66
void CORE_chbtype1cb(int N, int NB, PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU, int st, int ed, int sweep, int Vblksiz, int WANTZ, PLASMA_Complex32_t *WORK)
Definition: core_chbtype1cb.c:97
void CORE_slaed3_updatevectors(int op, int wsmode, int n, int n1, int K, int il_nondef, int iu_nondef, float *Q, int ldq, float *Q2, const int *ctot, float *W, int start, int end)
Definition: core_slaed3_updatevectors.c:95
int CORE_ctsmlq(PLASMA_enum side, PLASMA_enum trans, int M1, int N1, int M2, int N2, int K, int IB, PLASMA_Complex32_t *A1, int LDA1, PLASMA_Complex32_t *A2, int LDA2, const PLASMA_Complex32_t *V, int LDV, const PLASMA_Complex32_t *T, int LDT, PLASMA_Complex32_t *WORK, int LDWORK)
Definition: core_ctsmlq.c:124
int CORE_cttmqr(PLASMA_enum side, PLASMA_enum trans, int M1, int N1, int M2, int N2, int K, int IB, PLASMA_Complex32_t *A1, int LDA1, PLASMA_Complex32_t *A2, int LDA2, const PLASMA_Complex32_t *V, int LDV, const PLASMA_Complex32_t *T, int LDT, PLASMA_Complex32_t *WORK, int LDWORK)
Definition: core_cttmqr.c:116
void CORE_claset(PLASMA_enum uplo, int n1, int n2, PLASMA_Complex32_t alpha, PLASMA_Complex32_t beta, PLASMA_Complex32_t *tileA, int ldtilea)
Definition: core_claset.c:57
void CORE_chbtype2cb(int N, int NB, PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU, int st, int ed, int sweep, int Vblksiz, int WANTZ, PLASMA_Complex32_t *WORK)
Definition: core_chbtype2cb.c:101
void CORE_cgemv(PLASMA_enum trans, int M, int N, PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA, const PLASMA_Complex32_t *x, int incx, PLASMA_Complex32_t beta, PLASMA_Complex32_t *y, int incy)
Definition: core_cgemv.c:78
void CORE_cswap(int m, int n, PLASMA_Complex32_t *Q, int ldq, const PLASMA_Complex32_t *work, const int *perm, int start, int end)
Definition: core_cswap.c:67
void CORE_csyrk(PLASMA_enum uplo, PLASMA_enum trans, int N, int K, PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC)
Definition: core_csyrk.c:80
void CORE_ctrsm(PLASMA_enum side, PLASMA_enum uplo, PLASMA_enum transA, PLASMA_enum diag, int M, int N, PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t *B, int LDB)
Definition: core_ctrsm.c:80
void CORE_clarfy(int N, PLASMA_Complex32_t *A, int LDA, const PLASMA_Complex32_t *V, const PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK)
Definition: core_clarfy.c:61
void CORE_cherk(PLASMA_enum uplo, PLASMA_enum trans, int N, int K, float alpha, const PLASMA_Complex32_t *A, int LDA, float beta, PLASMA_Complex32_t *C, int LDC)
Definition: core_cherk.c:84
void CORE_ctrmm(PLASMA_enum side, PLASMA_enum uplo, PLASMA_enum transA, PLASMA_enum diag, int M, int N, PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t *B, int LDB)
Definition: core_ctrmm.c:84
void CORE_cbrdalg1(PLASMA_enum uplo, int n, int nb, PLASMA_Complex32_t *A, int lda, PLASMA_Complex32_t *VQ, PLASMA_Complex32_t *TAUQ, PLASMA_Complex32_t *VP, PLASMA_Complex32_t *TAUP, int Vblksiz, int wantz, int i, int sweepid, int m, int grsiz, PLASMA_Complex32_t *work)
Definition: core_cbrdalg1.c:111
int CORE_cpltmg_chebvand(int M, int N, PLASMA_Complex32_t *A, int LDA, int gN, int m0, int n0, PLASMA_Complex32_t *W)
Definition: core_cpltmg_chebvand.c:83
int CORE_cgetf2_nopiv(int m, int n, PLASMA_Complex32_t *A, int lda)
Definition: core_cgetf2_nopiv.c:64
void CORE_cgeqp3_init(int n, int *jpvt)
Definition: core_cgeqp3_init.c:38
int CORE_cgbelr(PLASMA_enum uplo, int N, PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU, int st, int ed, int eltsize)
Definition: core_cgbelr.c:81
void CORE_clauum(PLASMA_enum uplo, int N, PLASMA_Complex32_t *A, int LDA)
Definition: core_clauum.c:57
void CORE_csyr2k(PLASMA_enum uplo, PLASMA_enum trans, int N, int K, PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA, const PLASMA_Complex32_t *B, int LDB, PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC)
Definition: core_csyr2k.c:90
void CORE_cgetrip(int m, int n, PLASMA_Complex32_t *A, PLASMA_Complex32_t *work)
Definition: core_cgetrip.c:51
Definition: plasma.h:34
int CORE_chbrce(PLASMA_enum uplo, int N, PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU, int st, int ed, int eltsize)
Definition: core_chbrce.c:78
int CORE_chbelr(PLASMA_enum uplo, int N, PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU, int st, int ed, int eltsize)
Definition: core_chbelr.c:80
int CORE_claswp_ontile(PLASMA_desc descA, int i1, int i2, const int *ipiv, int inc)
Definition: core_claswp.c:107
void CORE_cgeqp3_larfg(PLASMA_desc A, int ii, int jj, int i, int j, PLASMA_Complex32_t *tau, PLASMA_Complex32_t *beta)
Definition: core_cgeqp3_larfg.c:78
void CORE_cplghe(float bump, int m, int n, PLASMA_Complex32_t *A, int lda, int bigM, int m0, int n0, unsigned long long int seed)
Definition: core_cplghe.c:72
int CORE_cunmlq(PLASMA_enum side, PLASMA_enum trans, int M, int N, int IB, int K, const PLASMA_Complex32_t *V, int LDV, const PLASMA_Complex32_t *T, int LDT, PLASMA_Complex32_t *C, int LDC, PLASMA_Complex32_t *WORK, int LDWORK)
Definition: core_cunmlq.c:108
int CORE_cstedc(PLASMA_enum compz, int n, float *D, float *E, PLASMA_Complex32_t *Z, int LDZ, PLASMA_Complex32_t *WORK, int LWORK, float *RWORK, int LRWORK, int *IWORK, int LIWORK)
Definition: core_cstedc.c:85
void CORE_ctrdalg1(int n, int nb, PLASMA_Complex32_t *A, int lda, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU, int Vblksiz, int wantz, int i, int sweepid, int m, int grsiz, PLASMA_Complex32_t *work)
Definition: core_ctrdalg1.c:91
void CORE_cher2k(PLASMA_enum uplo, PLASMA_enum trans, int N, int K, PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA, const PLASMA_Complex32_t *B, int LDB, float beta, PLASMA_Complex32_t *C, int LDC)
Definition: core_cher2k.c:93
int CORE_cpemv(PLASMA_enum trans, PLASMA_enum storev, int M, int N, int L, PLASMA_Complex32_t ALPHA, const PLASMA_Complex32_t *A, int LDA, const PLASMA_Complex32_t *X, int INCX, PLASMA_Complex32_t BETA, PLASMA_Complex32_t *Y, int INCY, PLASMA_Complex32_t *WORK)
Definition: core_cpemv.c:118
int CORE_ctsmlq_corner(int m1, int n1, int m2, int n2, int m3, int n3, int k, int ib, int nb, PLASMA_Complex32_t *A1, int lda1, PLASMA_Complex32_t *A2, int lda2, PLASMA_Complex32_t *A3, int lda3, const PLASMA_Complex32_t *V, int ldv, const PLASMA_Complex32_t *T, int ldt, PLASMA_Complex32_t *WORK, int ldwork)
Definition: core_ctsmlq_corner.c:130
int CORE_cgeqrt(int M, int N, int IB, PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t *T, int LDT, PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK)
Definition: core_cgeqrt.c:86
int CORE_clarfx2c(PLASMA_enum uplo, PLASMA_Complex32_t V, PLASMA_Complex32_t TAU, PLASMA_Complex32_t *C1, PLASMA_Complex32_t *C2, PLASMA_Complex32_t *C3)
Definition: core_clarfx_tbrd.c:177
int CORE_cunmqr(PLASMA_enum side, PLASMA_enum trans, int M, int N, int K, int IB, const PLASMA_Complex32_t *V, int LDV, const PLASMA_Complex32_t *T, int LDT, PLASMA_Complex32_t *C, int LDC, PLASMA_Complex32_t *WORK, int LDWORK)
Definition: core_cunmqr.c:108
void CORE_cgeqp3_pivot(PLASMA_desc A, PLASMA_Complex32_t *F, int ldf, int jj, int k, int *jpvt, float *norms1, float *norms2, int *info)
Definition: core_cgeqp3_pivot.c:68
Definition: core_cgetrf_reclap.c:24
void CORE_csymm(PLASMA_enum side, PLASMA_enum uplo, int M, int N, PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA, const PLASMA_Complex32_t *B, int LDB, PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC)
Definition: core_csymm.c:88
int CORE_clatro(PLASMA_enum uplo, PLASMA_enum trans, int M, int N, const PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t *B, int LDB)
Definition: core_clatro.c:80
void CORE_cgbtype2cb(PLASMA_enum uplo, int N, int NB, PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t *VQ, PLASMA_Complex32_t *TAUQ, PLASMA_Complex32_t *VP, PLASMA_Complex32_t *TAUP, int st, int ed, int sweep, int Vblksiz, int WANTZ, PLASMA_Complex32_t *WORK)
Definition: core_cgbtype2cb.c:126
int CORE_clarfx2ce(PLASMA_enum uplo, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *C1, PLASMA_Complex32_t *C2, PLASMA_Complex32_t *C3)
Definition: core_clarfx_tbrd.c:323
void CORE_slaed3_reduceW(int n, int n1, int K, int l, const float *Q, int LDQ, const float *Wred, float *W)
Definition: core_slaed3_reduceW.c:60
void CORE_slaed2_computeK(int *Kptr, int n, int n1, float *betaptr, float *D, float *Q, int LDQ, float *Z, float *DLAMBDA, float *W, int *INDX, int *INDXC, int *INDXP, int *INDXQ, int *COLTYP)
Definition: core_slaed2_computeK.c:104
int CORE_ctsmqr(PLASMA_enum side, PLASMA_enum trans, int M1, int N1, int M2, int N2, int K, int IB, PLASMA_Complex32_t *A1, int LDA1, PLASMA_Complex32_t *A2, int LDA2, const PLASMA_Complex32_t *V, int LDV, const PLASMA_Complex32_t *T, int LDT, PLASMA_Complex32_t *WORK, int LDWORK)
Definition: core_ctsmqr.c:124
int CORE_ctsmlq_hetra1(PLASMA_enum side, PLASMA_enum trans, int m1, int n1, int m2, int n2, int k, int ib, PLASMA_Complex32_t *A1, int lda1, PLASMA_Complex32_t *A2, int lda2, const PLASMA_Complex32_t *V, int ldv, const PLASMA_Complex32_t *T, int ldt, PLASMA_Complex32_t *WORK, int ldwork)
Definition: core_ctsmlq_hetra1.c:125
void CORE_claswp(int N, PLASMA_Complex32_t *A, int LDA, int I1, int I2, const int *IPIV, int INC)
Definition: core_claswp.c:62
void CORE_chegst(int itype, PLASMA_enum uplo, int N, PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t *B, int LDB, int *INFO)
Definition: core_chegst.c:80
int CORE_clarfx2(PLASMA_enum side, int N, PLASMA_Complex32_t V, PLASMA_Complex32_t TAU, PLASMA_Complex32_t *C1, int LDC1, PLASMA_Complex32_t *C2, int LDC2)
Definition: core_clarfx_tbrd.c:82
void CORE_cgeqp3_update(const PLASMA_Complex32_t *Ajj, int lda1, PLASMA_Complex32_t *Ajk, int lda2, const PLASMA_Complex32_t *Fk, int ldf, int joff, int k, int koff, int nb, float *norms1, float *norms2, int *info)
Definition: core_cgeqp3_update.c:82
void CORE_ctrasm(PLASMA_enum storev, PLASMA_enum uplo, PLASMA_enum diag, int M, int N, const PLASMA_Complex32_t *A, int lda, float *work)
Definition: core_ctrasm.c:66
void CORE_clantr(PLASMA_enum norm, PLASMA_enum uplo, PLASMA_enum diag, int M, int N, const PLASMA_Complex32_t *A, int LDA, float *work, float *normA)
Definition: core_clantr.c:86
int CORE_cgbrce(PLASMA_enum uplo, int N, PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU, int st, int ed, int eltsize)
Definition: core_cgbrce.c:78
void CORE_cpltmg_fiedler(int m, int n, const PLASMA_Complex32_t *X, int incX, const PLASMA_Complex32_t *Y, int incY, PLASMA_Complex32_t *A, int lda)
Definition: core_cpltmg_fiedler.c:75
void CORE_clanhe(int norm, PLASMA_enum uplo, int N, const PLASMA_Complex32_t *A, int LDA, float *work, float *normA)
Definition: core_clanhe.c:74
int CORE_ctsmqr_corner(int m1, int n1, int m2, int n2, int m3, int n3, int k, int ib, int nb, PLASMA_Complex32_t *A1, int lda1, PLASMA_Complex32_t *A2, int lda2, PLASMA_Complex32_t *A3, int lda3, const PLASMA_Complex32_t *V, int ldv, const PLASMA_Complex32_t *T, int ldt, PLASMA_Complex32_t *WORK, int ldwork)
Definition: core_ctsmqr_corner.c:130
void CORE_cgbtype3cb(PLASMA_enum uplo, int N, int NB, PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t *VQ, PLASMA_Complex32_t *TAUQ, PLASMA_Complex32_t *VP, PLASMA_Complex32_t *TAUP, int st, int ed, int sweep, int Vblksiz, int WANTZ, PLASMA_Complex32_t *WORK)
Definition: core_cgbtype3cb.c:121
Definition: plasma.h:24
int CORE_slaed4(int n, int K, float *D, float beta, float *Q, int LDQ, const float *D0, const float *Z, const int *INDX, int start, int end)
Definition: core_slaed4.c:75
int CORE_cgetrf(int M, int N, PLASMA_Complex32_t *A, int LDA, int *IPIV, int *INFO)
Definition: core_cgetrf.c:60
void CORE_chemm(PLASMA_enum side, PLASMA_enum uplo, int M, int N, PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA, const PLASMA_Complex32_t *B, int LDB, PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC)
Definition: core_chemm.c:91
void CORE_cplgsy(PLASMA_Complex32_t bump, int m, int n, PLASMA_Complex32_t *A, int lda, int bigM, int m0, int n0, unsigned long long int seed)
Definition: core_cplgsy.c:72
void CORE_scasum(int storev, PLASMA_enum uplo, int M, int N, const PLASMA_Complex32_t *A, int lda, float *work)
Definition: core_scasum.c:61
void CORE_cpotrf(PLASMA_enum uplo, int N, PLASMA_Complex32_t *A, int LDA, int *INFO)
Definition: core_cpotrf.c:68
int CORE_cttlqt(int M, int N, int IB, PLASMA_Complex32_t *A1, int LDA1, PLASMA_Complex32_t *A2, int LDA2, PLASMA_Complex32_t *T, int LDT, PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK)
Definition: core_cttlqt.c:116
void CORE_cgeqp3_norms(PLASMA_desc A, int ioff, int joff, float *norms1, float *norms2)
Definition: core_cgeqp3_norms.c:62
void CORE_slaed3_computevectors(int K, int il_nondef, int iu_nondef, float *Q, int LDQ, float *W, float *S, const int *INDXC, int start, int end)
Definition: core_slaed3_computevectors.c:74
void CORE_csetvar(const PLASMA_Complex32_t *alpha, PLASMA_Complex32_t *x)
Definition: core_csetvar.c:37
int CORE_cgeadd(PLASMA_enum trans, int M, int N, PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t beta, PLASMA_Complex32_t *B, int LDB)
Definition: core_cgeadd.c:75
Definition: descriptor.h:41
int CORE_ctsmqr_hetra1(PLASMA_enum side, PLASMA_enum trans, int m1, int n1, int m2, int n2, int k, int ib, PLASMA_Complex32_t *A1, int lda1, PLASMA_Complex32_t *A2, int lda2, const PLASMA_Complex32_t *V, int ldv, const PLASMA_Complex32_t *T, int ldt, PLASMA_Complex32_t *WORK, int ldwork)
Definition: core_ctsmqr_hetra1.c:127
int CORE_chblrx(PLASMA_enum uplo, int N, PLASMA_desc *A, PLASMA_Complex32_t *V, PLASMA_Complex32_t *TAU, int st, int ed, int eltsize)
Definition: core_chblrx.c:78
int CORE_claswpc_ontile(PLASMA_desc descA, int i1, int i2, const int *ipiv, int inc)
Definition: core_claswp.c:296
int CORE_cttqrt(int M, int N, int IB, PLASMA_Complex32_t *A1, int LDA1, PLASMA_Complex32_t *A2, int LDA2, PLASMA_Complex32_t *T, int LDT, PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK)
Definition: core_cttqrt.c:116
int CORE_cpltmg(PLASMA_enum mtxtype, int m, int n, PLASMA_Complex32_t *A, int lda, int gM, int gN, int m0, int n0, unsigned long long int seed)
Definition: core_cpltmg.c:90
int CORE_cpltmg_hankel(PLASMA_enum uplo, int M, int N, PLASMA_Complex32_t *A, int LDA, int m0, int n0, int nb, const PLASMA_Complex32_t *V1, const PLASMA_Complex32_t *V2)
Definition: core_cpltmg_hankel.c:88
void CORE_cgemm(PLASMA_enum transA, PLASMA_enum transB, int M, int N, int K, PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA, const PLASMA_Complex32_t *B, int LDB, PLASMA_Complex32_t beta, PLASMA_Complex32_t *C, int LDC)
Definition: core_cgemm.c:90
int CORE_cgelqt(int M, int N, int IB, PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t *T, int LDT, PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK)
Definition: core_cgelqt.c:85
int CORE_ctsqrt(int M, int N, int IB, PLASMA_Complex32_t *A1, int LDA1, PLASMA_Complex32_t *A2, int LDA2, PLASMA_Complex32_t *T, int LDT, PLASMA_Complex32_t *TAU, PLASMA_Complex32_t *WORK)
Definition: core_ctsqrt.c:97
int CORE_ctradd(PLASMA_enum uplo, PLASMA_enum trans, int M, int N, PLASMA_Complex32_t alpha, const PLASMA_Complex32_t *A, int LDA, PLASMA_Complex32_t beta, PLASMA_Complex32_t *B, int LDB)
Definition: core_ctradd.c:86
int CORE_cherfb(PLASMA_enum uplo, int N, int K, int IB, int NB, const PLASMA_Complex32_t *A, int LDA, const PLASMA_Complex32_t *T, int LDT, PLASMA_Complex32_t *C, int LDC, PLASMA_Complex32_t *WORK, int LDWORK)
Definition: core_cherfb.c:110
int CORE_cgetrf_incpiv(int M, int N, int IB, PLASMA_Complex32_t *A, int LDA, int *IPIV, int *INFO)
Definition: core_cgetrf_incpiv.c:83