tests/testthat/test_RateOfSpread.r

In nrcan-cfs-fire/cffdrs: Canadian Forest Fire Danger Rating System

test_that("RateOfSpread", {
  checkData('RateOfSpread',
            rate_of_spread,
            list(data.table(FUELTYPE=FUELTYPE),
                 data.table(ISI=ISI),
                 data.table(BUI=BUI),
                 data.table(FMC=FMC),
                 data.table(SFC=SFC),
                 data.table(PC=PC),
                 data.table(PDF=PDF),
                 data.table(CC=CC),
                 data.table(CBH=CBH)))
})