Data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · cb5bb5e222
commit cb5bb5e222
parent 7387c8f97b
199093 changed files with 3378972 additions and 0 deletions
--- a/Task/Prime-decomposition/Quackery/prime-decomposition.quackery
+++ b/Task/Prime-decomposition/Quackery/prime-decomposition.quackery
@ -0,0 +1,12 @@
+  [ [] swap
+    dup times
+    [ [ dup i^ 2 + /mod
+        0 = while
+        nip dip
+          [ i^ 2 + join ]
+        again ]
+      drop
+      dup 1 = if conclude ]
+    drop ]                  is primefactors ( n --> [ )
+
+ 1047552 primefactors echo