Skip to content

Commit

Permalink
Fixes for latest individual.
Browse files Browse the repository at this point in the history
  • Loading branch information
plietar committed Jul 25, 2024
1 parent 52f4aa0 commit e3091a4
Show file tree
Hide file tree
Showing 2 changed files with 3 additions and 3 deletions.
4 changes: 2 additions & 2 deletions tests/testthat/test-processes.R
Original file line number Diff line number Diff line change
Expand Up @@ -5,12 +5,12 @@ test_that("exponential_decay_process works as expected", {
v <- individual::DoubleVariable$new(c(0,0.5,1,2,4,10))
p <- create_exponential_decay_process(v, rate)

individual:::execute_any_process(p, 1)
individual:::execute_process(p, 1)
v$.update()

expect_equal(v$get_values(), c(0, 0.25, 0.5, 1, 2, 5))

individual:::execute_any_process(p, 2)
individual:::execute_process(p, 2)
v$.update()

expect_equal(v$get_values(), c(0, 0.125, 0.25, 0.5, 1, 2.5))
Expand Down
2 changes: 1 addition & 1 deletion tests/testthat/test-resume.R
Original file line number Diff line number Diff line change
Expand Up @@ -239,7 +239,7 @@ test_that("Correlations can be set when resuming with new interventions", {
renderer$render("total_tbv_and_mda", tbv$copy()$and(mda)$size(), t)
renderer$render("total_tbv_or_mda", tbv$copy()$or(mda)$size(), t)
}
c(create_processes(renderer, variables, events, parameters, ...), p)
c(create_processes(renderer, variables, events, parameters, ...), p=p)
}

mockery::stub(run_resumable_simulation, 'create_processes', create_processes_stub)
Expand Down

0 comments on commit e3091a4

Please sign in to comment.