commit bbc65e5ddd606a11223881cd0e57a69b4ca64482 parent 4a77af08984f9ab99faccb33bd3a356668e20483 Author: Luis Casillas <luis.casillas@progressfin.com> Date: Thu, 11 Feb 2016 12:55:05 -0800 Indentation. Diffstat:
M | src/System/Random/MWC/Probability.hs | | | 6 | +++--- |
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/src/System/Random/MWC/Probability.hs b/src/System/Random/MWC/Probability.hs @@ -126,9 +126,9 @@ instance MonadIO m => MonadIO (Prob m) where liftIO m = Prob $ const (liftIO m) instance PrimMonad m => PrimMonad (Prob m) where - type PrimState (Prob m) = PrimState m - primitive = lift . primitive - {-# INLINE primitive #-} + type PrimState (Prob m) = PrimState m + primitive = lift . primitive + {-# INLINE primitive #-} -- | The uniform distribution. uniform :: (PrimMonad m, Variate a) => Prob m a