6 lines
124 B
Text
6 lines
124 B
Text
[ factors size ] is tau ( n --> n )
|
|
|
|
[] []
|
|
100 times [ i^ 1+ tau join ]
|
|
witheach [ number$ nested join ]
|
|
70 wrap$
|