RosettaCodeData/Task/Higher-order-functions/Retro/higher-order-functions.retro
2023-07-01 13:44:08 -04:00

3 lines
53 B
Text

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