1 files changed, 2 insertions, 2 deletions

diff --git a/packages/base/src/Internal/Numeric.hs b/packages/base/src/Internal/Numeric.hs
index 2ef96bf..ca17c23 100644
--- a/packages/base/src/Internal/Numeric.hs
+++ b/packages/base/src/Internal/Numeric.hs
@@ -398,8 +398,8 @@ arctan2 = arctan2'
 --
 -- >>> cmod 3 (range 5)
 -- fromList [0,1,2,0,1]
-cmod :: (Integral e, Container c e) => Int -> c e -> c e
-cmod m = cmod' (fromIntegral m)
+cmod :: (Integral e, Container c e) => e -> c e -> c e
+cmod = cmod'
 
 -- |
 -- >>>fromInt ((2><2) [0..3]) :: Matrix (Complex Double)