tests/testthat/test_RateOfSpreadAtTheta.r

test_that("RateOfSpreadAtTheta", {
  checkData('RateOfSpreadAtTheta',
            rate_of_spread_at_theta,
            list(data.table(ROS=ROS),
                 data.table(FROS=ROS),
                 data.table(BROS=ROS),
                 data.table(THETA=THETA)))
})
nrcan-cfs-fire/cffdrs documentation built on Sept. 20, 2024, 12:30 a.m.