From 2a047e8e537275e13325f2136cc11331e99feaa8 Mon Sep 17 00:00:00 2001
From: mhirabay <mhirabay@purdue.edu>
Date: Mon, 5 Dec 2016 20:37:14 +0000
Subject: [PATCH] Changed EXCEPT_THIS_ONE => crater_critical_slope

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

diff --git a/src/crater/crater_critical_slope.f90 b/src/crater/crater_critical_slope.f90
index 9d94cde1..f88a5462 100644
--- a/src/crater/crater_critical_slope.f90
+++ b/src/crater/crater_critical_slope.f90
@@ -19,7 +19,7 @@
 function crater_critical_slope(user,crater,iradsq) result(critical)
    use module_globals
    use module_util
-   use module_crater, EXCEPT_THIS_ONE => crater_form_exterior_func
+   use module_crater, EXCEPT_THIS_ONE => crater_critical_slope
    implicit none
 
   ! Arguments