diff --git a/tests/manual_tests/dispersion_tests.R b/tests/manual_tests/dispersion_tests.R index 577a609a..6dc3c049 100644 --- a/tests/manual_tests/dispersion_tests.R +++ b/tests/manual_tests/dispersion_tests.R @@ -10,12 +10,15 @@ dispersion_model <- name = "particle", lat = 49.0, lon = -123.0, height = 50, pdiam = 15, density = 1.5, shape_factor = 0.8, + rate = 10, release_start = lubridate::ymd_hm("2015-07-01 00:00"), - release_end = lubridate::ymd_hm("2015-07-01 00:00") + lubridate::hours(2) + release_end = lubridate::ymd_hm("2015-07-01 00:00") + + lubridate::hours(2) ) %>% add_dispersion_params( start_time = lubridate::ymd_hm("2015-07-01 00:00"), - end_time = lubridate::ymd_hm("2015-07-01 00:00") + lubridate::hours(6), + end_time = lubridate::ymd_hm("2015-07-01 00:00") + + lubridate::hours(6), direction = "forward", met_type = "reanalysis", met_dir = here::here("met"),