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")
| object | object to test |
|---|---|
| errormsg | error message to overwrite default if check fails |
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.
testClosedAbove(Interval$new(1, 10, type = "[]")) #> [1] TRUE testClosedAbove(Interval$new(1, 10, type = "[)")) #> [1] FALSE