diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-05-06 20:51:09 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-05-06 20:51:09 -0400 |
| commit | 7617630baeaefd6cc13637021105bf79453a40ef (patch) | |
| tree | 91c47214b6f83400b0e355b7a30dcd5acd67c973 /src | |
| parent | 854fc160a685952c80a255c63d7676a752113c1c (diff) | |
Better fill handling in Depth modifier
Diffstat (limited to 'src')
| -rw-r--r-- | src/r1.bqn | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -650,11 +650,13 @@ ValidateRanks←{ _ranks ← {⟨2⟩⊘⟨1,0⟩ ValidateRanks 𝔽} _depthOp_←{ neg←0⊸>⌜n←𝕨𝔾_ranks𝕩 ⋄ F←𝔽 + fb←((3≤Type)◶1‿IsPure𝕗)⊑{𝕘⋄𝔽}‿{𝔽_fillBy_𝔾} + _tf←{𝕗⌜_fb_𝕗} ⋄ _ef←{𝕗_eachd _fb_ 𝕗} _d←{ r←0 ⋄ GR←𝕗{𝕩⋄gr↩0⋄R↩(𝕗+¨neg)_d} - Tw‿Tx←⟨1⟩⊸∾⍟(2>≠)neg{(𝕨×0≤𝕩)⊑⟨(0⌈𝕩)≥≡,1⟩}¨𝕗 + Tw‿Tx←⟨0⟩⊸∾⍟(2>≠)neg{(𝕨×0≤𝕩)⊑⟨(0⌈𝕩)<≡,0⟩}¨𝕗 (2×Tw)⊸+⟜Tx◶⟨ - {GR 0⋄𝕨R _each𝕩}, {GR 0⋄R⟜𝕩_table𝕨}, {GR 0⋄(𝕨R⊢)_table𝕩}, F + F, {GR 0⋄(𝕨R⊢)_tf𝕩}, {GR 0⋄R⟜𝕩_tf𝕨}, {GR 0⋄𝕨R _ef𝕩} ⟩ } 𝕨 n _d 𝕩 |