diff options
Diffstat (limited to 'src/e.bqn')
| -rw-r--r-- | src/e.bqn | 5 |
1 files changed, 1 insertions, 4 deletions
@@ -45,10 +45,7 @@ Explain ← { "00000110111001001101000100" # Position determiner ⟩ m ← { # Mask of instruction starts - a ← ba(⊣⊏˜≠⊸>×⊢)b - na← ∾⟜≠ (≠-(1+↕∘≠)⊸(»·⌈`×)⌾⌽) <⟜128 b - n ← 1+{(𝕩=⌜a) +˝∘× >⊏⟜na⍟𝕩↕≠a}↕3 - ! ∧´ ↕∘≠⊸< n + n ← (↕≠b)+1+ba(⊣⊏˜≠⊸>×⊢)b Se←{(⊏˜𝕨)Se 1¨⌾((𝕩/𝕨)⊸⊏)𝕩}⍟(0=¯1⊑⊢) (≠↑∾⟜≠Se 1∾0¨) n } |
