Wie mache ich ein Powerset in DrRacket?

Ich verwende die Anfangssprache mit Listenabkürzungen für DrRacket und möchte ein Powerset rekursiv erstellen, kann aber nicht herausfinden, wie das geht. Ich habe derzeit so viel

(define
  (powerset aL)
  (cond
    [(empty? aL) (list)]

Jede Hilfe wäre gut.