tests/testthat/test_aah.R

test_that("Test suite aah.R",{

    x <- rfalgg()
    y <- rfalggg()

    expect_true(is.freealg(x))
    expect_true(is.freealg(y))

    expect_true(x+y == y+x)
})
RobinHankin/freealg documentation built on April 13, 2025, 3:15 a.m.