From 774a0cc5551b45928179601ce9e25e1a601b5a2a Mon Sep 17 00:00:00 2001
From: daminton <daminton@purdue.edu>
Date: Fri, 3 Feb 2017 17:50:41 +0000
Subject: [PATCH] Fixed bug in util_search

---
 src/util/util_search.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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