optimized interface/zgemv.c for multithreading
authorwernsaar <wernsaar@googlemail.com>
Fri, 12 Sep 2014 17:18:23 +0000 (19:18 +0200)
committerwernsaar <wernsaar@googlemail.com>
Fri, 12 Sep 2014 17:18:23 +0000 (19:18 +0200)
interface/zgemv.c

index 50513a8..704034a 100644 (file)
@@ -238,7 +238,7 @@ void CNAME(enum CBLAS_ORDER order,
   int  nthreads_avail = nthreads_max;
 
   double MNK = (double) m * (double) n;
-  if ( MNK <= (80.0 * 20.0  * (double) GEMM_MULTITHREAD_THRESHOLD)  )
+  if ( MNK <= ( 256.0  * (double) (GEMM_MULTITHREAD_THRESHOLD * GEMM_MULTITHREAD_THRESHOLD)  ))
         nthreads_max = 1;
 
   if ( nthreads_max > nthreads_avail )