rnhmjoj/number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Avoid conversion from floating point

Browse Source
This commit is contained in:
rnhmjoj 2015-08-20 20:38:54 +02:00
parent af0bbedd48
commit 6ed0732644
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/Data/Number/Functions.hs
View File

@ -5,7 +5,7 @@ import Data.Number.Types
import Data.Number.Instances import Data.Number.Instances
import Data.Number.Internal import Data.Number.Internal
import Data.Number.Peano import Data.Number.Peano
import Data.Ratio
-- Various -- -- Various --
@ -55,7 +55,7 @@ toList (x:|xs) = x : toList xs
-- --
-- <<https://i.imgur.com/S1F6UoI.png>> -- <<https://i.imgur.com/S1F6UoI.png>>
π :: Number π :: Number
π = toNumber pi π = toNumber (80143857 % 25510582)
-- | Euler's number: the base of the natural logarithm -- | Euler's number: the base of the natural logarithm
-- --