From dd9b1f0e1ec7fcf3ba58c8a435f364c7303faddb Mon Sep 17 00:00:00 2001 From: David Minton Date: Fri, 10 Apr 2020 15:32:27 -0400 Subject: [PATCH] Added a comment to explain that the simple crater version is temporary --- src/crater/crater_realistic_topography.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/crater/crater_realistic_topography.f90 b/src/crater/crater_realistic_topography.f90 index a3ee3261..bc5c6239 100644 --- a/src/crater/crater_realistic_topography.f90 +++ b/src/crater/crater_realistic_topography.f90 @@ -117,7 +117,7 @@ end subroutine crater_realistic_slope_texture call complex_peak(user,surf,crater,deltaMtot) else if (crater%morphtype .eq. 'SIMPLE') then - call complex_floor(user,surf,crater,deltaMtot) + call complex_floor(user,surf,crater,deltaMtot) ! Temp until I make a simple crater version end if ! Retrieve the size of the ejecta dem and correct for indexing