Scheme program that produces the power set of a set in sorted order