diff options
Diffstat (limited to 'src/Data/Array')
| -rw-r--r-- | src/Data/Array/Nested/Internal.hs | 4 | 
1 files changed, 2 insertions, 2 deletions
| diff --git a/src/Data/Array/Nested/Internal.hs b/src/Data/Array/Nested/Internal.hs index 933ce6c..588237d 100644 --- a/src/Data/Array/Nested/Internal.hs +++ b/src/Data/Array/Nested/Internal.hs @@ -1626,12 +1626,12 @@ instance (Num a, PrimElt a) => Num (Shaped sh a) where    fromInteger _ = error "Data.Array.Nested.fromIntegral: No singletons available, use explicit sreplicate"  instance (Fractional a, PrimElt a) => Fractional (Shaped sh a) where -  fromRational _ = error "Data.Array.Nested.fromRational: No singletons available, use explicit rreplicate" +  fromRational _ = error "Data.Array.Nested.fromRational: No singletons available, use explicit sreplicate"    recip = arithPromoteShaped recip    (/) = arithPromoteShaped2 (/)  instance (Floating a, PrimElt a) => Floating (Shaped sh a) where -  pi = error "Data.Array.Nested.pi: No singletons available, use explicit rreplicate" +  pi = error "Data.Array.Nested.pi: No singletons available, use explicit sreplicate"    exp = arithPromoteShaped exp    log = arithPromoteShaped log    sqrt = arithPromoteShaped sqrt | 
