diff --git a/44/main.ua b/44/main.ua new file mode 100644 index 0000000..40df448 --- /dev/null +++ b/44/main.ua @@ -0,0 +1,10 @@ +# Experimental! +# project euler 44 +p ← ÷2×⊸(-1×3) +c ← =0-⊸⌊°p +# ⧈₂/(↧∩c⊃+-) p +1⇡100 +# ⍢+₁/(¬↥∩c⊃+-∩p) 1_2 +# &p⟜/-p +⌊▽⊸(c∂p) +1.5⇡100000000 +≡(p⊂⟜+₁) +▽⊸(c≡/+)