入力リストに何を入れても、セットを取り、重複するエントリなしでパワーセットを出力するパワーセット関数をhaskellで作成する必要があります。例: [1,1] は [[],[1]] を返す必要があります。
powerset [] = [[]]
powerset (x:xs) = union((powerset xs)) (map (x:) (powerset xs))
union は、以前に定義された関数であり、重複することなく 2 つのセットに隣接します。上記のコードの問題は、重複を元のエントリとしてカウントするため、入力 [1,1] が [[],[1],[1],[1,1]] を返すことです。
何か案は？パワーセットをトリガーする前に、入力リストと空のリストでユニオンを使用して重複をスクラブすることを考えましたが、それがどのように見えるかはわかりません。