diff --git a/deferred-folds.cabal b/deferred-folds.cabal
--- a/deferred-folds.cabal
+++ b/deferred-folds.cabal
@@ -1,5 +1,5 @@
 name: deferred-folds
-version: 0.9.16
+version: 0.9.17
 category: Folding
 synopsis: Abstractions over deferred folds
 description:
diff --git a/library/DeferredFolds/Defs/Unfoldr.hs b/library/DeferredFolds/Defs/Unfoldr.hs
--- a/library/DeferredFolds/Defs/Unfoldr.hs
+++ b/library/DeferredFolds/Defs/Unfoldr.hs
@@ -52,6 +52,10 @@
   foldl' leftStep state (Unfoldr unfoldr) = unfoldr rightStep id state where
     rightStep element k state = k $! leftStep state element
 
+instance Traversable Unfoldr where
+  traverse f (Unfoldr unfoldr) =
+    unfoldr (\a next -> cons <$> f a <*> next) (pure mempty)
+
 instance Eq a => Eq (Unfoldr a) where
   (==) left right = toList left == toList right