Avoid checking if 𝔽 is pure for Depth (⚇) that doesn't map

1 files changed, 2 insertions, 2 deletions

diff --git a/src/r1.bqn b/src/r1.bqn
index f8768100..7b9d88a0 100644
--- a/src/r1.bqn
+++ b/src/r1.bqn
@@ -807,10 +807,10 @@ ValidateRanks←{
 _ranks ← {⟨2⟩⊘⟨1,0⟩ ValidateRanks 𝔽}
 _depthOp_←{
   neg←0⊸>⌜n←𝕨𝔾_ranks𝕩 ⋄ F←𝔽 ⋄ B←{𝕏}⊘{𝕨˙⊸𝕏}
-  fb←((3≤Type)◶1‿IsPure𝕗)⊑{𝕘⋄𝔽}‿{𝔽_fillBy_𝔾}
+  fb←0 ⋄ SFB←{𝕩⋄sfb↩0⋄fb↩((3≤Type)◶1‿IsPure f)⊑{𝕘⋄𝔽}‿{𝔽_fillBy_𝔾}}
   _tf←{𝕗⌜_fb_𝕗} ⋄ _ef←{𝕗_eachd _fb_ 𝕗}
   _d←{
-    r←0 ⋄ GR←𝕗{𝕩⋄gr↩0⋄R↩(𝕗+¨neg)_d}
+    r←0 ⋄ GR←𝕗{SFB𝕩⋄gr↩0⋄R↩(𝕗+¨neg)_d}
     Tw‿Tx←⟨0⟩⊸∾⍟(2>≠)neg{(𝕨×0≤𝕩)⊑⟨(0⌈𝕩)<≡,0⟩}¨𝕗
     (2×Tw)⊸+⟜Tx◶⟨
       F, {GR 0⋄(𝕨 B r)_tf𝕩}, {GR 0⋄R⟜(𝕩˙)_tf𝕨}, {GR 0⋄𝕨R _ef𝕩}