Fixed bug in util_search

MintonGroup · Feb 3, 2017 · 774a0cc · 774a0cc
1 parent c6d3e00
commit 774a0cc
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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