1 files changed, 2 insertions, 1 deletions
diff --git a/src/r.bqn b/src/r.bqn
index 594f7a76..d70f51c4 100644
--- a/src/r.bqn
+++ b/src/r.bqn
@@ -513,7 +513,8 @@ JoinTo←∨○(1<=)◶(∾○⥊)‿{
 } _fillBy_ IF
 
 Rep ← Indices⊸⊏
-Replicate ← IsArray∘⊣◶{
+Replicate ← (0<=∘⊣)◶{
+  𝕨↩(0⊑⥊)⍟IsArray𝕨
   "/: Amounts to replicate must be natural numbers" ! Nat 𝕨
   e←r←𝕨
   ({e+↩r⋄1+𝕩}⍟{e=𝕨}˜`↕r×≠𝕩) ⊏ 𝕩