RosettaCodeData/Task/Apply-a-callback-to-an-array/Forth/apply-a-callback-to-an-array-2.fth

create data 1 , 2 , 3 , 4 , 5 ,
data 5 ' 1+ map  \ adds one to each element of data