assert/check/test/SetList

Validation checks to test if a given object is an R6 SetList.

testSetList(object, errormsg = "One or more items in the list are not Sets")

checkSetList(object, errormsg = "One or more items in the list are not Sets")

assertSetList(object, errormsg = "One or more items in the list are not Sets")

Arguments

object	object to test
errormsg	error message to overwrite default if check fails

Value

If check passes then assert returns object invisibly and test/check return TRUE. If check fails, assert stops code with error, check returns an error message as string, and test returns FALSE.

Examples

testSetList(Set$new(2, 3))
#> [1] FALSE
testSetList(list(Set$new(2), Set$new(3)))
#> [1] TRUE
testSetList(Tuple$new(2, 3))
#> [1] FALSE
testSetList(Interval$new())
#> [1] FALSE
testSetList(FuzzySet$new(2, 0.1))
#> [1] FALSE
testSetList(FuzzyTuple$new(2, 0.1))
#> [1] FALSE
testSetList(ConditionalSet$new(function(x) x == 0))
#> [1] FALSE