Also replace replicateScal -> replicatePrim in error messages

1 files changed, 3 insertions, 3 deletions

diff --git a/src/Data/Array/Nested/Ranked/Base.hs b/src/Data/Array/Nested/Ranked/Base.hs
index 9df508d..11a8ffb 100644
--- a/src/Data/Array/Nested/Ranked/Base.hs
+++ b/src/Data/Array/Nested/Ranked/Base.hs
@@ -210,15 +210,15 @@ instance (NumElt a, PrimElt a) => Num (Ranked n a) where
   negate = liftRanked1 negate
   abs = liftRanked1 abs
   signum = liftRanked1 signum
-  fromInteger = error "Data.Array.Nested(Ranked).fromInteger: No singletons available, use explicit rreplicateScal"
+  fromInteger = error "Data.Array.Nested(Ranked).fromInteger: No singletons available, use explicit rreplicatePrim"
 
 instance (FloatElt a, PrimElt a) => Fractional (Ranked n a) where
-  fromRational _ = error "Data.Array.Nested(Ranked).fromRational: No singletons available, use explicit rreplicateScal"
+  fromRational _ = error "Data.Array.Nested(Ranked).fromRational: No singletons available, use explicit rreplicatePrim"
   recip = liftRanked1 recip
   (/) = liftRanked2 (/)
 
 instance (FloatElt a, PrimElt a) => Floating (Ranked n a) where
-  pi = error "Data.Array.Nested(Ranked).pi: No singletons available, use explicit rreplicateScal"
+  pi = error "Data.Array.Nested(Ranked).pi: No singletons available, use explicit rreplicatePrim"
   exp = liftRanked1 exp
   log = liftRanked1 log
   sqrt = liftRanked1 sqrt