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 !