solve 40 in uiua (fast)

2025-09-25 09:48:17 +02:00
parent 596aedabc9
commit 6500d81f41
1 changed files with 5 additions and 0 deletions
--- a/40/main.ua
+++ b/40/main.ua
@@ -0,0 +1,5 @@
+# project euler 40
+1⇡1000000 # take some numbers
+/◇⊂°⋕      # join digits pervasively (fast)
+ₑ₁₀⇡7      # powers of 10
+/×≡⋕⊏-1    # grab digits, multiply