From ae36f785d68d637ef0a60f9028c38eb2d369d9f1 Mon Sep 17 00:00:00 2001
From: Renegade <Renegate@Renegates-MacBook-Pro.local>
Date: Fri, 11 Nov 2016 09:57:51 -0500
Subject:  some tuning

---
 SRC/iparam2stage.F | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

(limited to 'SRC')

diff --git a/SRC/iparam2stage.F b/SRC/iparam2stage.F
index ca09906e..6443f16e 100644
--- a/SRC/iparam2stage.F
+++ b/SRC/iparam2stage.F
@@ -274,7 +274,7 @@
 *     Could be also dependent from N but for now it
 *     depend only on sequential or parallel
 *
-      IF( NTHREADS.GT.1 ) THEN
+      IF( NTHREADS.GT.4 ) THEN
           IF( CPREC ) THEN
               KD = 128
               IB = 32
@@ -282,6 +282,14 @@
               KD = 160
               IB = 40
           ENDIF
+      ELSE IF( NTHREADS.GT.1 ) THEN
+          IF( CPREC ) THEN
+              KD = 64
+              IB = 32
+          ELSE
+              KD = 64
+              IB = 32
+          ENDIF
       ELSE
           IF( CPREC ) THEN
               KD = 16
-- 
cgit v1.2.3