Compare commits

...

2 Commits

3 changed files with 13 additions and 3 deletions

View File

@ -0,0 +1,8 @@
iterations <- 15000
dt <- 200
list(
timesteps = rep(dt, iterations),
store_result = TRUE,
out_save = c(1,20,50, seq(100,1000, by=100), seq(2000, iterations, by=1000))
)

View File

@ -88,12 +88,12 @@ dht_species <- c(
)
pht_species <- c(
"Ba" = 4,
"Ba" = 3,
"Cl" = 3,
"S" = 3,
"Sr" = 3,
"Barite" = 2,
"Celestite" = 2
"Barite" = 1,
"Celestite" = 1
)
chemistry_setup <- list(

View File

@ -4,6 +4,8 @@ SOLUTION 1
temperature 25
pH 7
pe 4
Mg 1e-12
Cl 2e-12
PURE 1
Calcite 0.0 1
END