RosettaCodeData/Task/Currying/R/currying-2.r

5 lines
80 B
R

add_curry <- curry(`+`)
add2 <- add_curry(2)
add2(40)
uncurry(add_curry)(40, 2)