# NOT RUN {
# Power of a Set
setpower(Set$new(1, 2), 3, simplify = FALSE)
setpower(Set$new(1, 2), 3, simplify = TRUE)
Set$new(1, 2)^3
# Power of an interval
Interval$new(2, 5)^5
Reals$new()^3
# Use tuples for contains
(PosNaturals$new()^3)$contains(Tuple$new(1, 2, 3))
# Power of ConditionalSet is meaningless
ConditionalSet$new(function(x) TRUE)^2
# Power of FuzzySet
FuzzySet$new(1, 0.1, 2, 0.5)^2
# Variable length
x <- Interval$new(0, 1)^"n"
x$contains(Tuple$new(0))
x$contains(Tuple$new(0, 1))
x$contains(Tuple$new(0, 1, 0, 0, 1, 1, 0))
x$contains(list(Tuple$new(0, 2), Tuple$new(1, 1)))
# }
Run the code above in your browser using DataLab