aboutsummaryrefslogtreecommitdiff
path: root/src/eu.bqn
diff options
context:
space:
mode:
Diffstat (limited to 'src/eu.bqn')
-rw-r--r--src/eu.bqn4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/eu.bqn b/src/eu.bqn
index 39677b54..0f3d0a20 100644
--- a/src/eu.bqn
+++ b/src/eu.bqn
@@ -14,8 +14,8 @@ Explain ← {
m ← { # Mask of instruction starts
n ← (↕≠b)+1+ba(⊣⊏˜≠⊸>×⊢)b
- Se←{(⊏˜𝕨)Se 1¨⌾((𝕩/𝕨)⊸⊏)𝕩}⍟(0=¯1⊑⊢)
- (≠↑∾⟜≠Se 1∾0¨) n
+ Se←≠(>/⊢)∾⟜≠{(⊏˜𝕨)𝕊⍟(≠○(¯1⊸⊑))𝕩∾𝕩⊏𝕨}⟨0⟩˙
+ (≠↑·/⁼Se) n
}
mb‿mi ← 0‿¯1 ↓¨ m⊸/¨ b‿i
la←¯1=na←mb⊏bc