Add lower threshold for multithreading in ?potrf and ?potri

2021-06-26 23:47:41 +02:00
parent 1f8bda71b9
commit 1b5620b66e
4 changed files with 26 additions and 0 deletions
--- a/interface/lapack/potri.c
+++ b/interface/lapack/potri.c
@@ -121,6 +121,9 @@ int NAME(char *UPLO, blasint *N, FLOAT *a, blasint *ldA, blasint *Info){

 #ifdef SMP
  args.common = NULL;
+  if (args.n < 180)
+    args.nthreads = 1;
+  else
  args.nthreads = num_cpu_avail(4);

  if (args.nthreads == 1) {