aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/r.bqn6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/r.bqn b/src/r.bqn
index f2894a1e..af3ef84f 100644
--- a/src/r.bqn
+++ b/src/r.bqn
@@ -213,7 +213,7 @@ _under_←{
_at_ ← {(↕≠𝕩) 𝔽⍟((𝔾𝕩)=⊣)¨ 𝕩}
Set ← 0⊸{ (𝕨≥≠root)◶⟨≢⥊(1+𝕨)⊸𝕊_at_(𝕨⊑root˙)∘⥊, Set1⟩ 𝕩 }
IsArray∘root◶⟨1⊑0⊑𝕨˙, Set⟩ 𝕩
- }
+ } _fillBy_ ⊢
IsStructErr◶⟨Struct⟜(𝕩˙), {𝕏val}·Inverse𝔾˙⟩ val GetInserts ind
}
Recompose ← ⊣◶⟨
@@ -524,8 +524,8 @@ Replicate ← IsArray∘⊣◶{
↕ ↩ Range ⊘ Windows
⌽ ← Reverse ⊘ (Rot _onAxes_ 0)
/ ← Indices ⊘ Replicate
-» ← FC⊸ShiftBefore ⊘ ShiftBefore
-« ← FC⊸ShiftAfter ⊘ ShiftAfter
+» ← FC⊸ShiftBefore ⊘ ShiftBefore _fillBy_ (⊢⊘IF)
+« ← FC⊸ShiftAfter ⊘ ShiftAfter _fillBy_ (⊢⊘IF)
_group←{
"⊔: Grouping argument must consist of integers" ! ∧´Int⌜𝕩