str(intrval_options())
x1 <- 0.5 - 0.3
x2 <- 0.3 - 0.1
# save old values and set the new one
op <- intrval_options(use_fpCompare = FALSE)
# this is the base R behavior
x1
x2
# reset defaults
intrval_options(op)
# using fpCompare
x1
x2
Run the code above in your browser using DataLab