diff --git a/66/main.ua b/66/main.ua new file mode 100644 index 0000000..e4aa9d7 --- /dev/null +++ b/66/main.ua @@ -0,0 +1,22 @@ +# Experimental! +# ? x y D +F ← =1˜-⊙×∩°√ +⍤⤙≍ 1 F 9 4 5 + +D ← ▽⊸(≠⟜⌊√)+1⇡29 +y ← +1⍚⇡ ⌈×2°√/↥D +x ← ⍚(˜↯1)≡◇⧻ y + +Iter ← ( + ◡F + ⊸(=1/↥≡◇/↥) + ⨬(◌ + | ⊙⊟₄⊸(≡◇˜∊1) + ⧋↘₁∩°□⊃⊢⊣ ⧋⊕□ + ⊙(⊂≡◇(⊂⊙¤⧋▽⊙(∩≡°□⊃↘↙¯1)°□⊃⊢↘₁)) + ⊙⊙≡°□⧋°⊟₃ + ) +) +# Iter x y D [] +◌◌◌⍢(+1Iter|>0⋅⋅⧻) x y D [] +⊢°¤⧋⊢⤸2 ? diff --git a/66/test.ua b/66/test.ua new file mode 100644 index 0000000..2bc3463 --- /dev/null +++ b/66/test.ua @@ -0,0 +1,6 @@ +# Experimental! +# ? x y D +F ← =1˜-⊙×∩°√ +◴≡(⇌⍆) ♭₂ wait pool⊞⊟ ∩+₁⊃⇡(⇡×29) 1000 +≡˜⊂¤29 +▽⊸(F≡°⊟₃)