From cfcfd80369bc3d949dad5547e73e3634c742ae71 Mon Sep 17 00:00:00 2001
From: daminton <daminton@purdue.edu>
Date: Mon, 27 Feb 2017 23:00:26 +0000
Subject: [PATCH] Fixed bug in crater_soften_accumulate that prevents soften
 accumulation

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

diff --git a/src/crater/crater_soften_accumulate.f90 b/src/crater/crater_soften_accumulate.f90
index 277c0c1d..82b6bc90 100644
--- a/src/crater/crater_soften_accumulate.f90
+++ b/src/crater/crater_soften_accumulate.f90
@@ -99,7 +99,7 @@ subroutine crater_soften_accumulate(user,surf,crater,domain,kdiff)
             
             if (.not.hit(xpi,ypi)) then 
                kdiff(xpi,ypi) = kdiff(xpi,ypi) + kappatmax * areafrac 
-               hit = .true.
+               hit(xpi,ypi) = .true.
             end if
 
          end if