RosettaCodeData/Task/Higher-order-functions/Retro/higher-order-functions.retro
2019-09-12 10:33:56 -07:00

3 lines
53 B
Text

:disp (nq-) call n:put ;
#31 [ (n-n) #100 * ] disp