# sum() reduces via + operator
z <- sum(normal(0, 1), normal(2, 3))
z # Normal(mu = 2, var = 4)
# min() of exponentials simplifies
w <- min(exponential(1), exponential(2))
w # Exponential(rate = 3)
Run the code above in your browser using DataLab