sync with local: solve 70

This commit is contained in:
2025-08-30 10:26:42 +02:00
parent 5691c64899
commit 77e94d5a4d

7
70/solution.uiua Normal file
View File

@@ -0,0 +1,7 @@
# project euler 70
Φ ← ⁅×/×-⊸÷⊙1◴⊸°/× # from uiua discord by maweo
p ← ≍∩(⍆°⋕)⊸Φ
b ← =⊸/↧≡(÷⊸Φ)
s ← ▽⊸(↧b⟜≡p)
σ ← ▽⊸(=⊸(/↧)≡/÷) ▽⊙(⍉⊟)≡(◡(≍∩(⍆°⋕))⊸Φ)
σ⍜-₂⇡1e7