diff --git a/library/Potoki/Consume.hs b/library/Potoki/Consume.hs
--- a/library/Potoki/Consume.hs
+++ b/library/Potoki/Consume.hs
@@ -38,11 +38,6 @@
 import qualified Potoki.Transform.Concurrency as B
 
 
-{-# INLINABLE transform #-}
-transform :: J.Transform input output -> Consume output sinkOutput -> Consume input sinkOutput
-transform (J.Transform transform) (Consume sink) =
-  Consume (transform >=> sink)
-
 {-# INLINABLE head #-}
 head :: Consume input (Maybe input)
 head =
diff --git a/library/Potoki/Produce.hs b/library/Potoki/Produce.hs
--- a/library/Potoki/Produce.hs
+++ b/library/Potoki/Produce.hs
@@ -29,14 +29,6 @@
 import qualified System.Directory as G
 
 
-{-# INLINE transform #-}
-transform :: F.Transform input output -> Produce input -> Produce output
-transform (F.Transform transformIO) (Produce produceIO) =
-  Produce $ do
-    (fetch, kill) <- produceIO
-    newFetch <- transformIO fetch
-    return (newFetch, kill)
-
 {-# INLINE vector #-}
 vector :: Vector input -> Produce input
 vector vector =
diff --git a/potoki.cabal b/potoki.cabal
--- a/potoki.cabal
+++ b/potoki.cabal
@@ -1,7 +1,7 @@
 name:
   potoki
 version:
-  0.7.3
+  0.8
 synopsis:
   Simple streaming in IO
 description:
@@ -81,7 +81,7 @@
     directory >=1.3 && <2,
     foldl >=1.3 && <2,
     hashable >=1 && <2,
-    potoki-core >=1.3 && <1.4,
+    potoki-core >=1.4 && <1.5,
     profunctors >=5.2 && <6,
     text >=1 && <2,
     unagi-chan >=0.4 && <0.5,