Task

Take a combined set of elements and apply a function to each element.




/# Rosetta Code problem: http://rosettacode.org/wiki/Apply_a_callback_to_an_array
by Galileo, 05/2022 #/
 
include ..\Utilitys.pmt
 
def ++
    1 +
enddef
 
def square
    dup *
enddef
 
( 1 2 3 ) dup
 
getid ++ map swap
getid square map
 
pstack