until -package:singletons-base -package:IfElse package:numhask

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