floraachy
/
OpenBLAS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add lower threshold for multithreading

This commit is contained in:
Martin Kroeker 2021-07-01 17:41:05 +02:00 committed by GitHub
parent dcfc5cf714
commit 726c44242b
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 12 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
interface/lapack/getrf.c
View File

@ -95,7 +95,14 @@ int NAME(blasint *M, blasint *N, FLOAT *a, blasint *ldA, blasint *ipiv, blasint
#ifdef SMP #ifdef SMP
args.common = NULL; args.common = NULL;
args.nthreads = num_cpu_avail(4); #ifndef DOUBLE
if (args.m*args.n < 40000)
#else
if (args.m*args.n < 10000)
#endif
args.nthreads=1;
else
args.nthreads = num_cpu_avail(4);
if (args.nthreads == 1) { if (args.nthreads == 1) {
#endif #endif

5
interface/lapack/zgetrf.c
View File

@ -95,7 +95,10 @@ int NAME(blasint *M, blasint *N, FLOAT *a, blasint *ldA, blasint *ipiv, blasint
#ifdef SMP #ifdef SMP
args.common = NULL; args.common = NULL;
args.nthreads = num_cpu_avail(4); if (args.m*args.n <10000)
args.nthreads = 1;
else
args.nthreads = num_cpu_avail(4);
if (args.nthreads == 1) { if (args.nthreads == 1) {
#endif #endif