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