Validation checks to test if a given object is closedabove.

testClosedAbove(object, errormsg = "This is not a set closed above")

checkClosedAbove(object, errormsg = "This is not a set closed above")

assertClosedAbove(object, errormsg = "This is not a set closed above")

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

testClosedAbove(Interval$new(1, 10, type = "[]"))
#> [1] TRUE
testClosedAbove(Interval$new(1, 10, type = "[)"))
#> [1] FALSE