Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
|
|
@ -0,0 +1,13 @@
|
|||
[ dup 0 < iff
|
||||
[ negate
|
||||
' negate ]
|
||||
else []
|
||||
swap 0 over
|
||||
primefactors
|
||||
witheach
|
||||
[ dip over / + ]
|
||||
nip swap do ] is d ( n --> n )
|
||||
|
||||
200 times [ i^ 99 - d echo sp ]
|
||||
cr cr
|
||||
20 times [ 10 i^ 1+ ** d 7 / echo cr ]
|
||||
Loading…
Add table
Add a link
Reference in a new issue