: square(*)  dup * ;
[1 2 3 4 5] square        . "\n" .
[1 2 3 4 5] 'square apply . "\n" .