RosettaCodeData/Task/Repeat/Factor/repeat-2.factor

3 lines
89 B
Factor

: times ( ... n quot: ( ... -- ... ) -- ... )
[ drop ] prepose each-integer ; inline