From de7e162e6865b9e805154b7c7178406309746e6f Mon Sep 17 00:00:00 2001
From: Teddy Wing
Date: Sun, 20 Aug 2017 12:45:17 +0200
Subject: Factorial: Use `Integral`

Apparently that's short for `Enum a, Num a`.
---
 src/Plugin/Factorial.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/Plugin/Factorial.hs b/src/Plugin/Factorial.hs
index f8cfee2..692d20f 100644
--- a/src/Plugin/Factorial.hs
+++ b/src/Plugin/Factorial.hs
@@ -25,5 +25,5 @@ factorialAction message = do
             let number = last m
             return $ Right $ showt $ calculate $ (read number :: Int)
 
-calculate :: (Enum a, Num a) => a -> a
+calculate :: (Integral a) => a -> a
 calculate n = product [1..n]
-- 
cgit v1.2.3