ScaLAPACK 2.1
2.1
ScaLAPACK: Scalable Linear Algebra PACKage
PBblas.h
Go to the documentation of this file.
1
/* ---------------------------------------------------------------------
2
*
3
* -- PBLAS routine (version 2.0) --
4
* University of Tennessee, Knoxville, Oak Ridge National Laboratory,
5
* and University of California, Berkeley.
6
* April 1, 1998
7
*
8
* ---------------------------------------------------------------------
9
*/
10
/*
11
* This file includes F77 BLAS definitions. All PBLAS routines include
12
* this file.
13
*
14
* ---------------------------------------------------------------------
15
* #define macro constants
16
* ---------------------------------------------------------------------
17
*/
18
#define CNOTRAN 'N'
19
#define CNOCONJG 'N'
20
#define CTRAN 'T'
21
#define CCONJG 'Z'
22
#define CCOTRAN 'C'
23
24
#define CALL 'A'
25
#define CLOWER 'L'
26
#define CUPPER 'U'
27
#define CDIAGONAL 'D'
28
29
#define CLEFT 'L'
30
#define CRIGHT 'R'
31
32
#define CUNIT 'U'
33
#define CNOUNIT 'N'
34
35
#define CINIT 'I'
36
#define CNOINIT 'N'
37
38
#define CFORWARD 'F'
39
#define CBACKWARD 'B'
40
41
#define CREUSE 'R'
42
#define CALLOCATE 'A'
43
44
#define NOTRAN "N"
45
#define NOCONJG "N"
46
#define TRAN "T"
47
#define CONJG "Z"
48
#define COTRAN "C"
49
50
#define ALL "A"
51
#define LOWER "L"
52
#define UPPER "U"
53
#define DIAGONAL "D"
54
55
#define LEFT "L"
56
#define RIGHT "R"
57
58
#define UNIT "U"
59
#define NOUNIT "N"
60
61
#define INIT "I"
62
#define NOINIT "N"
63
64
#define FORWARD "F"
65
#define BACKWARD "B"
66
67
#define REUSE "R"
68
#define ALLOCATE "A"
69
70
#if( _F2C_CALL_ == _F2C_ADD_ )
71
/*
72
* These defines set up the naming scheme required to have a FORTRAN
73
* routine called by a C routine. No redefinition is necessary to have
74
* the following FORTRAN to C interface:
75
*
76
* FORTRAN DECLARATION C CALL
77
* SUBROUTINE DGEMM(...) dgemm_(...)
78
*
79
* This is the PBLAS default.
80
*/
81
#endif
82
83
#if( _F2C_CALL_ == _F2C_UPCASE )
84
/*
85
* These defines set up the naming scheme required to have a FORTRAN
86
* routine called by a C routine with the following FORTRAN to C inter-
87
* face:
88
*
89
* FORTRAN DECLARATION C CALL
90
* SUBROUTINE DGEMM(...) DGEMM(...)
91
*/
92
#define srot_ SROT
93
#define drot_ DROT
94
95
#define sswap_ SSWAP
96
#define dswap_ DSWAP
97
#define cswap_ CSWAP
98
#define zswap_ ZSWAP
99
100
#define scopy_ SCOPY
101
#define dcopy_ DCOPY
102
#define ccopy_ CCOPY
103
#define zcopy_ ZCOPY
104
105
#define saxpy_ SAXPY
106
#define daxpy_ DAXPY
107
#define caxpy_ CAXPY
108
#define zaxpy_ ZAXPY
109
110
#define sscal_ SSCAL
111
#define dscal_ DSCAL
112
#define cscal_ CSCAL
113
#define zscal_ ZSCAL
114
#define csscal_ CSSCAL
115
#define zdscal_ ZDSCAL
116
117
#define sasum_ SASUM
118
#define dasum_ DASUM
119
#define scasum_ SCASUM
120
#define dzasum_ DZASUM
121
122
#define snrm2_ SNRM2
123
#define dnrm2_ DNRM2
124
#define scnrm2_ SCNRM2
125
#define dznrm2_ DZNRM2
126
127
#define sdot_ SDOT
128
#define ddot_ DDOT
129
#define cdotu_ CDOTU
130
#define zdotu_ ZDOTU
131
#define cdotc_ CDOTC
132
#define zdotc_ ZDOTC
133
134
#define isamax_ ISAMAX
135
#define idamax_ IDAMAX
136
#define icamax_ ICAMAX
137
#define izamax_ IZAMAX
138
139
#define sgemv_ SGEMV
140
#define dgemv_ DGEMV
141
#define cgemv_ CGEMV
142
#define zgemv_ ZGEMV
143
144
#define ssymv_ SSYMV
145
#define dsymv_ DSYMV
146
#define chemv_ CHEMV
147
#define zhemv_ ZHEMV
148
149
#define strmv_ STRMV
150
#define dtrmv_ DTRMV
151
#define ctrmv_ CTRMV
152
#define ztrmv_ ZTRMV
153
154
#define strsv_ STRSV
155
#define dtrsv_ DTRSV
156
#define ctrsv_ CTRSV
157
#define ztrsv_ ZTRSV
158
159
#define sger_ SGER
160
#define dger_ DGER
161
#define cgeru_ CGERU
162
#define zgeru_ ZGERU
163
#define cgerc_ CGERC
164
#define zgerc_ ZGERC
165
166
#define ssyr_ SSYR
167
#define dsyr_ DSYR
168
#define cher_ CHER
169
#define zher_ ZHER
170
171
#define ssyr2_ SSYR2
172
#define dsyr2_ DSYR2
173
#define cher2_ CHER2
174
#define zher2_ ZHER2
175
176
#define sgemm_ SGEMM
177
#define dgemm_ DGEMM
178
#define cgemm_ CGEMM
179
#define zgemm_ ZGEMM
180
181
#define ssymm_ SSYMM
182
#define dsymm_ DSYMM
183
#define csymm_ CSYMM
184
#define chemm_ CHEMM
185
#define zsymm_ ZSYMM
186
#define zhemm_ ZHEMM
187
188
#define strmm_ STRMM
189
#define dtrmm_ DTRMM
190
#define ctrmm_ CTRMM
191
#define ztrmm_ ZTRMM
192
193
#define strsm_ STRSM
194
#define dtrsm_ DTRSM
195
#define ctrsm_ CTRSM
196
#define ztrsm_ ZTRSM
197
198
#define ssyrk_ SSYRK
199
#define dsyrk_ DSYRK
200
#define csyrk_ CSYRK
201
#define cherk_ CHERK
202
#define zsyrk_ ZSYRK
203
#define zherk_ ZHERK
204
205
#define ssyr2k_ SSYR2K
206
#define dsyr2k_ DSYR2K
207
#define csyr2k_ CSYR2K
208
#define cher2k_ CHER2K
209
#define zsyr2k_ ZSYR2K
210
#define zher2k_ ZHER2K
211
212
#endif
213
214
#if( _F2C_CALL_ == _F2C_NOCHANGE )
215
/*
216
* These defines set up the naming scheme required to have a FORTRAN
217
* routine called by a C routine with the following FORTRAN to C inter-
218
* face:
219
*
220
* FORTRAN DECLARATION C CALL
221
* SUBROUTINE DGEMM(...) dgemm(...)
222
*/
223
#define srot_ srot
224
#define drot_ drot
225
226
#define sswap_ sswap
227
#define dswap_ dswap
228
#define cswap_ cswap
229
#define zswap_ zswap
230
231
#define scopy_ scopy
232
#define dcopy_ dcopy
233
#define ccopy_ ccopy
234
#define zcopy_ zcopy
235
236
#define saxpy_ saxpy
237
#define daxpy_ daxpy
238
#define caxpy_ caxpy
239
#define zaxpy_ zaxpy
240
241
#define sscal_ sscal
242
#define dscal_ dscal
243
#define cscal_ cscal
244
#define zscal_ zscal
245
#define csscal_ csscal
246
#define zdscal_ zdscal
247
248
#define sasum_ sasum
249
#define dasum_ dasum
250
#define scasum_ scasum
251
#define dzasum_ dzasum
252
253
#define snrm2_ snrm2
254
#define dnrm2_ dnrm2
255
#define scnrm2_ scnrm2
256
#define dznrm2_ dznrm2
257
258
#define sdot_ sdot
259
#define ddot_ ddot
260
#define cdotu_ cdotu
261
#define zdotu_ zdotu
262
#define cdotc_ cdotc
263
#define zdotc_ zdotc
264
265
#define isamax_ isamax
266
#define idamax_ idamax
267
#define icamax_ icamax
268
#define izamax_ izamax
269
270
#define sgemv_ sgemv
271
#define dgemv_ dgemv
272
#define cgemv_ cgemv
273
#define zgemv_ zgemv
274
275
#define ssymv_ ssymv
276
#define dsymv_ dsymv
277
#define chemv_ chemv
278
#define zhemv_ zhemv
279
280
#define strmv_ strmv
281
#define dtrmv_ dtrmv
282
#define ctrmv_ ctrmv
283
#define ztrmv_ ztrmv
284
285
#define strsv_ strsv
286
#define dtrsv_ dtrsv
287
#define ctrsv_ ctrsv
288
#define ztrsv_ ztrsv
289
290
#define sger_ sger
291
#define dger_ dger
292
#define cgeru_ cgeru
293
#define zgeru_ zgeru
294
#define cgerc_ cgerc
295
#define zgerc_ zgerc
296
297
#define ssyr_ ssyr
298
#define dsyr_ dsyr
299
#define cher_ cher
300
#define zher_ zher
301
302
#define ssyr2_ ssyr2
303
#define dsyr2_ dsyr2
304
#define cher2_ cher2
305
#define zher2_ zher2
306
307
#define sgemm_ sgemm
308
#define dgemm_ dgemm
309
#define cgemm_ cgemm
310
#define zgemm_ zgemm
311
312
#define ssymm_ ssymm
313
#define dsymm_ dsymm
314
#define csymm_ csymm
315
#define chemm_ chemm
316
#define zsymm_ zsymm
317
#define zhemm_ zhemm
318
319
#define strmm_ strmm
320
#define dtrmm_ dtrmm
321
#define ctrmm_ ctrmm
322
#define ztrmm_ ztrmm
323
324
#define strsm_ strsm
325
#define dtrsm_ dtrsm
326
#define ctrsm_ ctrsm
327
#define ztrsm_ ztrsm
328
329
#define ssyrk_ ssyrk
330
#define dsyrk_ dsyrk
331
#define csyrk_ csyrk
332
#define cherk_ cherk
333
#define zsyrk_ zsyrk
334
#define zherk_ zherk
335
336
#define ssyr2k_ ssyr2k
337
#define dsyr2k_ dsyr2k
338
#define csyr2k_ csyr2k
339
#define cher2k_ cher2k
340
#define zsyr2k_ zsyr2k
341
#define zher2k_ zher2k
342
343
#endif
344
/*
345
* ---------------------------------------------------------------------
346
* Function prototypes
347
* ---------------------------------------------------------------------
348
*/
349
#ifdef __STDC__
350
351
int
isamax_
(
int
*,
char
*,
int
* );
352
int
idamax_
(
int
*,
char
*,
int
* );
353
int
icamax_
(
int
*,
char
*,
int
* );
354
int
izamax_
(
int
*,
char
*,
int
* );
355
356
F_VOID_FCT
saxpy_
(
int
*,
char
*,
char
*,
357
int
*,
char
*,
int
* );
358
F_VOID_FCT
daxpy_
(
int
*,
char
*,
char
*,
359
int
*,
char
*,
int
* );
360
F_VOID_FCT
caxpy_
(
int
*,
char
*,
char
*,
361
int
*,
char
*,
int
* );
362
F_VOID_FCT
zaxpy_
(
int
*,
char
*,
char
*,
363
int
*,
char
*,
int
* );
364
365
F_VOID_FCT
scopy_
(
int
*,
char
*,
int
*,
366
char
*,
int
* );
367
F_VOID_FCT
dcopy_
(
int
*,
char
*,
int
*,
368
char
*,
int
* );
369
F_VOID_FCT
ccopy_
(
int
*,
char
*,
int
*,
370
char
*,
int
* );
371
F_VOID_FCT
zcopy_
(
int
*,
char
*,
int
*,
372
char
*,
int
* );
373
374
F_VOID_FCT
sscal_
(
int
*,
char
*,
char
*,
375
int
* );
376
F_VOID_FCT
dscal_
(
int
*,
char
*,
char
*,
377
int
* );
378
F_VOID_FCT
cscal_
(
int
*,
char
*,
char
*,
379
int
* );
380
F_VOID_FCT
csscal_
(
int
*,
char
*,
char
*,
381
int
* );
382
F_VOID_FCT
zdscal_
(
int
*,
char
*,
char
*,
383
int
* );
384
F_VOID_FCT
zscal_
(
int
*,
char
*,
char
*,
385
int
* );
386
387
F_VOID_FCT
sswap_
(
int
*,
char
*,
int
*,
388
char
*,
int
* );
389
F_VOID_FCT
dswap_
(
int
*,
char
*,
int
*,
390
char
*,
int
* );
391
F_VOID_FCT
cswap_
(
int
*,
char
*,
int
*,
392
char
*,
int
* );
393
F_VOID_FCT
zswap_
(
int
*,
char
*,
int
*,
394
char
*,
int
* );
395
396
F_VOID_FCT
sgemv_
(
F_CHAR_T
,
int
*,
int
*,
397
char
*,
char
*,
int
*,
398
char
*,
int
*,
char
*,
399
char
*,
int
* );
400
F_VOID_FCT
dgemv_
(
F_CHAR_T
,
int
*,
int
*,
401
char
*,
char
*,
int
*,
402
char
*,
int
*,
char
*,
403
char
*,
int
* );
404
F_VOID_FCT
cgemv_
(
F_CHAR_T
,
int
*,
int
*,
405
char
*,
char
*,
int
*,
406
char
*,
int
*,
char
*,
407
char
*,
int
* );
408
F_VOID_FCT
zgemv_
(
F_CHAR_T
,
int
*,
int
*,
409
char
*,
char
*,
int
*,
410
char
*,
int
*,
char
*,
411
char
*,
int
* );
412
413
F_VOID_FCT
ssymv_
(
F_CHAR_T
,
int
*,
char
*,
414
char
*,
int
*,
char
*,
415
int
*,
char
*,
char
*,
416
int
* );
417
F_VOID_FCT
dsymv_
(
F_CHAR_T
,
int
*,
char
*,
418
char
*,
int
*,
char
*,
419
int
*,
char
*,
char
*,
420
int
* );
421
F_VOID_FCT
chemv_
(
F_CHAR_T
,
int
*,
char
*,
422
char
*,
int
*,
char
*,
423
int
*,
char
*,
char
*,
424
int
* );
425
F_VOID_FCT
zhemv_
(
F_CHAR_T
,
int
*,
char
*,
426
char
*,
int
*,
char
*,
427
int
*,
char
*,
char
*,
428
int
* );
429
430
F_VOID_FCT
strmv_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
431
int
*,
char
*,
int
*,
432
char
*,
int
* );
433
F_VOID_FCT
dtrmv_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
434
int
*,
char
*,
int
*,
435
char
*,
int
* );
436
F_VOID_FCT
ctrmv_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
437
int
*,
char
*,
int
*,
438
char
*,
int
* );
439
F_VOID_FCT
ztrmv_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
440
int
*,
char
*,
int
*,
441
char
*,
int
* );
442
443
F_VOID_FCT
strsv_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
444
int
*,
char
*,
int
*,
445
char
*,
int
* );
446
F_VOID_FCT
dtrsv_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
447
int
*,
char
*,
int
*,
448
char
*,
int
* );
449
F_VOID_FCT
ctrsv_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
450
int
*,
char
*,
int
*,
451
char
*,
int
* );
452
F_VOID_FCT
ztrsv_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
453
int
*,
char
*,
int
*,
454
char
*,
int
* );
455
456
F_VOID_FCT
sger_
(
int
*,
int
*,
char
*,
457
char
*,
int
*,
char
*,
458
int
*,
char
*,
int
* );
459
F_VOID_FCT
dger_
(
int
*,
int
*,
char
*,
460
char
*,
int
*,
char
*,
461
int
*,
char
*,
int
* );
462
F_VOID_FCT
cgerc_
(
int
*,
int
*,
char
*,
463
char
*,
int
*,
char
*,
464
int
*,
char
*,
int
* );
465
F_VOID_FCT
cgeru_
(
int
*,
int
*,
char
*,
466
char
*,
int
*,
char
*,
467
int
*,
char
*,
int
* );
468
F_VOID_FCT
zgerc_
(
int
*,
int
*,
char
*,
469
char
*,
int
*,
char
*,
470
int
*,
char
*,
int
* );
471
F_VOID_FCT
zgeru_
(
int
*,
int
*,
char
*,
472
char
*,
int
*,
char
*,
473
int
*,
char
*,
int
* );
474
475
F_VOID_FCT
ssyr_
(
F_CHAR_T
,
int
*,
char
*,
476
char
*,
int
*,
char
*,
477
int
* );
478
F_VOID_FCT
dsyr_
(
F_CHAR_T
,
int
*,
char
*,
479
char
*,
int
*,
char
*,
480
int
* );
481
F_VOID_FCT
cher_
(
F_CHAR_T
,
int
*,
char
*,
482
char
*,
int
*,
char
*,
483
int
* );
484
F_VOID_FCT
zher_
(
F_CHAR_T
,
int
*,
char
*,
485
char
*,
int
*,
char
*,
486
int
* );
487
488
F_VOID_FCT
ssyr2_
(
F_CHAR_T
,
int
*,
char
*,
489
char
*,
int
*,
char
*,
490
int
*,
char
*,
int
* );
491
F_VOID_FCT
dsyr2_
(
F_CHAR_T
,
int
*,
char
*,
492
char
*,
int
*,
char
*,
493
int
*,
char
*,
int
* );
494
F_VOID_FCT
cher2_
(
F_CHAR_T
,
int
*,
char
*,
495
char
*,
int
*,
char
*,
496
int
*,
char
*,
int
* );
497
F_VOID_FCT
zher2_
(
F_CHAR_T
,
int
*,
char
*,
498
char
*,
int
*,
char
*,
499
int
*,
char
*,
int
* );
500
501
F_VOID_FCT
sgemm_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
502
int
*,
int
*,
char
*,
503
char
*,
int
*,
char
*,
504
int
*,
char
*,
char
*,
505
int
* );
506
F_VOID_FCT
dgemm_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
507
int
*,
int
*,
char
*,
508
char
*,
int
*,
char
*,
509
int
*,
char
*,
char
*,
510
int
* );
511
F_VOID_FCT
cgemm_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
512
int
*,
int
*,
char
*,
513
char
*,
int
*,
char
*,
514
int
*,
char
*,
char
*,
515
int
* );
516
F_VOID_FCT
zgemm_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
517
int
*,
int
*,
char
*,
518
char
*,
int
*,
char
*,
519
int
*,
char
*,
char
*,
520
int
* );
521
522
F_VOID_FCT
ssymm_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
523
int
*,
char
*,
char
*,
524
int
*,
char
*,
int
*,
525
char
*,
char
*,
int
* );
526
F_VOID_FCT
dsymm_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
527
int
*,
char
*,
char
*,
528
int
*,
char
*,
int
*,
529
char
*,
char
*,
int
* );
530
F_VOID_FCT
csymm_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
531
int
*,
char
*,
char
*,
532
int
*,
char
*,
int
*,
533
char
*,
char
*,
int
* );
534
F_VOID_FCT
zsymm_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
535
int
*,
char
*,
char
*,
536
int
*,
char
*,
int
*,
537
char
*,
char
*,
int
* );
538
F_VOID_FCT
chemm_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
539
int
*,
char
*,
char
*,
540
int
*,
char
*,
int
*,
541
char
*,
char
*,
int
* );
542
F_VOID_FCT
zhemm_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
543
int
*,
char
*,
char
*,
544
int
*,
char
*,
int
*,
545
char
*,
char
*,
int
* );
546
547
F_VOID_FCT
ssyrk_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
548
int
*,
char
*,
char
*,
549
int
*,
char
*,
char
*,
550
int
* );
551
F_VOID_FCT
dsyrk_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
552
int
*,
char
*,
char
*,
553
int
*,
char
*,
char
*,
554
int
* );
555
F_VOID_FCT
csyrk_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
556
int
*,
char
*,
char
*,
557
int
*,
char
*,
char
*,
558
int
* );
559
F_VOID_FCT
zsyrk_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
560
int
*,
char
*,
char
*,
561
int
*,
char
*,
char
*,
562
int
* );
563
F_VOID_FCT
cherk_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
564
int
*,
char
*,
char
*,
565
int
*,
char
*,
char
*,
566
int
* );
567
F_VOID_FCT
zherk_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
568
int
*,
char
*,
char
*,
569
int
*,
char
*,
char
*,
570
int
* );
571
572
F_VOID_FCT
ssyr2k_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
573
int
*,
char
*,
char
*,
574
int
*,
char
*,
int
*,
575
char
*,
char
*,
int
* );
576
F_VOID_FCT
dsyr2k_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
577
int
*,
char
*,
char
*,
578
int
*,
char
*,
int
*,
579
char
*,
char
*,
int
* );
580
F_VOID_FCT
csyr2k_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
581
int
*,
char
*,
char
*,
582
int
*,
char
*,
int
*,
583
char
*,
char
*,
int
* );
584
F_VOID_FCT
zsyr2k_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
585
int
*,
char
*,
char
*,
586
int
*,
char
*,
int
*,
587
char
*,
char
*,
int
* );
588
F_VOID_FCT
cher2k_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
589
int
*,
char
*,
char
*,
590
int
*,
char
*,
int
*,
591
char
*,
char
*,
int
* );
592
F_VOID_FCT
zher2k_
(
F_CHAR_T
,
F_CHAR_T
,
int
*,
593
int
*,
char
*,
char
*,
594
int
*,
char
*,
int
*,
595
char
*,
char
*,
int
* );
596
597
F_VOID_FCT
strmm_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
598
F_CHAR_T
,
int
*,
int
*,
599
char
*,
char
*,
int
*,
600
char
*,
int
* );
601
F_VOID_FCT
dtrmm_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
602
F_CHAR_T
,
int
*,
int
*,
603
char
*,
char
*,
int
*,
604
char
*,
int
* );
605
F_VOID_FCT
ctrmm_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
606
F_CHAR_T
,
int
*,
int
*,
607
char
*,
char
*,
int
*,
608
char
*,
int
* );
609
F_VOID_FCT
ztrmm_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
610
F_CHAR_T
,
int
*,
int
*,
611
char
*,
char
*,
int
*,
612
char
*,
int
* );
613
614
F_VOID_FCT
strsm_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
615
F_CHAR_T
,
int
*,
int
*,
616
char
*,
char
*,
int
*,
617
char
*,
int
* );
618
F_VOID_FCT
dtrsm_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
619
F_CHAR_T
,
int
*,
int
*,
620
char
*,
char
*,
int
*,
621
char
*,
int
* );
622
F_VOID_FCT
ctrsm_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
623
F_CHAR_T
,
int
*,
int
*,
624
char
*,
char
*,
int
*,
625
char
*,
int
* );
626
F_VOID_FCT
ztrsm_
(
F_CHAR_T
,
F_CHAR_T
,
F_CHAR_T
,
627
F_CHAR_T
,
int
*,
int
*,
628
char
*,
char
*,
int
*,
629
char
*,
int
* );
630
631
#else
632
633
int
isamax_
();
634
int
idamax_
();
635
int
icamax_
();
636
int
izamax_
();
637
638
F_VOID_FCT
saxpy_
();
639
F_VOID_FCT
daxpy_
();
640
F_VOID_FCT
caxpy_
();
641
F_VOID_FCT
zaxpy_
();
642
643
F_VOID_FCT
scopy_
();
644
F_VOID_FCT
dcopy_
();
645
F_VOID_FCT
ccopy_
();
646
F_VOID_FCT
zcopy_
();
647
648
F_VOID_FCT
sscal_
();
649
F_VOID_FCT
dscal_
();
650
F_VOID_FCT
cscal_
();
651
F_VOID_FCT
csscal_
();
652
F_VOID_FCT
zscal_
();
653
F_VOID_FCT
zdscal_
();
654
655
F_VOID_FCT
sswap_
();
656
F_VOID_FCT
dswap_
();
657
F_VOID_FCT
cswap_
();
658
F_VOID_FCT
zswap_
();
659
660
F_VOID_FCT
sgemv_
();
661
F_VOID_FCT
dgemv_
();
662
F_VOID_FCT
cgemv_
();
663
F_VOID_FCT
zgemv_
();
664
665
F_VOID_FCT
ssymv_
();
666
F_VOID_FCT
dsymv_
();
667
F_VOID_FCT
chemv_
();
668
F_VOID_FCT
zhemv_
();
669
670
F_VOID_FCT
strmv_
();
671
F_VOID_FCT
dtrmv_
();
672
F_VOID_FCT
ctrmv_
();
673
F_VOID_FCT
ztrmv_
();
674
675
F_VOID_FCT
strsv_
();
676
F_VOID_FCT
dtrsv_
();
677
F_VOID_FCT
ctrsv_
();
678
F_VOID_FCT
ztrsv_
();
679
680
F_VOID_FCT
sger_
();
681
F_VOID_FCT
dger_
();
682
F_VOID_FCT
cgerc_
();
683
F_VOID_FCT
cgeru_
();
684
F_VOID_FCT
zgerc_
();
685
F_VOID_FCT
zgeru_
();
686
687
F_VOID_FCT
ssyr_
();
688
F_VOID_FCT
dsyr_
();
689
F_VOID_FCT
cher_
();
690
F_VOID_FCT
zher_
();
691
692
F_VOID_FCT
ssyr2_
();
693
F_VOID_FCT
dsyr2_
();
694
F_VOID_FCT
cher2_
();
695
F_VOID_FCT
zher2_
();
696
697
F_VOID_FCT
sgemm_
();
698
F_VOID_FCT
dgemm_
();
699
F_VOID_FCT
cgemm_
();
700
F_VOID_FCT
zgemm_
();
701
702
F_VOID_FCT
ssymm_
();
703
F_VOID_FCT
dsymm_
();
704
F_VOID_FCT
csymm_
();
705
F_VOID_FCT
zsymm_
();
706
F_VOID_FCT
chemm_
();
707
F_VOID_FCT
zhemm_
();
708
709
F_VOID_FCT
ssyrk_
();
710
F_VOID_FCT
dsyrk_
();
711
F_VOID_FCT
csyrk_
();
712
F_VOID_FCT
zsyrk_
();
713
F_VOID_FCT
cherk_
();
714
F_VOID_FCT
zherk_
();
715
716
F_VOID_FCT
ssyr2k_
();
717
F_VOID_FCT
dsyr2k_
();
718
F_VOID_FCT
csyr2k_
();
719
F_VOID_FCT
zsyr2k_
();
720
F_VOID_FCT
cher2k_
();
721
F_VOID_FCT
zher2k_
();
722
723
F_VOID_FCT
strmm_
();
724
F_VOID_FCT
dtrmm_
();
725
F_VOID_FCT
ctrmm_
();
726
F_VOID_FCT
ztrmm_
();
727
728
F_VOID_FCT
strsm_
();
729
F_VOID_FCT
dtrsm_
();
730
F_VOID_FCT
ctrsm_
();
731
F_VOID_FCT
ztrsm_
();
732
733
#endif
ssyr2_
#define ssyr2_
Definition:
PBblas.h:302
strmv_
#define strmv_
Definition:
PBblas.h:280
zher2_
#define zher2_
Definition:
PBblas.h:305
zscal_
#define zscal_
Definition:
PBblas.h:244
icamax_
#define icamax_
Definition:
PBblas.h:267
zgemv_
#define zgemv_
Definition:
PBblas.h:273
cgemv_
#define cgemv_
Definition:
PBblas.h:272
sgemv_
#define sgemv_
Definition:
PBblas.h:270
ssyrk_
#define ssyrk_
Definition:
PBblas.h:329
cswap_
#define cswap_
Definition:
PBblas.h:228
zgerc_
#define zgerc_
Definition:
PBblas.h:295
zswap_
#define zswap_
Definition:
PBblas.h:229
daxpy_
#define daxpy_
Definition:
PBblas.h:237
sswap_
#define sswap_
Definition:
PBblas.h:226
dtrsv_
#define dtrsv_
Definition:
PBblas.h:286
ccopy_
#define ccopy_
Definition:
PBblas.h:233
sgemm_
#define sgemm_
Definition:
PBblas.h:307
dsyr_
#define dsyr_
Definition:
PBblas.h:298
zher_
#define zher_
Definition:
PBblas.h:300
dcopy_
#define dcopy_
Definition:
PBblas.h:232
dgemv_
#define dgemv_
Definition:
PBblas.h:271
zsyr2k_
#define zsyr2k_
Definition:
PBblas.h:340
izamax_
#define izamax_
Definition:
PBblas.h:268
cgeru_
#define cgeru_
Definition:
PBblas.h:292
dscal_
#define dscal_
Definition:
PBblas.h:242
zherk_
#define zherk_
Definition:
PBblas.h:334
zhemm_
#define zhemm_
Definition:
PBblas.h:317
chemm_
#define chemm_
Definition:
PBblas.h:315
zhemv_
#define zhemv_
Definition:
PBblas.h:278
ssymv_
#define ssymv_
Definition:
PBblas.h:275
strsv_
#define strsv_
Definition:
PBblas.h:285
cscal_
#define cscal_
Definition:
PBblas.h:243
F_VOID_FCT
#define F_VOID_FCT
Definition:
pblas.h:123
dger_
#define dger_
Definition:
PBblas.h:291
zgeru_
#define zgeru_
Definition:
PBblas.h:293
zsyrk_
#define zsyrk_
Definition:
PBblas.h:333
dsyrk_
#define dsyrk_
Definition:
PBblas.h:330
caxpy_
#define caxpy_
Definition:
PBblas.h:238
ztrmm_
#define ztrmm_
Definition:
PBblas.h:322
zgemm_
#define zgemm_
Definition:
PBblas.h:310
csyrk_
#define csyrk_
Definition:
PBblas.h:331
idamax_
#define idamax_
Definition:
PBblas.h:266
csscal_
#define csscal_
Definition:
PBblas.h:245
chemv_
#define chemv_
Definition:
PBblas.h:277
F_CHAR_T
char * F_CHAR_T
Definition:
pblas.h:118
ztrsm_
#define ztrsm_
Definition:
PBblas.h:327
cgemm_
#define cgemm_
Definition:
PBblas.h:309
dsymm_
#define dsymm_
Definition:
PBblas.h:313
ssymm_
#define ssymm_
Definition:
PBblas.h:312
dsymv_
#define dsymv_
Definition:
PBblas.h:276
zaxpy_
#define zaxpy_
Definition:
PBblas.h:239
strmm_
#define strmm_
Definition:
PBblas.h:319
zdscal_
#define zdscal_
Definition:
PBblas.h:246
csymm_
#define csymm_
Definition:
PBblas.h:314
ctrmv_
#define ctrmv_
Definition:
PBblas.h:282
strsm_
#define strsm_
Definition:
PBblas.h:324
zcopy_
#define zcopy_
Definition:
PBblas.h:234
ztrmv_
#define ztrmv_
Definition:
PBblas.h:283
dgemm_
#define dgemm_
Definition:
PBblas.h:308
cgerc_
#define cgerc_
Definition:
PBblas.h:294
dsyr2k_
#define dsyr2k_
Definition:
PBblas.h:337
cher2_
#define cher2_
Definition:
PBblas.h:304
dswap_
#define dswap_
Definition:
PBblas.h:227
dtrmm_
#define dtrmm_
Definition:
PBblas.h:320
ctrmm_
#define ctrmm_
Definition:
PBblas.h:321
cher2k_
#define cher2k_
Definition:
PBblas.h:339
cherk_
#define cherk_
Definition:
PBblas.h:332
dtrsm_
#define dtrsm_
Definition:
PBblas.h:325
dtrmv_
#define dtrmv_
Definition:
PBblas.h:281
zher2k_
#define zher2k_
Definition:
PBblas.h:341
ztrsv_
#define ztrsv_
Definition:
PBblas.h:288
zsymm_
#define zsymm_
Definition:
PBblas.h:316
ctrsm_
#define ctrsm_
Definition:
PBblas.h:326
cher_
#define cher_
Definition:
PBblas.h:299
isamax_
#define isamax_
Definition:
PBblas.h:265
ssyr2k_
#define ssyr2k_
Definition:
PBblas.h:336
scopy_
#define scopy_
Definition:
PBblas.h:231
sscal_
#define sscal_
Definition:
PBblas.h:241
saxpy_
#define saxpy_
Definition:
PBblas.h:236
sger_
#define sger_
Definition:
PBblas.h:290
csyr2k_
#define csyr2k_
Definition:
PBblas.h:338
ctrsv_
#define ctrsv_
Definition:
PBblas.h:287
dsyr2_
#define dsyr2_
Definition:
PBblas.h:303
ssyr_
#define ssyr_
Definition:
PBblas.h:297
PBLAS
SRC
PBblas.h
Generated by
1.8.16