until -package:singletons-base -package:free -is:exact package:ghc

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