aboutsummaryrefslogtreecommitdiff
path: root/src/Data/Array/Nested/Internal/Mixed.hs
diff options
context:
space:
mode:
authorTom Smeding <tom@tomsmeding.com>2025-03-12 23:17:48 +0100
committerTom Smeding <tom@tomsmeding.com>2025-03-12 23:17:48 +0100
commit11c3fda9ff63c466566e1f1375f5d8ae03833c90 (patch)
tree44e55620cbd655f83c5e28e7492169baeaa7ca52 /src/Data/Array/Nested/Internal/Mixed.hs
parent766a925698a97cac03e972bdaa2500085be17c65 (diff)
Slight cleanup of arith instances for Mixed/Ranked/Shaped
Reformulate error messages; add NumElt superclass to FloatElt
Diffstat (limited to 'src/Data/Array/Nested/Internal/Mixed.hs')
-rw-r--r--src/Data/Array/Nested/Internal/Mixed.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Data/Array/Nested/Internal/Mixed.hs b/src/Data/Array/Nested/Internal/Mixed.hs
index d8b7912..b72581e 100644
--- a/src/Data/Array/Nested/Internal/Mixed.hs
+++ b/src/Data/Array/Nested/Internal/Mixed.hs
@@ -232,14 +232,14 @@ instance (NumElt a, PrimElt a, Num a) => Num (Mixed sh a) where
abs = mliftNumElt1 numEltAbs
signum = mliftNumElt1 numEltSignum
-- TODO: THIS IS BAD, WE NEED TO REMOVE THIS
- fromInteger = error "Mixed(fromInteger): Cannot implement fromInteger, use mreplicateScal"
+ fromInteger = error "Data.Array.Nested.fromInteger: Cannot implement fromInteger, use mreplicateScal"
-instance (FloatElt a, NumElt a, PrimElt a, Num a) => Fractional (Mixed sh a) where
+instance (FloatElt a, PrimElt a, Num a) => Fractional (Mixed sh a) where
fromRational _ = error "Data.Array.Nested.fromRational: No singletons available, use explicit mreplicate"
recip = mliftNumElt1 floatEltRecip
(/) = mliftNumElt2 floatEltDiv
-instance (FloatElt a, NumElt a, PrimElt a, Num a) => Floating (Mixed sh a) where
+instance (FloatElt a, PrimElt a, Num a) => Floating (Mixed sh a) where
pi = error "Data.Array.Nested.pi: No singletons available, use explicit mreplicate"
exp = mliftNumElt1 floatEltExp
log = mliftNumElt1 floatEltLog