From 847e098d4154c0e26ce21b542b7b36184be559a9 Mon Sep 17 00:00:00 2001
From: Salvatore Filippone <salvatore.filippone@uniroma2.it>
Date: Sat, 29 Mar 2025 12:53:02 +0100
Subject: [PATCH] Change threshold for hash_srch from 8 to 6

---
 base/modules/desc/psb_hash_map_mod.F90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/base/modules/desc/psb_hash_map_mod.F90 b/base/modules/desc/psb_hash_map_mod.F90
index 349285c1..316f145d 100644
--- a/base/modules/desc/psb_hash_map_mod.F90
+++ b/base/modules/desc/psb_hash_map_mod.F90
@@ -1773,7 +1773,7 @@ contains
     integer(psb_ipk_) :: lb,ub,lm
     res = -1
     if (nh > 0) then
-      if (nh <= 8) then
+      if (nh <= 6) then
         !
         ! If the list is short, a sequential search is enough 
         !
@@ -1815,7 +1815,7 @@ contains
     integer(psb_ipk_) :: lb,ub,lm
     res = -1
     if (nh > 0) then
-      if (nh <= 8) then
+      if (nh <= 6) then
         !
         ! If the list is short, a sequential search is enough 
         !