aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-01-24 20:45:51 -0500
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-01-24 20:45:51 -0500
commit89921b8089964e5ad20f7c2711b44294a391b06d (patch)
treedd075dc80b12bdd3e60be28978b48e4208865de7 /src
parentac2854ae1408fb2a0f03ccccb57e338202fbb9da (diff)
Allow cells to inherit the overall array fill in Rank modifier
Diffstat (limited to 'src')
-rw-r--r--src/r.bqn2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/r.bqn b/src/r.bqn
index af3ef84f..4315e700 100644
--- a/src/r.bqn
+++ b/src/r.bqn
@@ -481,7 +481,7 @@ _rankOp_←{
Enc←{
f←(↕𝕨)⊏≢𝕩
c←×´s←𝕨Cell𝕩
- f⥊⊑⟜(⥊𝕩)⌜∘((s⥊↕c)+c×⊢)⌜↕×´f
+ f⥊((⥊𝕩)⊏˜(s⥊↕c)+c×⊢)⌜↕×´f
}
Enc↩(>⟜0×1+≥⟜=)◶⟨<⊢,Enc,<⌜⊢⟩
> ((0⊑k)Enc𝕨) 𝔽¨ ((1-˜≠)⊸⊑k)Enc𝕩