From c73b7c2aa9af05e1245a1ab6d47aa39d0453f1e9 Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Wed, 20 Jan 2021 16:41:48 -0500
Subject: Fix Fill computation for Suffixes

---
 src/r.bqn | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/r.bqn b/src/r.bqn
index 93886f2a..3940e5b8 100644
--- a/src/r.bqn
+++ b/src/r.bqn
@@ -149,7 +149,7 @@ Prefixes←{
 Suffixes←{
   "↓𝕩: 𝕩 must have rank at least 1" ! 1≤=𝕩
   l←≠𝕩
-  0⊸⊑⊸Fill {𝕩⊸+⌜↕l-𝕩}⊸⊏⟜𝕩⌜ ↕1+l
+  l⊸⊑⊸Fill {𝕩⊸+⌜↕l-𝕩}⊸⊏⟜𝕩⌜ ↕1+l
 }
 
 _sort ← {(𝕗⊑⟨Cmp,Cmp˜⟩)_grade_𝕗 ⊸ ⊏}
-- 
cgit v1.2.3