I do like the higher-order version. But here's a version that does it all in one function:
fun {PowerSet L}
case L
of nil then nil
[] H|T then
choice H|{PowerSet T} [] {PowerSet T} end
end
end
--Mark
_________________________________________________________________________________
mozart-users mailing list
[email protected]
http://www.mozart-oz.org/mailman/listinfo/mozart-users
