diff options
Diffstat (limited to 'spec/reference.bqn')
| -rw-r--r-- | spec/reference.bqn | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/spec/reference.bqn b/spec/reference.bqn index 6ecf59d3..5a6ab5ab 100644 --- a/spec/reference.bqn +++ b/spec/reference.bqn @@ -196,7 +196,10 @@ Unbox←(0<≠∘⥊)◶⊢‿{ _ranks ← {⟨2⟩⊘⟨1,0⟩((⊣-1+|)˜⟜≠⊑¨<∘⊢)⥊∘𝔽} _depthOp_←{ neg←0>n←𝕨𝔾_ranks𝕩 ⋄ F←𝔽 - _d←{𝕨(∧´(neg∧𝕗≥0)∨(0⌈𝕗)≥Pair○≡)◶⟨(𝕗+neg)_d¨⋄F⟩𝕩} + _d←{ + R←(𝕗+neg)_d + 𝕨(2⥊(neg∧𝕗≥0)∨(0⌈𝕗)≥Pair○≡)◶(⟨R¨⋄R⟜𝕩¨∘⊣⟩≍⟨(𝕨R⊢)¨∘⊢⋄F⟩)𝕩 + } 𝕨 n _d 𝕩 } _rankOp_←{ @@ -220,7 +223,7 @@ _scan←{ } _iterate_←{ n←𝕨𝔾𝕩 - F←𝕨(0⊘1)◶⟨𝔽,𝕨𝔽⊢⟩⊢ + f←⊑𝕨⟨𝔽⟩⊘⟨𝕨𝔽⊢⟩𝕩 l←u←0 {!Int𝕩⋄l↩l⌊𝕩⋄u↩u⌈𝕩}⚇0 n a←𝕩⋄_p←{𝔽∘⊣`(1+𝕩)⥊<a} |