@#example@
@(define s (set-int 1 2 3))@
@(define bin-edges (choose s 2))@
@(define hyper-edges (power-set s))@
@(describe bin-edges)@
@(describe hyper-edges)@
@#endexample@
@(bye)@
