diff --git a/eternity-timestamped.cabal b/eternity-timestamped.cabal
--- a/eternity-timestamped.cabal
+++ b/eternity-timestamped.cabal
@@ -1,15 +1,15 @@
 name:
   eternity-timestamped
 version:
-  0.3
+  0.4
 synopsis:
   Automatic timestamping for Eternity
 category:
   Database, Event-sourcing, Streaming, Eternity
 homepage:
-  https://github.com/metrix-ai/eternity-timestamped
+  https://github.com/metrix-ai/eternity-timestamped 
 bug-reports:
-  https://github.com/metrix-ai/eternity-timestamped/issues
+  https://github.com/metrix-ai/eternity-timestamped/issues 
 author:
   Nikita Volkov <nikita.y.volkov@mail.ru>
 maintainer:
@@ -40,7 +40,6 @@
     Haskell2010
   exposed-modules:
     Eternity.Timestamped.IO
-    Eternity.Timestamped.Foldl
     Eternity.Timestamped.Potoki.Consume
     Eternity.Timestamped.Potoki.Produce
     Eternity.Timestamped.Potoki.Transform
@@ -52,7 +51,6 @@
     cereal >=0.5.4 && <0.6,
     directory >=1.3 && <2,
     eternity >=0.1 && <0.2,
-    foldl >=1.3.5 && <2,
     generic-random >=1.1 && <1.2,
     hashable >=1.2 && <2,
     potoki >=0.11 && <0.12,
diff --git a/library/Eternity/Timestamped/Foldl.hs b/library/Eternity/Timestamped/Foldl.hs
deleted file mode 100644
--- a/library/Eternity/Timestamped/Foldl.hs
+++ /dev/null
@@ -1,30 +0,0 @@
-{-|
-Folds on timestamped values
--}
-module Eternity.Timestamped.Foldl
-where
-
-import Eternity.Timestamped.Prelude hiding (maximum)
-import Timestamp
-import Control.Foldl
-
-
-untimestamped :: Fold input output -> Fold (Timestamped input) output
-untimestamped =
-  premap (\ (Timestamped _ x) -> x)
-
-filteringByUtcTime :: (UTCTime -> Bool) -> Fold (Timestamped input) output -> Fold (Timestamped input) output
-filteringByUtcTime filter =
-  filteringByTimestamp (filter . timestampUtcTime)
-
-filteringByTimestamp :: (Timestamp -> Bool) -> Fold (Timestamped input) output -> Fold (Timestamped input) output
-filteringByTimestamp filter =
-  prefilter (\ (Timestamped ts _) -> filter ts)
-
-inUtcTimeRange :: UTCTime -> UTCTime -> Fold (Timestamped input) output -> Fold (Timestamped input) output
-inUtcTimeRange start end =
-  inTimestampRange (utcTimeTimestamp start) (utcTimeTimestamp end)
-
-inTimestampRange :: Timestamp -> Timestamp -> Fold (Timestamped input) output -> Fold (Timestamped input) output
-inTimestampRange start end =
-  filteringByTimestamp (\ ts -> ts >= start && ts < end)
diff --git a/library/Eternity/Timestamped/Prelude.hs b/library/Eternity/Timestamped/Prelude.hs
--- a/library/Eternity/Timestamped/Prelude.hs
+++ b/library/Eternity/Timestamped/Prelude.hs
@@ -70,10 +70,6 @@
 import Text.Read as Exports (Read(..), readMaybe, readEither)
 import Unsafe.Coerce as Exports
 
--- foldl
--------------------------
-import Control.Foldl as Exports (Fold(..), FoldM(..))
-
 -- cereal
 -------------------------
 import Data.Serialize as Exports (Serialize)