Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/include/packages/base/Data/Fixed.hi

Copyright © 2021 Plan 9 Foundation.
Distributed under the MIT License.
Download the Plan 9 distribution.


interface Data.Fixed where {

{-# NEED #-}
instance Prelude.Monad NHC.Internal.IO;

{-# NEED #-}
instance HasResolution E12;

{-# NEED #-}
instance HasResolution E6;

{-# NEED #-}
instance (HasResolution a) => Prelude.Fractional (Fixed a);

{-# NEED #-}
instance (Prelude.Integral a) => Prelude.Fractional (Ratio.Ratio a);

{-# NEED #-}
instance (HasResolution a) => Prelude.RealFrac (Fixed a);

{-# NEED #-}
instance (Prelude.Integral a) => Prelude.RealFrac (Ratio.Ratio a);

{-# NEED #-}
instance (HasResolution a) => Prelude.Real (Fixed a);

{-# NEED #-}
instance (Prelude.Integral a) => Prelude.Real (Ratio.Ratio a);

{-# NEED #-}
instance Prelude.Enum (Fixed a);

{-# NEED #-}
instance (Prelude.Integral a) => Prelude.Enum (Ratio.Ratio a);

{-# NEED #-}
instance (Prelude.Read a,Prelude.Integral a) => Prelude.Read (Ratio.Ratio a);

{-# NEED #-}
instance Prelude.Ord (Fixed a);

{-# NEED #-}
instance (Prelude.Integral a) => Prelude.Ord (Ratio.Ratio a);

{-# NEED #-}
instance Prelude.Eq (Fixed a);

{-# NEED #-}
instance (Prelude.Integral a) => Prelude.Eq (Ratio.Ratio a);

{-# NEED #-}
instance (HasResolution a) => Prelude.Show (Fixed a);

{-# NEED #-}
instance (Prelude.Integral a) => Prelude.Show (Ratio.Ratio a);

{-# NEED #-}
instance (Prelude.Show a) => Prelude.Show (NHC.Internal.IO a);

{-# NEED #-}
instance Prelude.Functor NHC.Internal.IO;

{-# NEED #-}
instance (HasResolution a) => Prelude.Num (Fixed a);

{-# NEED #-}
instance (Prelude.Integral a) => Prelude.Num (Ratio.Ratio a);
interface NHC.Internal
{-# NEED IO #-}
newtype {-#  #-} IO a;

{-# NEED World #-}
data World;
interface Ratio
{-# NEED Ratio #-}
data Ratio a;
interface ! Data.Fixed
{-# NEED Pico #-}
type {-# 2 #-} Pico = (Fixed E12);

{-# NEED E12 #-}
data E12;

{-# NEED Micro #-}
type {-# 1 #-} Micro = (Fixed E6);

{-# NEED E6 #-}
data E6;

{-# NEED showFixed #-}
showFixed{-# 2 #-}::(HasResolution a) => (Prelude.Bool -> ((Fixed a) -> Prelude.String));

{-# NEED {HasResolution resolution} #-}
class HasResolution a where {
  resolution{-# 1 #-}::(a -> Prelude.Integer);
};

{-# NEED {Fixed} #-}
newtype {-#  #-} Fixed a
  = MkFixed Prelude.Integer;

{-# NEED mod' #-}
mod'{-# 2 #-}::(Prelude.Real a) => (a -> (a -> a));

{-# NEED divMod' #-}
divMod'{-# 2 #-}::(Prelude.Real a,Prelude.Integral b) => (a -> (a -> (b,a)));

{-# NEED div' #-}
div'{-# 2 #-}::(Prelude.Real a,Prelude.Integral b) => (a -> (a -> b));
}

Bell Labs OSI certified Powered by Plan 9

(Return to Plan 9 Home Page)

Copyright © 2021 Plan 9 Foundation. All Rights Reserved.
Comments to webmaster@9p.io.