tests/testthat/test-invcop.R

In vein: Vehicular Emissions Inventories

# context("invcop")
#
# name = file.path(tempdir(), "YourCity")
# inventory(name = name)
#
# test_that("invcop works", {
#   expect_equal(invcop(in_name = name,
#                         out_name = file.path(tempdir(), "Hola")),
#                  0)
# })
#