4 lines
140 B
Factor
4 lines
140 B
Factor
1 1 + ! 2
|
|
[ + 1 1 ] reverse call ! 2
|
|
{ 1 2 3 4 5 } [ sq ] map ! { 1 4 9 16 25 }
|
|
[ map [ sq ] { 1 2 3 4 5 } ] reverse call ! { 1 4 9 16 25 }
|