Better error messages for Replicate

1 files changed, 3 insertions, 3 deletions

diff --git a/src/r1.bqn b/src/r1.bqn
index 4c073ade..7b1c5d45 100644
--- a/src/r1.bqn
+++ b/src/r1.bqn
@@ -299,15 +299,15 @@ Rotate ← ⟨"⌽"
 
 RepInd←(2⌊=∘⊣)◶{
   𝕨↩(0⊑⥊)⍟IsArray𝕨
-  "𝕨/𝕩: Amounts to replicate must be natural numbers" ! Nat 𝕨
+  "𝕨/𝕩: 𝕨 must consist of natural numbers" ! Nat 𝕨
   e←r←𝕨
   {e+↩r⋄1+𝕩}⍟{e=𝕨}˜`↕r×𝕩
 }‿{
   "𝕨/𝕩: Lengths of components of 𝕨 must match 𝕩" ! 𝕩=≠𝕨
-  "𝕨/𝕩: Amounts to replicate must be natural numbers" ! 1×´|∘⌊⊸=⌜𝕨
+  "𝕨/𝕩: 𝕨 must consist of natural numbers" ! 1×´|∘⌊⊸=⌜𝕨
   Ind 𝕨
 }‿{
-  "𝕨/𝕩: Replication argument must have rank 0 or 1" ! 0˙
+  "𝕨/𝕩: Components of 𝕨 must have rank 0 or 1" ! 0˙
 }
 Replicate←⟨"/"
   ((0<≠)×´(1=Type)⌜)∘⥊, 1,1