assert/check/test/Fuzzy

Validation checks to test if a given object is fuzzy.

testFuzzy(object, errormsg = "This is not fuzzy.")

checkFuzzy(object, errormsg = "This is not fuzzy.")

assertFuzzy(object, errormsg = "This is not fuzzy.")

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

testFuzzy(FuzzySet$new(1, 0.5))
#> [1] TRUE
testFuzzy(Set$new(1))
#> [1] FALSE