X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Data%2FFixed.hs;h=2b4fb26a967922fa35aada4cbed14471960aa603;hb=b5f74091bf655513e539c4048d789da89dd27ca7;hp=11fd4d1055a8accd308f351ec68c57091579fc9c;hpb=c97a57ca63193dea6ed2c6917accb8dc5f610fe0;p=ghc-base.git diff --git a/Data/Fixed.hs b/Data/Fixed.hs index 11fd4d1..2b4fb26 100644 --- a/Data/Fixed.hs +++ b/Data/Fixed.hs @@ -31,6 +31,8 @@ module Data.Fixed E12,Pico ) where +import Prelude -- necessary to get dependencies right + -- | generalisation of 'div' to any instance of Real div' :: (Real a,Integral b) => a -> a -> b div' n d = floor ((toRational n) / (toRational d))