[Haskell-cafe] round function
achatzianastassiou at hotmail.com
Sun Feb 12 17:34:00 EST 2006
Thanks for the anwser Sebastian,
this seems to work, however I am trying to implement something like
Main> myfunction 123.456 2
>From: Sebastian Sylvan <sebastian.sylvan at gmail.com>
>Reply-To: sylvan at student.chalmers.se
>To: Chatzianastassiou Achilleas <achatzianastassiou at hotmail.com>
>CC: haskell-cafe at haskell.org
>Subject: Re: [Haskell-cafe] round function
>Date: Sun, 12 Feb 2006 22:23:17 +0100
>On 2/12/06, Chatzianastassiou Achilleas <achatzianastassiou at hotmail.com>
> > Hi all,
> > I am trying to implement a function that finds the significant figure of
> > number to a specified point i.e. 2.55555 3 = 2.556. I have implemented
> > something like:
> > sig :: (RealFrac a, Integral b) => a -> Int -> a
> > sig x y = round y
> > However this doesn't work. Moreover at the Prelude when i type round
> > 2 i get an error.
> > Any suggestions?
>myround n s = fromIntegral (round (n * factor)) / factor
> where factor = fromIntegral (10^s)
>Basically scaling it to bring the specified number of digits to the
>left of the decimal point, then rounding, then scaling back.
FREE pop-up blocking with the new MSN Toolbar get it now!
More information about the Haskell-Cafe