RosettaCodeData/Task/Power-set/SETL/power-set.setl

Pfour := pow({1, 2, 3, 4});
Pempty := pow({});
PPempty := pow(Pempty);

print(Pfour);
print(Pempty);
print(PPempty);