126
126
#define CPAT Mjoin(C_ATL_, PRE);
128
128
#ifndef ATL_MaxMalloc
129
#if defined(ATL_ARCH_HAMMER64) || defined(ATL_ARCH_IA64Itan2) || \
130
defined(ATL_ARCH_IA64Itan)
131
#define ATL_MaxMalloc 8388608
133
#define ATL_MaxMalloc 4194304
129
#define ATL_MaxMalloc 67108864
137
132
typedef void (*MAT2BLK)(int, int, const TYPE*, int, TYPE*, const SCALAR);
133
typedef void (*MAT2BLK2)(const int, const int, const SCALAR, const TYPE*,
134
const int, TYPE*, const int);
138
135
typedef void (*MATSCAL)(const int, const int, const SCALAR, TYPE*, const int);
139
136
typedef void (*PUTBLK)(int, int, TYPE*, TYPE*, int, const SCALAR);
140
137
typedef void (*NBCLEANUP)(const TYPE*, const TYPE*, TYPE*, const int);
273
270
void Mjoin(PATL,putblk_bn1)(int M, int N, TYPE *V, TYPE *C, int ldc, const SCALAR beta);
274
271
void Mjoin(PATL,putblk_b1)(int M, int N, TYPE *V, TYPE *C, int ldc, const SCALAR beta);
275
272
void Mjoin(PATL,putblk_b0)(int M, int N, TYPE *V, TYPE *C, int ldc, const SCALAR beta);
273
void ATL_gereal2cplx(const int M, const int N, TYPE *alpha, TYPE *R, int ldr,
274
TYPE *I, int ldi, TYPE *beta, TYPE *C, int ldc);
277
276
void NBmm_b1(const int M, const int N, const int K, const TYPE alpha,
278
277
const TYPE *A, const int lda, const TYPE *B, const int ldb,
360
359
void Mjoin(PATL,col2blk2_a1)(int, int, const TYPE*, int, TYPE*, const SCALAR);
361
360
void Mjoin(PATL,col2blk_a1)(int, int, const TYPE*, int, TYPE*, const SCALAR);
362
int Mjoin(PATL,mmJITcp)(const enum ATLAS_TRANS TA, const enum ATLAS_TRANS TB,
363
const int M, const int N, const int K,
364
const SCALAR alpha, const TYPE *A, const int lda,
365
const TYPE *B, const int ldb, const SCALAR beta,
366
TYPE *C, const int ldc);
363
367
int Mjoin(PATL,mmJIK)(const enum ATLAS_TRANS TA, const enum ATLAS_TRANS TB,
364
368
const int M, const int N, const int K,
365
369
const SCALAR alpha, const TYPE *A, const int lda,
370
374
const SCALAR alpha, const TYPE *A, const int lda,
371
375
const TYPE *B, const int ldb, const SCALAR beta,
372
376
TYPE *C, const int ldc);
377
int Mjoin(PATL,mmJKI)(const enum ATLAS_TRANS TA, const enum ATLAS_TRANS TB,
378
const int M, const int N, const int K,
379
const SCALAR alpha, const TYPE *A, const int lda,
380
const TYPE *B, const int ldb, const SCALAR beta,
381
TYPE *C, const int ldc);
384
(int M, int m, int N, int n, int nblk, int kr, int KR, const SCALAR alphaA,
385
const SCALAR alphaB, const SCALAR beta, const TYPE *A, const int lda,
386
const int incA, TYPE *pA, const int incAW, const TYPE *B, const int ldb,
387
const int incB, TYPE *pB, const int incBW, TYPE *C, const int ldc,
388
MAT2BLK2 A2blk, MAT2BLK2 B2blk, NBMM0 NBmm0, NBMM0 NBmm1);
390
int Mjoin(PATL,mmBPP)(const enum ATLAS_TRANS TA, const enum ATLAS_TRANS TB,
391
const int M, const int N, const int K,
392
const SCALAR alpha, const TYPE *A, const int lda,
393
const TYPE *B, const int ldb, const SCALAR beta,
394
TYPE *C, const int ldc);
374
397
void Mjoin(PATL,gemmTT)
375
398
(const int M, const int N, const int K, const SCALAR alpha,