diff --git a/src/Data/Number/Functions.hs b/src/Data/Number/Functions.hs
index 6ab8446..941f134 100644
--- a/src/Data/Number/Functions.hs
+++ b/src/Data/Number/Functions.hs
@@ -5,7 +5,7 @@ import Data.Number.Types
 import Data.Number.Instances
 import Data.Number.Internal
 import Data.Number.Peano
-
+import Data.Ratio
 
 -- Various --
 
@@ -55,7 +55,7 @@ toList (x:|xs) = x : toList xs
 --
 --  <<https://i.imgur.com/S1F6UoI.png>>
 π :: Number
-π = toNumber pi
+π = toNumber (80143857 % 25510582)
 
 -- | Euler's number: the base of the natural logarithm
 --