set6 (version 0.2.4)

testCrisp: assert/check/test/Crisp

Description

Validation checks to test if a given object is crisp.

Usage

testCrisp(object, errormsg = "This is not crisp.")
checkCrisp(object, errormsg = "This is not crisp.")
assertCrisp(object, errormsg = "This is not crisp.")

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

# NOT RUN {
testCrisp(Set$new(1))
testCrisp(FuzzySet$new(1, 0.5))
# }