until -package:netwire -package:prelude-compat -package:IfElse package:termonad

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