until -package:basic-prelude -package:netwire -package:github package:numhask

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