diff --git a/src/util/util_search.f90 b/src/util/util_search.f90
index 236a8be3..61d3e415 100644
--- a/src/util/util_search.f90
+++ b/src/util/util_search.f90
@@ -94,7 +94,7 @@ end subroutine util_search_double
 
 subroutine util_search_double_1(arr,ind,n,val,klo)
 use module_globals
-use module_util, EXCEPT_THIS_ONE => util_search_double
+use module_util, EXCEPT_THIS_ONE => util_search_double_1
 implicit none
 
    ! Arguments