Code from today's lecture, adapted for Racket sets.