Get the supremum of the support.

supremum(object)

Arguments

object

A support object.

Value

The supremum (least upper bound) of the support.

Examples

I <- interval$new(0, 10)
supremum(I)  # 10
#> [1] 10

S <- finite_set$new(c(3, 7, 11))
supremum(S)  # 11
#> [1] 11