fix build error
[platform/upstream/openblas.git] / common_macro.h
1 /*********************************************************************/
2 /* Copyright 2009, 2010 The University of Texas at Austin.           */
3 /* All rights reserved.                                              */
4 /*                                                                   */
5 /* Redistribution and use in source and binary forms, with or        */
6 /* without modification, are permitted provided that the following   */
7 /* conditions are met:                                               */
8 /*                                                                   */
9 /*   1. Redistributions of source code must retain the above         */
10 /*      copyright notice, this list of conditions and the following  */
11 /*      disclaimer.                                                  */
12 /*                                                                   */
13 /*   2. Redistributions in binary form must reproduce the above      */
14 /*      copyright notice, this list of conditions and the following  */
15 /*      disclaimer in the documentation and/or other materials       */
16 /*      provided with the distribution.                              */
17 /*                                                                   */
18 /*    THIS  SOFTWARE IS PROVIDED  BY THE  UNIVERSITY OF  TEXAS AT    */
19 /*    AUSTIN  ``AS IS''  AND ANY  EXPRESS OR  IMPLIED WARRANTIES,    */
20 /*    INCLUDING, BUT  NOT LIMITED  TO, THE IMPLIED  WARRANTIES OF    */
21 /*    MERCHANTABILITY  AND FITNESS FOR  A PARTICULAR  PURPOSE ARE    */
22 /*    DISCLAIMED.  IN  NO EVENT SHALL THE UNIVERSITY  OF TEXAS AT    */
23 /*    AUSTIN OR CONTRIBUTORS BE  LIABLE FOR ANY DIRECT, INDIRECT,    */
24 /*    INCIDENTAL,  SPECIAL, EXEMPLARY,  OR  CONSEQUENTIAL DAMAGES    */
25 /*    (INCLUDING, BUT  NOT LIMITED TO,  PROCUREMENT OF SUBSTITUTE    */
26 /*    GOODS  OR  SERVICES; LOSS  OF  USE,  DATA,  OR PROFITS;  OR    */
27 /*    BUSINESS INTERRUPTION) HOWEVER CAUSED  AND ON ANY THEORY OF    */
28 /*    LIABILITY, WHETHER  IN CONTRACT, STRICT  LIABILITY, OR TORT    */
29 /*    (INCLUDING NEGLIGENCE OR OTHERWISE)  ARISING IN ANY WAY OUT    */
30 /*    OF  THE  USE OF  THIS  SOFTWARE,  EVEN  IF ADVISED  OF  THE    */
31 /*    POSSIBILITY OF SUCH DAMAGE.                                    */
32 /*                                                                   */
33 /* The views and conclusions contained in the software and           */
34 /* documentation are those of the authors and should not be          */
35 /* interpreted as representing official policies, either expressed   */
36 /* or implied, of The University of Texas at Austin.                 */
37 /*********************************************************************/
38
39 #ifndef COMMON_MACRO
40 #define COMMON_MACRO
41
42 #include "common_s.h"
43 #include "common_d.h"
44 #include "common_q.h"
45
46 #include "common_c.h"
47 #include "common_z.h"
48 #include "common_x.h"
49
50 #ifndef COMPLEX
51 #ifdef XDOUBLE
52
53 #define AMAX_K                  QAMAX_K
54 #define AMIN_K                  QAMIN_K
55 #define MAX_K                   QMAX_K
56 #define MIN_K                   QMIN_K
57 #define IAMAX_K                 IQAMAX_K
58 #define IAMIN_K                 IQAMIN_K
59 #define IMAX_K                  IQMAX_K
60 #define IMIN_K                  IQMIN_K
61 #define ASUM_K                  QASUM_K
62 #define AXPYU_K                 QAXPYU_K
63 #define AXPYC_K                 QAXPYC_K
64 #define COPY_K                  QCOPY_K
65 #define DOTU_K                  QDOTU_K
66 #define DOTC_K                  QDOTC_K
67 #define NRM2_K                  QNRM2_K
68 #define SCAL_K                  QSCAL_K
69 #define SUM_K                   QSUM_K
70 #define SWAP_K                  QSWAP_K
71 #define ROT_K                   QROT_K
72
73 #define GEMV_N                  QGEMV_N
74 #define GEMV_T                  QGEMV_T
75 #define GEMV_R                  QGEMV_R
76 #define GEMV_C                  QGEMV_C
77 #define GEMV_O                  QGEMV_O
78 #define GEMV_U                  QGEMV_U
79 #define GEMV_S                  QGEMV_S
80 #define GEMV_D                  QGEMV_D
81
82 #define GERU_K                  QGERU_K
83 #define GERC_K                  QGERC_K
84 #define GERV_K                  QGERV_K
85 #define GERD_K                  QGERD_K
86
87 #define SYMV_U                  QSYMV_U
88 #define SYMV_L                  QSYMV_L
89
90 #define SYMV_THREAD_U           QSYMV_THREAD_U
91 #define SYMV_THREAD_L           QSYMV_THREAD_L
92
93 #define GEMM_ONCOPY             QGEMM_ONCOPY
94 #define GEMM_OTCOPY             QGEMM_OTCOPY
95 #define GEMM_INCOPY             QGEMM_INCOPY
96 #define GEMM_ITCOPY             QGEMM_ITCOPY
97
98 #ifdef UNIT
99
100 #define TRMM_OUNCOPY            QTRMM_OUNUCOPY
101 #define TRMM_OUTCOPY            QTRMM_OUTUCOPY
102 #define TRMM_OLNCOPY            QTRMM_OLNUCOPY
103 #define TRMM_OLTCOPY            QTRMM_OLTUCOPY
104 #define TRSM_OUNCOPY            QTRSM_OUNUCOPY
105 #define TRSM_OUTCOPY            QTRSM_OUTUCOPY
106 #define TRSM_OLNCOPY            QTRSM_OLNUCOPY
107 #define TRSM_OLTCOPY            QTRSM_OLTUCOPY
108
109 #define TRMM_IUNCOPY            QTRMM_IUNUCOPY
110 #define TRMM_IUTCOPY            QTRMM_IUTUCOPY
111 #define TRMM_ILNCOPY            QTRMM_ILNUCOPY
112 #define TRMM_ILTCOPY            QTRMM_ILTUCOPY
113 #define TRSM_IUNCOPY            QTRSM_IUNUCOPY
114 #define TRSM_IUTCOPY            QTRSM_IUTUCOPY
115 #define TRSM_ILNCOPY            QTRSM_ILNUCOPY
116 #define TRSM_ILTCOPY            QTRSM_ILTUCOPY
117
118 #else
119
120 #define TRMM_OUNCOPY            QTRMM_OUNNCOPY
121 #define TRMM_OUTCOPY            QTRMM_OUTNCOPY
122 #define TRMM_OLNCOPY            QTRMM_OLNNCOPY
123 #define TRMM_OLTCOPY            QTRMM_OLTNCOPY
124 #define TRSM_OUNCOPY            QTRSM_OUNNCOPY
125 #define TRSM_OUTCOPY            QTRSM_OUTNCOPY
126 #define TRSM_OLNCOPY            QTRSM_OLNNCOPY
127 #define TRSM_OLTCOPY            QTRSM_OLTNCOPY
128
129 #define TRMM_IUNCOPY            QTRMM_IUNNCOPY
130 #define TRMM_IUTCOPY            QTRMM_IUTNCOPY
131 #define TRMM_ILNCOPY            QTRMM_ILNNCOPY
132 #define TRMM_ILTCOPY            QTRMM_ILTNCOPY
133 #define TRSM_IUNCOPY            QTRSM_IUNNCOPY
134 #define TRSM_IUTCOPY            QTRSM_IUTNCOPY
135 #define TRSM_ILNCOPY            QTRSM_ILNNCOPY
136 #define TRSM_ILTCOPY            QTRSM_ILTNCOPY
137
138 #endif
139
140 #define GEMM_BETA               QGEMM_BETA
141
142 #define GEMM_KERNEL_N           QGEMM_KERNEL
143 #define GEMM_KERNEL_L           QGEMM_KERNEL
144 #define GEMM_KERNEL_R           QGEMM_KERNEL
145 #define GEMM_KERNEL_B           QGEMM_KERNEL
146
147 #define TRMM_KERNEL_LN          QTRMM_KERNEL_LN
148 #define TRMM_KERNEL_LT          QTRMM_KERNEL_LT
149 #define TRMM_KERNEL_LR          QTRMM_KERNEL_LN
150 #define TRMM_KERNEL_LC          QTRMM_KERNEL_LT
151 #define TRMM_KERNEL_RN          QTRMM_KERNEL_RN
152 #define TRMM_KERNEL_RT          QTRMM_KERNEL_RT
153 #define TRMM_KERNEL_RR          QTRMM_KERNEL_RN
154 #define TRMM_KERNEL_RC          QTRMM_KERNEL_RT
155
156 #define TRSM_KERNEL_LN          QTRSM_KERNEL_LN
157 #define TRSM_KERNEL_LT          QTRSM_KERNEL_LT
158 #define TRSM_KERNEL_LR          QTRSM_KERNEL_LN
159 #define TRSM_KERNEL_LC          QTRSM_KERNEL_LT
160 #define TRSM_KERNEL_RN          QTRSM_KERNEL_RN
161 #define TRSM_KERNEL_RT          QTRSM_KERNEL_RT
162 #define TRSM_KERNEL_RR          QTRSM_KERNEL_RN
163 #define TRSM_KERNEL_RC          QTRSM_KERNEL_RT
164
165 #define SYMM_IUTCOPY            QSYMM_IUTCOPY
166 #define SYMM_ILTCOPY            QSYMM_ILTCOPY
167 #define SYMM_OUTCOPY            QSYMM_OUTCOPY
168 #define SYMM_OLTCOPY            QSYMM_OLTCOPY
169
170 #define GEMM_NN                 QGEMM_NN
171 #define GEMM_CN                 QGEMM_TN
172 #define GEMM_TN                 QGEMM_TN
173 #define GEMM_NC                 QGEMM_NT
174 #define GEMM_NT                 QGEMM_NT
175 #define GEMM_CC                 QGEMM_TT
176 #define GEMM_CT                 QGEMM_TT
177 #define GEMM_TC                 QGEMM_TT
178 #define GEMM_TT                 QGEMM_TT
179 #define GEMM_NR                 QGEMM_NN
180 #define GEMM_TR                 QGEMM_TN
181 #define GEMM_CR                 QGEMM_TN
182 #define GEMM_RN                 QGEMM_NN
183 #define GEMM_RT                 QGEMM_NT
184 #define GEMM_RC                 QGEMM_NT
185 #define GEMM_RR                 QGEMM_NN
186
187 #define SYMM_LU                 QSYMM_LU
188 #define SYMM_LL                 QSYMM_LL
189 #define SYMM_RU                 QSYMM_RU
190 #define SYMM_RL                 QSYMM_RL
191
192 #define HEMM_LU                 QHEMM_LU
193 #define HEMM_LL                 QHEMM_LL
194 #define HEMM_RU                 QHEMM_RU
195 #define HEMM_RL                 QHEMM_RL
196
197 #define SYRK_UN                 QSYRK_UN
198 #define SYRK_UT                 QSYRK_UT
199 #define SYRK_LN                 QSYRK_LN
200 #define SYRK_LT                 QSYRK_LT
201 #define SYRK_UR                 QSYRK_UN
202 #define SYRK_UC                 QSYRK_UT
203 #define SYRK_LR                 QSYRK_LN
204 #define SYRK_LC                 QSYRK_LT
205
206 #define SYRK_KERNEL_U           QSYRK_KERNEL_U
207 #define SYRK_KERNEL_L           QSYRK_KERNEL_L
208
209 #define HERK_UN                 QSYRK_UN
210 #define HERK_LN                 QSYRK_LN
211 #define HERK_UC                 QSYRK_UT
212 #define HERK_LC                 QSYRK_LT
213
214 #define HER2K_UN                QSYR2K_UN
215 #define HER2K_LN                QSYR2K_LN
216 #define HER2K_UC                QSYR2K_UT
217 #define HER2K_LC                QSYR2K_LT
218
219 #define SYR2K_UN                QSYR2K_UN
220 #define SYR2K_UT                QSYR2K_UT
221 #define SYR2K_LN                QSYR2K_LN
222 #define SYR2K_LT                QSYR2K_LT
223 #define SYR2K_UR                QSYR2K_UN
224 #define SYR2K_UC                QSYR2K_UT
225 #define SYR2K_LR                QSYR2K_LN
226 #define SYR2K_LC                QSYR2K_LT
227
228 #define SYR2K_KERNEL_U          QSYR2K_KERNEL_U
229 #define SYR2K_KERNEL_L          QSYR2K_KERNEL_L
230
231 #define TRMM_LNUU               QTRMM_LNUU
232 #define TRMM_LNUN               QTRMM_LNUN
233 #define TRMM_LNLU               QTRMM_LNLU
234 #define TRMM_LNLN               QTRMM_LNLN
235 #define TRMM_LTUU               QTRMM_LTUU
236 #define TRMM_LTUN               QTRMM_LTUN
237 #define TRMM_LTLU               QTRMM_LTLU
238 #define TRMM_LTLN               QTRMM_LTLN
239 #define TRMM_LRUU               QTRMM_LNUU
240 #define TRMM_LRUN               QTRMM_LNUN
241 #define TRMM_LRLU               QTRMM_LNLU
242 #define TRMM_LRLN               QTRMM_LNLN
243 #define TRMM_LCUU               QTRMM_LTUU
244 #define TRMM_LCUN               QTRMM_LTUN
245 #define TRMM_LCLU               QTRMM_LTLU
246 #define TRMM_LCLN               QTRMM_LTLN
247 #define TRMM_RNUU               QTRMM_RNUU
248 #define TRMM_RNUN               QTRMM_RNUN
249 #define TRMM_RNLU               QTRMM_RNLU
250 #define TRMM_RNLN               QTRMM_RNLN
251 #define TRMM_RTUU               QTRMM_RTUU
252 #define TRMM_RTUN               QTRMM_RTUN
253 #define TRMM_RTLU               QTRMM_RTLU
254 #define TRMM_RTLN               QTRMM_RTLN
255 #define TRMM_RRUU               QTRMM_RNUU
256 #define TRMM_RRUN               QTRMM_RNUN
257 #define TRMM_RRLU               QTRMM_RNLU
258 #define TRMM_RRLN               QTRMM_RNLN
259 #define TRMM_RCUU               QTRMM_RTUU
260 #define TRMM_RCUN               QTRMM_RTUN
261 #define TRMM_RCLU               QTRMM_RTLU
262 #define TRMM_RCLN               QTRMM_RTLN
263
264 #define TRSM_LNUU               QTRSM_LNUU
265 #define TRSM_LNUN               QTRSM_LNUN
266 #define TRSM_LNLU               QTRSM_LNLU
267 #define TRSM_LNLN               QTRSM_LNLN
268 #define TRSM_LTUU               QTRSM_LTUU
269 #define TRSM_LTUN               QTRSM_LTUN
270 #define TRSM_LTLU               QTRSM_LTLU
271 #define TRSM_LTLN               QTRSM_LTLN
272 #define TRSM_LRUU               QTRSM_LNUU
273 #define TRSM_LRUN               QTRSM_LNUN
274 #define TRSM_LRLU               QTRSM_LNLU
275 #define TRSM_LRLN               QTRSM_LNLN
276 #define TRSM_LCUU               QTRSM_LTUU
277 #define TRSM_LCUN               QTRSM_LTUN
278 #define TRSM_LCLU               QTRSM_LTLU
279 #define TRSM_LCLN               QTRSM_LTLN
280 #define TRSM_RNUU               QTRSM_RNUU
281 #define TRSM_RNUN               QTRSM_RNUN
282 #define TRSM_RNLU               QTRSM_RNLU
283 #define TRSM_RNLN               QTRSM_RNLN
284 #define TRSM_RTUU               QTRSM_RTUU
285 #define TRSM_RTUN               QTRSM_RTUN
286 #define TRSM_RTLU               QTRSM_RTLU
287 #define TRSM_RTLN               QTRSM_RTLN
288 #define TRSM_RRUU               QTRSM_RNUU
289 #define TRSM_RRUN               QTRSM_RNUN
290 #define TRSM_RRLU               QTRSM_RNLU
291 #define TRSM_RRLN               QTRSM_RNLN
292 #define TRSM_RCUU               QTRSM_RTUU
293 #define TRSM_RCUN               QTRSM_RTUN
294 #define TRSM_RCLU               QTRSM_RTLU
295 #define TRSM_RCLN               QTRSM_RTLN
296
297 #define GEMM_THREAD_NN          QGEMM_THREAD_NN
298 #define GEMM_THREAD_CN          QGEMM_THREAD_TN
299 #define GEMM_THREAD_TN          QGEMM_THREAD_TN
300 #define GEMM_THREAD_NC          QGEMM_THREAD_NT
301 #define GEMM_THREAD_NT          QGEMM_THREAD_NT
302 #define GEMM_THREAD_CC          QGEMM_THREAD_TT
303 #define GEMM_THREAD_CT          QGEMM_THREAD_TT
304 #define GEMM_THREAD_TC          QGEMM_THREAD_TT
305 #define GEMM_THREAD_TT          QGEMM_THREAD_TT
306 #define GEMM_THREAD_NR          QGEMM_THREAD_NN
307 #define GEMM_THREAD_TR          QGEMM_THREAD_TN
308 #define GEMM_THREAD_CR          QGEMM_THREAD_TN
309 #define GEMM_THREAD_RN          QGEMM_THREAD_NN
310 #define GEMM_THREAD_RT          QGEMM_THREAD_NT
311 #define GEMM_THREAD_RC          QGEMM_THREAD_NT
312 #define GEMM_THREAD_RR          QGEMM_THREAD_NN
313
314 #define SYMM_THREAD_LU          QSYMM_THREAD_LU
315 #define SYMM_THREAD_LL          QSYMM_THREAD_LL
316 #define SYMM_THREAD_RU          QSYMM_THREAD_RU
317 #define SYMM_THREAD_RL          QSYMM_THREAD_RL
318
319 #define HEMM_THREAD_LU          QHEMM_THREAD_LU
320 #define HEMM_THREAD_LL          QHEMM_THREAD_LL
321 #define HEMM_THREAD_RU          QHEMM_THREAD_RU
322 #define HEMM_THREAD_RL          QHEMM_THREAD_RL
323
324 #define SYRK_THREAD_UN          QSYRK_THREAD_UN
325 #define SYRK_THREAD_UT          QSYRK_THREAD_UT
326 #define SYRK_THREAD_LN          QSYRK_THREAD_LN
327 #define SYRK_THREAD_LT          QSYRK_THREAD_LT
328 #define SYRK_THREAD_UR          QSYRK_THREAD_UR
329 #define SYRK_THREAD_UC          QSYRK_THREAD_UC
330 #define SYRK_THREAD_LR          QSYRK_THREAD_LN
331 #define SYRK_THREAD_LC          QSYRK_THREAD_LT
332
333 #define HERK_THREAD_UN          QSYRK_THREAD_UN
334 #define HERK_THREAD_UT          QSYRK_THREAD_UT
335 #define HERK_THREAD_LN          QSYRK_THREAD_LN
336 #define HERK_THREAD_LT          QSYRK_THREAD_LT
337 #define HERK_THREAD_UR          QSYRK_THREAD_UR
338 #define HERK_THREAD_UC          QSYRK_THREAD_UC
339 #define HERK_THREAD_LR          QSYRK_THREAD_LN
340 #define HERK_THREAD_LC          QSYRK_THREAD_LT
341
342 #elif defined(DOUBLE)
343
344 #define AMAX_K                  DAMAX_K
345 #define AMIN_K                  DAMIN_K
346 #define MAX_K                   DMAX_K
347 #define MIN_K                   DMIN_K
348 #define IAMAX_K                 IDAMAX_K
349 #define IAMIN_K                 IDAMIN_K
350 #define IMAX_K                  IDMAX_K
351 #define IMIN_K                  IDMIN_K
352 #define ASUM_K                  DASUM_K
353 #define AXPYU_K                 DAXPYU_K
354 #define AXPYC_K                 DAXPYC_K
355 #define COPY_K                  DCOPY_K
356 #define DOTU_K                  DDOTU_K
357 #define DOTC_K                  DDOTC_K
358 #define NRM2_K                  DNRM2_K
359 #define SCAL_K                  DSCAL_K
360 #define SUM_K                   DSUM_K
361 #define SWAP_K                  DSWAP_K
362 #define ROT_K                   DROT_K
363
364 #define GEMV_N                  DGEMV_N
365 #define GEMV_T                  DGEMV_T
366 #define GEMV_R                  DGEMV_R
367 #define GEMV_C                  DGEMV_C
368 #define GEMV_O                  DGEMV_O
369 #define GEMV_U                  DGEMV_U
370 #define GEMV_S                  DGEMV_S
371 #define GEMV_D                  DGEMV_D
372
373 #define GERU_K                  DGERU_K
374 #define GERC_K                  DGERC_K
375 #define GERV_K                  DGERV_K
376 #define GERD_K                  DGERD_K
377
378 #define SYMV_U                  DSYMV_U
379 #define SYMV_L                  DSYMV_L
380
381 #define SYMV_THREAD_U           DSYMV_THREAD_U
382 #define SYMV_THREAD_L           DSYMV_THREAD_L
383
384 #define GEMM_ONCOPY             DGEMM_ONCOPY
385 #define GEMM_OTCOPY             DGEMM_OTCOPY
386 #define GEMM_INCOPY             DGEMM_INCOPY
387 #define GEMM_ITCOPY             DGEMM_ITCOPY
388
389 #ifdef UNIT
390
391 #define TRMM_OUNCOPY            DTRMM_OUNUCOPY
392 #define TRMM_OUTCOPY            DTRMM_OUTUCOPY
393 #define TRMM_OLNCOPY            DTRMM_OLNUCOPY
394 #define TRMM_OLTCOPY            DTRMM_OLTUCOPY
395 #define TRSM_OUNCOPY            DTRSM_OUNUCOPY
396 #define TRSM_OUTCOPY            DTRSM_OUTUCOPY
397 #define TRSM_OLNCOPY            DTRSM_OLNUCOPY
398 #define TRSM_OLTCOPY            DTRSM_OLTUCOPY
399
400 #define TRMM_IUNCOPY            DTRMM_IUNUCOPY
401 #define TRMM_IUTCOPY            DTRMM_IUTUCOPY
402 #define TRMM_ILNCOPY            DTRMM_ILNUCOPY
403 #define TRMM_ILTCOPY            DTRMM_ILTUCOPY
404 #define TRSM_IUNCOPY            DTRSM_IUNUCOPY
405 #define TRSM_IUTCOPY            DTRSM_IUTUCOPY
406 #define TRSM_ILNCOPY            DTRSM_ILNUCOPY
407 #define TRSM_ILTCOPY            DTRSM_ILTUCOPY
408
409 #else
410
411 #define TRMM_OUNCOPY            DTRMM_OUNNCOPY
412 #define TRMM_OUTCOPY            DTRMM_OUTNCOPY
413 #define TRMM_OLNCOPY            DTRMM_OLNNCOPY
414 #define TRMM_OLTCOPY            DTRMM_OLTNCOPY
415 #define TRSM_OUNCOPY            DTRSM_OUNNCOPY
416 #define TRSM_OUTCOPY            DTRSM_OUTNCOPY
417 #define TRSM_OLNCOPY            DTRSM_OLNNCOPY
418 #define TRSM_OLTCOPY            DTRSM_OLTNCOPY
419
420 #define TRMM_IUNCOPY            DTRMM_IUNNCOPY
421 #define TRMM_IUTCOPY            DTRMM_IUTNCOPY
422 #define TRMM_ILNCOPY            DTRMM_ILNNCOPY
423 #define TRMM_ILTCOPY            DTRMM_ILTNCOPY
424 #define TRSM_IUNCOPY            DTRSM_IUNNCOPY
425 #define TRSM_IUTCOPY            DTRSM_IUTNCOPY
426 #define TRSM_ILNCOPY            DTRSM_ILNNCOPY
427 #define TRSM_ILTCOPY            DTRSM_ILTNCOPY
428
429 #endif
430
431 #define GEMM_BETA               DGEMM_BETA
432
433 #define GEMM_KERNEL_N           DGEMM_KERNEL
434 #define GEMM_KERNEL_L           DGEMM_KERNEL
435 #define GEMM_KERNEL_R           DGEMM_KERNEL
436 #define GEMM_KERNEL_B           DGEMM_KERNEL
437
438 #define TRMM_KERNEL_LN          DTRMM_KERNEL_LN
439 #define TRMM_KERNEL_LT          DTRMM_KERNEL_LT
440 #define TRMM_KERNEL_LR          DTRMM_KERNEL_LN
441 #define TRMM_KERNEL_LC          DTRMM_KERNEL_LT
442 #define TRMM_KERNEL_RN          DTRMM_KERNEL_RN
443 #define TRMM_KERNEL_RT          DTRMM_KERNEL_RT
444 #define TRMM_KERNEL_RR          DTRMM_KERNEL_RN
445 #define TRMM_KERNEL_RC          DTRMM_KERNEL_RT
446
447 #define TRSM_KERNEL_LN          DTRSM_KERNEL_LN
448 #define TRSM_KERNEL_LT          DTRSM_KERNEL_LT
449 #define TRSM_KERNEL_LR          DTRSM_KERNEL_LN
450 #define TRSM_KERNEL_LC          DTRSM_KERNEL_LT
451 #define TRSM_KERNEL_RN          DTRSM_KERNEL_RN
452 #define TRSM_KERNEL_RT          DTRSM_KERNEL_RT
453 #define TRSM_KERNEL_RR          DTRSM_KERNEL_RN
454 #define TRSM_KERNEL_RC          DTRSM_KERNEL_RT
455
456 #define SYMM_IUTCOPY            DSYMM_IUTCOPY
457 #define SYMM_ILTCOPY            DSYMM_ILTCOPY
458 #define SYMM_OUTCOPY            DSYMM_OUTCOPY
459 #define SYMM_OLTCOPY            DSYMM_OLTCOPY
460
461 #define GEMM_NN                 DGEMM_NN
462 #define GEMM_CN                 DGEMM_TN
463 #define GEMM_TN                 DGEMM_TN
464 #define GEMM_NC                 DGEMM_NT
465 #define GEMM_NT                 DGEMM_NT
466 #define GEMM_CC                 DGEMM_TT
467 #define GEMM_CT                 DGEMM_TT
468 #define GEMM_TC                 DGEMM_TT
469 #define GEMM_TT                 DGEMM_TT
470 #define GEMM_NR                 DGEMM_NN
471 #define GEMM_TR                 DGEMM_TN
472 #define GEMM_CR                 DGEMM_TN
473 #define GEMM_RN                 DGEMM_NN
474 #define GEMM_RT                 DGEMM_NT
475 #define GEMM_RC                 DGEMM_NT
476 #define GEMM_RR                 DGEMM_NN
477
478 #define SYMM_LU                 DSYMM_LU
479 #define SYMM_LL                 DSYMM_LL
480 #define SYMM_RU                 DSYMM_RU
481 #define SYMM_RL                 DSYMM_RL
482
483 #define HEMM_LU                 DHEMM_LU
484 #define HEMM_LL                 DHEMM_LL
485 #define HEMM_RU                 DHEMM_RU
486 #define HEMM_RL                 DHEMM_RL
487
488 #define SYRK_UN                 DSYRK_UN
489 #define SYRK_UT                 DSYRK_UT
490 #define SYRK_LN                 DSYRK_LN
491 #define SYRK_LT                 DSYRK_LT
492 #define SYRK_UR                 DSYRK_UN
493 #define SYRK_UC                 DSYRK_UT
494 #define SYRK_LR                 DSYRK_LN
495 #define SYRK_LC                 DSYRK_LT
496
497 #define SYRK_KERNEL_U           DSYRK_KERNEL_U
498 #define SYRK_KERNEL_L           DSYRK_KERNEL_L
499
500 #define HERK_UN                 DSYRK_UN
501 #define HERK_LN                 DSYRK_LN
502 #define HERK_UC                 DSYRK_UT
503 #define HERK_LC                 DSYRK_LT
504
505 #define HER2K_UN                DSYR2K_UN
506 #define HER2K_LN                DSYR2K_LN
507 #define HER2K_UC                DSYR2K_UT
508 #define HER2K_LC                DSYR2K_LT
509
510 #define SYR2K_UN                DSYR2K_UN
511 #define SYR2K_UT                DSYR2K_UT
512 #define SYR2K_LN                DSYR2K_LN
513 #define SYR2K_LT                DSYR2K_LT
514 #define SYR2K_UR                DSYR2K_UN
515 #define SYR2K_UC                DSYR2K_UT
516 #define SYR2K_LR                DSYR2K_LN
517 #define SYR2K_LC                DSYR2K_LT
518
519 #define SYR2K_KERNEL_U          DSYR2K_KERNEL_U
520 #define SYR2K_KERNEL_L          DSYR2K_KERNEL_L
521
522 #define TRMM_LNUU               DTRMM_LNUU
523 #define TRMM_LNUN               DTRMM_LNUN
524 #define TRMM_LNLU               DTRMM_LNLU
525 #define TRMM_LNLN               DTRMM_LNLN
526 #define TRMM_LTUU               DTRMM_LTUU
527 #define TRMM_LTUN               DTRMM_LTUN
528 #define TRMM_LTLU               DTRMM_LTLU
529 #define TRMM_LTLN               DTRMM_LTLN
530 #define TRMM_LRUU               DTRMM_LNUU
531 #define TRMM_LRUN               DTRMM_LNUN
532 #define TRMM_LRLU               DTRMM_LNLU
533 #define TRMM_LRLN               DTRMM_LNLN
534 #define TRMM_LCUU               DTRMM_LTUU
535 #define TRMM_LCUN               DTRMM_LTUN
536 #define TRMM_LCLU               DTRMM_LTLU
537 #define TRMM_LCLN               DTRMM_LTLN
538 #define TRMM_RNUU               DTRMM_RNUU
539 #define TRMM_RNUN               DTRMM_RNUN
540 #define TRMM_RNLU               DTRMM_RNLU
541 #define TRMM_RNLN               DTRMM_RNLN
542 #define TRMM_RTUU               DTRMM_RTUU
543 #define TRMM_RTUN               DTRMM_RTUN
544 #define TRMM_RTLU               DTRMM_RTLU
545 #define TRMM_RTLN               DTRMM_RTLN
546 #define TRMM_RRUU               DTRMM_RNUU
547 #define TRMM_RRUN               DTRMM_RNUN
548 #define TRMM_RRLU               DTRMM_RNLU
549 #define TRMM_RRLN               DTRMM_RNLN
550 #define TRMM_RCUU               DTRMM_RTUU
551 #define TRMM_RCUN               DTRMM_RTUN
552 #define TRMM_RCLU               DTRMM_RTLU
553 #define TRMM_RCLN               DTRMM_RTLN
554
555 #define TRSM_LNUU               DTRSM_LNUU
556 #define TRSM_LNUN               DTRSM_LNUN
557 #define TRSM_LNLU               DTRSM_LNLU
558 #define TRSM_LNLN               DTRSM_LNLN
559 #define TRSM_LTUU               DTRSM_LTUU
560 #define TRSM_LTUN               DTRSM_LTUN
561 #define TRSM_LTLU               DTRSM_LTLU
562 #define TRSM_LTLN               DTRSM_LTLN
563 #define TRSM_LRUU               DTRSM_LNUU
564 #define TRSM_LRUN               DTRSM_LNUN
565 #define TRSM_LRLU               DTRSM_LNLU
566 #define TRSM_LRLN               DTRSM_LNLN
567 #define TRSM_LCUU               DTRSM_LTUU
568 #define TRSM_LCUN               DTRSM_LTUN
569 #define TRSM_LCLU               DTRSM_LTLU
570 #define TRSM_LCLN               DTRSM_LTLN
571 #define TRSM_RNUU               DTRSM_RNUU
572 #define TRSM_RNUN               DTRSM_RNUN
573 #define TRSM_RNLU               DTRSM_RNLU
574 #define TRSM_RNLN               DTRSM_RNLN
575 #define TRSM_RTUU               DTRSM_RTUU
576 #define TRSM_RTUN               DTRSM_RTUN
577 #define TRSM_RTLU               DTRSM_RTLU
578 #define TRSM_RTLN               DTRSM_RTLN
579 #define TRSM_RRUU               DTRSM_RNUU
580 #define TRSM_RRUN               DTRSM_RNUN
581 #define TRSM_RRLU               DTRSM_RNLU
582 #define TRSM_RRLN               DTRSM_RNLN
583 #define TRSM_RCUU               DTRSM_RTUU
584 #define TRSM_RCUN               DTRSM_RTUN
585 #define TRSM_RCLU               DTRSM_RTLU
586 #define TRSM_RCLN               DTRSM_RTLN
587
588 #define GEMM_THREAD_NN          DGEMM_THREAD_NN
589 #define GEMM_THREAD_CN          DGEMM_THREAD_TN
590 #define GEMM_THREAD_TN          DGEMM_THREAD_TN
591 #define GEMM_THREAD_NC          DGEMM_THREAD_NT
592 #define GEMM_THREAD_NT          DGEMM_THREAD_NT
593 #define GEMM_THREAD_CC          DGEMM_THREAD_TT
594 #define GEMM_THREAD_CT          DGEMM_THREAD_TT
595 #define GEMM_THREAD_TC          DGEMM_THREAD_TT
596 #define GEMM_THREAD_TT          DGEMM_THREAD_TT
597 #define GEMM_THREAD_NR          DGEMM_THREAD_NN
598 #define GEMM_THREAD_TR          DGEMM_THREAD_TN
599 #define GEMM_THREAD_CR          DGEMM_THREAD_TN
600 #define GEMM_THREAD_RN          DGEMM_THREAD_NN
601 #define GEMM_THREAD_RT          DGEMM_THREAD_NT
602 #define GEMM_THREAD_RC          DGEMM_THREAD_NT
603 #define GEMM_THREAD_RR          DGEMM_THREAD_NN
604
605 #define SYMM_THREAD_LU          DSYMM_THREAD_LU
606 #define SYMM_THREAD_LL          DSYMM_THREAD_LL
607 #define SYMM_THREAD_RU          DSYMM_THREAD_RU
608 #define SYMM_THREAD_RL          DSYMM_THREAD_RL
609
610 #define HEMM_THREAD_LU          DHEMM_THREAD_LU
611 #define HEMM_THREAD_LL          DHEMM_THREAD_LL
612 #define HEMM_THREAD_RU          DHEMM_THREAD_RU
613 #define HEMM_THREAD_RL          DHEMM_THREAD_RL
614
615 #define SYRK_THREAD_UN          DSYRK_THREAD_UN
616 #define SYRK_THREAD_UT          DSYRK_THREAD_UT
617 #define SYRK_THREAD_LN          DSYRK_THREAD_LN
618 #define SYRK_THREAD_LT          DSYRK_THREAD_LT
619 #define SYRK_THREAD_UR          DSYRK_THREAD_UR
620 #define SYRK_THREAD_UC          DSYRK_THREAD_UC
621 #define SYRK_THREAD_LR          DSYRK_THREAD_LN
622 #define SYRK_THREAD_LC          DSYRK_THREAD_LT
623
624 #define HERK_THREAD_UN          DSYRK_THREAD_UN
625 #define HERK_THREAD_UT          DSYRK_THREAD_UT
626 #define HERK_THREAD_LN          DSYRK_THREAD_LN
627 #define HERK_THREAD_LT          DSYRK_THREAD_LT
628 #define HERK_THREAD_UR          DSYRK_THREAD_UR
629 #define HERK_THREAD_UC          DSYRK_THREAD_UC
630 #define HERK_THREAD_LR          DSYRK_THREAD_LN
631 #define HERK_THREAD_LC          DSYRK_THREAD_LT
632
633 #define AXPBY_K                 DAXPBY_K
634
635 #define OMATCOPY_K_CN           DOMATCOPY_K_CN
636 #define OMATCOPY_K_RN           DOMATCOPY_K_RN
637 #define OMATCOPY_K_CT           DOMATCOPY_K_CT
638 #define OMATCOPY_K_RT           DOMATCOPY_K_RT
639 #define IMATCOPY_K_CN           DIMATCOPY_K_CN
640 #define IMATCOPY_K_RN           DIMATCOPY_K_RN
641 #define IMATCOPY_K_CT           DIMATCOPY_K_CT
642 #define IMATCOPY_K_RT           DIMATCOPY_K_RT
643
644 #define GEADD_K                 DGEADD_K 
645 #else
646
647 #define AMAX_K                  SAMAX_K
648 #define AMIN_K                  SAMIN_K
649 #define MAX_K                   SMAX_K
650 #define MIN_K                   SMIN_K
651 #define IAMAX_K                 ISAMAX_K
652 #define IAMIN_K                 ISAMIN_K
653 #define IMAX_K                  ISMAX_K
654 #define IMIN_K                  ISMIN_K
655 #define ASUM_K                  SASUM_K
656 #define AXPYU_K                 SAXPYU_K
657 #define AXPYC_K                 SAXPYU_K
658 #define COPY_K                  SCOPY_K
659 #define DOTU_K                  SDOTU_K
660 #define DOTC_K                  SDOTC_K
661 #define NRM2_K                  SNRM2_K
662 #define SCAL_K                  SSCAL_K
663 #define SUM_K                   SSUM_K
664 #define SWAP_K                  SSWAP_K
665 #define ROT_K                   SROT_K
666
667 #define GEMV_N                  SGEMV_N
668 #define GEMV_T                  SGEMV_T
669 #define GEMV_R                  SGEMV_R
670 #define GEMV_C                  SGEMV_C
671 #define GEMV_O                  SGEMV_O
672 #define GEMV_U                  SGEMV_U
673 #define GEMV_S                  SGEMV_S
674 #define GEMV_D                  SGEMV_D
675
676 #define GERU_K                  SGERU_K
677 #define GERC_K                  SGERC_K
678 #define GERV_K                  SGERV_K
679 #define GERD_K                  SGERD_K
680
681 #define SYMV_U                  SSYMV_U
682 #define SYMV_L                  SSYMV_L
683
684 #define SYMV_THREAD_U           SSYMV_THREAD_U
685 #define SYMV_THREAD_L           SSYMV_THREAD_L
686
687 #define GEMM_ONCOPY             SGEMM_ONCOPY
688 #define GEMM_OTCOPY             SGEMM_OTCOPY
689 #define GEMM_INCOPY             SGEMM_INCOPY
690 #define GEMM_ITCOPY             SGEMM_ITCOPY
691
692 #ifdef UNIT
693
694 #define TRMM_OUNCOPY            STRMM_OUNUCOPY
695 #define TRMM_OUTCOPY            STRMM_OUTUCOPY
696 #define TRMM_OLNCOPY            STRMM_OLNUCOPY
697 #define TRMM_OLTCOPY            STRMM_OLTUCOPY
698 #define TRSM_OUNCOPY            STRSM_OUNUCOPY
699 #define TRSM_OUTCOPY            STRSM_OUTUCOPY
700 #define TRSM_OLNCOPY            STRSM_OLNUCOPY
701 #define TRSM_OLTCOPY            STRSM_OLTUCOPY
702
703 #define TRMM_IUNCOPY            STRMM_IUNUCOPY
704 #define TRMM_IUTCOPY            STRMM_IUTUCOPY
705 #define TRMM_ILNCOPY            STRMM_ILNUCOPY
706 #define TRMM_ILTCOPY            STRMM_ILTUCOPY
707 #define TRSM_IUNCOPY            STRSM_IUNUCOPY
708 #define TRSM_IUTCOPY            STRSM_IUTUCOPY
709 #define TRSM_ILNCOPY            STRSM_ILNUCOPY
710 #define TRSM_ILTCOPY            STRSM_ILTUCOPY
711
712 #else
713
714 #define TRMM_OUNCOPY            STRMM_OUNNCOPY
715 #define TRMM_OUTCOPY            STRMM_OUTNCOPY
716 #define TRMM_OLNCOPY            STRMM_OLNNCOPY
717 #define TRMM_OLTCOPY            STRMM_OLTNCOPY
718 #define TRSM_OUNCOPY            STRSM_OUNNCOPY
719 #define TRSM_OUTCOPY            STRSM_OUTNCOPY
720 #define TRSM_OLNCOPY            STRSM_OLNNCOPY
721 #define TRSM_OLTCOPY            STRSM_OLTNCOPY
722
723 #define TRMM_IUNCOPY            STRMM_IUNNCOPY
724 #define TRMM_IUTCOPY            STRMM_IUTNCOPY
725 #define TRMM_ILNCOPY            STRMM_ILNNCOPY
726 #define TRMM_ILTCOPY            STRMM_ILTNCOPY
727 #define TRSM_IUNCOPY            STRSM_IUNNCOPY
728 #define TRSM_IUTCOPY            STRSM_IUTNCOPY
729 #define TRSM_ILNCOPY            STRSM_ILNNCOPY
730 #define TRSM_ILTCOPY            STRSM_ILTNCOPY
731
732 #endif
733
734 #define GEMM_BETA               SGEMM_BETA
735
736 #define GEMM_KERNEL_N           SGEMM_KERNEL
737 #define GEMM_KERNEL_L           SGEMM_KERNEL
738 #define GEMM_KERNEL_R           SGEMM_KERNEL
739 #define GEMM_KERNEL_B           SGEMM_KERNEL
740
741 #define TRMM_KERNEL_LN          STRMM_KERNEL_LN
742 #define TRMM_KERNEL_LT          STRMM_KERNEL_LT
743 #define TRMM_KERNEL_LR          STRMM_KERNEL_LN
744 #define TRMM_KERNEL_LC          STRMM_KERNEL_LT
745 #define TRMM_KERNEL_RN          STRMM_KERNEL_RN
746 #define TRMM_KERNEL_RT          STRMM_KERNEL_RT
747 #define TRMM_KERNEL_RR          STRMM_KERNEL_RN
748 #define TRMM_KERNEL_RC          STRMM_KERNEL_RT
749
750 #define TRSM_KERNEL_LN          STRSM_KERNEL_LN
751 #define TRSM_KERNEL_LT          STRSM_KERNEL_LT
752 #define TRSM_KERNEL_LR          STRSM_KERNEL_LN
753 #define TRSM_KERNEL_LC          STRSM_KERNEL_LT
754 #define TRSM_KERNEL_RN          STRSM_KERNEL_RN
755 #define TRSM_KERNEL_RT          STRSM_KERNEL_RT
756 #define TRSM_KERNEL_RR          STRSM_KERNEL_RN
757 #define TRSM_KERNEL_RC          STRSM_KERNEL_RT
758
759 #define SYMM_IUTCOPY            SSYMM_IUTCOPY
760 #define SYMM_ILTCOPY            SSYMM_ILTCOPY
761 #define SYMM_OUTCOPY            SSYMM_OUTCOPY
762 #define SYMM_OLTCOPY            SSYMM_OLTCOPY
763
764 #define GEMM_NN                 SGEMM_NN
765 #define GEMM_CN                 SGEMM_TN
766 #define GEMM_TN                 SGEMM_TN
767 #define GEMM_NC                 SGEMM_NT
768 #define GEMM_NT                 SGEMM_NT
769 #define GEMM_CC                 SGEMM_TT
770 #define GEMM_CT                 SGEMM_TT
771 #define GEMM_TC                 SGEMM_TT
772 #define GEMM_TT                 SGEMM_TT
773 #define GEMM_NR                 SGEMM_NN
774 #define GEMM_TR                 SGEMM_TN
775 #define GEMM_CR                 SGEMM_TN
776 #define GEMM_RN                 SGEMM_NN
777 #define GEMM_RT                 SGEMM_NT
778 #define GEMM_RC                 SGEMM_NT
779 #define GEMM_RR                 SGEMM_NN
780
781 #define SYMM_LU                 SSYMM_LU
782 #define SYMM_LL                 SSYMM_LL
783 #define SYMM_RU                 SSYMM_RU
784 #define SYMM_RL                 SSYMM_RL
785
786 #define HEMM_LU                 SHEMM_LU
787 #define HEMM_LL                 SHEMM_LL
788 #define HEMM_RU                 SHEMM_RU
789 #define HEMM_RL                 SHEMM_RL
790
791 #define SYRK_UN                 SSYRK_UN
792 #define SYRK_UT                 SSYRK_UT
793 #define SYRK_LN                 SSYRK_LN
794 #define SYRK_LT                 SSYRK_LT
795 #define SYRK_UR                 SSYRK_UN
796 #define SYRK_UC                 SSYRK_UT
797 #define SYRK_LR                 SSYRK_LN
798 #define SYRK_LC                 SSYRK_LT
799
800 #define SYRK_KERNEL_U           SSYRK_KERNEL_U
801 #define SYRK_KERNEL_L           SSYRK_KERNEL_L
802
803 #define HERK_UN                 SSYRK_UN
804 #define HERK_LN                 SSYRK_LN
805 #define HERK_UC                 SSYRK_UT
806 #define HERK_LC                 SSYRK_LT
807
808 #define HER2K_UN                SSYR2K_UN
809 #define HER2K_LN                SSYR2K_LN
810 #define HER2K_UC                SSYR2K_UT
811 #define HER2K_LC                SSYR2K_LT
812
813 #define SYR2K_UN                SSYR2K_UN
814 #define SYR2K_UT                SSYR2K_UT
815 #define SYR2K_LN                SSYR2K_LN
816 #define SYR2K_LT                SSYR2K_LT
817 #define SYR2K_UR                SSYR2K_UN
818 #define SYR2K_UC                SSYR2K_UT
819 #define SYR2K_LR                SSYR2K_LN
820 #define SYR2K_LC                SSYR2K_LT
821
822 #define SYR2K_KERNEL_U          SSYR2K_KERNEL_U
823 #define SYR2K_KERNEL_L          SSYR2K_KERNEL_L
824
825 #define TRMM_LNUU               STRMM_LNUU
826 #define TRMM_LNUN               STRMM_LNUN
827 #define TRMM_LNLU               STRMM_LNLU
828 #define TRMM_LNLN               STRMM_LNLN
829 #define TRMM_LTUU               STRMM_LTUU
830 #define TRMM_LTUN               STRMM_LTUN
831 #define TRMM_LTLU               STRMM_LTLU
832 #define TRMM_LTLN               STRMM_LTLN
833 #define TRMM_LRUU               STRMM_LNUU
834 #define TRMM_LRUN               STRMM_LNUN
835 #define TRMM_LRLU               STRMM_LNLU
836 #define TRMM_LRLN               STRMM_LNLN
837 #define TRMM_LCUU               STRMM_LTUU
838 #define TRMM_LCUN               STRMM_LTUN
839 #define TRMM_LCLU               STRMM_LTLU
840 #define TRMM_LCLN               STRMM_LTLN
841 #define TRMM_RNUU               STRMM_RNUU
842 #define TRMM_RNUN               STRMM_RNUN
843 #define TRMM_RNLU               STRMM_RNLU
844 #define TRMM_RNLN               STRMM_RNLN
845 #define TRMM_RTUU               STRMM_RTUU
846 #define TRMM_RTUN               STRMM_RTUN
847 #define TRMM_RTLU               STRMM_RTLU
848 #define TRMM_RTLN               STRMM_RTLN
849 #define TRMM_RRUU               STRMM_RNUU
850 #define TRMM_RRUN               STRMM_RNUN
851 #define TRMM_RRLU               STRMM_RNLU
852 #define TRMM_RRLN               STRMM_RNLN
853 #define TRMM_RCUU               STRMM_RTUU
854 #define TRMM_RCUN               STRMM_RTUN
855 #define TRMM_RCLU               STRMM_RTLU
856 #define TRMM_RCLN               STRMM_RTLN
857
858 #define TRSM_LNUU               STRSM_LNUU
859 #define TRSM_LNUN               STRSM_LNUN
860 #define TRSM_LNLU               STRSM_LNLU
861 #define TRSM_LNLN               STRSM_LNLN
862 #define TRSM_LTUU               STRSM_LTUU
863 #define TRSM_LTUN               STRSM_LTUN
864 #define TRSM_LTLU               STRSM_LTLU
865 #define TRSM_LTLN               STRSM_LTLN
866 #define TRSM_LRUU               STRSM_LNUU
867 #define TRSM_LRUN               STRSM_LNUN
868 #define TRSM_LRLU               STRSM_LNLU
869 #define TRSM_LRLN               STRSM_LNLN
870 #define TRSM_LCUU               STRSM_LTUU
871 #define TRSM_LCUN               STRSM_LTUN
872 #define TRSM_LCLU               STRSM_LTLU
873 #define TRSM_LCLN               STRSM_LTLN
874 #define TRSM_RNUU               STRSM_RNUU
875 #define TRSM_RNUN               STRSM_RNUN
876 #define TRSM_RNLU               STRSM_RNLU
877 #define TRSM_RNLN               STRSM_RNLN
878 #define TRSM_RTUU               STRSM_RTUU
879 #define TRSM_RTUN               STRSM_RTUN
880 #define TRSM_RTLU               STRSM_RTLU
881 #define TRSM_RTLN               STRSM_RTLN
882 #define TRSM_RRUU               STRSM_RNUU
883 #define TRSM_RRUN               STRSM_RNUN
884 #define TRSM_RRLU               STRSM_RNLU
885 #define TRSM_RRLN               STRSM_RNLN
886 #define TRSM_RCUU               STRSM_RTUU
887 #define TRSM_RCUN               STRSM_RTUN
888 #define TRSM_RCLU               STRSM_RTLU
889 #define TRSM_RCLN               STRSM_RTLN
890
891 #define GEMM_THREAD_NN          SGEMM_THREAD_NN
892 #define GEMM_THREAD_CN          SGEMM_THREAD_TN
893 #define GEMM_THREAD_TN          SGEMM_THREAD_TN
894 #define GEMM_THREAD_NC          SGEMM_THREAD_NT
895 #define GEMM_THREAD_NT          SGEMM_THREAD_NT
896 #define GEMM_THREAD_CC          SGEMM_THREAD_TT
897 #define GEMM_THREAD_CT          SGEMM_THREAD_TT
898 #define GEMM_THREAD_TC          SGEMM_THREAD_TT
899 #define GEMM_THREAD_TT          SGEMM_THREAD_TT
900 #define GEMM_THREAD_NR          SGEMM_THREAD_NN
901 #define GEMM_THREAD_TR          SGEMM_THREAD_TN
902 #define GEMM_THREAD_CR          SGEMM_THREAD_TN
903 #define GEMM_THREAD_RN          SGEMM_THREAD_NN
904 #define GEMM_THREAD_RT          SGEMM_THREAD_NT
905 #define GEMM_THREAD_RC          SGEMM_THREAD_NT
906 #define GEMM_THREAD_RR          SGEMM_THREAD_NN
907
908 #define SYMM_THREAD_LU          SSYMM_THREAD_LU
909 #define SYMM_THREAD_LL          SSYMM_THREAD_LL
910 #define SYMM_THREAD_RU          SSYMM_THREAD_RU
911 #define SYMM_THREAD_RL          SSYMM_THREAD_RL
912
913 #define HEMM_THREAD_LU          SHEMM_THREAD_LU
914 #define HEMM_THREAD_LL          SHEMM_THREAD_LL
915 #define HEMM_THREAD_RU          SHEMM_THREAD_RU
916 #define HEMM_THREAD_RL          SHEMM_THREAD_RL
917
918 #define SYRK_THREAD_UN          SSYRK_THREAD_UN
919 #define SYRK_THREAD_UT          SSYRK_THREAD_UT
920 #define SYRK_THREAD_LN          SSYRK_THREAD_LN
921 #define SYRK_THREAD_LT          SSYRK_THREAD_LT
922 #define SYRK_THREAD_UR          SSYRK_THREAD_UR
923 #define SYRK_THREAD_UC          SSYRK_THREAD_UC
924 #define SYRK_THREAD_LR          SSYRK_THREAD_LN
925 #define SYRK_THREAD_LC          SSYRK_THREAD_LT
926
927 #define HERK_THREAD_UN          SSYRK_THREAD_UN
928 #define HERK_THREAD_UT          SSYRK_THREAD_UT
929 #define HERK_THREAD_LN          SSYRK_THREAD_LN
930 #define HERK_THREAD_LT          SSYRK_THREAD_LT
931 #define HERK_THREAD_UR          SSYRK_THREAD_UR
932 #define HERK_THREAD_UC          SSYRK_THREAD_UC
933 #define HERK_THREAD_LR          SSYRK_THREAD_LN
934 #define HERK_THREAD_LC          SSYRK_THREAD_LT
935
936 #define AXPBY_K                 SAXPBY_K
937
938 #define OMATCOPY_K_CN           SOMATCOPY_K_CN
939 #define OMATCOPY_K_RN           SOMATCOPY_K_RN
940 #define OMATCOPY_K_CT           SOMATCOPY_K_CT
941 #define OMATCOPY_K_RT           SOMATCOPY_K_RT
942 #define IMATCOPY_K_CN           SIMATCOPY_K_CN
943 #define IMATCOPY_K_RN           SIMATCOPY_K_RN
944 #define IMATCOPY_K_CT           SIMATCOPY_K_CT
945 #define IMATCOPY_K_RT           SIMATCOPY_K_RT
946
947 #define GEADD_K                 SGEADD_K 
948 #endif
949 #else
950 #ifdef XDOUBLE
951
952 #define AMAX_K                  XAMAX_K
953 #define AMIN_K                  XAMIN_K
954 #define MAX_K                   XMAX_K
955 #define MIN_K                   XMIN_K
956 #define IAMAX_K                 IXAMAX_K
957 #define IAMIN_K                 IXAMIN_K
958 #define IMAX_K                  IXMAX_K
959 #define IMIN_K                  IXMIN_K
960 #define ASUM_K                  XASUM_K
961 #define AXPYU_K                 XAXPYU_K
962 #define AXPYC_K                 XAXPYC_K
963 #define COPY_K                  XCOPY_K
964 #define DOTU_K                  XDOTU_K
965 #define DOTC_K                  XDOTC_K
966 #define NRM2_K                  XNRM2_K
967 #define SCAL_K                  XSCAL_K
968 #define SUM_K                   XSUM_K
969 #define SWAP_K                  XSWAP_K
970 #define ROT_K                   XROT_K
971
972 #define GEMV_N                  XGEMV_N
973 #define GEMV_T                  XGEMV_T
974 #define GEMV_R                  XGEMV_R
975 #define GEMV_C                  XGEMV_C
976 #define GEMV_O                  XGEMV_O
977 #define GEMV_U                  XGEMV_U
978 #define GEMV_S                  XGEMV_S
979 #define GEMV_D                  XGEMV_D
980
981 #define GERU_K                  XGERU_K
982 #define GERC_K                  XGERC_K
983 #define GERV_K                  XGERV_K
984 #define GERD_K                  XGERD_K
985
986 #define SYMV_U                  XSYMV_U
987 #define SYMV_L                  XSYMV_L
988 #define HEMV_U                  XHEMV_U
989 #define HEMV_L                  XHEMV_L
990 #define HEMV_V                  XHEMV_V
991 #define HEMV_M                  XHEMV_M
992
993 #define SYMV_THREAD_U           XSYMV_THREAD_U
994 #define SYMV_THREAD_L           XSYMV_THREAD_L
995 #define HEMV_THREAD_U           XHEMV_THREAD_U
996 #define HEMV_THREAD_L           XHEMV_THREAD_L
997 #define HEMV_THREAD_V           XHEMV_THREAD_V
998 #define HEMV_THREAD_M           XHEMV_THREAD_M
999
1000 #define GEMM_ONCOPY             XGEMM_ONCOPY
1001 #define GEMM_OTCOPY             XGEMM_OTCOPY
1002 #define GEMM_INCOPY             XGEMM_INCOPY
1003 #define GEMM_ITCOPY             XGEMM_ITCOPY
1004
1005 #define GEMM3M_ONCOPYB          XGEMM3M_ONCOPYB
1006 #define GEMM3M_ONCOPYR          XGEMM3M_ONCOPYR
1007 #define GEMM3M_ONCOPYI          XGEMM3M_ONCOPYI
1008 #define GEMM3M_OTCOPYB          XGEMM3M_OTCOPYB
1009 #define GEMM3M_OTCOPYR          XGEMM3M_OTCOPYR
1010 #define GEMM3M_OTCOPYI          XGEMM3M_OTCOPYI
1011 #define GEMM3M_INCOPYB          XGEMM3M_INCOPYB
1012 #define GEMM3M_INCOPYR          XGEMM3M_INCOPYR
1013 #define GEMM3M_INCOPYI          XGEMM3M_INCOPYI
1014 #define GEMM3M_ITCOPYB          XGEMM3M_ITCOPYB
1015 #define GEMM3M_ITCOPYR          XGEMM3M_ITCOPYR
1016 #define GEMM3M_ITCOPYI          XGEMM3M_ITCOPYI
1017
1018 #ifdef UNIT
1019
1020 #define TRMM_OUNCOPY            XTRMM_OUNUCOPY
1021 #define TRMM_OUTCOPY            XTRMM_OUTUCOPY
1022 #define TRMM_OLNCOPY            XTRMM_OLNUCOPY
1023 #define TRMM_OLTCOPY            XTRMM_OLTUCOPY
1024 #define TRSM_OUNCOPY            XTRSM_OUNUCOPY
1025 #define TRSM_OUTCOPY            XTRSM_OUTUCOPY
1026 #define TRSM_OLNCOPY            XTRSM_OLNUCOPY
1027 #define TRSM_OLTCOPY            XTRSM_OLTUCOPY
1028
1029 #define TRMM_IUNCOPY            XTRMM_IUNUCOPY
1030 #define TRMM_IUTCOPY            XTRMM_IUTUCOPY
1031 #define TRMM_ILNCOPY            XTRMM_ILNUCOPY
1032 #define TRMM_ILTCOPY            XTRMM_ILTUCOPY
1033 #define TRSM_IUNCOPY            XTRSM_IUNUCOPY
1034 #define TRSM_IUTCOPY            XTRSM_IUTUCOPY
1035 #define TRSM_ILNCOPY            XTRSM_ILNUCOPY
1036 #define TRSM_ILTCOPY            XTRSM_ILTUCOPY
1037
1038 #else
1039
1040 #define TRMM_OUNCOPY            XTRMM_OUNNCOPY
1041 #define TRMM_OUTCOPY            XTRMM_OUTNCOPY
1042 #define TRMM_OLNCOPY            XTRMM_OLNNCOPY
1043 #define TRMM_OLTCOPY            XTRMM_OLTNCOPY
1044 #define TRSM_OUNCOPY            XTRSM_OUNNCOPY
1045 #define TRSM_OUTCOPY            XTRSM_OUTNCOPY
1046 #define TRSM_OLNCOPY            XTRSM_OLNNCOPY
1047 #define TRSM_OLTCOPY            XTRSM_OLTNCOPY
1048
1049 #define TRMM_IUNCOPY            XTRMM_IUNNCOPY
1050 #define TRMM_IUTCOPY            XTRMM_IUTNCOPY
1051 #define TRMM_ILNCOPY            XTRMM_ILNNCOPY
1052 #define TRMM_ILTCOPY            XTRMM_ILTNCOPY
1053 #define TRSM_IUNCOPY            XTRSM_IUNNCOPY
1054 #define TRSM_IUTCOPY            XTRSM_IUTNCOPY
1055 #define TRSM_ILNCOPY            XTRSM_ILNNCOPY
1056 #define TRSM_ILTCOPY            XTRSM_ILTNCOPY
1057
1058 #endif
1059
1060 #define SYMM3M_ILCOPYB          XSYMM3M_ILCOPYB
1061 #define SYMM3M_IUCOPYB          XSYMM3M_IUCOPYB
1062 #define SYMM3M_ILCOPYR          XSYMM3M_ILCOPYR
1063 #define SYMM3M_IUCOPYR          XSYMM3M_IUCOPYR
1064 #define SYMM3M_ILCOPYI          XSYMM3M_ILCOPYI
1065 #define SYMM3M_IUCOPYI          XSYMM3M_IUCOPYI
1066
1067 #define SYMM3M_OLCOPYB          XSYMM3M_OLCOPYB
1068 #define SYMM3M_OUCOPYB          XSYMM3M_OUCOPYB
1069 #define SYMM3M_OLCOPYR          XSYMM3M_OLCOPYR
1070 #define SYMM3M_OUCOPYR          XSYMM3M_OUCOPYR
1071 #define SYMM3M_OLCOPYI          XSYMM3M_OLCOPYI
1072 #define SYMM3M_OUCOPYI          XSYMM3M_OUCOPYI
1073
1074 #define HEMM3M_ILCOPYB          XHEMM3M_ILCOPYB
1075 #define HEMM3M_IUCOPYB          XHEMM3M_IUCOPYB
1076 #define HEMM3M_ILCOPYR          XHEMM3M_ILCOPYR
1077 #define HEMM3M_IUCOPYR          XHEMM3M_IUCOPYR
1078 #define HEMM3M_ILCOPYI          XHEMM3M_ILCOPYI
1079 #define HEMM3M_IUCOPYI          XHEMM3M_IUCOPYI
1080
1081 #define HEMM3M_OLCOPYB          XHEMM3M_OLCOPYB
1082 #define HEMM3M_OUCOPYB          XHEMM3M_OUCOPYB
1083 #define HEMM3M_OLCOPYR          XHEMM3M_OLCOPYR
1084 #define HEMM3M_OUCOPYR          XHEMM3M_OUCOPYR
1085 #define HEMM3M_OLCOPYI          XHEMM3M_OLCOPYI
1086 #define HEMM3M_OUCOPYI          XHEMM3M_OUCOPYI
1087
1088 #define GEMM_BETA               XGEMM_BETA
1089
1090 #define GEMM_KERNEL_N           XGEMM_KERNEL_N
1091 #define GEMM_KERNEL_L           XGEMM_KERNEL_L
1092 #define GEMM_KERNEL_R           XGEMM_KERNEL_R
1093 #define GEMM_KERNEL_B           XGEMM_KERNEL_B
1094
1095 #define GEMM3M_KERNEL           XGEMM3M_KERNEL
1096
1097 #define TRMM_KERNEL_LN          XTRMM_KERNEL_LN
1098 #define TRMM_KERNEL_LT          XTRMM_KERNEL_LT
1099 #define TRMM_KERNEL_LR          XTRMM_KERNEL_LR
1100 #define TRMM_KERNEL_LC          XTRMM_KERNEL_LC
1101 #define TRMM_KERNEL_RN          XTRMM_KERNEL_RN
1102 #define TRMM_KERNEL_RT          XTRMM_KERNEL_RT
1103 #define TRMM_KERNEL_RR          XTRMM_KERNEL_RR
1104 #define TRMM_KERNEL_RC          XTRMM_KERNEL_RC
1105
1106 #define TRSM_KERNEL_LN          XTRSM_KERNEL_LN
1107 #define TRSM_KERNEL_LT          XTRSM_KERNEL_LT
1108 #define TRSM_KERNEL_LR          XTRSM_KERNEL_LR
1109 #define TRSM_KERNEL_LC          XTRSM_KERNEL_LC
1110 #define TRSM_KERNEL_RN          XTRSM_KERNEL_RN
1111 #define TRSM_KERNEL_RT          XTRSM_KERNEL_RT
1112 #define TRSM_KERNEL_RR          XTRSM_KERNEL_RR
1113 #define TRSM_KERNEL_RC          XTRSM_KERNEL_RC
1114
1115 #define GEMM_NN                 XGEMM_NN
1116 #define GEMM_CN                 XGEMM_CN
1117 #define GEMM_TN                 XGEMM_TN
1118 #define GEMM_NC                 XGEMM_NC
1119 #define GEMM_NT                 XGEMM_NT
1120 #define GEMM_CC                 XGEMM_CC
1121 #define GEMM_CT                 XGEMM_CT
1122 #define GEMM_TC                 XGEMM_TC
1123 #define GEMM_TT                 XGEMM_TT
1124 #define GEMM_NR                 XGEMM_NR
1125 #define GEMM_TR                 XGEMM_TR
1126 #define GEMM_CR                 XGEMM_CR
1127 #define GEMM_RN                 XGEMM_RN
1128 #define GEMM_RT                 XGEMM_RT
1129 #define GEMM_RC                 XGEMM_RC
1130 #define GEMM_RR                 XGEMM_RR
1131
1132 #define SYMM_LU                 XSYMM_LU
1133 #define SYMM_LL                 XSYMM_LL
1134 #define SYMM_RU                 XSYMM_RU
1135 #define SYMM_RL                 XSYMM_RL
1136
1137 #define HEMM_LU                 XHEMM_LU
1138 #define HEMM_LL                 XHEMM_LL
1139 #define HEMM_RU                 XHEMM_RU
1140 #define HEMM_RL                 XHEMM_RL
1141
1142 #define HEMM_IUTCOPY            XHEMM_IUTCOPY
1143 #define HEMM_ILTCOPY            XHEMM_ILTCOPY
1144 #define HEMM_OUTCOPY            XHEMM_OUTCOPY
1145 #define HEMM_OLTCOPY            XHEMM_OLTCOPY
1146
1147 #define SYRK_UN                 XSYRK_UN
1148 #define SYRK_UT                 XSYRK_UT
1149 #define SYRK_LN                 XSYRK_LN
1150 #define SYRK_LT                 XSYRK_LT
1151 #define SYRK_UR                 XSYRK_UN
1152 #define SYRK_UC                 XSYRK_UT
1153 #define SYRK_LR                 XSYRK_LN
1154 #define SYRK_LC                 XSYRK_LT
1155
1156 #define SYRK_KERNEL_U           XSYRK_KERNEL_U
1157 #define SYRK_KERNEL_L           XSYRK_KERNEL_L
1158
1159 #define HERK_UN                 XHERK_UN
1160 #define HERK_LN                 XHERK_LN
1161 #define HERK_UC                 XHERK_UC
1162 #define HERK_LC                 XHERK_LC
1163
1164 #define HER2K_UN                XHER2K_UN
1165 #define HER2K_LN                XHER2K_LN
1166 #define HER2K_UC                XHER2K_UC
1167 #define HER2K_LC                XHER2K_LC
1168
1169 #define SYR2K_UN                XSYR2K_UN
1170 #define SYR2K_UT                XSYR2K_UT
1171 #define SYR2K_LN                XSYR2K_LN
1172 #define SYR2K_LT                XSYR2K_LT
1173 #define SYR2K_UR                XSYR2K_UN
1174 #define SYR2K_UC                XSYR2K_UT
1175 #define SYR2K_LR                XSYR2K_LN
1176 #define SYR2K_LC                XSYR2K_LT
1177
1178 #define SYR2K_KERNEL_U          XSYR2K_KERNEL_U
1179 #define SYR2K_KERNEL_L          XSYR2K_KERNEL_L
1180
1181 #define TRMM_LNUU               XTRMM_LNUU
1182 #define TRMM_LNUN               XTRMM_LNUN
1183 #define TRMM_LNLU               XTRMM_LNLU
1184 #define TRMM_LNLN               XTRMM_LNLN
1185 #define TRMM_LTUU               XTRMM_LTUU
1186 #define TRMM_LTUN               XTRMM_LTUN
1187 #define TRMM_LTLU               XTRMM_LTLU
1188 #define TRMM_LTLN               XTRMM_LTLN
1189 #define TRMM_LRUU               XTRMM_LRUU
1190 #define TRMM_LRUN               XTRMM_LRUN
1191 #define TRMM_LRLU               XTRMM_LRLU
1192 #define TRMM_LRLN               XTRMM_LRLN
1193 #define TRMM_LCUU               XTRMM_LCUU
1194 #define TRMM_LCUN               XTRMM_LCUN
1195 #define TRMM_LCLU               XTRMM_LCLU
1196 #define TRMM_LCLN               XTRMM_LCLN
1197 #define TRMM_RNUU               XTRMM_RNUU
1198 #define TRMM_RNUN               XTRMM_RNUN
1199 #define TRMM_RNLU               XTRMM_RNLU
1200 #define TRMM_RNLN               XTRMM_RNLN
1201 #define TRMM_RTUU               XTRMM_RTUU
1202 #define TRMM_RTUN               XTRMM_RTUN
1203 #define TRMM_RTLU               XTRMM_RTLU
1204 #define TRMM_RTLN               XTRMM_RTLN
1205 #define TRMM_RRUU               XTRMM_RRUU
1206 #define TRMM_RRUN               XTRMM_RRUN
1207 #define TRMM_RRLU               XTRMM_RRLU
1208 #define TRMM_RRLN               XTRMM_RRLN
1209 #define TRMM_RCUU               XTRMM_RCUU
1210 #define TRMM_RCUN               XTRMM_RCUN
1211 #define TRMM_RCLU               XTRMM_RCLU
1212 #define TRMM_RCLN               XTRMM_RCLN
1213
1214 #define TRSM_LNUU               XTRSM_LNUU
1215 #define TRSM_LNUN               XTRSM_LNUN
1216 #define TRSM_LNLU               XTRSM_LNLU
1217 #define TRSM_LNLN               XTRSM_LNLN
1218 #define TRSM_LTUU               XTRSM_LTUU
1219 #define TRSM_LTUN               XTRSM_LTUN
1220 #define TRSM_LTLU               XTRSM_LTLU
1221 #define TRSM_LTLN               XTRSM_LTLN
1222 #define TRSM_LRUU               XTRSM_LRUU
1223 #define TRSM_LRUN               XTRSM_LRUN
1224 #define TRSM_LRLU               XTRSM_LRLU
1225 #define TRSM_LRLN               XTRSM_LRLN
1226 #define TRSM_LCUU               XTRSM_LCUU
1227 #define TRSM_LCUN               XTRSM_LCUN
1228 #define TRSM_LCLU               XTRSM_LCLU
1229 #define TRSM_LCLN               XTRSM_LCLN
1230 #define TRSM_RNUU               XTRSM_RNUU
1231 #define TRSM_RNUN               XTRSM_RNUN
1232 #define TRSM_RNLU               XTRSM_RNLU
1233 #define TRSM_RNLN               XTRSM_RNLN
1234 #define TRSM_RTUU               XTRSM_RTUU
1235 #define TRSM_RTUN               XTRSM_RTUN
1236 #define TRSM_RTLU               XTRSM_RTLU
1237 #define TRSM_RTLN               XTRSM_RTLN
1238 #define TRSM_RRUU               XTRSM_RRUU
1239 #define TRSM_RRUN               XTRSM_RRUN
1240 #define TRSM_RRLU               XTRSM_RRLU
1241 #define TRSM_RRLN               XTRSM_RRLN
1242 #define TRSM_RCUU               XTRSM_RCUU
1243 #define TRSM_RCUN               XTRSM_RCUN
1244 #define TRSM_RCLU               XTRSM_RCLU
1245 #define TRSM_RCLN               XTRSM_RCLN
1246
1247
1248 #define GEMM_THREAD_NN          XGEMM_THREAD_NN
1249 #define GEMM_THREAD_CN          XGEMM_THREAD_CN
1250 #define GEMM_THREAD_TN          XGEMM_THREAD_TN
1251 #define GEMM_THREAD_NC          XGEMM_THREAD_NC
1252 #define GEMM_THREAD_NT          XGEMM_THREAD_NT
1253 #define GEMM_THREAD_CC          XGEMM_THREAD_CC
1254 #define GEMM_THREAD_CT          XGEMM_THREAD_CT
1255 #define GEMM_THREAD_TC          XGEMM_THREAD_TC
1256 #define GEMM_THREAD_TT          XGEMM_THREAD_TT
1257 #define GEMM_THREAD_NR          XGEMM_THREAD_NR
1258 #define GEMM_THREAD_TR          XGEMM_THREAD_TR
1259 #define GEMM_THREAD_CR          XGEMM_THREAD_CR
1260 #define GEMM_THREAD_RN          XGEMM_THREAD_RN
1261 #define GEMM_THREAD_RT          XGEMM_THREAD_RT
1262 #define GEMM_THREAD_RC          XGEMM_THREAD_RC
1263 #define GEMM_THREAD_RR          XGEMM_THREAD_RR
1264
1265 #define SYMM_THREAD_LU          XSYMM_THREAD_LU
1266 #define SYMM_THREAD_LL          XSYMM_THREAD_LL
1267 #define SYMM_THREAD_RU          XSYMM_THREAD_RU
1268 #define SYMM_THREAD_RL          XSYMM_THREAD_RL
1269
1270 #define HEMM_THREAD_LU          XHEMM_THREAD_LU
1271 #define HEMM_THREAD_LL          XHEMM_THREAD_LL
1272 #define HEMM_THREAD_RU          XHEMM_THREAD_RU
1273 #define HEMM_THREAD_RL          XHEMM_THREAD_RL
1274
1275 #define SYRK_THREAD_UN          XSYRK_THREAD_UN
1276 #define SYRK_THREAD_UT          XSYRK_THREAD_UT
1277 #define SYRK_THREAD_LN          XSYRK_THREAD_LN
1278 #define SYRK_THREAD_LT          XSYRK_THREAD_LT
1279 #define SYRK_THREAD_UR          XSYRK_THREAD_UR
1280 #define SYRK_THREAD_UC          XSYRK_THREAD_UC
1281 #define SYRK_THREAD_LR          XSYRK_THREAD_LR
1282 #define SYRK_THREAD_LC          XSYRK_THREAD_LC
1283
1284 #define HERK_THREAD_UN          XHERK_THREAD_UN
1285 #define HERK_THREAD_UT          XHERK_THREAD_UT
1286 #define HERK_THREAD_LN          XHERK_THREAD_LN
1287 #define HERK_THREAD_LT          XHERK_THREAD_LT
1288 #define HERK_THREAD_UR          XHERK_THREAD_UR
1289 #define HERK_THREAD_UC          XHERK_THREAD_UC
1290 #define HERK_THREAD_LR          XHERK_THREAD_LR
1291 #define HERK_THREAD_LC          XHERK_THREAD_LC
1292
1293 #define GEMM3M_NN               XGEMM3M_NN
1294 #define GEMM3M_CN               XGEMM3M_CN
1295 #define GEMM3M_TN               XGEMM3M_TN
1296 #define GEMM3M_NC               XGEMM3M_NC
1297 #define GEMM3M_NT               XGEMM3M_NT
1298 #define GEMM3M_CC               XGEMM3M_CC
1299 #define GEMM3M_CT               XGEMM3M_CT
1300 #define GEMM3M_TC               XGEMM3M_TC
1301 #define GEMM3M_TT               XGEMM3M_TT
1302 #define GEMM3M_NR               XGEMM3M_NR
1303 #define GEMM3M_TR               XGEMM3M_TR
1304 #define GEMM3M_CR               XGEMM3M_CR
1305 #define GEMM3M_RN               XGEMM3M_RN
1306 #define GEMM3M_RT               XGEMM3M_RT
1307 #define GEMM3M_RC               XGEMM3M_RC
1308 #define GEMM3M_RR               XGEMM3M_RR
1309
1310 #define GEMM3M_THREAD_NN        XGEMM3M_THREAD_NN
1311 #define GEMM3M_THREAD_CN        XGEMM3M_THREAD_CN
1312 #define GEMM3M_THREAD_TN        XGEMM3M_THREAD_TN
1313 #define GEMM3M_THREAD_NC        XGEMM3M_THREAD_NC
1314 #define GEMM3M_THREAD_NT        XGEMM3M_THREAD_NT
1315 #define GEMM3M_THREAD_CC        XGEMM3M_THREAD_CC
1316 #define GEMM3M_THREAD_CT        XGEMM3M_THREAD_CT
1317 #define GEMM3M_THREAD_TC        XGEMM3M_THREAD_TC
1318 #define GEMM3M_THREAD_TT        XGEMM3M_THREAD_TT
1319 #define GEMM3M_THREAD_NR        XGEMM3M_THREAD_NR
1320 #define GEMM3M_THREAD_TR        XGEMM3M_THREAD_TR
1321 #define GEMM3M_THREAD_CR        XGEMM3M_THREAD_CR
1322 #define GEMM3M_THREAD_RN        XGEMM3M_THREAD_RN
1323 #define GEMM3M_THREAD_RT        XGEMM3M_THREAD_RT
1324 #define GEMM3M_THREAD_RC        XGEMM3M_THREAD_RC
1325 #define GEMM3M_THREAD_RR        XGEMM3M_THREAD_RR
1326
1327 #define SYMM3M_LU               XSYMM3M_LU
1328 #define SYMM3M_LL               XSYMM3M_LL
1329 #define SYMM3M_RU               XSYMM3M_RU
1330 #define SYMM3M_RL               XSYMM3M_RL
1331
1332 #define SYMM3M_THREAD_LU        XSYMM3M_THREAD_LU
1333 #define SYMM3M_THREAD_LL        XSYMM3M_THREAD_LL
1334 #define SYMM3M_THREAD_RU        XSYMM3M_THREAD_RU
1335 #define SYMM3M_THREAD_RL        XSYMM3M_THREAD_RL
1336
1337 #define HEMM3M_LU               XHEMM3M_LU
1338 #define HEMM3M_LL               XHEMM3M_LL
1339 #define HEMM3M_RU               XHEMM3M_RU
1340 #define HEMM3M_RL               XHEMM3M_RL
1341
1342 #define HEMM3M_THREAD_LU        XHEMM3M_THREAD_LU
1343 #define HEMM3M_THREAD_LL        XHEMM3M_THREAD_LL
1344 #define HEMM3M_THREAD_RU        XHEMM3M_THREAD_RU
1345 #define HEMM3M_THREAD_RL        XHEMM3M_THREAD_RL
1346
1347 #define SYMM_IUTCOPY            XSYMM_IUTCOPY
1348 #define SYMM_ILTCOPY            XSYMM_ILTCOPY
1349 #define SYMM_OUTCOPY            XSYMM_OUTCOPY
1350 #define SYMM_OLTCOPY            XSYMM_OLTCOPY
1351
1352 #elif defined(DOUBLE)
1353
1354 #define AMAX_K                  ZAMAX_K
1355 #define AMIN_K                  ZAMIN_K
1356 #define MAX_K                   ZMAX_K
1357 #define MIN_K                   ZMIN_K
1358 #define IAMAX_K                 IZAMAX_K
1359 #define IAMIN_K                 IZAMIN_K
1360 #define IMAX_K                  IZMAX_K
1361 #define IMIN_K                  IZMIN_K
1362 #define ASUM_K                  ZASUM_K
1363 #define AXPYU_K                 ZAXPYU_K
1364 #define AXPYC_K                 ZAXPYC_K
1365 #define COPY_K                  ZCOPY_K
1366 #define DOTU_K                  ZDOTU_K
1367 #define DOTC_K                  ZDOTC_K
1368 #define NRM2_K                  ZNRM2_K
1369 #define SCAL_K                  ZSCAL_K
1370 #define SUM_K                   ZSUM_K
1371 #define SWAP_K                  ZSWAP_K
1372 #define ROT_K                   ZROT_K
1373
1374 #define GEMV_N                  ZGEMV_N
1375 #define GEMV_T                  ZGEMV_T
1376 #define GEMV_R                  ZGEMV_R
1377 #define GEMV_C                  ZGEMV_C
1378 #define GEMV_O                  ZGEMV_O
1379 #define GEMV_U                  ZGEMV_U
1380 #define GEMV_S                  ZGEMV_S
1381 #define GEMV_D                  ZGEMV_D
1382
1383 #define GERU_K                  ZGERU_K
1384 #define GERC_K                  ZGERC_K
1385 #define GERV_K                  ZGERV_K
1386 #define GERD_K                  ZGERD_K
1387
1388 #define SYMV_U                  ZSYMV_U
1389 #define SYMV_L                  ZSYMV_L
1390 #define HEMV_U                  ZHEMV_U
1391 #define HEMV_L                  ZHEMV_L
1392 #define HEMV_V                  ZHEMV_V
1393 #define HEMV_M                  ZHEMV_M
1394
1395 #define SYMV_THREAD_U           ZSYMV_THREAD_U
1396 #define SYMV_THREAD_L           ZSYMV_THREAD_L
1397 #define HEMV_THREAD_U           ZHEMV_THREAD_U
1398 #define HEMV_THREAD_L           ZHEMV_THREAD_L
1399 #define HEMV_THREAD_V           ZHEMV_THREAD_V
1400 #define HEMV_THREAD_M           ZHEMV_THREAD_M
1401
1402 #define GEMM_ONCOPY             ZGEMM_ONCOPY
1403 #define GEMM_OTCOPY             ZGEMM_OTCOPY
1404 #define GEMM_INCOPY             ZGEMM_INCOPY
1405 #define GEMM_ITCOPY             ZGEMM_ITCOPY
1406
1407 #define GEMM3M_ONCOPYB          ZGEMM3M_ONCOPYB
1408 #define GEMM3M_ONCOPYR          ZGEMM3M_ONCOPYR
1409 #define GEMM3M_ONCOPYI          ZGEMM3M_ONCOPYI
1410 #define GEMM3M_OTCOPYB          ZGEMM3M_OTCOPYB
1411 #define GEMM3M_OTCOPYR          ZGEMM3M_OTCOPYR
1412 #define GEMM3M_OTCOPYI          ZGEMM3M_OTCOPYI
1413 #define GEMM3M_INCOPYB          ZGEMM3M_INCOPYB
1414 #define GEMM3M_INCOPYR          ZGEMM3M_INCOPYR
1415 #define GEMM3M_INCOPYI          ZGEMM3M_INCOPYI
1416 #define GEMM3M_ITCOPYB          ZGEMM3M_ITCOPYB
1417 #define GEMM3M_ITCOPYR          ZGEMM3M_ITCOPYR
1418 #define GEMM3M_ITCOPYI          ZGEMM3M_ITCOPYI
1419
1420 #ifdef UNIT
1421
1422 #define TRMM_OUNCOPY            ZTRMM_OUNUCOPY
1423 #define TRMM_OUTCOPY            ZTRMM_OUTUCOPY
1424 #define TRMM_OLNCOPY            ZTRMM_OLNUCOPY
1425 #define TRMM_OLTCOPY            ZTRMM_OLTUCOPY
1426 #define TRSM_OUNCOPY            ZTRSM_OUNUCOPY
1427 #define TRSM_OUTCOPY            ZTRSM_OUTUCOPY
1428 #define TRSM_OLNCOPY            ZTRSM_OLNUCOPY
1429 #define TRSM_OLTCOPY            ZTRSM_OLTUCOPY
1430
1431 #define TRMM_IUNCOPY            ZTRMM_IUNUCOPY
1432 #define TRMM_IUTCOPY            ZTRMM_IUTUCOPY
1433 #define TRMM_ILNCOPY            ZTRMM_ILNUCOPY
1434 #define TRMM_ILTCOPY            ZTRMM_ILTUCOPY
1435 #define TRSM_IUNCOPY            ZTRSM_IUNUCOPY
1436 #define TRSM_IUTCOPY            ZTRSM_IUTUCOPY
1437 #define TRSM_ILNCOPY            ZTRSM_ILNUCOPY
1438 #define TRSM_ILTCOPY            ZTRSM_ILTUCOPY
1439
1440 #else
1441
1442 #define TRMM_OUNCOPY            ZTRMM_OUNNCOPY
1443 #define TRMM_OUTCOPY            ZTRMM_OUTNCOPY
1444 #define TRMM_OLNCOPY            ZTRMM_OLNNCOPY
1445 #define TRMM_OLTCOPY            ZTRMM_OLTNCOPY
1446 #define TRSM_OUNCOPY            ZTRSM_OUNNCOPY
1447 #define TRSM_OUTCOPY            ZTRSM_OUTNCOPY
1448 #define TRSM_OLNCOPY            ZTRSM_OLNNCOPY
1449 #define TRSM_OLTCOPY            ZTRSM_OLTNCOPY
1450
1451 #define TRMM_IUNCOPY            ZTRMM_IUNNCOPY
1452 #define TRMM_IUTCOPY            ZTRMM_IUTNCOPY
1453 #define TRMM_ILNCOPY            ZTRMM_ILNNCOPY
1454 #define TRMM_ILTCOPY            ZTRMM_ILTNCOPY
1455 #define TRSM_IUNCOPY            ZTRSM_IUNNCOPY
1456 #define TRSM_IUTCOPY            ZTRSM_IUTNCOPY
1457 #define TRSM_ILNCOPY            ZTRSM_ILNNCOPY
1458 #define TRSM_ILTCOPY            ZTRSM_ILTNCOPY
1459
1460 #endif
1461
1462 #define SYMM3M_ILCOPYB          ZSYMM3M_ILCOPYB
1463 #define SYMM3M_IUCOPYB          ZSYMM3M_IUCOPYB
1464 #define SYMM3M_ILCOPYR          ZSYMM3M_ILCOPYR
1465 #define SYMM3M_IUCOPYR          ZSYMM3M_IUCOPYR
1466 #define SYMM3M_ILCOPYI          ZSYMM3M_ILCOPYI
1467 #define SYMM3M_IUCOPYI          ZSYMM3M_IUCOPYI
1468
1469 #define SYMM3M_OLCOPYB          ZSYMM3M_OLCOPYB
1470 #define SYMM3M_OUCOPYB          ZSYMM3M_OUCOPYB
1471 #define SYMM3M_OLCOPYR          ZSYMM3M_OLCOPYR
1472 #define SYMM3M_OUCOPYR          ZSYMM3M_OUCOPYR
1473 #define SYMM3M_OLCOPYI          ZSYMM3M_OLCOPYI
1474 #define SYMM3M_OUCOPYI          ZSYMM3M_OUCOPYI
1475
1476 #define HEMM3M_ILCOPYB          ZHEMM3M_ILCOPYB
1477 #define HEMM3M_IUCOPYB          ZHEMM3M_IUCOPYB
1478 #define HEMM3M_ILCOPYR          ZHEMM3M_ILCOPYR
1479 #define HEMM3M_IUCOPYR          ZHEMM3M_IUCOPYR
1480 #define HEMM3M_ILCOPYI          ZHEMM3M_ILCOPYI
1481 #define HEMM3M_IUCOPYI          ZHEMM3M_IUCOPYI
1482
1483 #define HEMM3M_OLCOPYB          ZHEMM3M_OLCOPYB
1484 #define HEMM3M_OUCOPYB          ZHEMM3M_OUCOPYB
1485 #define HEMM3M_OLCOPYR          ZHEMM3M_OLCOPYR
1486 #define HEMM3M_OUCOPYR          ZHEMM3M_OUCOPYR
1487 #define HEMM3M_OLCOPYI          ZHEMM3M_OLCOPYI
1488 #define HEMM3M_OUCOPYI          ZHEMM3M_OUCOPYI
1489
1490 #define GEMM_BETA               ZGEMM_BETA
1491
1492 #define GEMM_KERNEL_N           ZGEMM_KERNEL_N
1493 #define GEMM_KERNEL_L           ZGEMM_KERNEL_L
1494 #define GEMM_KERNEL_R           ZGEMM_KERNEL_R
1495 #define GEMM_KERNEL_B           ZGEMM_KERNEL_B
1496
1497 #define GEMM3M_KERNEL           ZGEMM3M_KERNEL
1498
1499 #define TRMM_KERNEL_LN          ZTRMM_KERNEL_LN
1500 #define TRMM_KERNEL_LT          ZTRMM_KERNEL_LT
1501 #define TRMM_KERNEL_LR          ZTRMM_KERNEL_LR
1502 #define TRMM_KERNEL_LC          ZTRMM_KERNEL_LC
1503 #define TRMM_KERNEL_RN          ZTRMM_KERNEL_RN
1504 #define TRMM_KERNEL_RT          ZTRMM_KERNEL_RT
1505 #define TRMM_KERNEL_RR          ZTRMM_KERNEL_RR
1506 #define TRMM_KERNEL_RC          ZTRMM_KERNEL_RC
1507
1508 #define TRSM_KERNEL_LN          ZTRSM_KERNEL_LN
1509 #define TRSM_KERNEL_LT          ZTRSM_KERNEL_LT
1510 #define TRSM_KERNEL_LR          ZTRSM_KERNEL_LR
1511 #define TRSM_KERNEL_LC          ZTRSM_KERNEL_LC
1512 #define TRSM_KERNEL_RN          ZTRSM_KERNEL_RN
1513 #define TRSM_KERNEL_RT          ZTRSM_KERNEL_RT
1514 #define TRSM_KERNEL_RR          ZTRSM_KERNEL_RR
1515 #define TRSM_KERNEL_RC          ZTRSM_KERNEL_RC
1516
1517 #define GEMM_NN                 ZGEMM_NN
1518 #define GEMM_CN                 ZGEMM_CN
1519 #define GEMM_TN                 ZGEMM_TN
1520 #define GEMM_NC                 ZGEMM_NC
1521 #define GEMM_NT                 ZGEMM_NT
1522 #define GEMM_CC                 ZGEMM_CC
1523 #define GEMM_CT                 ZGEMM_CT
1524 #define GEMM_TC                 ZGEMM_TC
1525 #define GEMM_TT                 ZGEMM_TT
1526 #define GEMM_NR                 ZGEMM_NR
1527 #define GEMM_TR                 ZGEMM_TR
1528 #define GEMM_CR                 ZGEMM_CR
1529 #define GEMM_RN                 ZGEMM_RN
1530 #define GEMM_RT                 ZGEMM_RT
1531 #define GEMM_RC                 ZGEMM_RC
1532 #define GEMM_RR                 ZGEMM_RR
1533
1534 #define SYMM_LU                 ZSYMM_LU
1535 #define SYMM_LL                 ZSYMM_LL
1536 #define SYMM_RU                 ZSYMM_RU
1537 #define SYMM_RL                 ZSYMM_RL
1538
1539 #define HEMM_LU                 ZHEMM_LU
1540 #define HEMM_LL                 ZHEMM_LL
1541 #define HEMM_RU                 ZHEMM_RU
1542 #define HEMM_RL                 ZHEMM_RL
1543
1544 #define HEMM_IUTCOPY            ZHEMM_IUTCOPY
1545 #define HEMM_ILTCOPY            ZHEMM_ILTCOPY
1546 #define HEMM_OUTCOPY            ZHEMM_OUTCOPY
1547 #define HEMM_OLTCOPY            ZHEMM_OLTCOPY
1548
1549 #define SYRK_UN                 ZSYRK_UN
1550 #define SYRK_UT                 ZSYRK_UT
1551 #define SYRK_LN                 ZSYRK_LN
1552 #define SYRK_LT                 ZSYRK_LT
1553 #define SYRK_UR                 ZSYRK_UN
1554 #define SYRK_UC                 ZSYRK_UT
1555 #define SYRK_LR                 ZSYRK_LN
1556 #define SYRK_LC                 ZSYRK_LT
1557
1558 #define SYRK_KERNEL_U           ZSYRK_KERNEL_U
1559 #define SYRK_KERNEL_L           ZSYRK_KERNEL_L
1560
1561 #define HERK_UN                 ZHERK_UN
1562 #define HERK_LN                 ZHERK_LN
1563 #define HERK_UC                 ZHERK_UC
1564 #define HERK_LC                 ZHERK_LC
1565
1566 #define HER2K_UN                ZHER2K_UN
1567 #define HER2K_LN                ZHER2K_LN
1568 #define HER2K_UC                ZHER2K_UC
1569 #define HER2K_LC                ZHER2K_LC
1570
1571 #define SYR2K_UN                ZSYR2K_UN
1572 #define SYR2K_UT                ZSYR2K_UT
1573 #define SYR2K_LN                ZSYR2K_LN
1574 #define SYR2K_LT                ZSYR2K_LT
1575 #define SYR2K_UR                ZSYR2K_UN
1576 #define SYR2K_UC                ZSYR2K_UT
1577 #define SYR2K_LR                ZSYR2K_LN
1578 #define SYR2K_LC                ZSYR2K_LT
1579
1580 #define SYR2K_KERNEL_U          ZSYR2K_KERNEL_U
1581 #define SYR2K_KERNEL_L          ZSYR2K_KERNEL_L
1582
1583 #define TRMM_LNUU               ZTRMM_LNUU
1584 #define TRMM_LNUN               ZTRMM_LNUN
1585 #define TRMM_LNLU               ZTRMM_LNLU
1586 #define TRMM_LNLN               ZTRMM_LNLN
1587 #define TRMM_LTUU               ZTRMM_LTUU
1588 #define TRMM_LTUN               ZTRMM_LTUN
1589 #define TRMM_LTLU               ZTRMM_LTLU
1590 #define TRMM_LTLN               ZTRMM_LTLN
1591 #define TRMM_LRUU               ZTRMM_LRUU
1592 #define TRMM_LRUN               ZTRMM_LRUN
1593 #define TRMM_LRLU               ZTRMM_LRLU
1594 #define TRMM_LRLN               ZTRMM_LRLN
1595 #define TRMM_LCUU               ZTRMM_LCUU
1596 #define TRMM_LCUN               ZTRMM_LCUN
1597 #define TRMM_LCLU               ZTRMM_LCLU
1598 #define TRMM_LCLN               ZTRMM_LCLN
1599 #define TRMM_RNUU               ZTRMM_RNUU
1600 #define TRMM_RNUN               ZTRMM_RNUN
1601 #define TRMM_RNLU               ZTRMM_RNLU
1602 #define TRMM_RNLN               ZTRMM_RNLN
1603 #define TRMM_RTUU               ZTRMM_RTUU
1604 #define TRMM_RTUN               ZTRMM_RTUN
1605 #define TRMM_RTLU               ZTRMM_RTLU
1606 #define TRMM_RTLN               ZTRMM_RTLN
1607 #define TRMM_RRUU               ZTRMM_RRUU
1608 #define TRMM_RRUN               ZTRMM_RRUN
1609 #define TRMM_RRLU               ZTRMM_RRLU
1610 #define TRMM_RRLN               ZTRMM_RRLN
1611 #define TRMM_RCUU               ZTRMM_RCUU
1612 #define TRMM_RCUN               ZTRMM_RCUN
1613 #define TRMM_RCLU               ZTRMM_RCLU
1614 #define TRMM_RCLN               ZTRMM_RCLN
1615
1616 #define TRSM_LNUU               ZTRSM_LNUU
1617 #define TRSM_LNUN               ZTRSM_LNUN
1618 #define TRSM_LNLU               ZTRSM_LNLU
1619 #define TRSM_LNLN               ZTRSM_LNLN
1620 #define TRSM_LTUU               ZTRSM_LTUU
1621 #define TRSM_LTUN               ZTRSM_LTUN
1622 #define TRSM_LTLU               ZTRSM_LTLU
1623 #define TRSM_LTLN               ZTRSM_LTLN
1624 #define TRSM_LRUU               ZTRSM_LRUU
1625 #define TRSM_LRUN               ZTRSM_LRUN
1626 #define TRSM_LRLU               ZTRSM_LRLU
1627 #define TRSM_LRLN               ZTRSM_LRLN
1628 #define TRSM_LCUU               ZTRSM_LCUU
1629 #define TRSM_LCUN               ZTRSM_LCUN
1630 #define TRSM_LCLU               ZTRSM_LCLU
1631 #define TRSM_LCLN               ZTRSM_LCLN
1632 #define TRSM_RNUU               ZTRSM_RNUU
1633 #define TRSM_RNUN               ZTRSM_RNUN
1634 #define TRSM_RNLU               ZTRSM_RNLU
1635 #define TRSM_RNLN               ZTRSM_RNLN
1636 #define TRSM_RTUU               ZTRSM_RTUU
1637 #define TRSM_RTUN               ZTRSM_RTUN
1638 #define TRSM_RTLU               ZTRSM_RTLU
1639 #define TRSM_RTLN               ZTRSM_RTLN
1640 #define TRSM_RRUU               ZTRSM_RRUU
1641 #define TRSM_RRUN               ZTRSM_RRUN
1642 #define TRSM_RRLU               ZTRSM_RRLU
1643 #define TRSM_RRLN               ZTRSM_RRLN
1644 #define TRSM_RCUU               ZTRSM_RCUU
1645 #define TRSM_RCUN               ZTRSM_RCUN
1646 #define TRSM_RCLU               ZTRSM_RCLU
1647 #define TRSM_RCLN               ZTRSM_RCLN
1648
1649
1650 #define GEMM_THREAD_NN          ZGEMM_THREAD_NN
1651 #define GEMM_THREAD_CN          ZGEMM_THREAD_CN
1652 #define GEMM_THREAD_TN          ZGEMM_THREAD_TN
1653 #define GEMM_THREAD_NC          ZGEMM_THREAD_NC
1654 #define GEMM_THREAD_NT          ZGEMM_THREAD_NT
1655 #define GEMM_THREAD_CC          ZGEMM_THREAD_CC
1656 #define GEMM_THREAD_CT          ZGEMM_THREAD_CT
1657 #define GEMM_THREAD_TC          ZGEMM_THREAD_TC
1658 #define GEMM_THREAD_TT          ZGEMM_THREAD_TT
1659 #define GEMM_THREAD_NR          ZGEMM_THREAD_NR
1660 #define GEMM_THREAD_TR          ZGEMM_THREAD_TR
1661 #define GEMM_THREAD_CR          ZGEMM_THREAD_CR
1662 #define GEMM_THREAD_RN          ZGEMM_THREAD_RN
1663 #define GEMM_THREAD_RT          ZGEMM_THREAD_RT
1664 #define GEMM_THREAD_RC          ZGEMM_THREAD_RC
1665 #define GEMM_THREAD_RR          ZGEMM_THREAD_RR
1666
1667 #define SYMM_THREAD_LU          ZSYMM_THREAD_LU
1668 #define SYMM_THREAD_LL          ZSYMM_THREAD_LL
1669 #define SYMM_THREAD_RU          ZSYMM_THREAD_RU
1670 #define SYMM_THREAD_RL          ZSYMM_THREAD_RL
1671
1672 #define HEMM_THREAD_LU          ZHEMM_THREAD_LU
1673 #define HEMM_THREAD_LL          ZHEMM_THREAD_LL
1674 #define HEMM_THREAD_RU          ZHEMM_THREAD_RU
1675 #define HEMM_THREAD_RL          ZHEMM_THREAD_RL
1676
1677 #define SYRK_THREAD_UN          ZSYRK_THREAD_UN
1678 #define SYRK_THREAD_UT          ZSYRK_THREAD_UT
1679 #define SYRK_THREAD_LN          ZSYRK_THREAD_LN
1680 #define SYRK_THREAD_LT          ZSYRK_THREAD_LT
1681 #define SYRK_THREAD_UR          ZSYRK_THREAD_UR
1682 #define SYRK_THREAD_UC          ZSYRK_THREAD_UC
1683 #define SYRK_THREAD_LR          ZSYRK_THREAD_LR
1684 #define SYRK_THREAD_LC          ZSYRK_THREAD_LC
1685
1686 #define HERK_THREAD_UN          ZHERK_THREAD_UN
1687 #define HERK_THREAD_UT          ZHERK_THREAD_UT
1688 #define HERK_THREAD_LN          ZHERK_THREAD_LN
1689 #define HERK_THREAD_LT          ZHERK_THREAD_LT
1690 #define HERK_THREAD_UR          ZHERK_THREAD_UR
1691 #define HERK_THREAD_UC          ZHERK_THREAD_UC
1692 #define HERK_THREAD_LR          ZHERK_THREAD_LR
1693 #define HERK_THREAD_LC          ZHERK_THREAD_LC
1694
1695 #define GEMM3M_NN               ZGEMM3M_NN
1696 #define GEMM3M_CN               ZGEMM3M_CN
1697 #define GEMM3M_TN               ZGEMM3M_TN
1698 #define GEMM3M_NC               ZGEMM3M_NC
1699 #define GEMM3M_NT               ZGEMM3M_NT
1700 #define GEMM3M_CC               ZGEMM3M_CC
1701 #define GEMM3M_CT               ZGEMM3M_CT
1702 #define GEMM3M_TC               ZGEMM3M_TC
1703 #define GEMM3M_TT               ZGEMM3M_TT
1704 #define GEMM3M_NR               ZGEMM3M_NR
1705 #define GEMM3M_TR               ZGEMM3M_TR
1706 #define GEMM3M_CR               ZGEMM3M_CR
1707 #define GEMM3M_RN               ZGEMM3M_RN
1708 #define GEMM3M_RT               ZGEMM3M_RT
1709 #define GEMM3M_RC               ZGEMM3M_RC
1710 #define GEMM3M_RR               ZGEMM3M_RR
1711
1712 #define GEMM3M_THREAD_NN        ZGEMM3M_THREAD_NN
1713 #define GEMM3M_THREAD_CN        ZGEMM3M_THREAD_CN
1714 #define GEMM3M_THREAD_TN        ZGEMM3M_THREAD_TN
1715 #define GEMM3M_THREAD_NC        ZGEMM3M_THREAD_NC
1716 #define GEMM3M_THREAD_NT        ZGEMM3M_THREAD_NT
1717 #define GEMM3M_THREAD_CC        ZGEMM3M_THREAD_CC
1718 #define GEMM3M_THREAD_CT        ZGEMM3M_THREAD_CT
1719 #define GEMM3M_THREAD_TC        ZGEMM3M_THREAD_TC
1720 #define GEMM3M_THREAD_TT        ZGEMM3M_THREAD_TT
1721 #define GEMM3M_THREAD_NR        ZGEMM3M_THREAD_NR
1722 #define GEMM3M_THREAD_TR        ZGEMM3M_THREAD_TR
1723 #define GEMM3M_THREAD_CR        ZGEMM3M_THREAD_CR
1724 #define GEMM3M_THREAD_RN        ZGEMM3M_THREAD_RN
1725 #define GEMM3M_THREAD_RT        ZGEMM3M_THREAD_RT
1726 #define GEMM3M_THREAD_RC        ZGEMM3M_THREAD_RC
1727 #define GEMM3M_THREAD_RR        ZGEMM3M_THREAD_RR
1728
1729 #define SYMM3M_LU               ZSYMM3M_LU
1730 #define SYMM3M_LL               ZSYMM3M_LL
1731 #define SYMM3M_RU               ZSYMM3M_RU
1732 #define SYMM3M_RL               ZSYMM3M_RL
1733
1734 #define SYMM3M_THREAD_LU        ZSYMM3M_THREAD_LU
1735 #define SYMM3M_THREAD_LL        ZSYMM3M_THREAD_LL
1736 #define SYMM3M_THREAD_RU        ZSYMM3M_THREAD_RU
1737 #define SYMM3M_THREAD_RL        ZSYMM3M_THREAD_RL
1738
1739 #define HEMM3M_LU               ZHEMM3M_LU
1740 #define HEMM3M_LL               ZHEMM3M_LL
1741 #define HEMM3M_RU               ZHEMM3M_RU
1742 #define HEMM3M_RL               ZHEMM3M_RL
1743
1744 #define HEMM3M_THREAD_LU        ZHEMM3M_THREAD_LU
1745 #define HEMM3M_THREAD_LL        ZHEMM3M_THREAD_LL
1746 #define HEMM3M_THREAD_RU        ZHEMM3M_THREAD_RU
1747 #define HEMM3M_THREAD_RL        ZHEMM3M_THREAD_RL
1748
1749 #define SYMM_IUTCOPY            ZSYMM_IUTCOPY
1750 #define SYMM_ILTCOPY            ZSYMM_ILTCOPY
1751 #define SYMM_OUTCOPY            ZSYMM_OUTCOPY
1752 #define SYMM_OLTCOPY            ZSYMM_OLTCOPY
1753
1754 #define AXPBY_K                 ZAXPBY_K
1755
1756 #define OMATCOPY_K_CN           ZOMATCOPY_K_CN
1757 #define OMATCOPY_K_RN           ZOMATCOPY_K_RN
1758 #define OMATCOPY_K_CT           ZOMATCOPY_K_CT
1759 #define OMATCOPY_K_RT           ZOMATCOPY_K_RT
1760 #define OMATCOPY_K_CNC          ZOMATCOPY_K_CNC
1761 #define OMATCOPY_K_RNC          ZOMATCOPY_K_RNC
1762 #define OMATCOPY_K_CTC          ZOMATCOPY_K_CTC
1763 #define OMATCOPY_K_RTC          ZOMATCOPY_K_RTC
1764 #define IMATCOPY_K_CN           ZIMATCOPY_K_CN
1765 #define IMATCOPY_K_RN           ZIMATCOPY_K_RN
1766 #define IMATCOPY_K_CT           ZIMATCOPY_K_CT
1767 #define IMATCOPY_K_RT           ZIMATCOPY_K_RT
1768 #define IMATCOPY_K_CNC          ZIMATCOPY_K_CNC
1769 #define IMATCOPY_K_RNC          ZIMATCOPY_K_RNC
1770 #define IMATCOPY_K_CTC          ZIMATCOPY_K_CTC
1771 #define IMATCOPY_K_RTC          ZIMATCOPY_K_RTC
1772
1773 #define GEADD_K                 ZGEADD_K 
1774
1775 #else
1776
1777 #define AMAX_K                  CAMAX_K
1778 #define AMIN_K                  CAMIN_K
1779 #define MAX_K                   CMAX_K
1780 #define MIN_K                   CMIN_K
1781 #define IAMAX_K                 ICAMAX_K
1782 #define IAMIN_K                 ICAMIN_K
1783 #define IMAX_K                  ICMAX_K
1784 #define IMIN_K                  ICMIN_K
1785 #define ASUM_K                  CASUM_K
1786 #define AXPYU_K                 CAXPYU_K
1787 #define AXPYC_K                 CAXPYC_K
1788 #define COPY_K                  CCOPY_K
1789 #define DOTU_K                  CDOTU_K
1790 #define DOTC_K                  CDOTC_K
1791 #define NRM2_K                  CNRM2_K
1792 #define SCAL_K                  CSCAL_K
1793 #define SUM_K                   CSUM_K
1794 #define SWAP_K                  CSWAP_K
1795 #define ROT_K                   CROT_K
1796
1797 #define GEMV_N                  CGEMV_N
1798 #define GEMV_T                  CGEMV_T
1799 #define GEMV_R                  CGEMV_R
1800 #define GEMV_C                  CGEMV_C
1801 #define GEMV_O                  CGEMV_O
1802 #define GEMV_U                  CGEMV_U
1803 #define GEMV_S                  CGEMV_S
1804 #define GEMV_D                  CGEMV_D
1805
1806 #define GERU_K                  CGERU_K
1807 #define GERC_K                  CGERC_K
1808 #define GERV_K                  CGERV_K
1809 #define GERD_K                  CGERD_K
1810
1811 #define SYMV_U                  CSYMV_U
1812 #define SYMV_L                  CSYMV_L
1813 #define HEMV_U                  CHEMV_U
1814 #define HEMV_L                  CHEMV_L
1815 #define HEMV_V                  CHEMV_V
1816 #define HEMV_M                  CHEMV_M
1817
1818 #define SYMV_THREAD_U           CSYMV_THREAD_U
1819 #define SYMV_THREAD_L           CSYMV_THREAD_L
1820 #define HEMV_THREAD_U           CHEMV_THREAD_U
1821 #define HEMV_THREAD_L           CHEMV_THREAD_L
1822 #define HEMV_THREAD_V           CHEMV_THREAD_V
1823 #define HEMV_THREAD_M           CHEMV_THREAD_M
1824
1825 #define GEMM_ONCOPY             CGEMM_ONCOPY
1826 #define GEMM_OTCOPY             CGEMM_OTCOPY
1827 #define GEMM_INCOPY             CGEMM_INCOPY
1828 #define GEMM_ITCOPY             CGEMM_ITCOPY
1829
1830 #define GEMM3M_ONCOPYB          CGEMM3M_ONCOPYB
1831 #define GEMM3M_ONCOPYR          CGEMM3M_ONCOPYR
1832 #define GEMM3M_ONCOPYI          CGEMM3M_ONCOPYI
1833 #define GEMM3M_OTCOPYB          CGEMM3M_OTCOPYB
1834 #define GEMM3M_OTCOPYR          CGEMM3M_OTCOPYR
1835 #define GEMM3M_OTCOPYI          CGEMM3M_OTCOPYI
1836 #define GEMM3M_INCOPYB          CGEMM3M_INCOPYB
1837 #define GEMM3M_INCOPYR          CGEMM3M_INCOPYR
1838 #define GEMM3M_INCOPYI          CGEMM3M_INCOPYI
1839 #define GEMM3M_ITCOPYB          CGEMM3M_ITCOPYB
1840 #define GEMM3M_ITCOPYR          CGEMM3M_ITCOPYR
1841 #define GEMM3M_ITCOPYI          CGEMM3M_ITCOPYI
1842
1843 #ifdef UNIT
1844
1845 #define TRMM_OUNCOPY            CTRMM_OUNUCOPY
1846 #define TRMM_OUTCOPY            CTRMM_OUTUCOPY
1847 #define TRMM_OLNCOPY            CTRMM_OLNUCOPY
1848 #define TRMM_OLTCOPY            CTRMM_OLTUCOPY
1849 #define TRSM_OUNCOPY            CTRSM_OUNUCOPY
1850 #define TRSM_OUTCOPY            CTRSM_OUTUCOPY
1851 #define TRSM_OLNCOPY            CTRSM_OLNUCOPY
1852 #define TRSM_OLTCOPY            CTRSM_OLTUCOPY
1853
1854 #define TRMM_IUNCOPY            CTRMM_IUNUCOPY
1855 #define TRMM_IUTCOPY            CTRMM_IUTUCOPY
1856 #define TRMM_ILNCOPY            CTRMM_ILNUCOPY
1857 #define TRMM_ILTCOPY            CTRMM_ILTUCOPY
1858 #define TRSM_IUNCOPY            CTRSM_IUNUCOPY
1859 #define TRSM_IUTCOPY            CTRSM_IUTUCOPY
1860 #define TRSM_ILNCOPY            CTRSM_ILNUCOPY
1861 #define TRSM_ILTCOPY            CTRSM_ILTUCOPY
1862
1863 #else
1864
1865 #define TRMM_OUNCOPY            CTRMM_OUNNCOPY
1866 #define TRMM_OUTCOPY            CTRMM_OUTNCOPY
1867 #define TRMM_OLNCOPY            CTRMM_OLNNCOPY
1868 #define TRMM_OLTCOPY            CTRMM_OLTNCOPY
1869 #define TRSM_OUNCOPY            CTRSM_OUNNCOPY
1870 #define TRSM_OUTCOPY            CTRSM_OUTNCOPY
1871 #define TRSM_OLNCOPY            CTRSM_OLNNCOPY
1872 #define TRSM_OLTCOPY            CTRSM_OLTNCOPY
1873
1874 #define TRMM_IUNCOPY            CTRMM_IUNNCOPY
1875 #define TRMM_IUTCOPY            CTRMM_IUTNCOPY
1876 #define TRMM_ILNCOPY            CTRMM_ILNNCOPY
1877 #define TRMM_ILTCOPY            CTRMM_ILTNCOPY
1878 #define TRSM_IUNCOPY            CTRSM_IUNNCOPY
1879 #define TRSM_IUTCOPY            CTRSM_IUTNCOPY
1880 #define TRSM_ILNCOPY            CTRSM_ILNNCOPY
1881 #define TRSM_ILTCOPY            CTRSM_ILTNCOPY
1882
1883 #endif
1884
1885 #define SYMM3M_ILCOPYB          CSYMM3M_ILCOPYB
1886 #define SYMM3M_IUCOPYB          CSYMM3M_IUCOPYB
1887 #define SYMM3M_ILCOPYR          CSYMM3M_ILCOPYR
1888 #define SYMM3M_IUCOPYR          CSYMM3M_IUCOPYR
1889 #define SYMM3M_ILCOPYI          CSYMM3M_ILCOPYI
1890 #define SYMM3M_IUCOPYI          CSYMM3M_IUCOPYI
1891
1892 #define SYMM3M_OLCOPYB          CSYMM3M_OLCOPYB
1893 #define SYMM3M_OUCOPYB          CSYMM3M_OUCOPYB
1894 #define SYMM3M_OLCOPYR          CSYMM3M_OLCOPYR
1895 #define SYMM3M_OUCOPYR          CSYMM3M_OUCOPYR
1896 #define SYMM3M_OLCOPYI          CSYMM3M_OLCOPYI
1897 #define SYMM3M_OUCOPYI          CSYMM3M_OUCOPYI
1898
1899 #define HEMM3M_ILCOPYB          CHEMM3M_ILCOPYB
1900 #define HEMM3M_IUCOPYB          CHEMM3M_IUCOPYB
1901 #define HEMM3M_ILCOPYR          CHEMM3M_ILCOPYR
1902 #define HEMM3M_IUCOPYR          CHEMM3M_IUCOPYR
1903 #define HEMM3M_ILCOPYI          CHEMM3M_ILCOPYI
1904 #define HEMM3M_IUCOPYI          CHEMM3M_IUCOPYI
1905
1906 #define HEMM3M_OLCOPYB          CHEMM3M_OLCOPYB
1907 #define HEMM3M_OUCOPYB          CHEMM3M_OUCOPYB
1908 #define HEMM3M_OLCOPYR          CHEMM3M_OLCOPYR
1909 #define HEMM3M_OUCOPYR          CHEMM3M_OUCOPYR
1910 #define HEMM3M_OLCOPYI          CHEMM3M_OLCOPYI
1911 #define HEMM3M_OUCOPYI          CHEMM3M_OUCOPYI
1912
1913 #define GEMM_BETA               CGEMM_BETA
1914
1915 #define GEMM_KERNEL_N           CGEMM_KERNEL_N
1916 #define GEMM_KERNEL_L           CGEMM_KERNEL_L
1917 #define GEMM_KERNEL_R           CGEMM_KERNEL_R
1918 #define GEMM_KERNEL_B           CGEMM_KERNEL_B
1919
1920 #define GEMM3M_KERNEL           CGEMM3M_KERNEL
1921
1922 #define TRMM_KERNEL_LN          CTRMM_KERNEL_LN
1923 #define TRMM_KERNEL_LT          CTRMM_KERNEL_LT
1924 #define TRMM_KERNEL_LR          CTRMM_KERNEL_LR
1925 #define TRMM_KERNEL_LC          CTRMM_KERNEL_LC
1926 #define TRMM_KERNEL_RN          CTRMM_KERNEL_RN
1927 #define TRMM_KERNEL_RT          CTRMM_KERNEL_RT
1928 #define TRMM_KERNEL_RR          CTRMM_KERNEL_RR
1929 #define TRMM_KERNEL_RC          CTRMM_KERNEL_RC
1930
1931 #define TRSM_KERNEL_LN          CTRSM_KERNEL_LN
1932 #define TRSM_KERNEL_LT          CTRSM_KERNEL_LT
1933 #define TRSM_KERNEL_LR          CTRSM_KERNEL_LR
1934 #define TRSM_KERNEL_LC          CTRSM_KERNEL_LC
1935 #define TRSM_KERNEL_RN          CTRSM_KERNEL_RN
1936 #define TRSM_KERNEL_RT          CTRSM_KERNEL_RT
1937 #define TRSM_KERNEL_RR          CTRSM_KERNEL_RR
1938 #define TRSM_KERNEL_RC          CTRSM_KERNEL_RC
1939
1940 #define GEMM_NN                 CGEMM_NN
1941 #define GEMM_CN                 CGEMM_CN
1942 #define GEMM_TN                 CGEMM_TN
1943 #define GEMM_NC                 CGEMM_NC
1944 #define GEMM_NT                 CGEMM_NT
1945 #define GEMM_CC                 CGEMM_CC
1946 #define GEMM_CT                 CGEMM_CT
1947 #define GEMM_TC                 CGEMM_TC
1948 #define GEMM_TT                 CGEMM_TT
1949 #define GEMM_NR                 CGEMM_NR
1950 #define GEMM_TR                 CGEMM_TR
1951 #define GEMM_CR                 CGEMM_CR
1952 #define GEMM_RN                 CGEMM_RN
1953 #define GEMM_RT                 CGEMM_RT
1954 #define GEMM_RC                 CGEMM_RC
1955 #define GEMM_RR                 CGEMM_RR
1956
1957 #define SYMM_LU                 CSYMM_LU
1958 #define SYMM_LL                 CSYMM_LL
1959 #define SYMM_RU                 CSYMM_RU
1960 #define SYMM_RL                 CSYMM_RL
1961
1962 #define HEMM_LU                 CHEMM_LU
1963 #define HEMM_LL                 CHEMM_LL
1964 #define HEMM_RU                 CHEMM_RU
1965 #define HEMM_RL                 CHEMM_RL
1966
1967 #define HEMM_IUTCOPY            CHEMM_IUTCOPY
1968 #define HEMM_ILTCOPY            CHEMM_ILTCOPY
1969 #define HEMM_OUTCOPY            CHEMM_OUTCOPY
1970 #define HEMM_OLTCOPY            CHEMM_OLTCOPY
1971
1972 #define SYRK_UN                 CSYRK_UN
1973 #define SYRK_UT                 CSYRK_UT
1974 #define SYRK_LN                 CSYRK_LN
1975 #define SYRK_LT                 CSYRK_LT
1976 #define SYRK_UR                 CSYRK_UN
1977 #define SYRK_UC                 CSYRK_UT
1978 #define SYRK_LR                 CSYRK_LN
1979 #define SYRK_LC                 CSYRK_LT
1980
1981 #define SYRK_KERNEL_U           CSYRK_KERNEL_U
1982 #define SYRK_KERNEL_L           CSYRK_KERNEL_L
1983
1984 #define HERK_UN                 CHERK_UN
1985 #define HERK_LN                 CHERK_LN
1986 #define HERK_UC                 CHERK_UC
1987 #define HERK_LC                 CHERK_LC
1988
1989 #define HER2K_UN                CHER2K_UN
1990 #define HER2K_LN                CHER2K_LN
1991 #define HER2K_UC                CHER2K_UC
1992 #define HER2K_LC                CHER2K_LC
1993
1994 #define SYR2K_UN                CSYR2K_UN
1995 #define SYR2K_UT                CSYR2K_UT
1996 #define SYR2K_LN                CSYR2K_LN
1997 #define SYR2K_LT                CSYR2K_LT
1998 #define SYR2K_UR                CSYR2K_UN
1999 #define SYR2K_UC                CSYR2K_UT
2000 #define SYR2K_LR                CSYR2K_LN
2001 #define SYR2K_LC                CSYR2K_LT
2002
2003 #define SYR2K_KERNEL_U          CSYR2K_KERNEL_U
2004 #define SYR2K_KERNEL_L          CSYR2K_KERNEL_L
2005
2006 #define TRMM_LNUU               CTRMM_LNUU
2007 #define TRMM_LNUN               CTRMM_LNUN
2008 #define TRMM_LNLU               CTRMM_LNLU
2009 #define TRMM_LNLN               CTRMM_LNLN
2010 #define TRMM_LTUU               CTRMM_LTUU
2011 #define TRMM_LTUN               CTRMM_LTUN
2012 #define TRMM_LTLU               CTRMM_LTLU
2013 #define TRMM_LTLN               CTRMM_LTLN
2014 #define TRMM_LRUU               CTRMM_LRUU
2015 #define TRMM_LRUN               CTRMM_LRUN
2016 #define TRMM_LRLU               CTRMM_LRLU
2017 #define TRMM_LRLN               CTRMM_LRLN
2018 #define TRMM_LCUU               CTRMM_LCUU
2019 #define TRMM_LCUN               CTRMM_LCUN
2020 #define TRMM_LCLU               CTRMM_LCLU
2021 #define TRMM_LCLN               CTRMM_LCLN
2022 #define TRMM_RNUU               CTRMM_RNUU
2023 #define TRMM_RNUN               CTRMM_RNUN
2024 #define TRMM_RNLU               CTRMM_RNLU
2025 #define TRMM_RNLN               CTRMM_RNLN
2026 #define TRMM_RTUU               CTRMM_RTUU
2027 #define TRMM_RTUN               CTRMM_RTUN
2028 #define TRMM_RTLU               CTRMM_RTLU
2029 #define TRMM_RTLN               CTRMM_RTLN
2030 #define TRMM_RRUU               CTRMM_RRUU
2031 #define TRMM_RRUN               CTRMM_RRUN
2032 #define TRMM_RRLU               CTRMM_RRLU
2033 #define TRMM_RRLN               CTRMM_RRLN
2034 #define TRMM_RCUU               CTRMM_RCUU
2035 #define TRMM_RCUN               CTRMM_RCUN
2036 #define TRMM_RCLU               CTRMM_RCLU
2037 #define TRMM_RCLN               CTRMM_RCLN
2038
2039 #define TRSM_LNUU               CTRSM_LNUU
2040 #define TRSM_LNUN               CTRSM_LNUN
2041 #define TRSM_LNLU               CTRSM_LNLU
2042 #define TRSM_LNLN               CTRSM_LNLN
2043 #define TRSM_LTUU               CTRSM_LTUU
2044 #define TRSM_LTUN               CTRSM_LTUN
2045 #define TRSM_LTLU               CTRSM_LTLU
2046 #define TRSM_LTLN               CTRSM_LTLN
2047 #define TRSM_LRUU               CTRSM_LRUU
2048 #define TRSM_LRUN               CTRSM_LRUN
2049 #define TRSM_LRLU               CTRSM_LRLU
2050 #define TRSM_LRLN               CTRSM_LRLN
2051 #define TRSM_LCUU               CTRSM_LCUU
2052 #define TRSM_LCUN               CTRSM_LCUN
2053 #define TRSM_LCLU               CTRSM_LCLU
2054 #define TRSM_LCLN               CTRSM_LCLN
2055 #define TRSM_RNUU               CTRSM_RNUU
2056 #define TRSM_RNUN               CTRSM_RNUN
2057 #define TRSM_RNLU               CTRSM_RNLU
2058 #define TRSM_RNLN               CTRSM_RNLN
2059 #define TRSM_RTUU               CTRSM_RTUU
2060 #define TRSM_RTUN               CTRSM_RTUN
2061 #define TRSM_RTLU               CTRSM_RTLU
2062 #define TRSM_RTLN               CTRSM_RTLN
2063 #define TRSM_RRUU               CTRSM_RRUU
2064 #define TRSM_RRUN               CTRSM_RRUN
2065 #define TRSM_RRLU               CTRSM_RRLU
2066 #define TRSM_RRLN               CTRSM_RRLN
2067 #define TRSM_RCUU               CTRSM_RCUU
2068 #define TRSM_RCUN               CTRSM_RCUN
2069 #define TRSM_RCLU               CTRSM_RCLU
2070 #define TRSM_RCLN               CTRSM_RCLN
2071
2072
2073 #define GEMM_THREAD_NN          CGEMM_THREAD_NN
2074 #define GEMM_THREAD_CN          CGEMM_THREAD_CN
2075 #define GEMM_THREAD_TN          CGEMM_THREAD_TN
2076 #define GEMM_THREAD_NC          CGEMM_THREAD_NC
2077 #define GEMM_THREAD_NT          CGEMM_THREAD_NT
2078 #define GEMM_THREAD_CC          CGEMM_THREAD_CC
2079 #define GEMM_THREAD_CT          CGEMM_THREAD_CT
2080 #define GEMM_THREAD_TC          CGEMM_THREAD_TC
2081 #define GEMM_THREAD_TT          CGEMM_THREAD_TT
2082 #define GEMM_THREAD_NR          CGEMM_THREAD_NR
2083 #define GEMM_THREAD_TR          CGEMM_THREAD_TR
2084 #define GEMM_THREAD_CR          CGEMM_THREAD_CR
2085 #define GEMM_THREAD_RN          CGEMM_THREAD_RN
2086 #define GEMM_THREAD_RT          CGEMM_THREAD_RT
2087 #define GEMM_THREAD_RC          CGEMM_THREAD_RC
2088 #define GEMM_THREAD_RR          CGEMM_THREAD_RR
2089
2090 #define SYMM_THREAD_LU          CSYMM_THREAD_LU
2091 #define SYMM_THREAD_LL          CSYMM_THREAD_LL
2092 #define SYMM_THREAD_RU          CSYMM_THREAD_RU
2093 #define SYMM_THREAD_RL          CSYMM_THREAD_RL
2094
2095 #define HEMM_THREAD_LU          CHEMM_THREAD_LU
2096 #define HEMM_THREAD_LL          CHEMM_THREAD_LL
2097 #define HEMM_THREAD_RU          CHEMM_THREAD_RU
2098 #define HEMM_THREAD_RL          CHEMM_THREAD_RL
2099
2100 #define SYRK_THREAD_UN          CSYRK_THREAD_UN
2101 #define SYRK_THREAD_UT          CSYRK_THREAD_UT
2102 #define SYRK_THREAD_LN          CSYRK_THREAD_LN
2103 #define SYRK_THREAD_LT          CSYRK_THREAD_LT
2104 #define SYRK_THREAD_UR          CSYRK_THREAD_UR
2105 #define SYRK_THREAD_UC          CSYRK_THREAD_UC
2106 #define SYRK_THREAD_LR          CSYRK_THREAD_LR
2107 #define SYRK_THREAD_LC          CSYRK_THREAD_LC
2108
2109 #define HERK_THREAD_UN          CHERK_THREAD_UN
2110 #define HERK_THREAD_UT          CHERK_THREAD_UT
2111 #define HERK_THREAD_LN          CHERK_THREAD_LN
2112 #define HERK_THREAD_LT          CHERK_THREAD_LT
2113 #define HERK_THREAD_UR          CHERK_THREAD_UR
2114 #define HERK_THREAD_UC          CHERK_THREAD_UC
2115 #define HERK_THREAD_LR          CHERK_THREAD_LR
2116 #define HERK_THREAD_LC          CHERK_THREAD_LC
2117
2118 #define GEMM3M_NN               CGEMM3M_NN
2119 #define GEMM3M_CN               CGEMM3M_CN
2120 #define GEMM3M_TN               CGEMM3M_TN
2121 #define GEMM3M_NC               CGEMM3M_NC
2122 #define GEMM3M_NT               CGEMM3M_NT
2123 #define GEMM3M_CC               CGEMM3M_CC
2124 #define GEMM3M_CT               CGEMM3M_CT
2125 #define GEMM3M_TC               CGEMM3M_TC
2126 #define GEMM3M_TT               CGEMM3M_TT
2127 #define GEMM3M_NR               CGEMM3M_NR
2128 #define GEMM3M_TR               CGEMM3M_TR
2129 #define GEMM3M_CR               CGEMM3M_CR
2130 #define GEMM3M_RN               CGEMM3M_RN
2131 #define GEMM3M_RT               CGEMM3M_RT
2132 #define GEMM3M_RC               CGEMM3M_RC
2133 #define GEMM3M_RR               CGEMM3M_RR
2134
2135 #define GEMM3M_THREAD_NN        CGEMM3M_THREAD_NN
2136 #define GEMM3M_THREAD_CN        CGEMM3M_THREAD_CN
2137 #define GEMM3M_THREAD_TN        CGEMM3M_THREAD_TN
2138 #define GEMM3M_THREAD_NC        CGEMM3M_THREAD_NC
2139 #define GEMM3M_THREAD_NT        CGEMM3M_THREAD_NT
2140 #define GEMM3M_THREAD_CC        CGEMM3M_THREAD_CC
2141 #define GEMM3M_THREAD_CT        CGEMM3M_THREAD_CT
2142 #define GEMM3M_THREAD_TC        CGEMM3M_THREAD_TC
2143 #define GEMM3M_THREAD_TT        CGEMM3M_THREAD_TT
2144 #define GEMM3M_THREAD_NR        CGEMM3M_THREAD_NR
2145 #define GEMM3M_THREAD_TR        CGEMM3M_THREAD_TR
2146 #define GEMM3M_THREAD_CR        CGEMM3M_THREAD_CR
2147 #define GEMM3M_THREAD_RN        CGEMM3M_THREAD_RN
2148 #define GEMM3M_THREAD_RT        CGEMM3M_THREAD_RT
2149 #define GEMM3M_THREAD_RC        CGEMM3M_THREAD_RC
2150 #define GEMM3M_THREAD_RR        CGEMM3M_THREAD_RR
2151
2152 #define SYMM3M_LU               CSYMM3M_LU
2153 #define SYMM3M_LL               CSYMM3M_LL
2154 #define SYMM3M_RU               CSYMM3M_RU
2155 #define SYMM3M_RL               CSYMM3M_RL
2156
2157 #define SYMM3M_THREAD_LU        CSYMM3M_THREAD_LU
2158 #define SYMM3M_THREAD_LL        CSYMM3M_THREAD_LL
2159 #define SYMM3M_THREAD_RU        CSYMM3M_THREAD_RU
2160 #define SYMM3M_THREAD_RL        CSYMM3M_THREAD_RL
2161
2162 #define HEMM3M_LU               CHEMM3M_LU
2163 #define HEMM3M_LL               CHEMM3M_LL
2164 #define HEMM3M_RU               CHEMM3M_RU
2165 #define HEMM3M_RL               CHEMM3M_RL
2166
2167 #define HEMM3M_THREAD_LU        CHEMM3M_THREAD_LU
2168 #define HEMM3M_THREAD_LL        CHEMM3M_THREAD_LL
2169 #define HEMM3M_THREAD_RU        CHEMM3M_THREAD_RU
2170 #define HEMM3M_THREAD_RL        CHEMM3M_THREAD_RL
2171
2172 #define SYMM_IUTCOPY            CSYMM_IUTCOPY
2173 #define SYMM_ILTCOPY            CSYMM_ILTCOPY
2174 #define SYMM_OUTCOPY            CSYMM_OUTCOPY
2175 #define SYMM_OLTCOPY            CSYMM_OLTCOPY
2176
2177 #define AXPBY_K                 CAXPBY_K
2178
2179 #define OMATCOPY_K_CN           COMATCOPY_K_CN
2180 #define OMATCOPY_K_RN           COMATCOPY_K_RN
2181 #define OMATCOPY_K_CT           COMATCOPY_K_CT
2182 #define OMATCOPY_K_RT           COMATCOPY_K_RT
2183 #define OMATCOPY_K_CNC          COMATCOPY_K_CNC
2184 #define OMATCOPY_K_RNC          COMATCOPY_K_RNC
2185 #define OMATCOPY_K_CTC          COMATCOPY_K_CTC
2186 #define OMATCOPY_K_RTC          COMATCOPY_K_RTC
2187 #define IMATCOPY_K_CN           CIMATCOPY_K_CN
2188 #define IMATCOPY_K_RN           CIMATCOPY_K_RN
2189 #define IMATCOPY_K_CT           CIMATCOPY_K_CT
2190 #define IMATCOPY_K_RT           CIMATCOPY_K_RT
2191 #define IMATCOPY_K_CNC          CIMATCOPY_K_CNC
2192 #define IMATCOPY_K_RNC          CIMATCOPY_K_RNC
2193 #define IMATCOPY_K_CTC          CIMATCOPY_K_CTC
2194 #define IMATCOPY_K_RTC          CIMATCOPY_K_RTC
2195
2196 #define GEADD_K                 CGEADD_K 
2197
2198 #endif
2199 #endif
2200
2201 #ifndef ASSEMBLER
2202 #if defined(ARCH_X86) || defined(ARCH_X86_64) || defined(ARCH_IA64) || defined(ARCH_MIPS64) || defined(ARCH_ARM64)
2203 extern BLASLONG gemm_offset_a;
2204 extern BLASLONG gemm_offset_b;
2205 extern BLASLONG sgemm_p;
2206 extern BLASLONG sgemm_q;
2207 extern BLASLONG sgemm_r;
2208 extern BLASLONG dgemm_p;
2209 extern BLASLONG dgemm_q;
2210 extern BLASLONG dgemm_r;
2211 extern BLASLONG qgemm_p;
2212 extern BLASLONG qgemm_q;
2213 extern BLASLONG qgemm_r;
2214 extern BLASLONG cgemm_p;
2215 extern BLASLONG cgemm_q;
2216 extern BLASLONG cgemm_r;
2217 extern BLASLONG zgemm_p;
2218 extern BLASLONG zgemm_q;
2219 extern BLASLONG zgemm_r;
2220 extern BLASLONG xgemm_p;
2221 extern BLASLONG xgemm_q;
2222 extern BLASLONG xgemm_r;
2223 #endif
2224
2225 typedef struct {
2226   void *a, *b, *c, *d, *alpha, *beta;
2227   BLASLONG      m, n, k, lda, ldb, ldc, ldd;
2228
2229 #ifdef SMP
2230   void *common;
2231   BLASLONG nthreads;
2232 #endif
2233
2234 #ifdef PARAMTEST
2235   BLASLONG gemm_p, gemm_q, gemm_r;
2236 #endif
2237
2238 #ifdef PREFETCHTEST
2239   BLASLONG prea, preb, prec, pred;
2240 #endif
2241
2242 } blas_arg_t;
2243 #endif
2244
2245 #ifdef XDOUBLE
2246
2247 #define TRSV_NUU qtrsv_NUU
2248 #define TRSV_NUN qtrsv_NUN
2249 #define TRSV_NLU qtrsv_NLU
2250 #define TRSV_NLN qtrsv_NLN
2251 #define TRSV_TUU qtrsv_TUU
2252 #define TRSV_TUN qtrsv_TUN
2253 #define TRSV_TLU qtrsv_TLU
2254 #define TRSV_TLN qtrsv_TLN
2255
2256 #define ZTRSV_NUU xtrsv_NUU
2257 #define ZTRSV_NUN xtrsv_NUN
2258 #define ZTRSV_NLU xtrsv_NLU
2259 #define ZTRSV_NLN xtrsv_NLN
2260 #define ZTRSV_TUU xtrsv_TUU
2261 #define ZTRSV_TUN xtrsv_TUN
2262 #define ZTRSV_TLU xtrsv_TLU
2263 #define ZTRSV_TLN xtrsv_TLN
2264 #define ZTRSV_RUU xtrsv_RUU
2265 #define ZTRSV_RUN xtrsv_RUN
2266 #define ZTRSV_RLU xtrsv_RLU
2267 #define ZTRSV_RLN xtrsv_RLN
2268 #define ZTRSV_CUU xtrsv_CUU
2269 #define ZTRSV_CUN xtrsv_CUN
2270 #define ZTRSV_CLU xtrsv_CLU
2271 #define ZTRSV_CLN xtrsv_CLN
2272
2273 #define TRMV_NUU qtrmv_NUU
2274 #define TRMV_NUN qtrmv_NUN
2275 #define TRMV_NLU qtrmv_NLU
2276 #define TRMV_NLN qtrmv_NLN
2277 #define TRMV_TUU qtrmv_TUU
2278 #define TRMV_TUN qtrmv_TUN
2279 #define TRMV_TLU qtrmv_TLU
2280 #define TRMV_TLN qtrmv_TLN
2281
2282 #define TRMV_THREAD_NUU qtrmv_thread_NUU
2283 #define TRMV_THREAD_NUN qtrmv_thread_NUN
2284 #define TRMV_THREAD_NLU qtrmv_thread_NLU
2285 #define TRMV_THREAD_NLN qtrmv_thread_NLN
2286 #define TRMV_THREAD_TUU qtrmv_thread_TUU
2287 #define TRMV_THREAD_TUN qtrmv_thread_TUN
2288 #define TRMV_THREAD_TLU qtrmv_thread_TLU
2289 #define TRMV_THREAD_TLN qtrmv_thread_TLN
2290
2291 #define ZTRMV_NUU xtrmv_NUU
2292 #define ZTRMV_NUN xtrmv_NUN
2293 #define ZTRMV_NLU xtrmv_NLU
2294 #define ZTRMV_NLN xtrmv_NLN
2295 #define ZTRMV_TUU xtrmv_TUU
2296 #define ZTRMV_TUN xtrmv_TUN
2297 #define ZTRMV_TLU xtrmv_TLU
2298 #define ZTRMV_TLN xtrmv_TLN
2299 #define ZTRMV_RUU xtrmv_RUU
2300 #define ZTRMV_RUN xtrmv_RUN
2301 #define ZTRMV_RLU xtrmv_RLU
2302 #define ZTRMV_RLN xtrmv_RLN
2303 #define ZTRMV_CUU xtrmv_CUU
2304 #define ZTRMV_CUN xtrmv_CUN
2305 #define ZTRMV_CLU xtrmv_CLU
2306 #define ZTRMV_CLN xtrmv_CLN
2307
2308 #define ZTRMV_THREAD_NUU xtrmv_thread_NUU
2309 #define ZTRMV_THREAD_NUN xtrmv_thread_NUN
2310 #define ZTRMV_THREAD_NLU xtrmv_thread_NLU
2311 #define ZTRMV_THREAD_NLN xtrmv_thread_NLN
2312 #define ZTRMV_THREAD_TUU xtrmv_thread_TUU
2313 #define ZTRMV_THREAD_TUN xtrmv_thread_TUN
2314 #define ZTRMV_THREAD_TLU xtrmv_thread_TLU
2315 #define ZTRMV_THREAD_TLN xtrmv_thread_TLN
2316 #define ZTRMV_THREAD_RUU xtrmv_thread_RUU
2317 #define ZTRMV_THREAD_RUN xtrmv_thread_RUN
2318 #define ZTRMV_THREAD_RLU xtrmv_thread_RLU
2319 #define ZTRMV_THREAD_RLN xtrmv_thread_RLN
2320 #define ZTRMV_THREAD_CUU xtrmv_thread_CUU
2321 #define ZTRMV_THREAD_CUN xtrmv_thread_CUN
2322 #define ZTRMV_THREAD_CLU xtrmv_thread_CLU
2323 #define ZTRMV_THREAD_CLN xtrmv_thread_CLN
2324
2325 #elif defined(DOUBLE)
2326
2327 #define TRSV_NUU dtrsv_NUU
2328 #define TRSV_NUN dtrsv_NUN
2329 #define TRSV_NLU dtrsv_NLU
2330 #define TRSV_NLN dtrsv_NLN
2331 #define TRSV_TUU dtrsv_TUU
2332 #define TRSV_TUN dtrsv_TUN
2333 #define TRSV_TLU dtrsv_TLU
2334 #define TRSV_TLN dtrsv_TLN
2335
2336 #define ZTRSV_NUU ztrsv_NUU
2337 #define ZTRSV_NUN ztrsv_NUN
2338 #define ZTRSV_NLU ztrsv_NLU
2339 #define ZTRSV_NLN ztrsv_NLN
2340 #define ZTRSV_TUU ztrsv_TUU
2341 #define ZTRSV_TUN ztrsv_TUN
2342 #define ZTRSV_TLU ztrsv_TLU
2343 #define ZTRSV_TLN ztrsv_TLN
2344 #define ZTRSV_RUU ztrsv_RUU
2345 #define ZTRSV_RUN ztrsv_RUN
2346 #define ZTRSV_RLU ztrsv_RLU
2347 #define ZTRSV_RLN ztrsv_RLN
2348 #define ZTRSV_CUU ztrsv_CUU
2349 #define ZTRSV_CUN ztrsv_CUN
2350 #define ZTRSV_CLU ztrsv_CLU
2351 #define ZTRSV_CLN ztrsv_CLN
2352
2353 #define TRMV_NUU dtrmv_NUU
2354 #define TRMV_NUN dtrmv_NUN
2355 #define TRMV_NLU dtrmv_NLU
2356 #define TRMV_NLN dtrmv_NLN
2357 #define TRMV_TUU dtrmv_TUU
2358 #define TRMV_TUN dtrmv_TUN
2359 #define TRMV_TLU dtrmv_TLU
2360 #define TRMV_TLN dtrmv_TLN
2361
2362 #define TRMV_THREAD_NUU dtrmv_thread_NUU
2363 #define TRMV_THREAD_NUN dtrmv_thread_NUN
2364 #define TRMV_THREAD_NLU dtrmv_thread_NLU
2365 #define TRMV_THREAD_NLN dtrmv_thread_NLN
2366 #define TRMV_THREAD_TUU dtrmv_thread_TUU
2367 #define TRMV_THREAD_TUN dtrmv_thread_TUN
2368 #define TRMV_THREAD_TLU dtrmv_thread_TLU
2369 #define TRMV_THREAD_TLN dtrmv_thread_TLN
2370
2371 #define ZTRMV_NUU ztrmv_NUU
2372 #define ZTRMV_NUN ztrmv_NUN
2373 #define ZTRMV_NLU ztrmv_NLU
2374 #define ZTRMV_NLN ztrmv_NLN
2375 #define ZTRMV_TUU ztrmv_TUU
2376 #define ZTRMV_TUN ztrmv_TUN
2377 #define ZTRMV_TLU ztrmv_TLU
2378 #define ZTRMV_TLN ztrmv_TLN
2379 #define ZTRMV_RUU ztrmv_RUU
2380 #define ZTRMV_RUN ztrmv_RUN
2381 #define ZTRMV_RLU ztrmv_RLU
2382 #define ZTRMV_RLN ztrmv_RLN
2383 #define ZTRMV_CUU ztrmv_CUU
2384 #define ZTRMV_CUN ztrmv_CUN
2385 #define ZTRMV_CLU ztrmv_CLU
2386 #define ZTRMV_CLN ztrmv_CLN
2387
2388 #define ZTRMV_THREAD_NUU ztrmv_thread_NUU
2389 #define ZTRMV_THREAD_NUN ztrmv_thread_NUN
2390 #define ZTRMV_THREAD_NLU ztrmv_thread_NLU
2391 #define ZTRMV_THREAD_NLN ztrmv_thread_NLN
2392 #define ZTRMV_THREAD_TUU ztrmv_thread_TUU
2393 #define ZTRMV_THREAD_TUN ztrmv_thread_TUN
2394 #define ZTRMV_THREAD_TLU ztrmv_thread_TLU
2395 #define ZTRMV_THREAD_TLN ztrmv_thread_TLN
2396 #define ZTRMV_THREAD_RUU ztrmv_thread_RUU
2397 #define ZTRMV_THREAD_RUN ztrmv_thread_RUN
2398 #define ZTRMV_THREAD_RLU ztrmv_thread_RLU
2399 #define ZTRMV_THREAD_RLN ztrmv_thread_RLN
2400 #define ZTRMV_THREAD_CUU ztrmv_thread_CUU
2401 #define ZTRMV_THREAD_CUN ztrmv_thread_CUN
2402 #define ZTRMV_THREAD_CLU ztrmv_thread_CLU
2403 #define ZTRMV_THREAD_CLN ztrmv_thread_CLN
2404
2405 #else
2406
2407 #define TRSV_NUU strsv_NUU
2408 #define TRSV_NUN strsv_NUN
2409 #define TRSV_NLU strsv_NLU
2410 #define TRSV_NLN strsv_NLN
2411 #define TRSV_TUU strsv_TUU
2412 #define TRSV_TUN strsv_TUN
2413 #define TRSV_TLU strsv_TLU
2414 #define TRSV_TLN strsv_TLN
2415
2416 #define ZTRSV_NUU ctrsv_NUU
2417 #define ZTRSV_NUN ctrsv_NUN
2418 #define ZTRSV_NLU ctrsv_NLU
2419 #define ZTRSV_NLN ctrsv_NLN
2420 #define ZTRSV_TUU ctrsv_TUU
2421 #define ZTRSV_TUN ctrsv_TUN
2422 #define ZTRSV_TLU ctrsv_TLU
2423 #define ZTRSV_TLN ctrsv_TLN
2424 #define ZTRSV_RUU ctrsv_RUU
2425 #define ZTRSV_RUN ctrsv_RUN
2426 #define ZTRSV_RLU ctrsv_RLU
2427 #define ZTRSV_RLN ctrsv_RLN
2428 #define ZTRSV_CUU ctrsv_CUU
2429 #define ZTRSV_CUN ctrsv_CUN
2430 #define ZTRSV_CLU ctrsv_CLU
2431 #define ZTRSV_CLN ctrsv_CLN
2432
2433 #define TRMV_NUU strmv_NUU
2434 #define TRMV_NUN strmv_NUN
2435 #define TRMV_NLU strmv_NLU
2436 #define TRMV_NLN strmv_NLN
2437 #define TRMV_TUU strmv_TUU
2438 #define TRMV_TUN strmv_TUN
2439 #define TRMV_TLU strmv_TLU
2440 #define TRMV_TLN strmv_TLN
2441
2442 #define TRMV_THREAD_NUU strmv_thread_NUU
2443 #define TRMV_THREAD_NUN strmv_thread_NUN
2444 #define TRMV_THREAD_NLU strmv_thread_NLU
2445 #define TRMV_THREAD_NLN strmv_thread_NLN
2446 #define TRMV_THREAD_TUU strmv_thread_TUU
2447 #define TRMV_THREAD_TUN strmv_thread_TUN
2448 #define TRMV_THREAD_TLU strmv_thread_TLU
2449 #define TRMV_THREAD_TLN strmv_thread_TLN
2450
2451 #define ZTRMV_NUU ctrmv_NUU
2452 #define ZTRMV_NUN ctrmv_NUN
2453 #define ZTRMV_NLU ctrmv_NLU
2454 #define ZTRMV_NLN ctrmv_NLN
2455 #define ZTRMV_TUU ctrmv_TUU
2456 #define ZTRMV_TUN ctrmv_TUN
2457 #define ZTRMV_TLU ctrmv_TLU
2458 #define ZTRMV_TLN ctrmv_TLN
2459 #define ZTRMV_RUU ctrmv_RUU
2460 #define ZTRMV_RUN ctrmv_RUN
2461 #define ZTRMV_RLU ctrmv_RLU
2462 #define ZTRMV_RLN ctrmv_RLN
2463 #define ZTRMV_CUU ctrmv_CUU
2464 #define ZTRMV_CUN ctrmv_CUN
2465 #define ZTRMV_CLU ctrmv_CLU
2466 #define ZTRMV_CLN ctrmv_CLN
2467
2468 #define ZTRMV_THREAD_NUU ctrmv_thread_NUU
2469 #define ZTRMV_THREAD_NUN ctrmv_thread_NUN
2470 #define ZTRMV_THREAD_NLU ctrmv_thread_NLU
2471 #define ZTRMV_THREAD_NLN ctrmv_thread_NLN
2472 #define ZTRMV_THREAD_TUU ctrmv_thread_TUU
2473 #define ZTRMV_THREAD_TUN ctrmv_thread_TUN
2474 #define ZTRMV_THREAD_TLU ctrmv_thread_TLU
2475 #define ZTRMV_THREAD_TLN ctrmv_thread_TLN
2476 #define ZTRMV_THREAD_RUU ctrmv_thread_RUU
2477 #define ZTRMV_THREAD_RUN ctrmv_thread_RUN
2478 #define ZTRMV_THREAD_RLU ctrmv_thread_RLU
2479 #define ZTRMV_THREAD_RLN ctrmv_thread_RLN
2480 #define ZTRMV_THREAD_CUU ctrmv_thread_CUU
2481 #define ZTRMV_THREAD_CUN ctrmv_thread_CUN
2482 #define ZTRMV_THREAD_CLU ctrmv_thread_CLU
2483 #define ZTRMV_THREAD_CLN ctrmv_thread_CLN
2484
2485 #endif
2486
2487 #define SGETF2  sgetf2_k
2488 #define DGETF2  dgetf2_k
2489 #define QGETF2  qgetf2_k
2490 #define CGETF2  cgetf2_k
2491 #define ZGETF2  zgetf2_k
2492 #define XGETF2  xgetf2_k
2493
2494 #define SLASWP_PLUS     slaswp_plus
2495 #define SLASWP_MINUS    slaswp_minus
2496 #define DLASWP_PLUS     dlaswp_plus
2497 #define DLASWP_MINUS    dlaswp_minus
2498 #define QLASWP_PLUS     qlaswp_plus
2499 #define QLASWP_MINUS    qlaswp_minus
2500 #define CLASWP_PLUS     claswp_plus
2501 #define CLASWP_MINUS    claswp_minus
2502 #define ZLASWP_PLUS     zlaswp_plus
2503 #define ZLASWP_MINUS    zlaswp_minus
2504 #define XLASWP_PLUS     xlaswp_plus
2505 #define XLASWP_MINUS    xlaswp_minus
2506
2507 #define SLARF_L         slarf_L
2508 #define SLARF_R         slarf_R
2509 #define DLARF_L         dlarf_L
2510 #define DLARF_R         dlarf_R
2511 #define QLARF_L         qlarf_L
2512 #define QLARF_R         qlarf_R
2513 #define CLARF_L         clarf_L
2514 #define CLARF_R         clarf_R
2515 #define ZLARF_L         zlarf_L
2516 #define ZLARF_R         zlarf_R
2517 #define XLARF_L         xlarf_L
2518 #define XLARF_R         xlarf_R
2519
2520 #ifndef COMPLEX
2521 #ifdef XDOUBLE
2522 #define GETF2   QGETF2
2523 #define GETRF   QGETRF
2524 #define GETRS_N_SINGLE  qgetrs_N_single
2525 #define GETRS_T_SINGLE  qgetrs_T_single
2526 #define GETRS_R_SINGLE  qgetrs_N_single
2527 #define GETRS_C_SINGLE  qgetrs_T_single
2528 #define GETRS_N_PARALLEL        qgetrs_N_parallel
2529 #define GETRS_T_PARALLEL        qgetrs_T_parallel
2530 #define GETRS_R_PARALLEL        qgetrs_N_parallel
2531 #define GETRS_C_PARALLEL        qgetrs_T_parallel
2532 #define LASWP_PLUS      QLASWP_PLUS
2533 #define LASWP_MINUS     QLASWP_MINUS
2534 #define LASWP_NCOPY     QLASWP_NCOPY
2535 #define GETRS_N         QGETRS_N
2536 #define GETRS_T         QGETRS_T
2537 #define GETRF_SINGLE    qgetrf_single
2538 #define GETRF_PARALLEL  qgetrf_parallel
2539 #define NEG_TCOPY       QNEG_TCOPY
2540 #define LARF_L          QLARF_L
2541 #define LARF_R          QLARF_R
2542 #elif defined(DOUBLE)
2543 #define GETF2   DGETF2
2544 #define GETRF   DGETRF
2545 #define GETRS_N_SINGLE  dgetrs_N_single
2546 #define GETRS_T_SINGLE  dgetrs_T_single
2547 #define GETRS_R_SINGLE  dgetrs_N_single
2548 #define GETRS_C_SINGLE  dgetrs_T_single
2549 #define GETRS_N_PARALLEL        dgetrs_N_parallel
2550 #define GETRS_T_PARALLEL        dgetrs_T_parallel
2551 #define GETRS_R_PARALLEL        dgetrs_N_parallel
2552 #define GETRS_C_PARALLEL        dgetrs_T_parallel
2553 #define LASWP_PLUS      DLASWP_PLUS
2554 #define LASWP_MINUS     DLASWP_MINUS
2555 #define LASWP_NCOPY     DLASWP_NCOPY
2556 #define GETRS_N         DGETRS_N
2557 #define GETRS_T         DGETRS_T
2558 #define GETRF_SINGLE    dgetrf_single
2559 #define GETRF_PARALLEL  dgetrf_parallel
2560 #define NEG_TCOPY       DNEG_TCOPY
2561 #define LARF_L          DLARF_L
2562 #define LARF_R          DLARF_R
2563 #else
2564 #define GETF2   SGETF2
2565 #define GETRF   SGETRF
2566 #define GETRS_N_SINGLE  sgetrs_N_single
2567 #define GETRS_T_SINGLE  sgetrs_T_single
2568 #define GETRS_R_SINGLE  sgetrs_N_single
2569 #define GETRS_C_SINGLE  sgetrs_T_single
2570 #define GETRS_N_PARALLEL        sgetrs_N_parallel
2571 #define GETRS_T_PARALLEL        sgetrs_T_parallel
2572 #define GETRS_R_PARALLEL        sgetrs_N_parallel
2573 #define GETRS_C_PARALLEL        sgetrs_T_parallel
2574 #define LASWP_PLUS      SLASWP_PLUS
2575 #define LASWP_MINUS     SLASWP_MINUS
2576 #define LASWP_NCOPY     SLASWP_NCOPY
2577 #define GETRS_N         SGETRS_N
2578 #define GETRS_T         SGETRS_T
2579 #define GETRF_SINGLE    sgetrf_single
2580 #define GETRF_PARALLEL  sgetrf_parallel
2581 #define NEG_TCOPY       SNEG_TCOPY
2582 #define LARF_L          SLARF_L
2583 #define LARF_R          SLARF_R
2584 #endif
2585 #else
2586 #ifdef XDOUBLE
2587 #define GETF2   XGETF2
2588 #define GETRF   XGETRF
2589 #define GETRS_N_SINGLE  xgetrs_N_single
2590 #define GETRS_T_SINGLE  xgetrs_T_single
2591 #define GETRS_R_SINGLE  xgetrs_R_single
2592 #define GETRS_C_SINGLE  xgetrs_C_single
2593 #define GETRS_N_PARALLEL        xgetrs_N_parallel
2594 #define GETRS_T_PARALLEL        xgetrs_T_parallel
2595 #define GETRS_R_PARALLEL        xgetrs_R_parallel
2596 #define GETRS_C_PARALLEL        xgetrs_C_parallel
2597 #define LASWP_PLUS      XLASWP_PLUS
2598 #define LASWP_MINUS     XLASWP_MINUS
2599 #define LASWP_NCOPY     XLASWP_NCOPY
2600 #define GETRS_N         XGETRS_N
2601 #define GETRS_T         XGETRS_T
2602 #define GETRF_SINGLE    xgetrf_single
2603 #define GETRF_PARALLEL  xgetrf_parallel
2604 #define NEG_TCOPY       XNEG_TCOPY
2605 #define LARF_L          XLARF_L
2606 #define LARF_R          XLARF_R
2607 #elif defined(DOUBLE)
2608 #define GETF2   ZGETF2
2609 #define GETRF   ZGETRF
2610 #define GETRS_N_SINGLE  zgetrs_N_single
2611 #define GETRS_T_SINGLE  zgetrs_T_single
2612 #define GETRS_R_SINGLE  zgetrs_R_single
2613 #define GETRS_C_SINGLE  zgetrs_C_single
2614 #define GETRS_N_PARALLEL        zgetrs_N_parallel
2615 #define GETRS_T_PARALLEL        zgetrs_T_parallel
2616 #define GETRS_R_PARALLEL        zgetrs_R_parallel
2617 #define GETRS_C_PARALLEL        zgetrs_C_parallel
2618 #define LASWP_PLUS      ZLASWP_PLUS
2619 #define LASWP_MINUS     ZLASWP_MINUS
2620 #define LASWP_NCOPY     ZLASWP_NCOPY
2621 #define GETRS_N         ZGETRS_N
2622 #define GETRS_T         ZGETRS_T
2623 #define GETRF_SINGLE    zgetrf_single
2624 #define GETRF_PARALLEL  zgetrf_parallel
2625 #define NEG_TCOPY       ZNEG_TCOPY
2626 #define LARF_L          ZLARF_L
2627 #define LARF_R          ZLARF_R
2628 #else
2629 #define GETF2   CGETF2
2630 #define GETRF   CGETRF
2631 #define GETRS_N_SINGLE  cgetrs_N_single
2632 #define GETRS_T_SINGLE  cgetrs_T_single
2633 #define GETRS_R_SINGLE  cgetrs_R_single
2634 #define GETRS_C_SINGLE  cgetrs_C_single
2635 #define GETRS_N_PARALLEL        cgetrs_N_parallel
2636 #define GETRS_T_PARALLEL        cgetrs_T_parallel
2637 #define GETRS_R_PARALLEL        cgetrs_R_parallel
2638 #define GETRS_C_PARALLEL        cgetrs_C_parallel
2639 #define LASWP_PLUS      CLASWP_PLUS
2640 #define LASWP_MINUS     CLASWP_MINUS
2641 #define LASWP_NCOPY     CLASWP_NCOPY
2642 #define GETRS_N         CGETRS_N
2643 #define GETRS_T         CGETRS_T
2644 #define GETRF_SINGLE    cgetrf_single
2645 #define GETRF_PARALLEL  cgetrf_parallel
2646 #define NEG_TCOPY       CNEG_TCOPY
2647 #define LARF_L          CLARF_L
2648 #define LARF_R          CLARF_R
2649 #endif
2650 #endif
2651
2652 #ifndef COMPLEX
2653 #ifdef XDOUBLE
2654 #define  POTF2_U  qpotf2_U
2655 #define  POTF2_L  qpotf2_L
2656 #define  LAUU2_U  qlauu2_U
2657 #define  LAUU2_L  qlauu2_L
2658 #define  POTRF_U_SINGLE qpotrf_U_single
2659 #define  POTRF_L_SINGLE qpotrf_L_single
2660 #define  POTRF_U_PARALLEL qpotrf_U_parallel
2661 #define  POTRF_L_PARALLEL qpotrf_L_parallel
2662 #define  LAUUM_U_SINGLE qlauum_U_single
2663 #define  LAUUM_L_SINGLE qlauum_L_single
2664 #define  LAUUM_U_PARALLEL qlauum_U_parallel
2665 #define  LAUUM_L_PARALLEL qlauum_L_parallel
2666 #define  TRTI2_UU qtrti2_UU
2667 #define  TRTI2_UN qtrti2_UN
2668 #define  TRTI2_LU qtrti2_LU
2669 #define  TRTI2_LN qtrti2_LN
2670 #define  TRTRI_UU_SINGLE qtrtri_UU_single
2671 #define  TRTRI_UN_SINGLE qtrtri_UN_single
2672 #define  TRTRI_LU_SINGLE qtrtri_LU_single
2673 #define  TRTRI_LN_SINGLE qtrtri_LN_single
2674 #define  TRTRI_UU_PARALLEL qtrtri_UU_parallel
2675 #define  TRTRI_UN_PARALLEL qtrtri_UN_parallel
2676 #define  TRTRI_LU_PARALLEL qtrtri_LU_parallel
2677 #define  TRTRI_LN_PARALLEL qtrtri_LN_parallel
2678 #elif defined(DOUBLE)
2679 #define  POTF2_U  dpotf2_U
2680 #define  POTF2_L  dpotf2_L
2681 #define  LAUU2_U  dlauu2_U
2682 #define  LAUU2_L  dlauu2_L
2683 #define  POTRF_U_SINGLE dpotrf_U_single
2684 #define  POTRF_L_SINGLE dpotrf_L_single
2685 #define  POTRF_U_PARALLEL dpotrf_U_parallel
2686 #define  POTRF_L_PARALLEL dpotrf_L_parallel
2687 #define  LAUUM_U_SINGLE dlauum_U_single
2688 #define  LAUUM_L_SINGLE dlauum_L_single
2689 #define  LAUUM_U_PARALLEL dlauum_U_parallel
2690 #define  LAUUM_L_PARALLEL dlauum_L_parallel
2691 #define  TRTI2_UU dtrti2_UU
2692 #define  TRTI2_UN dtrti2_UN
2693 #define  TRTI2_LU dtrti2_LU
2694 #define  TRTI2_LN dtrti2_LN
2695 #define  TRTRI_UU_SINGLE dtrtri_UU_single
2696 #define  TRTRI_UN_SINGLE dtrtri_UN_single
2697 #define  TRTRI_LU_SINGLE dtrtri_LU_single
2698 #define  TRTRI_LN_SINGLE dtrtri_LN_single
2699 #define  TRTRI_UU_PARALLEL dtrtri_UU_parallel
2700 #define  TRTRI_UN_PARALLEL dtrtri_UN_parallel
2701 #define  TRTRI_LU_PARALLEL dtrtri_LU_parallel
2702 #define  TRTRI_LN_PARALLEL dtrtri_LN_parallel
2703 #else
2704 #define  POTF2_U  spotf2_U
2705 #define  POTF2_L  spotf2_L
2706 #define  LAUU2_U  slauu2_U
2707 #define  LAUU2_L  slauu2_L
2708 #define  POTRF_U_SINGLE spotrf_U_single
2709 #define  POTRF_L_SINGLE spotrf_L_single
2710 #define  POTRF_U_PARALLEL spotrf_U_parallel
2711 #define  POTRF_L_PARALLEL spotrf_L_parallel
2712 #define  LAUUM_U_SINGLE slauum_U_single
2713 #define  LAUUM_L_SINGLE slauum_L_single
2714 #define  LAUUM_U_PARALLEL slauum_U_parallel
2715 #define  LAUUM_L_PARALLEL slauum_L_parallel
2716 #define  TRTI2_UU strti2_UU
2717 #define  TRTI2_UN strti2_UN
2718 #define  TRTI2_LU strti2_LU
2719 #define  TRTI2_LN strti2_LN
2720 #define  TRTRI_UU_SINGLE strtri_UU_single
2721 #define  TRTRI_UN_SINGLE strtri_UN_single
2722 #define  TRTRI_LU_SINGLE strtri_LU_single
2723 #define  TRTRI_LN_SINGLE strtri_LN_single
2724 #define  TRTRI_UU_PARALLEL strtri_UU_parallel
2725 #define  TRTRI_UN_PARALLEL strtri_UN_parallel
2726 #define  TRTRI_LU_PARALLEL strtri_LU_parallel
2727 #define  TRTRI_LN_PARALLEL strtri_LN_parallel
2728 #endif
2729 #else
2730 #ifdef XDOUBLE
2731 #define  POTF2_U  xpotf2_U
2732 #define  POTF2_L  xpotf2_L
2733 #define  LAUU2_U  xlauu2_U
2734 #define  LAUU2_L  xlauu2_L
2735 #define  POTRF_U_SINGLE xpotrf_U_single
2736 #define  POTRF_L_SINGLE xpotrf_L_single
2737 #define  POTRF_U_PARALLEL xpotrf_U_parallel
2738 #define  POTRF_L_PARALLEL xpotrf_L_parallel
2739 #define  LAUUM_U_SINGLE xlauum_U_single
2740 #define  LAUUM_L_SINGLE xlauum_L_single
2741 #define  LAUUM_U_PARALLEL xlauum_U_parallel
2742 #define  LAUUM_L_PARALLEL xlauum_L_parallel
2743 #define  TRTI2_UU xtrti2_UU
2744 #define  TRTI2_UN xtrti2_UN
2745 #define  TRTI2_LU xtrti2_LU
2746 #define  TRTI2_LN xtrti2_LN
2747 #define  TRTRI_UU_SINGLE xtrtri_UU_single
2748 #define  TRTRI_UN_SINGLE xtrtri_UN_single
2749 #define  TRTRI_LU_SINGLE xtrtri_LU_single
2750 #define  TRTRI_LN_SINGLE xtrtri_LN_single
2751 #define  TRTRI_UU_PARALLEL xtrtri_UU_parallel
2752 #define  TRTRI_UN_PARALLEL xtrtri_UN_parallel
2753 #define  TRTRI_LU_PARALLEL xtrtri_LU_parallel
2754 #define  TRTRI_LN_PARALLEL xtrtri_LN_parallel
2755 #elif defined(DOUBLE)
2756 #define  POTF2_U  zpotf2_U
2757 #define  POTF2_L  zpotf2_L
2758 #define  LAUU2_U  zlauu2_U
2759 #define  LAUU2_L  zlauu2_L
2760 #define  POTRF_U_SINGLE zpotrf_U_single
2761 #define  POTRF_L_SINGLE zpotrf_L_single
2762 #define  POTRF_U_PARALLEL zpotrf_U_parallel
2763 #define  POTRF_L_PARALLEL zpotrf_L_parallel
2764 #define  LAUUM_U_SINGLE zlauum_U_single
2765 #define  LAUUM_L_SINGLE zlauum_L_single
2766 #define  LAUUM_U_PARALLEL zlauum_U_parallel
2767 #define  LAUUM_L_PARALLEL zlauum_L_parallel
2768 #define  TRTI2_UU ztrti2_UU
2769 #define  TRTI2_UN ztrti2_UN
2770 #define  TRTI2_LU ztrti2_LU
2771 #define  TRTI2_LN ztrti2_LN
2772 #define  TRTRI_UU_SINGLE ztrtri_UU_single
2773 #define  TRTRI_UN_SINGLE ztrtri_UN_single
2774 #define  TRTRI_LU_SINGLE ztrtri_LU_single
2775 #define  TRTRI_LN_SINGLE ztrtri_LN_single
2776 #define  TRTRI_UU_PARALLEL ztrtri_UU_parallel
2777 #define  TRTRI_UN_PARALLEL ztrtri_UN_parallel
2778 #define  TRTRI_LU_PARALLEL ztrtri_LU_parallel
2779 #define  TRTRI_LN_PARALLEL ztrtri_LN_parallel
2780 #else
2781 #define  POTF2_U  cpotf2_U
2782 #define  POTF2_L  cpotf2_L
2783 #define  LAUU2_U  clauu2_U
2784 #define  LAUU2_L  clauu2_L
2785 #define  POTRF_U_SINGLE cpotrf_U_single
2786 #define  POTRF_L_SINGLE cpotrf_L_single
2787 #define  POTRF_U_PARALLEL cpotrf_U_parallel
2788 #define  POTRF_L_PARALLEL cpotrf_L_parallel
2789 #define  LAUUM_U_SINGLE clauum_U_single
2790 #define  LAUUM_L_SINGLE clauum_L_single
2791 #define  LAUUM_U_PARALLEL clauum_U_parallel
2792 #define  LAUUM_L_PARALLEL clauum_L_parallel
2793 #define  TRTI2_UU ctrti2_UU
2794 #define  TRTI2_UN ctrti2_UN
2795 #define  TRTI2_LU ctrti2_LU
2796 #define  TRTI2_LN ctrti2_LN
2797 #define  TRTRI_UU_SINGLE ctrtri_UU_single
2798 #define  TRTRI_UN_SINGLE ctrtri_UN_single
2799 #define  TRTRI_LU_SINGLE ctrtri_LU_single
2800 #define  TRTRI_LN_SINGLE ctrtri_LN_single
2801 #define  TRTRI_UU_PARALLEL ctrtri_UU_parallel
2802 #define  TRTRI_UN_PARALLEL ctrtri_UN_parallel
2803 #define  TRTRI_LU_PARALLEL ctrtri_LU_parallel
2804 #define  TRTRI_LN_PARALLEL ctrtri_LN_parallel
2805 #endif
2806 #endif
2807
2808 #endif