comment out bedrock function as i'm not sure how useful it is.

ElmerCSC · Dec 18, 2024 · 9bace4f · 9bace4f
1 parent d27af29
commit 9bace4f
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/elmerice/Solvers/CalvingGlacierAdvance3D.F90 b/elmerice/Solvers/CalvingGlacierAdvance3D.F90
@@ -208,7 +208,8 @@ SUBROUTINE GlacierAdvance3D ( Model, Solver, dt, TransientSimulation )
    IF(.NOT. Found) CALL Info(SolverName, "Not moving bulk as default")
 
    MoveBase = ListGetLogical(Params,"Account for bedrock", Found, DefValue=.FALSE.)
-   IF(.NOT. Found) CALL Fatal(SolverName, "'Account for bedrock' not found")
+   ! still in testing
+   !IF(.NOT. Found) CALL Fatal(SolverName, "'Account for bedrock' not found")
 
    !Get the front line
    FrontMaskName = "Calving Front Mask"