diff --git a/Control/Monad/Random.hs b/Control/Monad/Random.hs
--- a/Control/Monad/Random.hs
+++ b/Control/Monad/Random.hs
@@ -1,6 +1,7 @@
 {-# LANGUAGE MultiParamTypeClasses #-}
 {-# LANGUAGE FlexibleInstances, UndecidableInstances #-}
 {-# LANGUAGE GeneralizedNewtypeDeriving #-}
+{-# OPTIONS -fno-warn-orphans #-}
 
 {- |
 Copyright    : 2006-2007 Cale Gibbard, Russell O'Connor, Dan Doel, Remi Turk, Eric Kidd.
@@ -47,7 +48,6 @@
 import Control.Monad.State
 import Control.Monad.Trans()
 import Control.Monad.Writer
-import Control.Monad.Fix
 import Control.Arrow
 import Control.Applicative
 
@@ -56,7 +56,7 @@
 newtype (RandomGen g) => RandT g m a = RandT (StateT g m a)
     deriving (Functor, Monad, MonadTrans, MonadIO, MonadFix)
 
-instance (Monad m) => Applicative (RandT g m) where
+instance (Functor m,Monad m) => Applicative (RandT g m) where
   pure = return
   (<*>) = ap
 
diff --git a/MonadRandom.cabal b/MonadRandom.cabal
--- a/MonadRandom.cabal
+++ b/MonadRandom.cabal
@@ -1,6 +1,6 @@
 Name:                MonadRandom
 Build-type:          Simple
-Version:             0.1.5
+Version:             0.1.6
 Synopsis:            Random-number generation monad.
 Description:         Support for computations which consume random values.
 License:             OtherLicense