diff options
Diffstat (limited to 'spec/reference.bqn')
| -rw-r--r-- | spec/reference.bqn | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/spec/reference.bqn b/spec/reference.bqn index 84f403bf..2072f96a 100644 --- a/spec/reference.bqn +++ b/spec/reference.bqn @@ -400,11 +400,11 @@ _grade←{ i⊐˜+´˘(𝔽⎉∞‿¯1⎉¯1‿∞˜𝕩)(⌈⟜0+=⟜0⊸×)>⌜˜i←↕≠𝕩 } _bins←{ - r←1-˜≠≢𝕨 - ! 0≤r - LE←0≤𝔽⎉r - ! ∧´LE´˘2↕<˘𝕩 - +´𝕨LE⎉¯1‿∞𝕩 + c←1-˜≠≢𝕨 + ! 0≤c + LE←𝔽⎉c≤0˜ + ! (0<≠)◶⟨1,∧´·LE´˘2↕<˘⟩𝕨 + 𝕨 (0<≠𝕨)◶⟨0⎉c∘⊢,(+´<˘)LE⎉¯1‿∞⟩ 𝕩 } OccurrenceCount ← ⊐˜(⊢-⊏)⍋∘⍋ |