Updated code to conserve mass by doing collapse stage before ejecta

MintonGroup · Feb 8, 2017 · 33864cb · 33864cb
1 parent 58fd5a2
commit 33864cb
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/crater/crater_emplace.f90 b/src/crater/crater_emplace.f90
@@ -7,7 +7,7 @@
 !   * module_util
 !   * module_crater
 !   
-!   call crater_emplace(user,surf,crater,domain,ejbmass)
+!   call crater_emplace(user,surf,crater,domain,deltaMtot)
 !
 ! DESCRIPTION
 !    
@@ -18,7 +18,7 @@
 !   * surf    -- Surface grid
 !   * crater  -- Crater dimension container
 !   * domain  -- Simulation domain variable container
-!   * ejbmass -- Total ejecta blanket thickness for a given cratering event
+!   * deltaMtot -- Total displaced mass used to calculate mass-conserving ejecta blanket
 !
 !   Output
 !   * surf   -- Outputs the new ejecta blanket onto the grid