frero/project_euler
0
1
Fork 0
Code Issues Pull Requests Releases Activity

solve 35 in uiua (SLOW)

Browse Source
This commit is contained in:
Fredrik Robertsen
2025-09-07 10:39:21 +02:00
parent b8d781740c
commit 00805bbcf8
1 changed files with 12 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
35/main.ua Normal file
View File

@@ -0,0 +1,12 @@
# project euler 35
# is_prime(n) ? n
p ← =1⧻°/×
# is_circular_prime(n) ? n
c ← /↧≡p⍜⊥₁₀(≡↻⊙¤°⊏)
┌─╴test
⍤⤙≍ 1 /↧≡c[2 3 5 7 11 13 17 31 37 71 73 79 97]
└─╴
⧻▽⊸≡c +1⇡-1 1e6