module MyPrelude where


import Data.List



listIndices :: [a] -> [Int]
listIndices = findIndices (const True)