RosettaCodeData/Task/Currying/Factor/currying-3.factor

5 lines
95 B
Factor
Raw Permalink Normal View History

2018-06-22 20:57:24 +00:00
IN: scratchpad { 1 2 3 4 5 } [ 1 + ] { 2 / } append map
--- Data stack:
{ 1 1+1/2 2 2+1/2 3 }