alpha_progress

more or less generalized :accept: