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