diff --git a/base-prelude.cabal b/base-prelude.cabal
--- a/base-prelude.cabal
+++ b/base-prelude.cabal
@@ -1,7 +1,7 @@
 name:
   base-prelude
 version:
-  0.1.14
+  0.1.15
 synopsis:
   The most complete prelude formed from only the "base" package
 description:
diff --git a/library/BasePrelude.hs b/library/BasePrelude.hs
--- a/library/BasePrelude.hs
+++ b/library/BasePrelude.hs
@@ -13,6 +13,8 @@
   traceShowId,
   traceM,
   traceShowM,
+  -- ** Data.Functor
+  ($>),
 )
 where
 
@@ -35,6 +37,7 @@
 import Data.Either as Exports
 import Data.Fixed as Exports
 import Data.Foldable as Exports
+import Data.Functor as Exports hiding (($>))
 import Data.Function as Exports hiding ((.), id)
 import Data.Int as Exports
 import Data.IORef as Exports
@@ -71,8 +74,6 @@
 import Text.Read as Exports (Read(..), readMaybe, readEither)
 import Unsafe.Coerce as Exports
 
-import qualified Text.ParserCombinators.ReadPrec as ReadPrec
-import qualified Text.ParserCombinators.ReadP as ReadP
 
 -- Reimplementations
 -------------------------
@@ -114,3 +115,9 @@
 -}
 traceShowM :: (Show a, Monad m) => a -> m ()
 traceShowM = traceM . show
+
+infixl 4 $>
+
+-- | Flipped version of '<$'.
+($>) :: Functor f => f a -> b -> f b
+($>) = flip (<$)