diff --git a/src/crater/crater_populate.f90 b/src/crater/crater_populate.f90
index 7f36bf92..3c3ef7e7 100644
--- a/src/crater/crater_populate.f90
+++ b/src/crater/crater_populate.f90
@@ -320,7 +320,7 @@ subroutine crater_populate(user,surf,crater,domain,prod,production_list,vdist,nt
 
          if (user%doregotrack) call regolith_interior(user,surf,crater,domain,incval,nmeltsheet,vmeltsheet)
 
-         if (user%dorealistic) call crater_realistic_topography(user,surf,crater,domain,ejecta_dem) 
+         if (user%dorealistic) call realistic_crater_topography(user,surf,crater,domain,ejecta_dem) 
          deallocate(ejecta_dem)
 
          ! Collapse any remaining unstable slopes