>>> findIndices (`elem` "aeiou") "Hello World!" [1,4,7]
>>> findIndices (\l -> length l > 3) ["a", "bcde", "fgh", "ijklmnop"] [1,3]
>>> findIndices (`elem` "aeiou") "Hello World!" [1,4,7]
findIndices = fold Fold.findIndices
>>> findIndices p = Stream.scanMaybe (Fold.findIndices p)