until -package:monad-loops package:numhask

until p f yields the result of applying f until p holds.