diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/r1.bqn | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -696,8 +696,8 @@ _repeat_←{ ⋆ ↩ ⋆ _perv √ ← ⋆⟜(÷2) ⊘ (⋆⟜÷˜) | ← (| ⊘ (>○|◶{𝕩-𝕨×⌊𝕩÷𝕨}‿(+⍟(<⟜0◶⟨0⊸>,0⊸<⟩))) ) _perv -⌊ ↩ (⌊ ⊘ {(𝕨>𝕩)⊑𝕨‿𝕩}) _perv -⌈ ↩ (-∘⌊∘- ⊘ {(𝕨<𝕩)⊑𝕨‿𝕩}) _perv +⌊ ↩ (⌊ ⊘ (⊣⍟<)) _perv +⌈ ↩ (-∘⌊∘- ⊘ (⊣⍟>)) _perv ∧ ← ⍋⊸⊏ ⊘ (× _perv) ∨ ← ⍒⊸⊏ ⊘ ((+-×) _perv) × ↩ (0⊸(<->) ⊘ ×) _perv |
