diff --git a/deferred-folds.cabal b/deferred-folds.cabal
--- a/deferred-folds.cabal
+++ b/deferred-folds.cabal
@@ -1,7 +1,7 @@
 name:
   deferred-folds
 version:
-  0.2
+  0.2.1
 category:
   Folding
 synopsis:
diff --git a/library/DeferredFolds/FoldlView.hs b/library/DeferredFolds/FoldlView.hs
--- a/library/DeferredFolds/FoldlView.hs
+++ b/library/DeferredFolds/FoldlView.hs
@@ -90,3 +90,14 @@
 {-# INLINE foldable #-}
 foldable :: Foldable foldable => foldable a -> FoldlView a
 foldable foldable = FoldlView (\ step init -> A.foldl' step init foldable)
+
+{-| Ints in the specified inclusive range -}
+intsInRange :: Int -> Int -> FoldlView Int
+intsInRange from to =
+  FoldlView $ \ step init ->
+  let
+    loop !state int =
+      if int <= to
+        then loop (step state int) (succ int)
+        else state
+    in loop init from