Commit 406bb82f authored by Marco De Lucia's avatar Marco De Lucia
Browse files

fixing errors with doParallel

parent b4c8045f
## Functions for dealing with surrogate simulations
### Marco De Lucia, delucia@gfz-potsdam.de, 2009-2018
### Time-stamp: "Last modified 2018-05-16 17:52:14 delucia"
### Time-stamp: "Last modified 2018-05-16 17:58:01 delucia"
##' Todo
......@@ -244,7 +244,7 @@ ReactTranspBalanceEq <- function(setup, init, maxtime, step=c("time","iter","fix
initsim <- setup$initsim
if (procs > 1) {
parallel::registerDoParallel(procs)
doParallel::registerDoParallel(procs)
msg("Registered default doParallel cluster with ", procs, "nodes")
}
......@@ -532,7 +532,7 @@ ReactTranspBalanceKin <- function(setup, init, maxtime, step=c("time","iter","fi
ann <- setup$ann
if (procs > 1) {
parallel::registerDoParallel(procs)
doParallel::registerDoParallel(procs)
msg("Registered default doParallel cluster with ", procs, "nodes")
}
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment