diff options
| author | Tom Smeding <tom@tomsmeding.com> | 2025-11-15 11:24:00 +0100 |
|---|---|---|
| committer | Tom Smeding <tom@tomsmeding.com> | 2025-11-15 11:24:00 +0100 |
| commit | f7025bc3727e5ee058df3dfebb1fb73b933ee6b0 (patch) | |
| tree | 250a2ef5924c2bce57a178fc5b302498d0f5b842 /ops | |
| parent | ad3f44c8b170298e63b8b57ee02cb88fbbd210fc (diff) | |
arith: Add IntElt instances for Int8 and Int16
Diffstat (limited to 'ops')
| -rw-r--r-- | ops/Data/Array/Strided/Arith/Internal.hs | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/ops/Data/Array/Strided/Arith/Internal.hs b/ops/Data/Array/Strided/Arith/Internal.hs index 6364802..d94fc65 100644 --- a/ops/Data/Array/Strided/Arith/Internal.hs +++ b/ops/Data/Array/Strided/Arith/Internal.hs @@ -860,6 +860,14 @@ class NumElt a => IntElt a where intEltQuot :: SNat n -> Array n a -> Array n a -> Array n a intEltRem :: SNat n -> Array n a -> Array n a -> Array n a +instance IntElt Int8 where + intEltQuot = quotVectorInt8 + intEltRem = remVectorInt8 + +instance IntElt Int16 where + intEltQuot = quotVectorInt16 + intEltRem = remVectorInt16 + instance IntElt Int32 where intEltQuot = quotVectorInt32 intEltRem = remVectorInt32 |
