When simulation error, stop the simulation without removing fictive a…

…reas
dhia-gharsallaoui · Nov 23, 2022 · 2dbcaec · 2dbcaec
1 parent 33a4676
commit 2dbcaec
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/runWaterValuesSimulation.R b/R/runWaterValuesSimulation.R
@@ -203,6  203,7 @@ runWaterValuesSimulation <- function(area,
 
     if(launch_simulations){
       if(!dir.exists(paste0(sim_check,"/economy/mc-all"))) {
         stop("Simulation Error. Please check simulation log.")
         # remove the fictive area
         if(launch_simulations){
           for (fictive_area in fictive_areas){
@@ -212,7  213,6 @@ runWaterValuesSimulation <- function(area,
         # restore hydrostorage
         restoreHydroStorage(area = area, opts = opts)
         restorePumpPower(area = area, opts = opts)
-        stop("Simulation Error. Please check simulation log.")
       }
     }
   }