iterations <- 200 dt <- 1000 list( timesteps = rep(dt, iterations), store_result = TRUE )