until -package:singletons -package:hosc package:protolude

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