@hackage almost-fix0.0.1

Recurse while a predicate is satisfied